<> <> <> <> DIRECTORY ImagerPath USING [PathProc, MoveToProc, LineToProc, CurveToProc, ConicToProc], ImagerPen USING [Pen], ImagerTransformation USING [Transformation], Real USING [LargestNumber], Vector2 USING [VEC]; ImagerStroke: CEDAR DEFINITIONS ~ BEGIN VEC: TYPE ~ Vector2.VEC; VertexIndex: TYPE ~ NAT; bigReal: REAL ~ Real.LargestNumber; PathFromStroke: PROC [path: ImagerPath.PathProc, closed: BOOL, width: REAL, end: INT, joint: INT, m: ImagerTransformation.Transformation, moveTo: ImagerPath.MoveToProc, lineTo: ImagerPath.LineToProc, conicTo: ImagerPath.ConicToProc, curveTo: ImagerPath.CurveToProc ]; <> <<>> SquareEndWithNoDirection: SIGNAL; <> PenStroke: PROC [path: ImagerPath.PathProc, pen: ImagerPen.Pen, closed: BOOL, moveTo: ImagerPath.MoveToProc, lineTo: ImagerPath.LineToProc, conicTo: ImagerPath.ConicToProc, curveTo: ImagerPath.CurveToProc, end: PROC [p: VEC, v: VEC, i0, i1: VertexIndex], joint: PROC [p: VEC, v0, v1: VEC, i0, i1: VertexIndex] ]; <> END.