% Draft.Style % last written by Horning May 28, 1982 11:55 am BeginStyle (BasicLooks) AttachStyle (BasicPrint) AttachStyle (step) "increase indent: screen rule" { 14 pt } ScreenRule (step) "increase indent: print rule" { 10 pt } PrintRule (title) "for title nodes" { "TimesRoman" family bold face 18 bp size 25 20 5 top.leading.glue 23 20 5 bottom.leading.glue 100 page.break.after.last.line.penalty step bigger left.indent 0 first.indent 0 rest.indent centered line.formatting } StyleRule (subtitle) "for subtitle nodes" { title 12 bp size } StyleRule (default) "default type for nodes" { % does paragraph indent standard } StyleRule (def) "item definition" { % does hanging indent standard 0 first.indent 2 em rest.indent } StyleRule (section) "section headings" { "TimesRoman" family bold face step bigger left.indent 12 bp size 25 20 5 top.leading.glue 23 20 5 bottom.leading.glue 100 page.break.after.last.line.penalty 0 first.indent 0 rest.indent } StyleRule (ssection) "sub-section headings: print" { section "Tioga" family 12 bp size italic face 19 15 5 top.leading.glue 17 15 5 bottom.leading.glue 75 page.break.after.last.line.penalty } PrintRule (ssection) "sub-section headings: screen" { section 12 bp size italic face 23 pt top.leading 21 pt bottom.leading } ScreenRule (sub) "sub-sub-section headings" { section italic face 20 20 5 top.leading.glue 20 20 5 bottom.leading.glue 50 page.break.after.last.line.penalty } StyleRule (sssection) "sub-sub-section headings: screen" { sub "Tioga" family 12 bp size 20 pt top.leading 20 pt bottom.leading } ScreenRule (sssection) "sub-sub-section headings: print" { sub "TimesRoman" family 10 bp size 16 pt top.leading.glue 16 pt bottom.leading.glue 50 page.break.after.last.line.penalty } PrintRule (table0) "for wide first column tables" { default 40 pt tab.stops } ScreenRule (table0) "for wide first column tables" { default 15 page.break.penalty 40 pt tab.stops } PrintRule (table1) "for 2 column tables" { default 30 pt tab.stops } ScreenRule (table1) "for 2 column tables" { default 15 page.break.penalty 30 pt tab.stops } PrintRule (table2) "for 3 column tables" { default 20 pt tab.stops } ScreenRule (table2) "for 3 column tables" { default 30 pt tab.stops 15 page.break.penalty } PrintRule (look.e) "emphasis" { +italic face } StyleRule (look.t) "Tioga font" { "Tioga" family 12 bp size } StyleRule (look.s) "smaller font" { "TimesRoman" family 2 bp smaller size } StyleRule (basic) "set up standard font, etc." { regular face caps+lowercase alphabets justified line.formatting 0 em first.indent 0 em rest.indent step bigger left.indent } StyleRule (standard) "basic for screen" { basic "Tioga" family 12 bp size 14 pt leading 18 pt top.leading 18 pt bottom.leading } ScreenRule (standard) "basic for print" { basic "TimesRoman" family 12 bp size 14 pt leading 18 4 0 top.leading.glue 18 4 0 bottom.leading.glue 20 page.break.after.first.line.penalty 20 page.break.before.last.line.penalty 0 page.break.penalty } PrintRule (root) "default type for root nodes" { standard 10 pt top.indent 24 pt top.leading step .neg .1 in .add left.indent 10 pt right.indent 16 sp tab.stops } StyleRule EndStyle