DIRECTORY ImagerBasic, ImagerMasks, Scaled; ImagerStroke: CEDAR DEFINITIONS ~ BEGIN MaskFromStroke: PROC [ path: ImagerBasic.Path, clientToDevice: ImagerBasic.Transformation, width: REAL, strokeEnds: ImagerBasic.StrokeEnds, closed: BOOLEAN, sMin: INTEGER _ FIRST[INTEGER]/2, sMax: INTEGER _ LAST[INTEGER]/2 ] RETURNS [mask: ImagerMasks.Mask]; MaskThinSegment: PROC [ dest, clipper: ImagerMasks.Mask, sFrom, fFrom, sTo, fTo: Scaled.Value, function: PACKED ARRAY [0..1] OF [0..1] ]; Subdivide: PROC [b: ImagerBasic.Bezier, vertex: PROC[ImagerBasic.Pair], tolerance: REAL _ 1.5, depth: NAT _ 0]; END. @ImagerStroke.mesa Michael Plass, August 4, 1983 1:22 pm ʘJ™J™%JšÏk œ"˜+Jšœœ œ˜'šÏnœœ˜Jšœ˜Jšœ+˜+Jšœœ˜ Jšœ#˜#Jšœœ˜Jšœœœœ˜!Jšœœœœ˜Jšœœ˜#—šžœœ˜Jšœ ˜ Jšœ%˜%Jšœ œœœ˜'Jšœ˜—Jš ž œœ!œœœ˜oJšœ˜J™—…—X˜