ImagerPenExtras.mesa
Copyright Ó 1992 by Xerox Corporation. All rights reserved.
Michael Plass, August 18, 1992 9:05 am PDT
DIRECTORY
ImagerPen USING [Pen],
ImagerTransformation USING [Transformation],
Vector2 USING [VEC];
ImagerPenExtras: CEDAR DEFINITIONS
~ BEGIN OPEN ImagerPen, ImagerTransformation, Vector2;
MakeThickenedTransformedCircle: PROC [strokeWidth: REAL, m: Transformation, thickening: VEC ¬ [0.0, 0.0], minThickness: VEC ¬ [0.0, 0.0]] RETURNS [Pen];
A convenience; the translation part of m is ignored; thickening is in device space and can be negative (i.e. thinning is OK); minThickness is in device space and should be non-negative.
END.
Michael Plass, August 18, 1992 9:04:43 am PDT
Created.