trajectory_path_position Function

private function trajectory_path_position(self, t) result(p)

The trajectory's position at time t (point_at: linear between its points, its first or last point outside its times; 0 if it has none).

Type Bound

TrajectoryPath

Arguments

Type IntentOptional Attributes Name
class(TrajectoryPath), intent(in) :: self
real(kind=wp), intent(in) :: t

the time

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


Calls

proc~~trajectory_path_position~~CallsGraph proc~trajectory_path_position TrajectoryPath%trajectory_path_position proc~point_at Trajectory%point_at proc~trajectory_path_position->proc~point_at proc~num_points Trajectory%num_points proc~point_at->proc~num_points proc~point_between Trajectory%point_between proc~point_at->proc~point_between proc~point~2 Trajectory%point proc~point_at->proc~point~2 proc~position_sources position_sources proc~point_at->proc~position_sources proc~time_index Trajectory%time_index proc~point_at->proc~time_index proc~point_between->proc~num_points proc~point_between->proc~point~2 proc~time_fraction Trajectory%time_fraction proc~point_between->proc~time_fraction proc~time_distance Trajectory%time_distance proc~time_index->proc~time_distance

Source Code

    function trajectory_path_position(self, t) result(p)
        class(TrajectoryPath), intent(in) :: self
        real(wp), intent(in) :: t                           !! the time
        real(wp) :: p(3)
        p = 0.0_wp
        if (associated(self%trajectory)) p = self%trajectory%point_at(t)
    end function trajectory_path_position