DIRECTORY ImagerPress USING [PrinterType], ImagerTransformation USING [Transformation], Rope USING [ROPE]; ImagerPressFontSubst: CEDAR DEFINITIONS ~ BEGIN OPEN ImagerPress, ImagerTransformation, Rope; FindSubstitute: PROC [fontName: ROPE, m: Transformation, printerType: PrinterType] RETURNS [PressFontDescription]; PressFontDescription: TYPE ~ REF PressFontDescriptionRep; PressFontDescriptionRep: TYPE ~ RECORD [ family: ROPE, face: [0..256), rotation: INT, -- in minutes of arc size: INTEGER, -- in micas veryClose: BOOLEAN, exact: BOOLEAN ]; END. ŽImagerPressFontSubst.mesa Copyright c 1985 by Xerox Corporation. All rights reserved. Michael Plass, April 16, 1985 2:05:05 pm PST Attempts to find a reasonable substitute for the given font; returns NIL if nothing reasonable can be found. The transformation m goes from the client coordinate system to the press coordinate system (micas). Works best if fontName is already lower case. Κ˜code™Kšœ Οmœ1™