<<>> <> <> <> <> <> <<>> BeginStyle (AnacapaCedar) AttachStyle <> (bottomIndentStretch) 0 StyleParam <> (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 <> <> (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 EndStyle