DIRECTORY IPImagerBasic USING [Outline, Pair, Trajectory, Transformation]; IPGeometry: CEDAR DEFINITIONS = BEGIN OPEN IPImagerBasic; MoveTo: PROC[p: Pair] RETURNS[Trajectory]; LineTo: PROC[t: Trajectory, p: Pair] RETURNS[Trajectory]; LineToX: PROC[t: Trajectory, x: REAL] RETURNS[Trajectory]; LineToY: PROC[t: Trajectory, y: REAL] RETURNS[Trajectory]; CurveTo: PROC[t: Trajectory, p1, p2, p3: Pair] RETURNS[Trajectory]; MakeOutline: PROC[n: INT, p: PROC RETURNS[Trajectory]] RETURNS[Outline]; MapTrajectory: PROC[t: Trajectory, m: Transformation _ NIL, move: PROC[Pair], line: PROC[Pair], curve: PROC[Pair, Pair, Pair]]; MapOutline: PROC[o: Outline, m: Transformation _ NIL, move: PROC[Pair], line: PROC[Pair], curve: PROC[Pair, Pair, Pair]]; END. JIPGeometry.mesa Last changed by: Doug Wyatt, April 11, 1983 1:56 pm ΚU˜headšœ™šœ™Jšœ"™"—J˜šΟk ˜ Jšœœ-˜@—J˜—šœ œ ˜Jšœœœ˜J˜JšΟnœœ œ ˜*J˜Jšžœœœ ˜9J˜Jšžœœœœ ˜:J˜Jšžœœœœ ˜:J˜Jšžœœ"œ ˜CJ˜Jš ž œœœœœœ ˜HJ˜šž œœ$œ˜;Jšœœœœ˜C—J˜šž œœ!œ˜5Jšœœœœ˜C—J˜Jšœ˜——…—ψ—