get_momentum_from_vel_dens_incompressible Function

private pure function get_momentum_from_vel_dens_incompressible(vel, dens) result(vector)

function pointer to get momentum from vel and density for any stencil

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