///7.0/Commands/Typewriter.Style
Copyright Ó 1987, 1989 by Xerox Corporation. All rights reserved.
Michael Plass, March 22, 1989 4:24:55 pm PST
Barth, April 12, 1989 10:06:17 am PDT
BeginStyle
(basicSize) 12 bp StyleParam
(basicIncrement) 2 bp StyleParam
(extraLead) 2 bp StyleParam
(magnification) 1.0 StyleParam
(Magnified) {the magnification .mul} .cvx .def
(BasicSize) {the basicSize Magnified} .cvx .def
(BasicIncrement) {the basicIncrement Magnified} .cvx .def
(ExtraLead) {the extraLead Magnified} .cvx .def
(SmallerSize) "Make the font size smaller" {BasicIncrement smaller size} StyleRule
(BasicLeading) % normal type leading
{BasicSize ExtraLead .add} .cvx .def
(MoreLead) % double inter-paragraph spacing
{ExtraLead 3 .mul} .cvx .def
(BreakSize) % normal inter-paragraph spacing
{BasicSize 9.875 bp .add} .cvx .def
(look.u) "up, for superscript " {
the size 0.4 .mul vShift
SmallerSize} StyleRule
(pageBreak) "to force a new page" {
0 pt 1 filll 0 pt topLeadingGlue
1 fil 0 pt 0 pt bottomLeadingGlue
} PrintRule
(pageBreak) "to force a new page" {
} ScreenRule
(head4list) "an item in a No. 4 head list" {
default
3 sp restIndent
the restIndent tabStops
} StyleRule
(firstReference) "an item in a reference list" {
default
BreakSize MoreLead 0 topLeadingGlue
flushLeft lineFormatting
4 sp restIndent
the restIndent tabStops
} StyleRule
(reference) "an item in a reference list" {
default
flushLeft lineFormatting
4 sp restIndent
the restIndent tabStops
} StyleRule
(root) "format for the root node" {
0 topMargin
0 headerMargin
0 pt footerMargin
0 pt bottomMargin
.1 in leftMargin
.25 in rightMargin
8.5 in lineLength
0 pt leftIndent
0 pt rightIndent
2 column
0.375 in columnGap
8.5 in pageWidth
11.21875 in pageLength
%11 in pageLength
999999 firstHeaders
} StyleRule
(dofont) "" {"xerox/pressfonts/XeroxBook-mrr" family} PrintRule
(dofont) "" {"gacha" family} ScreenRule
(default) "default for undefined formats" {
dofont
1 in tabStops
12 bp leading
12 bp topLeading
IF isComment THEN {italic face} ELSE {regular face} FI
Show comment nodes by italics
} StyleRule
(block) "for block paragraphs, no initial indentation" {
default
BreakSize MoreLead 0 topLeadingGlue
4 maxHorizontalExpansion
(English) hyphenation
flushLeft lineFormatting
} StyleRule
(center) "center" {
default
centered lineFormatting
centered lastLineFormatting
} StyleRule
EndStyle