<> <> <> <> <> <> DIRECTORY Draw2d, GGBasicTypes, GGCoreTypes, GGSegmentTypes, Imager, ImagerTransformation; GGShapes: CEDAR DEFINITIONS = BEGIN BoundBox: TYPE = GGCoreTypes.BoundBox; Circle: TYPE = GGBasicTypes.Circle; Line: TYPE = GGCoreTypes.Line; Point: TYPE = GGBasicTypes.Point; Vector: TYPE = GGBasicTypes.Vector; SelectionClass: TYPE = GGSegmentTypes.SelectionClass; <> DrawRectangle: PROC [dc: Imager.Context, loX, loY, hiX, hiY: REAL, strokeWidth: REAL _ 1.0]; <> DrawFilledRectangle: PROC [dc: Imager.Context, loX, loY, hiX, hiY: REAL]; <> DrawBoundBox: PROC [dc: Imager.Context, bBox: BoundBox, strokeWidth: REAL _ 1.0]; <> DrawSquare: PROC [dc: Imager.Context, center: Point, side: REAL, strokeWidth: REAL _ 1.0]; <> DrawFilledSquare: PROC [dc: Imager.Context, center: Point, side: REAL]; <> DrawFilledLoLeftSquare: PROC [dc: Imager.Context, loLeft: Point, side: REAL]; <> DrawPlus: PROC [dc: Imager.Context, center: Point]; <> DrawLine: PROC [dc: Imager.Context, line: Line, clippedBy: Imager.Rectangle, strokeWidth: REAL _ 1.0, zip: Draw2d.Zip _ NIL]; <> DrawLittleLine: PROC [dc: Imager.Context, line: Line, point: Point]; <> DrawCircle: PROC [dc: Imager.Context, circle: Circle]; DrawStarburst: PROC [dc: Imager.Context, point: Point, scale: REAL _ 1.0, zip: Draw2d.Zip _ NIL]; <> <<>> <> DrawCaret: PROC [dc: Imager.Context, point: Point, normal: Vector, scale: REAL]; <> DrawAnchor: PROC [dc: Imager.Context, point: Point, normal: Vector, scale: REAL]; <> DrawSpot: PROC [dc: Imager.Context, point: Point]; <> DrawJoint: PROC [dc: Imager.Context, point: Point, scale: REAL]; <> DrawCP: PROC [dc: Imager.Context, point: Point, scale: REAL]; DrawSelectedJoint: PROC [dc: Imager.Context, point: Point, selectClass: SelectionClass, scale: REAL]; DrawQuickSelectedJoint: PROC [dc: Imager.Context, point: Point, selectClass: SelectionClass, scale: REAL]; DrawArrow: PROC [dc: Imager.Context, tip: Point, base: Point, strokeWidth: REAL]; ArrowSize: PROC [strokeWidth: REAL] RETURNS [height, halfWidth: REAL]; <> END. <<>> <<>>