ComputeWidth Function

public function ComputeWidth(p1, p2, p3) result(width)

Arguments

Type	Intent	Optional	Attributes		Name
type(point_type),	intent(in)			::	p1
type(point_type),	intent(in)			::	p2
type(point_type),	intent(in)			::	p3

Return Value real(kind=rp)