get_sigma_d2q9 Function

private pure function get_sigma_d2q9(vel) result(sigma)

This function computes the sigma vector necessary to get the

Arguments

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

Return Value real(kind=rk), (9)

output is sigma vector