DEFINITION MODULE Polydev;

FROM Polysys IMPORT Polygon;

EXPORT QUALIFIED
          
          Surface,

          Draw,
          
          Box,
          Trapeze,

          Move,
          Line,
          
          init,
	  terminate,
          View;
   
PROCEDURE Surface (Xl, Yb, Xr, Yt :INTEGER);

PROCEDURE Draw    (Cell           :ARRAY OF Polygon);

PROCEDURE Box     (Layer,
                   Xl, Yb, Xr, Yt :INTEGER;
                   Text           :ARRAY OF CHAR);

PROCEDURE Trapeze (Layer,
                   Xlb, Yb, dxb,
                   Xlt, Yt, dxt    :INTEGER);

PROCEDURE Move    (AbsX, AbsY     :INTEGER);

PROCEDURE Line    (Layer,
                   AbsX, AbsY     :INTEGER);

PROCEDURE init ();

PROCEDURE terminate ();

PROCEDURE View ();

END Polydev.
