IPTransform.mesa
Last edited by:
Doug Wyatt, April 6, 1983 9:30 pm
DIRECTORY
IPImagerBasic USING [Pair, Transformation];
IPTransform: CEDAR DEFINITIONS
= BEGIN OPEN IPImagerBasic;
DRound: PROC[p: Pair] RETURNS[Pair];
MakeT: PROC[a, b, c, d, e, f: REAL] RETURNS[Transformation];
Translate: PROC[x, y: REAL] RETURNS[Transformation];
Rotate: PROC[a: REAL] RETURNS[Transformation];
Scale: PROC[s: REAL] RETURNS[Transformation];
Scale2: PROC[sx, sy: REAL] RETURNS[Transformation];
Concat: PROC[m, n: Transformation] RETURNS[Transformation];
Invert: PROC[m: Transformation] RETURNS[Transformation];
Transform, Tp: PROC[m: Transformation, p: Pair] RETURNS[Pair];
TransformVec, Tv: PROC[m: Transformation, v: Pair] RETURNS[Pair];
InverseTransform, ITp: PROC[m: Transformation, p: Pair] RETURNS[Pair];
InverseTransformVec, ITv: PROC[m: Transformation, v: Pair] RETURNS[Pair];
RoundXY: PROC[m: Transformation, p: Pair] RETURNS[Pair];
RoundXYVec: PROC[m: Transformation, v: Pair] RETURNS[Pair];
CopyTransformation: PROC[m: Transformation] RETURNS[Transformation];
END.