Points and line segments example

This example demonstrates the use of the previous packet. It draws a triangle, annotating its points and sides with names. Note that the coordinates of a, b and c should be chosen to fit the screen of the particular computer (see A.7).


\begin{elan}
program:
POINT a :: point (100.0, 400.0) AS ''A'',
b :: point ...
...bc);
draw line (ca);
TEXT VAR wait :: inchar;
enter text mode.
\end{elan}

The resulting picture looks like:

(315,160) (010,010)(1,0)140 (150,010)(0,1)140 (010,010)(1,1)140 (010,010)A (150,010)B (150,150)C (080,010) $\overline{{\tt AC}}$ (150,080) $\overline{{\tt BC}}$ (080,080) $\overline{{\tt AB}}$