Style.style
Copyright © 1985 by Xerox Corporation. All rights reserved.
last written by Paxton, July 22, 1982 2:59 pm
Rick Beach, August 5, 1985 4:50:07 pm PDT
BeginStyle
(BasicPrint) AttachStyle
(bp) "big point" {72.0 .div in} StyleRule
(look.b) "add bold to font face" {+bold face} StyleRule
(look.c) "command name" { +bold face } StyleRule
(look.e) "emphasis" {the face italic .eq {+bold face} {+italic face} .ifelse .cvx .exec} StyleRule
(look.i) "add italic to font face" {+italic face} StyleRule
(look.l) "larger font" {12 bp size "TimesRoman" family} StyleRule
(look.m) "much larger" {18 bp size "TimesRoman" family} StyleRule
(look.s) "smaller font" {8 bp size "TimesRoman" family} StyleRule
(look.u) "underline all characters" {all underlined} StyleRule
(step) 0.25 in .def
(standard) "set up standard font, etc." {
"Tioga" family
regular face
caps+lowercase alphabets
10 pt size
13 pt leading
14 pt top.leading
14 pt bottom.leading
} StyleRule
(default) "default type for nodes" {
standard
step bigger left.indent
} StyleRule
(header) "for document header info" {
standard
+italic face
step bigger left.indent
} StyleRule
(ruledef) "for first node of rule definition" {
"TimesRoman" family
12 pt size
step bigger left.indent
regular face
24 pt top.leading
14 pt bottom.leading
regular face
} StyleRule
(root) "default type for root nodes" {
standard
10 pt top.indent
step .neg left.indent
5 pt right.indent
4 sp tab.stops
} StyleRule
EndStyle