In[411]:=
Out[411]=
The function finds the area between three points independent of dimension:
In[405]:=
Converted by Mathematica (March 7, 2003)
![areaUS[{xn[1], yn[1]}, {xn[2], yn[2]}, {xn[3], yn[3]}] // Simplify](../HTMLFiles/index_18.gif){kind=small}
![1/2 √ (xn[3] (-yn[1] + yn[2]) + xn[2] (yn[1] - yn[3]) + xn[1] (-yn[2] + yn[3]))^2](../HTMLFiles/index_19.gif){kind=small}
![areaUS[{xn[1], yn[1], z[1]}, {xn[2], yn[2], zn[2]}, {xn[3], yn[3], zn[3]}] // Simplify](../HTMLFiles/index_22.gif){kind=small}