DEFINITION MODULE NewHP;

IMPORT Polysys;

EXPORT QUALIFIED

          init,

          Device,
          
          Surface,
          
          DrawPolygon,
          
          View;
             
PROCEDURE init ();

PROCEDURE Device (Cline :ARRAY OF CHAR);

PROCEDURE Surface (Xl, Yb, Xr, Yt :INTEGER);

PROCEDURE DrawPolygon (Poly  :Polysys.Polygon;
                       Layer,
                       How   :ARRAY OF CHAR);

PROCEDURE View ();


END NewHP.

