drawn_color Function

private function drawn_color(self, i) result(rgba)

The color of point i (1 to num_drawn) as drawn: read back from the line buffers.

Type Bound

CurveArtist

Arguments

Type IntentOptional Attributes Name
class(CurveArtist), intent(in) :: self
integer, intent(in) :: i

the point (1 to num_drawn)

Return Value real(kind=wp), (4)


Calls

proc~~drawn_color~~CallsGraph proc~drawn_color CurveArtist%drawn_color is_colored is_colored proc~drawn_color->is_colored point_color point_color proc~drawn_color->point_color

Source Code

    function drawn_color(self, i) result(rgba)
        class(CurveArtist), intent(in) :: self
        integer, intent(in) :: i                            !! the point (1 to num_drawn)
        real(wp) :: rgba(4)
        if (self%chain%is_colored()) then
            rgba = self%chain%point_color(i)
        else
            rgba = self%color_
        end if
    end function drawn_color