get_vector_from_vel_dens Interface

interface
private pure function get_vector_from_vel_dens(vel, dens) result(vector)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rk),	intent(in)			::	vel(:)	velocity
real(kind=rk),	intent(in)			::	dens	density

Return Value real(kind=rk)(3)

momentum

Description

function pointer to get pdf equilibrium from vel and density