General declarations
(
BasicSize) % normal type font size
{18 bp} .cvx .def
(
ExtraLead) % normal between-lines leading
{4 bp} .cvx .def
(FontFamily) "main font" { "Modern" family } StyleRule
(BodyFontFamily) "screen font" { "Modern" family } ScreenRule
(BodyFontFamily) "print font" { "Modern" family } PrintRule
(AlternateFontFamily) "other font" { "Classic" family } StyleRule
(Nest) "display nesting level" { ParaIndent bigger leftIndent } StyleRule
Formats
(
pageNumber) "appearance of page numbers" {body look.s look.i} StyleRule
(
docStandard) "shared by various text formats" {
standard
FontFamily
nestingLevel 2 .gt {Nest} .cvx .if
} StyleRule
(
ragged) "ragged-right block" {
block
flushLeft lineFormatting
flushLeft lastLineFormatting
1 em restIndent
} StyleRule
(
root) "format for root nodes" {
cedarRoot
DoNest
1 in leftMargin
1 in rightMargin
6.5 in lineLength
1 fill bottomIndentStretch
} StyleRule
(
subtitle) "for subtitle nodes" {
title
DoubleIncrement smaller size
DoubleBreak BasicSize MoreLead topLeadingGlue
DoubleBreak BasicSize MoreLead bottomLeadingGlue
} StyleRule
(
title) "for title nodes on the screen" {
docStandard
24 bp size
bold face
the size DoubleIncrement .add leading
DoubleBreak BasicSize MoreLead topLeadingGlue
DoubleBreak BasicSize MoreLead bottomLeadingGlue
200 pageBreakAfterLastLinePenalty
0 firstIndent
0 restIndent
centered lineFormatting
centered lastLineFormatting
} ScreenRule
(
title) "for title nodes when printed" {
docStandard
24 bp size
bold face
the size DoubleIncrement .add leading
1 fill 0 pt 0 pt topLeadingGlue
DoubleBreak BasicSize MoreLead bottomLeadingGlue
200 pageBreakAfterLastLinePenalty
0 firstIndent
0 restIndent
centered lineFormatting
centered lastLineFormatting
} PrintRule