length3d Function

public function length3d(P1, P2) result(length)

Compute length of linesegment between points P1 and P2

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in),		dimension(3)	::	P1	Coordinates of point P1
real(kind=dp),	intent(in),		dimension(3)	::	P2	Coordinates of point P2

Return Value real(kind=dp)

Length of linesegment