nint_vec Function

private pure elemental function nint_vec(this)

Overload the nint intrinsic for a vec3 elementwise

Arguments

Type	Intent	Optional	Attributes		Name
type(vector),	intent(in)			::	this	Input vector

Return Value type(vector)

Source Code

        type(vector) pure elemental function nint_vec(this)
            !! Overload the nint intrinsic for a vec3 elementwise
            !> Input vector
            type(vector), intent(IN) :: this

            nint_vec = vector(real(nint(this%x), kind=wp), real(nint(this%y), kind=wp), real(nint(this%z), kind=wp))

        end function nint_vec