BeginStyle (look.b) "add bold to font face" {+bold face} StyleRule (look.c) "command name" { +bold face "Helvetica" family} StyleRule (look.e) "emphasis" {the face italic .eq {+bold face} {+italic face} .ifelse .cvx .exec} StyleRule (look.i) "add italic to font face" {+italic face} StyleRule (look.l) "larger font" {12 bp size "TimesRoman" family} StyleRule (look.m) "much larger" {18 bp size "TimesRoman" family} StyleRule (look.s) "smaller font" {8 bp size "TimesRoman" family} StyleRule (look.u) "underline all characters" {all underlining} StyleRule (default) "default type for nodes" { standard } StyleRule (header) "for document header info" { standard +italic face } StyleRule (root) "default type for root nodes" { standard 0 pt leftIndent 10 pt topIndent 5 pt rightIndent 4 sp tabStops } StyleRule (ruledef) "for first node of rule definition" { standard "TimesRoman" family 12 pt size regular face 24 pt topLeading 14 pt bottomLeading regular face } StyleRule (step) 0.25 in StyleParam (standard) "set up standard font, etc." { "TimesRoman" family regular face caps+lowercase alphabets 10 pt size 13 pt leading 14 pt topLeading 14 pt bottomLeading IF nestingLevel 1 .eq .not THEN {the step bigger leftIndent} FI IF isComment THEN {standardComment} FI } StyleRule (standardComment) "set up for comment nodes" { italic face 11 pt leading 12 pt topLeading 12 pt bottomLeading } StyleRule EndStyle μ Style.style Copyright Σ 1985, 1986, 1987, 1991 by Xerox Corporation. All rights reserved. last written by Paxton, July 22, 1982 2:59 pm Rick Beach, August 5, 1985 4:50:07 pm PDT Michael Plass, November 23, 1987 12:40:53 pm PST Κ –(cedarcode) style•NewlineDelimiter ™™ Jšœ ΟeœC™NJ™-J™)J™0J™—ruledef˜ šœΟcœΟbœ˜ Jšœ˜—šœžœž œ˜Jšœ*˜*—šœžœœ˜JšœN˜N—šœžœΟiœ˜"Jšœ˜—šœžœΟl œ˜Jšœ*˜*—šœžœΟm œ˜Jšœ*˜*—šœžœΟs œ˜Jšœ)˜)—KšœžœΟuœ˜?šœžœ˜$J˜J˜ —šœžœ˜%J˜J˜ J˜ —šœžœ!˜&J˜J˜J˜J˜J˜ J˜ —šœžœ'˜/J˜J˜Jšœ ˜ J˜ J˜J˜J˜ J˜ —Kšœžœ˜šœžœ ˜)Jšœ˜J˜ J˜J˜ Jšœ ˜ Jšœ˜Jšœ˜Jšœ?˜?Jšœ&˜&J˜ —šœžœ˜.Jšœ ˜ Jšœ ˜ Jšœ˜Jšœ˜J˜ —K˜—J˜—…—€w