cone_line_color Function

private pure function cone_line_color(self) result(c)

The edges' and base outline's color [r, g, b, a].

Type Bound

Arguments

Type	Intent	Optional	Attributes		Name
class(PolyhedralCone),	intent(in)			::	self

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

Source Code

    pure function cone_line_color(self) result(c)
        class(PolyhedralCone), intent(in) :: self
        real(wp) :: c(4)
        c = self%line_color_
    end function cone_line_color