unitVec Function

public pure function unitVec(aVec)

Normalizes a non-zero 3d vector

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in),		dimension(3)	::	aVec

Return Value real(kind=dp), dimension(3)