DEFINITION MODULE Graphic; IMPORT WindowBase; VAR Redraw: WindowBase.RedrawProcType; PROCEDURE Dot(x,y:INTEGER); PROCEDURE Line(x1,y1,x2,y2:INTEGER); PROCEDURE Box (x,y,w,h: INTEGER); PROCEDURE DOT(x,y: REAL); PROCEDURE LINE(x1,y1,x2,y2:REAL); PROCEDURE BOX(x,y,w,h:REAL); PROCEDURE SetColourBlack(black:BOOLEAN); PROCEDURE OpenGraphicWindow(x,y,w,h:INTEGER); PROCEDURE CloseGraphicWindow; PROCEDURE Scale(xmin,ymin,xmax,ymax:REAL); END Graphic.