<> <> <> DIRECTORY IPImagerBasic USING [Bezier, Pair]; IPCubic: CEDAR DEFINITIONS = BEGIN OPEN IPImagerBasic; Coeffs: TYPE = RECORD[c0, c1, c2, c3: Pair]; <> <> <> CoeffsToBezier: PROC[Coeffs] RETURNS[Bezier]; BezierToCoeffs: PROC[Bezier] RETURNS[Coeffs]; Split: PROC[Bezier] RETURNS[Bezier,Bezier]; Flat: PROC[bezier: Bezier, epsilon: REAL] RETURNS[BOOLEAN]; END.