<<>> <> <> <> <<>> <> <> <<>> DIRECTORY Imager; ViewerScreenTypes: CEDAR DEFINITIONS ~ BEGIN Screen: TYPE ~ MACHINE DEPENDENT {main(0), color(1), (7)}; <> <> <<>> ContextCreatorProc: TYPE ~ PROC [screenServerData: REF ANY, screen: Screen] RETURNS [Imager.Context]; END.