% CedarACM.Style
<<% Copyright © 1985 by Xerox Corporation.  All rights reserved.>>
% created by Beach, November 7, 1983 12:39 pm
% last edited by Beach, April 22, 1985 7:50:30 pm PST
% Produce a 25-pica galley for paste-up on the ACM reduction mats.
BeginStyle
(Cedar) AttachStyle

% General declarations
(BasicSize) % normal type font size
{11 bp} .cvx .def % was 10 bp
(CodeFont) "code font" { "Tioga" family 11 bp size } StyleRule % was 10 bp

% Formats
(PageBuilder) {  % without any paging; no headers, page numbers, footers
DO {
.page EXITifFALSE
.fill 1 the headerMargin .vboxto
.exchbox
.fill 1 the footerMargin .vboxto
3 .vbox .shipout
} ENDLOOP
}.cvx .def
(look.m) "math looks for the display" {
"Math" family
10 bp size
} ScreenRule
(abstract) "for abstract on title page" {
block
BasicIncrement smaller size
BasicIncrement smaller leading
the leading topLeading
the leading bottomLeading
} StyleRule
(abstractbody) "for abstract on title page" {
body
BasicIncrement smaller size
BasicIncrement smaller leading
the leading topLeading
the leading bottomLeading
} StyleRule
(authors) "for authors on title page" {
center
6 in lineLength
} StyleRule
(block) "for block paragraphs, no initial indentation" {
docStandard
regular face
the leading MoreLead 0 topLeadingGlue
10 pageBreakPenalty
justified lineFormatting
} StyleRule
(caption) "for figure captions" {
block
BasicIncrement smaller size
BasicIncrement smaller leading
the leading topLeading
} StyleRule
(CodeFont) "for figure captions" {
"Tioga" family 10 bp size
11 pt leading
11 pt topLeading
11 pt bottomLeading
} StyleRule
(head1) "for chapter headings" {
docStandard
bold face
LargeSize size
LargeSize BasicIncrement .add leading
isComment {
QuadBreak BasicSize MoreLead topLeadingGlue
} {
HexBreak BasicSize MoreLead topLeadingGlue
} .ifelse .cvx .exec
DoubleBreak BasicSize MoreLead bottomLeadingGlue
75 pageBreakAfterLastLinePenalty
} StyleRule
(horizontalrule) "for rules (solid lines) used to separate things" {
docStandard
6 pt leading
6 pt topLeading
6 pt bottomLeading
0 em firstIndent
0 em restIndent
} StyleRule
(hungOverItem) "for definitions, etc." {
body
0 leftIndent
2 in restIndent
LooseLeading ExtraLead 0 topLeadingGlue
flushLeft lineFormatting
} StyleRule
(reference) "an item in a reference list" {
block
flushLeft lineFormatting
BasicIncrement smaller size
the size BasicIncrement .add topLeading
the size BasicIncrement .add bottomLeading
the size BasicIncrement .add leading
4 sp restIndent
the restIndent tabStops
} StyleRule
(root) "default type for root nodes" {
docStandard
24 pt topMargin  % try to get 10.5 inches in each column
0 headerMargin
0 footerMargin
12 pt bottomMargin
2 in leftMargin
2 in rightMargin
4.125 in lineLength  % for ACM reduction mats
24 pt topIndent
24 pt topLeading
0 leftIndent
0 rightIndent
} StyleRule
(subtitle) "for subtitle nodes" {
title
BasicIncrement smaller size
} StyleRule
(title) "for title nodes" {
head
bold face
18 bp size
DoubleBreak leading
QuadBreak DoubleBreak .add BasicSize MoreLead topLeadingGlue
QuadBreak BasicSize MoreLead bottomLeadingGlue
6 in lineLength
200 pageBreakAfterLastLinePenalty
0 firstIndent
0 restIndent
centered lineFormatting
} ScreenRule
(title) "for title nodes" {
head
bold face
DoubleIncrement bigger size
DoubleBreak leading
QuadBreak DoubleBreak .add BasicSize MoreLead topLeadingGlue
QuadBreak BasicSize MoreLead bottomLeadingGlue
6 in lineLength
200 pageBreakAfterLastLinePenalty
0 firstIndent
0 restIndent
centered lineFormatting
} PrintRule
EndStyle