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;
Personal tools