is_point_on_line Function

public pure function is_point_on_line(pt, ln, tol) result(rst)

Tests to see if a point lies on a line.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(in)			::	pt(3)	The point.
class(line),	intent(in)			::	ln	The line.
real(kind=real64),	intent(in),	optional		::	tol	The tolerance to use when testing. The default tolerance is 10x machine epsilon.

Return Value logical

Returns true if the point lies on the line; else, false.

Contents