lrline Function

function lrline(xu, yu, xv1, yv1, xv2, yv2, dv)

************80

LRLINE determines if a point is left of, right or, or on a directed line.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=8)				::	xu
real(kind=8)				::	yu
real(kind=8)				::	xv1
real(kind=8)				::	yv1
real(kind=8)				::	xv2
real(kind=8)				::	yv2
real(kind=8)				::	dv

Return Value integer(kind=4)

Variables

Type	Visibility	Attributes		Name		Initial
real(kind=8),	public		::	dx
real(kind=8),	public		::	dxu
real(kind=8),	public		::	dy
real(kind=8),	public		::	dyu
real(kind=8),	public		::	t
real(kind=8),	public		::	tol
real(kind=8),	public		::	tolabs