ImagerConic.mesa
Michael Plass, October 24, 1983 11:25 am
Edited by Doug Wyatt, November 22, 1983 11:30 am
DIRECTORY
ImagerBasic USING [Pair];
ImagerConic: CEDAR DEFINITIONS
Pair:
TYPE ~ ImagerBasic.Pair;
ToCurves:
PROC[p0, p1, p2: Pair, r:
REAL, curve:
PROC[p1, p2, p3: Pair]];
Turns a ConicTo into a sequence of CurveTo commands. Unless the conic is a parabola, this will necessarily involve some approximation, but the error will be in the range of floating-point fuzz. The first curve should be assumed to start at p0.
FromArc:
PROC[p0, p1, p2: Pair, conic:
PROC[p1, p2: Pair, r:
REAL]];
Turns an ArcTo into a sequence of ConicTo commands.
END.