BeginStyle
(Cedar) AttachStyle
Basic StyleParam Declarations
(
device) "xc" StyleParam
controls font selection; known options are:
press, anacapa, xc
General declarations
(
FontPrefix) "default font prefix" {
"Xerox/TiogaFonts/" fontPrefix
} ScreenRule
(
FontPrefix) "default font prefix" {
IF the device (press) .eq
THEN {"Xerox/PressFonts/" fontPrefix}
ELSE {"Xerox/XC1-2-2/" fontPrefix} FI
} PrintRule
(
FontFamily) "main font" {
"TimesRoman" family
} ScreenRule
(
FontFamily) "main font" {
"Classic" family
} PrintRule
(
AlternateFontFamily) "other font" {
"Helvetica" family
} ScreenRule
(
AlternateFontFamily) "other font" {
"Modern" family
} PrintRule
Looks
(
look.m) "math looks for the display" {
"Math" family
10 bp size % only 8 and 10 point screen fonts
} ScreenRule
Formats
(
abstract) "for abstract on title page" {
block
the leading topLeading
the leading bottomLeading
} StyleRule
(
abstractbody) "for abstract on title page" {
body
the leading topLeading
the leading bottomLeading
} StyleRule
(
artworkFigure) "applied to inserted artwork" {
center
12 pt topLeading
0 pt topIndent
12 pt bottomLeading
0 pt bottomIndent
} StyleRule
(
artworkCaption) "applied to inserted artwork captions" {
tight
AlternateFontFamily
bold face
} StyleRule
(
authors) "for authors on title page" {
center
singleColumn
48.75 pt bottomLeading % 65 pt at 25% reduction
48.75 pt bottomIndent
BasicLeading leading
BasicLeading MoreLead 0 topLeadingGlue
BasicLeading MoreLead 0 bottomLeadingGlue
} StyleRule
(
block) "for block paragraphs, no initial indentation" {
docStandard
regular face
BasicLeading 2 .mul 8 bp .add MoreLead 2 .mul 0 topLeadingGlue
justified lineFormatting
flushLeft lastLineFormatting
} StyleRule
(
caption) "for figure captions" {
block
bold face
BasicIncrement smaller size
BasicIncrement smaller leading
the leading 6 pt .add topLeading
the leading bottomLeading
} StyleRule
(
copyrightBlock) "for supplied copyright hole" {
docStandard
96 pt topLeading
96 pt topIndent
% copyright box is 96 pt high = 128 pt at 25% reduction
} StyleRule
(
head1) "for chapter headings" {
docStandard
bold face
LargeSize size
LargeSize BasicIncrement .add leading
QuadBreak BasicSize 2 .mul MoreLead 2 .mul topLeadingGlue
BasicLeading 2 .mul 2 bp .add BasicSize MoreLead bottomLeadingGlue
144 pt keep
2 column
} StyleRule
(
head2) "for major section headings" {
docStandard
bold face
BasicSize MoreLead .add 2 .mul leading
TripleBreak BasicSize 2 .mul MoreLead 2 .mul topLeadingGlue
BasicLeading 2 .mul 2 bp .add BasicSize MoreLead bottomLeadingGlue
50 pageBreakAfterLastLinePenalty
the bottomLeading keep
BasicSize bigger keep
BasicSize bigger keep
} StyleRule
(
head3) "for minor section headings" {
docStandard
italic face
BasicSize MoreLead .add 2 .mul leading
TripleBreak BasicSize 2 .mul MoreLead 2 .mul topLeadingGlue
BasicLeading 2 .mul 2 bp .add BasicSize MoreLead bottomLeadingGlue
25 pageBreakAfterLastLinePenalty
the bottomLeading keep
BasicSize bigger keep
BasicSize bigger keep
} StyleRule
(
head4) "for run-in section headings" {
block
BreakPlus 2 .mul BasicSize 2 .mul MoreLead 2 .mul topLeadingGlue
the bottomLeading keep
BasicSize bigger keep
} StyleRule
(
horizontalrule) "for rules (solid lines) used to separate things" {
docStandard
6 pt leading
6 pt topLeading
9 pt topIndent
6 pt bottomLeading
0 em firstIndent
0 em restIndent
justified lastLineFormatting
all underlining
} StyleRule
(
hungOverItem) "for definitions, etc." {
body
0 leftIndent
2 in restIndent
LooseLeading ExtraLead 0 topLeadingGlue
flushLeft lineFormatting
flushLeft lastLineFormatting
} StyleRule
(
reference) "an item in a reference list" {
block
flushLeft lineFormatting
flushLeft lastLineFormatting
% BasicIncrement smaller size
the size BasicIncrement .add 2 .mul topLeading
the size BasicIncrement .add 2 .mul bottomLeading
the size BasicIncrement .add 2 .mul leading
5 en restIndent
the restIndent tabStops
48 bp keep
} StyleRule
(
root) "default format for root nodes" {
cedar.root
} ScreenRule
(
root) "default format for root nodes" {
10 bp basicSize
10 bp codeSize
cedar.root
27 pt topMargin % 36 pt at 25% reduction
27 pt headerMargin
27 pt footerMargin
60 pt bottomMargin
487.5 pt lineLength % 6.75 inches
63.75 pt leftMargin
63.75 pt rightMargin
0 leftIndent
0 rightIndent
% 999999 firstHeaders no headers for pages
1 column
} PrintRule
(
singleColumn) "for single full-page-width nodes" {
484.5 pt lineLength % full page width of 646 pt at 25% reduction
1 column
} StyleRule
(
singleDisplay) "for single-spaced included material" {
display
BasicLeading ExtraLead 0 topLeadingGlue
BasicLeading ExtraLead 0 bottomLeadingGlue
BasicLeading leading
} StyleRule
(
subtitle) "for subtitle nodes" {
title
BasicIncrement smaller size
} StyleRule
(
tight) "for items with less leading" {
block
BasicLeading 2 .mul ExtraLead 2 .mul 0 topLeadingGlue
BasicLeading 2 .mul ExtraLead 2 .mul 0 bottomLeadingGlue
BasicLeading 2 .mul leading
} StyleRule
(
title) "for title nodes" {
titleFormat
18 bp size % to avoid font substitution on screen
} ScreenRule
(
title) "for title nodes" {
titleFormat
} PrintRule
(
titleFormat) "for title nodes" {
% 162.75 pt = 217 pt vertical height at 25% reduction
% copyright box is 96 pt high = 128 pt at 25% reduction
head
bold face
DoubleIncrement bigger size
DoubleBreak leading
54 pt topLeading % 72 pt at 25% reduction
54 pt topIndent
QuadBreak bottomLeading
singleColumn
0 firstIndent
0 restIndent
centered lineFormatting
centered lastLineFormatting
144 pt keep
} StyleRule
(
standard) "xxxx" {
cedar.standard
BasicLeading 2 .mul leading
BasicLeading 2 .mul MoreLead 0 topLeadingGlue
BasicLeading 2 .mul MoreLead 0 bottomLeadingGlue
} StyleRule
EndStyle