draw Subroutine

private subroutine draw(self, k)

Draw points 1 .. k (no upload).

Type Bound

LineChain

Arguments

Type IntentOptional Attributes Name
class(LineChain), intent(in) :: self
integer, intent(in) :: k

last point drawn (chain index)

Calls

proc~~draw~~CallsGraph proc~draw LineChain%draw proc~draw_range LineChain%draw_range proc~draw->proc~draw_range interface~vkf_line_set_range vkf_line_set_range proc~draw_range->interface~vkf_line_set_range proc~check_status check_status proc~draw_range->proc~check_status

Called by

proc~~draw~~CalledByGraph proc~draw LineChain%draw proc~draw_written draw_written proc~draw_written->proc~draw proc~marker_update MarkerArtist%marker_update proc~marker_update->proc~draw proc~write_segments~2 write_segments proc~write_segments~2->proc~draw proc~chain_update ChainArtist%chain_update proc~chain_update->proc~draw_written proc~curve_update CurveArtist%curve_update proc~curve_update->proc~draw_written proc~segments_late_update CustomLineSegments%segments_late_update proc~segments_late_update->proc~write_segments~2

Source Code

    subroutine draw(self, k)
        class(LineChain), intent(in) :: self
        integer, intent(in) :: k                !! last point drawn (chain index)
        call self%draw_range(1, k)
    end subroutine draw