<> <> DIRECTORY Containers, Rope, Rules, PDFileReader, PDReaderPage, Sliders, ViewerClasses; ShowPD: DEFINITIONS = BEGIN ShowData: TYPE = REF ShowDataRec; ShowDataRec: TYPE = RECORD [ show: PDFileReader.Handle _ NIL, image: PDReaderPage.Handle _ NIL, pdContainer: Containers.Container _ NIL, pdViewer: ViewerClasses.Viewer _ NIL, pageNumberViewer: ViewerClasses.Viewer _ NIL, pageNumberSlider: Sliders.Slider _ NIL, pageNumber: INT _ 1, lastPageNumber: INT _ 1, atPage: PDReaderPage.PageRecRef _ NIL, pageStructure: PDReaderPage.PageRecRef _ NIL, top, height: REAL _ 0.0, scaleFactor: REAL _ 1.0, clearClient: BOOLEAN_FALSE, abortPainting: BOOLEAN_FALSE ]; CreateShowViewer: PROC[fileName: Rope.ROPE, reduction: REAL _ 1.0] RETURNS[pdViewer: ViewerClasses.Viewer]; END.