curve_set_trajectory Subroutine

private subroutine curve_set_trajectory(self, traj)

Draw traj; with the default data sources, its positions (per its DOF).

Type Bound

CurveArtist

Arguments

Type IntentOptional Attributes Name
class(CurveArtist), intent(inout) :: self
type(Trajectory), intent(in), target :: traj

the trajectory to draw (not owned)

Calls

proc~~curve_set_trajectory~~CallsGraph proc~curve_set_trajectory CurveArtist%curve_set_trajectory proc~dof Trajectory%dof proc~curve_set_trajectory->proc~dof proc~position_sources position_sources proc~curve_set_trajectory->proc~position_sources

Called by

proc~~curve_set_trajectory~~CalledByGraph proc~curve_set_trajectory CurveArtist%curve_set_trajectory proc~new_curve_artist new_curve_artist proc~new_curve_artist->proc~curve_set_trajectory interface~curveartist CurveArtist interface~curveartist->proc~new_curve_artist

Source Code

    subroutine curve_set_trajectory(self, traj)
        class(CurveArtist), intent(inout) :: self
        type(Trajectory), intent(in), target :: traj        !! the trajectory to draw (not owned)
        self%traj => traj
        if (self%default_data) self%sources_ = position_sources(traj%dof())
        self%seen_generation = -1
    end subroutine curve_set_trajectory