•Example

In[816]:=

{dist[{xn[1], yn[1]}, {xn[2], yn[2]}], dist[{xn[1], yn[1], zn[1]}, {xn[2], yn[2], zn[2]}]}

Out[816]=

{((xn[1] - xn[2])^2 + (yn[1] - yn[2])^2)^(1/2), ((xn[1] - xn[2])^2 + (yn[1] - yn[2])^2 + (zn[1] - zn[2])^2)^(1/2)}

Converted by Mathematica  (March 7, 2003)