<> <> <> <> <<>> DIRECTORY Imager USING [Context], Rope USING [ROPE], ViewerClasses USING [DestroyProc, NotifyProc, Viewer, ViewerRec]; ImagerViewer: CEDAR DEFINITIONS ~ BEGIN OPEN Imager, ViewerClasses; Units: TYPE ~ {pixels, meters}; Create: PROC [info: ViewerRec, units: Units, v: Viewer _ NIL, clientData: REF ANY_ NIL] RETURNS [Context]; <> FancyCreate: PROC [info: ViewerRec, units: Units, v: Viewer _ NIL, notify: NotifyProc_ NIL, tipTable: Rope.ROPE_ NIL, destroy: DestroyProc_ NIL, clientData: REF ANY_ NIL] RETURNS [Context]; <> ClientDataFromViewer: PROC [viewer: Viewer] RETURNS [clientData: REF ANY_ NIL]; <> Clear: PROC [context: Context]; <> Erase: PROC [context: Context]; <> Reset: PROC [context: Context]; <> GetViewer: PROC [context: Context] RETURNS [Viewer]; END.