<> <> <> <<>> <> DIRECTORY Imager USING [Context], ImagerPixelArrayDefs USING [PixelArray], ImagerPixelMap USING [DeviceRectangle, PixelMap], ImagerTransformation USING [Transformation]; ImagerGray: CEDAR DEFINITIONS ~ BEGIN OPEN Imager, ImagerPixelArrayDefs, ImagerPixelMap, ImagerTransformation; Create: PROC [pixelMap: PixelMap, component: ATOM, viewToPixel: Transformation _ NIL, initialScale: REAL _ 1.0, change: PROC[changeData: REF, d: DeviceRectangle, action: PROC] _ NIL, changeData: REF _ NIL, cacheFonts: BOOL _ TRUE] RETURNS [Context]; <> <> <> <> SetComponent: PUBLIC PROC [context: Context, component: ATOM]; <> MakePixelArray: PROC [action: PROC [Context], sSize, fSize: NAT, components: LIST OF ATOM, viewToPixel: Transformation _ NIL, initialScale: REAL _ 1.0, lgBitsPerSample: NAT _ 3, cacheFonts: BOOL _ TRUE, blackBackground: BOOL _ FALSE] RETURNS [PixelArray]; <> <> <> LikeScreen: PROC [sSize: NAT] RETURNS [Transformation]; <> END.