optional Function

private pure function optional(self, i, k) result(v)

Optional vector k (1 to num_optionals) of position i.

Type Bound

Trajectory

Arguments

Type IntentOptional Attributes Name
class(Trajectory), intent(in) :: self
integer, intent(in) :: i

the position (1 to num_positions); the optional (1 to num_optionals)
integer, intent(in) :: k

the position (1 to num_positions); the optional (1 to num_optionals)

Return Value real(kind=wp), (3)


Source Code

    pure function optional(self, i, k) result(v)
        class(Trajectory), intent(in) :: self
        integer, intent(in) :: i, k                         !! the position (1 to num_positions); the optional (1 to num_optionals)
        real(wp) :: v(3)
        v = self%posopt(:, k, i)
    end function optional