do_concurrent_k Module Procedure

module procedure do_concurrent_k pure module subroutine do_concurrent_k(speeds, vel, k) Interface →

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=c_double),	intent(in)			::	speeds(:)
real(kind=c_double),	intent(in)			::	vel(:)
integer(kind=c_int),	intent(out),		allocatable	::	k(:)