Copyright (C) 1994, Digital Equipment Corp.
by Stephen Harrison and Steve Glassman
INTERFACEShapeUtils ; IMPORT R2Path; PROCEDURE RegularPolygon(sides: CARDINAL := 3; radius := 1.0): R2Path.T; (* Return a "R2Path.T" representing the regular polygon centered at the origin, with given "radius" and number of "sides". *) END ShapeUtils.