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
(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
(
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