132    SUBROUTINE nhc_to_particle_mapping(thermostat_info, simpar, local_molecules, &  argument
137       TYPE(distribution_1d_type), POINTER                :: local_molecules  local
166 …                        molecule_kind_set, local_molecules, molecule_set, para_env, natoms_local, &
236 …                             massive_atom_list, molecule_kind_set, local_molecules, molecule_set, &  argument
243       TYPE(distribution_1d_type), POINTER                :: local_molecules  local
272 …                        molecule_kind_set, local_molecules, molecule_set, para_env, natoms_local, &
300    SUBROUTINE nhc_to_particle_mapping_slow(thermostat_info, simpar, local_molecules, &  argument
305       TYPE(distribution_1d_type), POINTER                :: local_molecules  local
330 …                        molecule_kind_set, local_molecules, molecule_set, para_env, natoms_local, &
396    SUBROUTINE nhc_to_particle_mapping_fast(thermostat_info, simpar, local_molecules, &  argument
401       TYPE(distribution_1d_type), POINTER                :: local_molecules  local
426 …                        molecule_kind_set, local_molecules, molecule_set, para_env, natoms_local, &
497 …                             massive_atom_list, molecule_kind_set, local_molecules, molecule_set, &  argument
504       TYPE(distribution_1d_type), POINTER                :: local_molecules  local
533 …                        molecule_kind_set, local_molecules, molecule_set, para_env, natoms_local, &
560    SUBROUTINE nhc_to_shell_mapping(thermostat_info, simpar, local_molecules, &  argument
565       TYPE(distribution_1d_type), POINTER                :: local_molecules  local
593 …                        molecule_kind_set, local_molecules, molecule_set, para_env, nshell_local, &