% Style.Style % last written by Paxton, April 2, 1982 1:22 pm (Style) Style (BasicLooks) AttachStyle (look.e) "emphasis" { the face italic .eq {+bold face} {+italic face} .ifelse .cvx .exec } StyleRule (look.c) "command name" { +bold face} 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 flush left line formatting } 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 .1 in .add left indent 5 pt right indent 4 sp tab stops } StyleRule EndStyle