% MJSCedar.Style
% last written by Spreitzer, March 17, 1983 2:24 pm
BeginStyle
(
Cedar) AttachStyle
% Formats
(
code) "for ordinary Cedar program statements" {
standard
"Gacha" family 10 bp size
nestingLevel 1 .eq .not {CodeIndent bigger leftIndent} .cvx .if
CodeIndent 3 .mul restIndent
} StyleRule
% Looks
(look
.v) "for code" {
"Gacha" family} StyleRule
(look
.w) "for concepts" {
AlternateFontFamily} StyleRule
EndStyle