<> <> DIRECTORY Rope USING [ ROPE ], ThreeDBasics USING [ Context, ContextProc, ImagerProc, Pair, PairSequence, Pixel, RGB, Triple, Patch, PatchProc ]; RenderWithImager: CEDAR DEFINITIONS ~ BEGIN <> Context: TYPE ~ ThreeDBasics.Context; ContextProc: TYPE ~ ThreeDBasics.ContextProc; Pair: TYPE ~ ThreeDBasics.Pair; PairSequence: TYPE ~ ThreeDBasics.PairSequence; Triple: TYPE ~ ThreeDBasics.Triple; RGB: TYPE ~ ThreeDBasics.RGB; Pixel: TYPE ~ ThreeDBasics.Pixel; Patch: TYPE ~ ThreeDBasics.Patch; PatchProc: TYPE ~ ThreeDBasics.PatchProc; <> ClearViewPort: ContextProc; <> <> Imager2DLine: PROC[ context: REF Context, p1, p2: Pair, color: Pixel]; <> Imager2DPoly: PROC[ context: REF Context, poly: REF PairSequence, color: Pixel]; <> ImagerPolygon: PatchProc; <> Draw2DRope: PROC[context: REF Context, rope: Rope.ROPE, position: Pair, color: Pixel _ [255,255,128,0,0], size: REAL _ 20, font: Rope.ROPE _ NIL]; <> DrawThroughViewer: PROC[ context: REF Context, drawProc: ThreeDBasics.ImagerProc ]; <> <> MakeInterpressPage: PROC[ context: REF Context, fileName: Rope.ROPE ]; END.