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