do_concurrent_my_velocities Module Procedure

module procedure do_concurrent_my_velocities pure module subroutine do_concurrent_my_velocities(nsteps, dir, sampled_speeds, my_velocities)

Arguments

Type IntentOptional Attributes Name
integer(kind=c_int), intent(in) :: nsteps
real(kind=c_double), intent(in) :: dir(:,:,:)
real(kind=c_double), intent(in) :: sampled_speeds(:,:)
real(kind=c_double), intent(out), allocatable :: my_velocities(:,:,:)