@Marker(FontFamily,AllPostScriptFonts, ScaleableLaser,PostScript)
@DefineFont(Bodyfont,
	R=<RawFont "NewCenturySchlbkRoman">,
	I=<RawFont "NewCenturySchlbkItalic">,
	B=<RawFont "NewCenturySchlbkBold">,
	P=<RawFont "NewCenturySchlbkBoldItalic">,
	Z=<TypeCase "NewCenturySchlbkItalic">,
	A=<TypeCase "Mathematics10">,
	G=<TypeCase "PsGreek">,
	Y=<TypeCase "PsPubsSerif">,
	J=<TypeCase "PsSymbol1">,
	K=<TypeCase "PsSymbol2">,
	T=<RawFont "Courier">,
	F=<RawFont "CourierBold">,
	D=<RawFont "ZapfDingbats">,
	E=<TypeCase "ZapfDingbats">)
@DefineFont(Headingfont,
	R=<RawFont "Helvetica">,
	I=<RawFont "HelveticaOblique">,
	B=<RawFont "HelveticaBold">,
	P=<RawFont "HelveticaBoldOblique">,
        A=<Typecase "Mathematics10">,
	G=<TypeCase "PsGreek">,
	Y=<TypeCase "PsPubsSansSerif">,
        J=<TypeCase "PsSymbol1">,
        K=<TypeCase "PsSymbol2">,
	D=<RawFont "ZapfDingbats">,
	E=<TypeCase "ZapfDingbats">)
@DefineFont(Courier,
	R=<RawFont "Courier">,
	I=<RawFont "CourierOblique">,
	B=<RawFont "CourierBold">,
	P=<RawFont "CourierBoldOblique">,
	T=<RawFont "Courier">,
	F=<RawFont "Courier">
        )
@DefineFont(HelveticaNarrow,
	R=<RawFont "HelveticaNarrow">,
	I=<RawFont "HelveticaNarrowOblique">,
	B=<RawFont "HelveticaNarrowBold">,
	P=<RawFont "HelveticaNarrowBoldOblique">)
@DefineFont(AvantGarde,
	R=<RawFont "AvantGardeBook">,
	I=<RawFont "AvantGardeBookOblique">,
	B=<RawFont "AvantGardeDemi">,
	P=<RawFont "AvantGardeDemiOblique">)
@DefineFont(Times,
        R=<RawFont "TimesRoman">,
        I=<RawFont "TimesItalic">,
        B=<RawFont "TimesBold">,
        P=<RawFont "TimesBoldItalic">)
@DefineFont(Garamond,
	R=<RawFont "GaramondLight">,
	I=<RawFont "GaramondLightItalic">,
	B=<RawFont "GaramondBold">,
	P=<RawFont "GaramondBoldItalic">)
@DefineFont(Palatino,
	R=<RawFont "PalatinoRoman">,
	I=<RawFont "PalatinoItalic">,
	B=<RawFont "PalatinoBold">,
	P=<RawFont "PalatinoBoldItalic">)
@DefineFont(Bookman,
	R=<RawFont "BookmanLight">,
	I=<RawFont "BookmanLightItalic">,
	B=<RawFont "BookmanDemi">,
	P=<RawFont "BookmanDemiItalic">)
@DefineFont(Lubalin,
	R=<RawFont "LubalinGraphBook">,
	I=<RawFont "LubalinGraphBookOblique">,
	B=<RawFont "LubalinGraphDemi">,
	P=<RawFont "LubalinGraphDemiOblique">)
@DefineFont(Souvenir,
	R=<RawFont "XouvenirLight">,
	I=<RawFont "XouvenirLightItalic">,
	B=<RawFont "XouvenirDemi">,
	P=<RawFont "XouvenirDemiItalic">)
@DefineFont(Symbol,
	R=<RawFont "Helvetica">,
	S=<RawFont "Symbol">)

@Equate(Helvetica=HeadingFont, 
        NewCenturySchoolbook=BodyFont)

@Equate(SmallBodyFont=BodyFont,
	TitleFont=HeadingFont)

@Marker(FontFamily,ChangeLog)
@Comment[
27 Dec 86  JHS	Created
]