set_default_data Subroutine

private subroutine set_default_data(self)

Use the trajectories' positions (per the first trajectory's DOF).

Type Bound

TrajectoryFollower

Arguments

Type IntentOptional Attributes Name
class(TrajectoryFollower), intent(inout) :: self

Calls

proc~~set_default_data~~CallsGraph proc~set_default_data TrajectoryFollower%set_default_data proc~dof Trajectory%dof proc~set_default_data->proc~dof proc~next_motion_stamp next_motion_stamp proc~set_default_data->proc~next_motion_stamp proc~position_sources position_sources proc~set_default_data->proc~position_sources

Called by

proc~~set_default_data~~CalledByGraph proc~set_default_data TrajectoryFollower%set_default_data proc~add_trajectory TrajectoryFollower%add_trajectory proc~add_trajectory->proc~set_default_data proc~follow ReferenceFrame%follow proc~follow->proc~add_trajectory proc~set_trajectory~2 TrajectoryFollower%set_trajectory proc~follow->proc~set_trajectory~2 proc~set_trajectory~2->proc~add_trajectory

Source Code

    subroutine set_default_data(self)
        class(TrajectoryFollower), intent(inout) :: self
        if (self%n > 0) then
            self%sources_ = position_sources(self%trajs(1)%p%dof())
        else
            self%sources_ = position_sources(0)
        end if
        self%default_data = .true.
        self%stamp_ = next_motion_stamp()
    end subroutine set_default_data