exchangeVelocities_DPS Subroutine

public subroutine exchangeVelocities_DPS(this, send, recv, comm, myRank, message_flag)

exchangeVelocities exchanges particles continuous velocities after they have been updated by the particle owner. Each process sends velocity updates for particles they own and receives updates for particles which they do not own, but that do exist in their particleGroup.

Arguments

Type IntentOptional Attributes Name
type(mus_particle_group_type), intent(inout) :: this

particleGroup of this process

type(mus_particles_communication_type), intent(inout) :: send

Communication type for sending force contributions

type(mus_particles_communication_type), intent(inout) :: recv

Communication type for receiving force contributions

integer, intent(in) :: comm

MPI communicator

integer, intent(in) :: myRank

Rank of this process

integer, intent(in) :: message_flag

Flag for message (in Musubi this is just iLevel, don't think we really need this here)