segment_release Subroutine

private subroutine segment_release(self)

Forget the render nodes (see artist_release).

Type Bound

SegmentArtist

Arguments

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

Calls

proc~~segment_release~~CallsGraph proc~segment_release SegmentArtist%segment_release proc~artist_release TrajectoryArtist%artist_release proc~segment_release->proc~artist_release proc~release~2 LineChain%release proc~segment_release->proc~release~2 interface~vkf_node_delete vkf_node_delete proc~release~2->interface~vkf_node_delete

Source Code

    subroutine segment_release(self)
        class(SegmentArtist), intent(inout) :: self
        call self%chain%release()
        self%n_written = 0
        self%n_drawn = 0
        call artist_release(self)
    end subroutine segment_release