abs_vec Function

private pure elemental function abs_vec(this)

Calculate the absoulte of a vector elementwise

Arguments

Type IntentOptional Attributes Name
type(vector), intent(in) :: this

Input vector

Return Value type(vector)


Source Code

        type(vector) pure elemental function abs_vec(this)
        !! Calculate the absoulte of a vector elementwise
            !> Input vector
            type(vector), intent(IN) :: this

            abs_vec = vector(abs(this%x), abs(this%y), abs(this%z))

        end function abs_vec