Intersection and projection

This section contains an addendum to the first packet. Procedures for finding the intersection of two lines and the projection of a point on a line are defined. Note that intersection of parallel lines will result in an error message.


\begin{elan}
POINT OP X (LINE line1, line2):
calculate parameters;
the inte...
...
(rc1 * b2 - b1 * rc2) / (rc1 - rc2),
'''']
FI.
\par
ENDOP ON;
\end{elan}