Math-Get distance between two vectors

From Vectorlab
Jump to: navigation, search


Returns the distance between two points stored as vectors. By Orso B. Schmid


{ Orso ***************************** }
{ returns the distances between two points  }
FUNCTION M_GetDistance(v1, v2: VECTOR): REAL;
	BEGIN
		{ M_GetDistance := distance(v1.x, v1.y, v2.x, v2.y); }
		M_GetDistance := Norm(v1 -v2); { is exactly the same as the previous }
	END;