<> <> <> DIRECTORY ImagerDevice USING [Device], ImagerPixelMap USING [PixelMap]; ImagerBitmapDevice: CEDAR DEFINITIONS ~ BEGIN PixelMap: TYPE ~ ImagerPixelMap.PixelMap; Device: TYPE ~ ImagerDevice.Device; defaultPixelsPerInch: REAL ~ 72; Create: PROC[frame: PixelMap, pixelsPerInch: REAL _ defaultPixelsPerInch] RETURNS[Device]; END.