<> <> <> <> <> <<>> <> <<>> DIRECTORY Imager USING [ColorOperator, Context, PixelArray, Transformation], IO USING [STREAM], Rope USING [ROPE]; ImagerInterpressFragment: CEDAR DEFINITIONS ~ BEGIN Ref: TYPE ~ REF Rep; Rep: TYPE; <<>> Create: PROC [fileName: Rope.ROPE, header: Rope.ROPE _ NIL] RETURNS [Ref]; <> <> <<>> CreateFromStream: PROC [stream: IO.STREAM, header: Rope.ROPE] RETURNS [Ref]; <> <<>> PushInt: PROC [self: Ref, n: INT]; <> <<>> VectorProc: TYPE ~ PROC [ putIdentifier: PROC [ATOM], putString: PROC [Rope.ROPE], putInt: PROC [INT], putReal: PROC [REAL], putTransformation: PROC [Imager.Transformation], putVector: PROC [vecProc: PROC], putImageOp: PROC [action: PROC [Imager.Context]] ]; PushVector: PROC [self: Ref, vectorProc: VectorProc]; <> <> <<>> PushPixelArray: PROC [self: Ref, pa: Imager.PixelArray]; <> <<>> PushColorOperator: PROC [self: Ref, op: Imager.ColorOperator]; <> <<>> Close: PROC [self: Ref]; <> <<>> Finish: PROC [self: Ref]; <> <<>> <<>> END.