move_particles_cumul Function

private pure function move_particles_cumul(GAS_spec, previous, src, tgt) result(res)

Move particles from src -> tgt and as many particles as possible from the right of tgt.

Arguments

Type IntentOptional Attributes Name
type(CumulGASSpec_t), intent(in) :: GAS_spec
integer, intent(in) :: previous(:)

The previous supergroup

integer, intent(in) :: src

Source and target GAS space

integer, intent(in) :: tgt

Source and target GAS space

Return Value integer, (size(previous))


Contents