| LinesCommon features of all lines. 
|  |  | type Line |  |  |  | Abstract parent type of all lines.
Starting point "From" is implicit
(ending point "To" of previous Line). |  |  
|  |  | type Line_Access |  |  |  | Access type for lines. |  |  
|  |  | function Length |  |  |  | Calculate the length of this line. Results are cached for
reuse. So make sure the starting point always remains the same
between calls. |  |  |  |  
|  |  | procedure Scale |  |  |  | Scale a line by a given factor. |  |  |  |  
|  |  | procedure Translate |  |  |  | Translate a line by a given offset. |  |  |  |  
|  |  | function To_SVG |  |  |  | Format a line for Scalable Vector Graphics output. |  |  |  |  
|  |  | function To_Postscript |  |  |  | Format a line for Postscript output. |  |  |  |  |