draw_styled_line Subroutine

public subroutine draw_styled_line(image_data, img_w, img_h, px1, py1, px2, py2, r, g, b, line_width, line_style, line_pattern, pattern_size, pattern_length, pattern_distance)

Draw line with pattern support (dashed, dotted, etc.)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=1),	intent(inout)			::	image_data(:)
integer,	intent(in)			::	img_w
integer,	intent(in)			::	img_h
real(kind=wp),	intent(in)			::	px1
real(kind=wp),	intent(in)			::	py1
real(kind=wp),	intent(in)			::	px2
real(kind=wp),	intent(in)			::	py2
real(kind=wp),	intent(in)			::	r
real(kind=wp),	intent(in)			::	g
real(kind=wp),	intent(in)			::	b
real(kind=wp),	intent(in)			::	line_width
character(len=*),	intent(in)			::	line_style
real(kind=wp),	intent(in)			::	line_pattern(:)
integer,	intent(in)			::	pattern_size
real(kind=wp),	intent(in)			::	pattern_length
real(kind=wp),	intent(inout)			::	pattern_distance