<<>> <> <> <> <<>> DIRECTORY Scaled USING [Value], Vector2 USING [VEC]; ImagerDeviceVector: CEDAR DEFINITIONS ~ BEGIN ScaledVec: TYPE ~ RECORD [s, f: Scaled.Value]; DVec: TYPE ~ REF DVecRep; DVecRep: TYPE ~ RECORD [ <> scaled: BOOL, -- Says which of the following representations is the truth: sv: ScaledVec, fv: Vector2.VEC ]; END.