% BlueAndWhite.Style
% Created by Beach, May 15, 1984 10:34:46 am PDT
% last modified by Subhana, August 9, 1983 2:20 PM
% Last Edited by: Horning, September 9, 1983 1:56 pm
% Last Edited by: Subhana, May 15, 1984 8:40:59 am PDT
% Last Edited by: Beach, May 16, 1984 11:27:34 am PDT
BeginStyle
(
Cedar) AttachStyle
% General declarations
(
oneSidedFormat) % set false if you wish two-sided headers/footers
{.false} .cvx .def
(
firstPageNumber)
{0} .cvx .def
(
firstHeadersAfterPage)
{0} .cvx .def
(
BasicLeading) % normal type leading
{BasicSize 6 bp .add} .cvx .def
% Looks
(look.
q) "
quaint Xerox logo font ScreenRule" {
"Logo" family 24 pt size 4 pt bigger topLeading} ScreenRule
(look.
q) "
quaint Xerox logo font PrintRule" {
"Logo" family 24 pt size 8 pt .neg vshift} PrintRule
% Formats
(
block) "for block paragraphs, no initial indentation" {
docStandard
regular face
BasicLeading MoreLead 0 topLeadingGlue
10 pageBreakPenalty
justified lineFormatting
} StyleRule
(
head1) "for chapter headings" {
docStandard
bold face
LargeSize size
LargeSize MoreLead .add leading
isComment {
QuadBreak BasicSize MoreLead topLeadingGlue
} {
HexBreak BasicSize MoreLead topLeadingGlue
} .ifelse .cvx .exec
24 pt BasicSize MoreLead bottomLeadingGlue
} ScreenRule
(
head1) "for chapter headings" {
docStandard
bold face
LargeSize size
LargeSize MoreLead .add leading
isComment {
QuadBreak BasicSize MoreLead topLeadingGlue
} {
HexBreak BasicSize MoreLead topLeadingGlue
} .ifelse .cvx .exec
24 pt BasicSize MoreLead bottomLeadingGlue
} PrintRule
(
head2) "for major section headings" {
docStandard
bold face
BasicSize MoreLead .add leading
40 pt BasicSize MoreLead topLeadingGlue
24 pt BasicSize MoreLead bottomLeadingGlue
18 pageBreakAfterLastLinePenalty
} StyleRule
(
head3) "for minor section headings" {
docStandard
italic face
BasicSize MoreLead .add leading
DoubleBreak BasicSize MoreLead topLeadingGlue
24 pt BasicSize MoreLead bottomLeadingGlue
25 pageBreakAfterLastLinePenalty
} StyleRule
(
pageBreak) "to force a new page" {
standard
centered lineFormatting
0 pt 1 fill 0 pt topLeadingGlue
1 fill 0 pt 0 pt bottomLeadingGlue
} PrintRule
(
pageBreak) "to force a new page" {
standard
centered lineFormatting
} ScreenRule
(
root) "default type for root nodes" {
docStandard
.5 in topMargin
.8 in headerMargin
.5 in footerMargin
.5 in bottomMargin
85 pt leftMargin
85 pt rightMargin
442 pt lineLength
24 pt topIndent
24 pt topLeading
0 leftIndent
0 pt rightIndent
} StyleRule
(
tight) "for items with less leading" {
block
BasicSize ExtraLead .add ExtraLead 0 topLeadingGlue
BasicSize ExtraLead .add ExtraLead 0 bottomLeadingGlue
BasicSize ExtraLead .add leading
} StyleRule
EndStyle