clear Subroutine

private subroutine clear(self)

Remove all points (keeping the memory).

Type Bound

Trajectory

Arguments

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

Called by

proc~~clear~~CalledByGraph proc~clear Trajectory%clear proc~set_dof Trajectory%set_dof proc~set_dof->proc~clear proc~set_num_optionals Trajectory%set_num_optionals proc~set_num_optionals->proc~clear

Source Code

    subroutine clear(self)
        class(Trajectory), intent(inout) :: self
        self%n_times = 0
        self%n_pos = 0
        self%n_att = 0
        self%n_col = 0
        self%generation_ = self%generation_ + 1
        self%revision_ = self%revision_ + 1
    end subroutine clear