distance Function

public function distance(p1, p2) result(d1)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		dimension(3)	::	p1	Points to calculate distance between
real,	intent(in),		dimension(3)	::	p2	Points to calculate distance between

Return Value real

Contents

None