(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP") (FILECREATED "21-Jun-2021 20:29:51" ("compiled on " {DSK}kaplan>Local>medley3.5>git-medley>library>POSTSCRIPTSTREAM.;11) "21-Jun-2021 19:44:30" recompiled exprs%: \SETXFORM.PSC in "FULL 21-Jun-2021 ..." dated "21-Jun-2021 19:44:43") (FILECREATED "21-Jun-2021 20:29:32" {DSK}kaplan>Local>medley3.5>git-medley>library>POSTSCRIPTSTREAM.;11 259283 previous date%: "12-Jun-2021 19:14:50" {DSK}kaplan>Local>medley3.5>git-medley>library>POSTSCRIPTSTREAM.;10) POSTSCRIPT.INITA0045 :D8 (I 2 DIMENSION I 1 BITMAP I 0 STREAM) YBdgh@ A dgh@ A  h@ A h@ A B (86 \ILLEGAL.ARG 77 BITMAPHEIGHT 71 DSPSCALE 63 BITMAPWIDTH 57 DSPSCALE 46 BITMAPHEIGHT 40 DSPSCALE 22 BITMAPWIDTH 16 DSPSCALE) (30 HEIGHT 6 WIDTH) () POSTSCRIPT.INIT :D8 (P 15 A0178 P 14 A0179 P 13 A0177 P 12 x P 10 FP P 9 OLDPSCFD P 8 COPYFD P 7 CLASS P 3 FD F 16 FONTDEFS F 17 POSTSCRIPTFONTCACHE F 18 *POSTSCRIPT-NS-TRANSLATIONS*) 0W 4d0gKdMLh^L&NXIHZYJo YHd! O O _pOO O_gO_OgOd$OOd  OlW UdgK?d gO*OgOOOhh hgdddg dgK hc"ngi l~l  OdOgg `dgdgdgdgdg dgdg dg dgdgdgdgdgdgdgdgdgDdgdg"dgPdg0dg$dg&dg(dg*dg,dgdg@dgBdg2dg4dgLdgJdgNdgXdgRdgTdg^dg\dgZdgVdgHdgFdg:dg8dg6dg.l W$ l(&Odl) dl\`!O_OOOOk_(889 \POSTSCRIPT.NSHASH 877 HARRAY 427 FONTPROFILE.ADDDEVICE 389 CL:MAKE-ARRAY 367 APPLY 349 FONTSAVAILABLE 318 \NCONC2 217 FONTUNPARSE 209 FONTUNPARSE 112 \EVALV1 101 BOUNDP 84 LAST 76 CL:REMOVE-DUPLICATES 71 \NCONC2) (915 \POSTSCRIPT.CHARTYPE 882 *POSTSCRIPT-NS-HASH* 870 \POSTSCRIPTIMAGEOPS 862 NILL 853 NILL 844 NILL 835 POSTSCRIPT.INITA0045 826 NILL 817 NILL 808 NILL 799 \MEDW.BLTCHAR 790 \MEDW.XOFFSET 781 \MEDW.YOFFSET 772 \DSPPOPSTATE.PSC 763 \DSPPUSHSTATE.PSC 754 \DRAWPOINT.PSC 745 \DSPTRANSLATE.PSC 736 \DSPROTATE.PSC 727 \DRAWARC.PSC 718 \CHARWIDTH.PSC 709 \STRINGWIDTH.PSC 700 \FILLPOLYGON.PSC 691 \DRAWPOLYGON.PSC 682 \DSPRESET.PSC 673 \DSPCLIPPINGREGION.PSC 664 POSTSCRIPT 655 \DSPSPACEFACTOR.PSC 646 \DSPBOTTOMMARGIN.PSC 637 \DSPTOPMARGIN.PSC 628 \TERPRI.PSC 619 \DSPCOLOR.PSC 610 \DSPSCALE2.PSC 601 \DSPSCALE.PSC 592 \NEWPAGE.PSC 583 \SCALEDBITBLT.PSC 574 \BITBLT.PSC 565 \BLTSHADE.PSC 556 \FILLCIRCLE.PSC 547 \DRAWELLIPSE.PSC 538 \DRAWCIRCLE.PSC 529 \DRAWCURVE.PSC 520 \DRAWLINE.PSC 511 \DSPLINEFEED.PSC 502 \DSPRIGHTMARGIN.PSC 493 \DSPLEFTMARGIN.PSC 484 \DSPFONT.PSC 475 \MOVETO.PSC 466 \DSPYPOSITION.PSC 457 \DSPXPOSITION.PSC 448 CLOSEPOSTSCRIPTSTREAM 439 POSTSCRIPT 432 |IMAGEOPSTYPE#| 422 INTERPRESS 417 POSTSCRIPT 394 \POSTSCRIPT.CHARTYPE 383 :INITIAL-ELEMENT 361 SETFONTDESCRIPTOR 343 POSTSCRIPT 335 * 286 POSTSCRIPT 269 POSTSCRIPT 254 FONTPROFILE 225 FONTCLASS 186 POSTSCRIPT 181 FONTCLASS 167 FONTCLASS 160 POSTSCRIPT 150 FONTCLASS 139 FONTCLASS 128 FONTCLASS 119 FONTCLASS 19 FONTPROFILE) ( 66 (FONT7 FONT6 FONT5 FONT4 FONT3 FONT2 FONT1 BOLDFONT LITTLEFONT BIGFONT PRETTYCOMFONT COMMENTFONT USERFONT SYSTEMFONT CLISPFONT LAMBDAFONT CHANGEFONT DEFAULTFONT)) PSCFONT.READFONT :D8 (P 5 C P 3 W P 2 FID P 1 PF P 0 S I 0 FONTFILENAME F 6 POSTSCRIPTFONTCACHE)  @gho hddddddd"IHo ZH lIJIH H IH H IH H IH H Ingjd [ljMLKMH H Mk]H InI@g IIIIIIIIVc I(206 L-CASE 201 FILENAMEFIELD 173 CLOSEF 159 SETA 133 ARRAY 51 READ 46 FIND-READTABLE 16 OPENSTREAM) (196 NAME 126 SMALLPOSP 5 INPUT) ( 41 "INTERLISP" 11 ((SEQUENTIAL T))) PSCFONT.SPELLFILE :D8 (I 4 DEVICE I 3 ROTATION I 2 FACE I 1 SIZE I 0 FAMILY) )`"@`@ABjDj`o (38 \FINDFONTFILE) (27 POSTSCRIPTFONTDIRECTORIES 12 POSTSCRIPT.FONT.ALIST 4 POSTSCRIPTFONTDIRECTORIES) ( 32 (PSCFONT PF PSC)) PSCFONT.COERCEFILE :D8 (I 6 DEVICE I 5 ROTATION I 4 EXPANSION I 3 SLOPE I 2 WEIGHT I 1 SIZE I 0 FAMILY) 1Dg@ABCghEF Cg@ABgDhEF Dg&Cg@ABgdhEF Bdg@AgCDhEF Bg&Dg@AgCghEF iBdg(Cg@AggDhEF :Bgh/Dgh$Cg@AggdhEF (302 PSCFONT.SPELLFILE 244 PSCFONT.SPELLFILE 197 PSCFONT.SPELLFILE 148 PSCFONT.SPELLFILE 110 PSCFONT.SPELLFILE 65 PSCFONT.SPELLFILE 29 PSCFONT.SPELLFILE) (289 REGULAR 284 MEDIUM 274 ITALIC 263 REGULAR 252 MEDIUM 231 REGULAR 226 MEDIUM 216 ITALIC 206 MEDIUM 185 REGULAR 179 MEDIUM 169 REGULAR 160 MEDIUM 134 MEDIUM 123 MEDIUM 97 REGULAR 86 ITALIC 77 REGULAR 52 REGULAR 41 ITALIC 17 REGULAR 5 REGULAR) () PSCFONTFROMCACHE.SPELLFILE :D8 (I 4 DEVICE I 3 ROTATION I 2 FACE I 1 SIZE I 0 FAMILY F 1 POSTSCRIPTFONTCACHE) e@`@ABgj g QHd3HHHHHHH(39 L-CASE 34 FILENAMEFIELD 24 \FONTFILENAME) (29 NAME 17 PSCFONT 5 POSTSCRIPT.FONT.ALIST) () PSCFONTFROMCACHE.COERCEFILE :D8 (I 6 DEVICE I 5 ROTATION I 4 EXPANSION I 3 SLOPE I 2 WEIGHT I 1 SIZE I 0 FAMILY) 1Dg@ABCghEF Cg@ABgDhEF Dg&Cg@ABgdhEF Bdg@AgCDhEF Bg&Dg@AgCghEF iBdg(Cg@AggDhEF :Bgh/Dgh$Cg@AggdhEF (302 PSCFONTFROMCACHE.SPELLFILE 244 PSCFONTFROMCACHE.SPELLFILE 197 PSCFONTFROMCACHE.SPELLFILE 148 PSCFONTFROMCACHE.SPELLFILE 110 PSCFONTFROMCACHE.SPELLFILE 65 PSCFONTFROMCACHE.SPELLFILE 29 PSCFONTFROMCACHE.SPELLFILE) (289 REGULAR 284 MEDIUM 274 ITALIC 263 REGULAR 252 MEDIUM 231 REGULAR 226 MEDIUM 216 ITALIC 206 MEDIUM 185 REGULAR 179 MEDIUM 169 REGULAR 160 MEDIUM 134 MEDIUM 123 MEDIUM 97 REGULAR 86 ITALIC 77 REGULAR 52 REGULAR 41 ITALIC 17 REGULAR 5 REGULAR) () PSCFONT.WRITEFONT :D8 (P 14 C P 2 *READTABLE* P 1 W P 0 S I 1 PF I 0 FONTFILENAME) @gho Ao  AH Hj Hl HA[L KLl HA]N MNl HA__O OOl HA__O OOl ljOOH @HIO __O OOl Ok_(238 \BOUT 225 \BOUT 212 ELT 201 CLOSEF 181 \BOUT 168 \BOUT 146 \BOUT 133 \BOUT 112 \BOUT 101 \BOUT 85 \BOUT 74 \BOUT 60 BOUT 52 BOUT 45 PRIN3 34 FIND-READTABLE 16 OPENSTREAM) (5 OUTPUT) ( 29 "INTERLISP" 11 ((TYPE BINARY) (SEQUENTIAL T))) READ-AFM-FILE :D8 (P 18 CCODE P 17 CC P 10 FBBOX P 9 CMCOUNT P 8 HEIGHT P 7 SLOPE P 6 WEIGHT P 5 TOKEN P 4 W P 3 LCHAR P 2 FCHAR P 1 PSCFONT P 0 IFILE I 2 ITALICNESS I 1 BOLDNESS I 0 FILE F 19 WeightMenu F 20 SlopeMenu F 21 CWIDTH F 22 CNAME F 23 WeightMenuItems F 24 SlopeMenuItems F 25 *POSTSCRIPT-EXTRA-CHARACTERS*) n@g hdddddddnjngjd H oH H oH ] g W&L`dW.gl _dOdg dgjdndh_dO c&g W(L`dW0gl _dOdg dgjdndh_dO c(A^?i oi Ii oi W& ^i i B_@i oi Ii oi W( _i i IMNOghIOgNgMINOg H oM H H H H h_IO_jOOjOIOII_IInO IInO H oM BH _H l ILOkO"O H gH _$gH H c*O$jJO$0O$Z-H gH c,W2W,'_$JO$O$ZO$KO$LO$W* H l O"k_"lIJIKH I(874 CLOSEF 840 READCCODE 833 SETA 794 RATOM 780 RATOM 755 READ 748 RATOMS 734 READ 720 RATOM 681 READCCODE 672 RATOM 662 CL::SIMPLE-STRING-EQUAL 650 READCCODE 642 FIXR 636 CL::%%/ 613 FIXR 607 CL::%%/ 519 READ 513 READ 507 READ 501 READ 491 CL::SIMPLE-STRING-EQUAL 479 RSTRING 471 POSTSCRIPT.GETFONTID 417 TERPRI 410 PRIN1 402 MENU 394 PRIN1 382 PRIN1 374 PRIN1 362 TERPRI 350 TERPRI 343 PRIN1 336 MENU 328 PRIN1 316 PRIN1 308 PRIN1 296 TERPRI 236 FONTCREATE 202 BOUNDP 142 FONTCREATE 108 BOUNDP 96 CL::SIMPLE-STRING-EQUAL 90 RSTRING 78 READCCODE 70 CL::SIMPLE-STRING-EQUAL 65 RSTRING 53 READCCODE 44 ARRAY 10 OPENSTREAM) (785 N 742 WX 725 C 466 REGULAR 452 MEDIUM 444 REGULAR 428 REGULAR 260 DEFAULTMENUHELDFN 251 CLRPROMPT 229 HELVETICA 217 |MENUTYPE#| 210 MENU 197 SlopeMenu 166 DEFAULTMENUHELDFN 157 CLRPROMPT 135 HELVETICA 123 |MENUTYPE#| 116 MENU 103 WeightMenu 37 SMALLPOSP 5 INPUT) ( 656 "StartCharMetrics" 485 "FontBBox" 388 ": " 368 "Font SLOPE for " 322 ": " 302 "Font WEIGHT for " 84 "" 59 "FontName") CONVERT-AFM-FILES :D8 (P 9 SLOPE P 8 WEIGHT P 7 AFM-FILE P 3 FILENAME P 2 FONT P 1 FNAME P 0 FL I 0 FILE-LIST) } @8dHH!ooH3 N_M_L h_OOO IkOOghgj [J NML(111 PSCFONT.WRITEFONT 104 \FONTFILENAME 76 READ-AFM-FILE) (97 PSCFONT 88 REGULAR) ( 25 (MEDIUM MEDIUM BOLD BOLD) 20 (REGULAR ITALIC REGULAR ITALIC)) POSTSCRIPT.GETFONTID :D8 (P 0 FONTID I 3 EXPANSION I 2 SLOPE I 1 WEIGHT I 0 FID) n@oohX@dBBgHo@AAgHoCgHHCgooHNIL (91 COMPRESSED 77 REGULAR 60 BOLD 35 ITALIC) ( 104 1.618034 98 0.618034 69 1.1 45 0.12278454 14 0.0 9 1.0) POSTSCRIPT.FONTCREATEA0015 :D8 (P 4 BASECHAR P 3 CODE2 P 2 A0181 P 1 KIND P 0 A0180 I 1 CODE I 0 MAPPING F 8 FD F 9 PSCWIDTHSBLOCK F 10 SYMWIDTHS F 11 DINGWIDTHS) @AHHZJI3WAWKlMN NMh NlOOg=W.WAWKl MN NMh NlOOIdg>WWAWKl MN NMh NlOOg>WAWȤoW1 MN NMh NlOOIdg1WAWLMN NMh NlOOg/WAWKMN NMh NlOO(369 \CREATECHARSET 315 \CREATECHARSET 258 \CREATECHARSET 234 FIXR 190 \CREATECHARSET 167 ELT 120 \CREATECHARSET 97 ELT 53 \CREATECHARSET) (334 ACCENTPAIR 279 ACCENT 209 FUNCTION 141 DINGBAT 72 SYMBOL) ( 224 1.3) POSTSCRIPT.FONTCREATEA0046 :D8 (I 1 CODE I 0 MAPPING F 3 FD) B@g8SA@S@lHHI IHh IlJJ(52 \CREATECHARSET) (6 APPLY*) () POSTSCRIPT.FONTCREATE :D8 (P 21 DINGWIDTHS P 20 SYMWIDTHS P 19 TMP P 18 CH P 13 FACECHANGED P 12 FD P 11 WIDTHSBLOCK P 10 PSCWIDTHSBLOCK P 9 FIXPWIDTHS P 8 DESCENT P 7 ASCENT P 6 PSCFD P 5 SCALEFONTP P 4 FULLNAME P 3 UNITFONT P 2 EXPANSION P 1 SLOPE P 0 WEIGHT I 4 DEVICE I 3 ROTATION I 2 FACE I 1 SIZE I 0 FAMILY) BBBAk@ABCD ^h_A@ABCD \@AHIJCD ^i_ h_@AHIJCD \FNdxo _No _ONNHIJ  i_@kBCDi [=@ABCD @ABCD \d ^d_N_h>g'ANo _ANo _i]N`gNh_dOdlddDd@dAdBdj OO_dO dOdO lki _ dO _d jOh _N_M8ljO$O"(OO$AOO$ o O$k_$)ljO$O"OO$OO$ O$k_$llk _ljO$O"OO$OO$O$k_$L KdD O&%@O&OO&AB jDhgOCD gOCD `g `g O(733 MAPHASH 717 MAPHASH 699 \POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS 685 \POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS 659 COPY 628 \FONTINFOFROMFILENAME 569 \ALLOCBLOCK 544 ELT 503 FIXR 491 ELT 441 \CREATECHARSET 414 \ALLOCBLOCK 310 FIXR 287 FIXR 227 PSCFONT.READFONT 219 PSCFONT.SPELLFILE 206 PSCFONTFROMCACHE.SPELLFILE 192 FONTCREATE 173 PSCFONT.READFONT 164 POSTSCRIPT.GETFONTID 143 FIXR 122 FIXR 97 PSCFONT.COERCEFILE 78 PSCFONT.READFONT 64 PSCFONTFROMCACHE.COERCEFILE 48 PSCFONT.SPELLFILE 29 PSCFONTFROMCACHE.SPELLFILE) (728 POSTSCRIPT.FONTCREATEA0046 723 *POSTSCRIPT-NS-HASH* 712 POSTSCRIPT.FONTCREATEA0015 707 *POSTSCRIPT-NS-HASH* 690 ZAPFDINGBATS 676 SYMBOL 649 FONTDESCRIPTOR 619 FONTDESCRIPTOR 446 CHARSETINFO 334 PSCFONT 328 |FONTDESCRIPTORTYPE#| 266 PSCFONT 259 FONTDESCRIPTOR) ( 497 0.1 304 0.1 281 0.1 137 0.1 116 0.1) \POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS :D8 (P 6 CH P 4 NEWWIDTHS P 3 WIDTHS P 2 TYPEFONT P 1 FONTFILE P 0 SIZE I 3 DEVICE I 2 ROTATION I 1 FD I 0 TYPE) A@kABC gkoBC 2@kABC G@kABC Y-gkoBC gkoBC Yd ZdKd[@ngjd \ljNM$LNHKN o Nk^L(207 SETA 202 FIXR 190 ELT 168 ARRAY 138 PSCFONT.READFONT 130 PSCFONT.SPELLFILE 109 PSCFONTFROMCACHE.SPELLFILE 87 PSCFONT.SPELLFILE 67 PSCFONTFROMCACHE.SPELLFILE 46 PSCFONT.SPELLFILE 25 PSCFONT.SPELLFILE) (161 SMALLPOSP 116 SYMBOL 95 SYMBOL 77 FONTDESCRIPTOR 57 FONTDESCRIPTOR 32 SYMBOL 15 FONTDESCRIPTOR 5 FONTDESCRIPTOR) ( 196 0.1 122 (MEDIUM REGULAR REGULAR) 101 (MEDIUM REGULAR REGULAR) 38 (MEDIUM REGULAR REGULAR)) POSTSCRIPT.FONTSAVAILABLE :D8 (P 30 NF P 22 S P 20 FD P 19 FD P 14 RAWNAME P 13 RAWFD P 12 FILE P 8 DIRECTORY P 6 FONTSAVAILABLE P 5 INVERSE.ALIST P 4 PATTERN I 4 DEVICE I 3 ROTATION I 2 FACE I 1 SIZE I 0 FAMILY) @`@ABg @`d[KIHhZH&J"0`dd0 OL ;d OD O_OOMO_O Oh_O&_OXI*HZYJAO"O ^Ag10N YH_&@g@O&WAgAO&O&k@BgBO&BoO&O&O O&_$O"O$h_"_ O_pO$&_"dO(dkQ`l2O,O*2O( _O,O_2O0O2h_0_.O,k_,O2&_0O.AO4O6XI8HZYJ_@g ogg @j @ l%@ l!@j (58 SETFILEPTR 39 SETFILEPTR 30 CL:MEMBER 10 UNPACKFILENAME.STRING) (25 STRING-EQUAL 20 :TEST 5 EXTENSION) ( 15 ("PS" "PSC" "PSF")) MAKEEPSFILE :D8 (P 4 BOUNDINGBOX P 3 IMAGEBOX P 0 STREAM I 1 FILENAME I 0 IMAGEOBJ) gg !@g @HlIjdKKhAggjdKKhh XKKH @g @HlJH (125 CLOSEF 110 IMAGEOBJPROP 99 MOVETO 83 OPENIMAGESTREAM 28 IMAGEOBJPROP 14 OPENIMAGESTREAM) (105 DISPLAYFN 63 BOUNDINGBOX 58 POSTSCRIPT 23 IMAGEBOXFN 9 POSTSCRIPT 4 {NODIRCORE}SCRATCH) () POSTSCRIPT.BITMAPSCALE :D8 (P 16 MINDIML P 15 MINDIMP P 6 SHORTEDGE P 3 LONGEDGE P 0 PAGEREGION I 1 HEIGHT I 0 WIDTH) ?lH` `` HHYJIJHHMdLLKA`bN@`b__OdOONAK@__OdOO_ `dg` _O _OO_O _Odkk0oo"OdooooO_Odkk0oo"OdooooOkOdOdOhOO(159 MENU 29 \PS.SCALEREGION 11 CL::%%/) (154 \POSTSCRIPT.ORIENTATION.MENU 146 ASK 140 POSTSCRIPT.PREFER.LANDSCAPE 87 POSTSCRIPT.BITMAP.SCALE 76 POSTSCRIPT.BITMAP.SCALE 21 POSTSCRIPT.PAGEREGIONS 16 POSTSCRIPT.PAGETYPE 6 POSTSCRIPT.BITMAP.SCALE) ( 291 0.25 284 0.25 278 0.5 270 0.5 260 0.75 253 0.75 233 0.25 226 0.25 220 0.5 212 0.5 202 0.75 195 0.75) POSTSCRIPT.CLOSESTRING :D8 (P 0 IMAGEDATA I 0 STREAM) ,@0H$@o Hh$i(31 POSTSCRIPT.OUTSTR) (37 \POSTSCRIPTDATA 16 \POSTSCRIPTDATA 5 STREAM) ( 26 ") ") POSTSCRIPT.ENDPAGE :D8 (P 0 IMAGEDATA I 0 STREAM) M@0@ Hh0H4@o @og Hh@h(63 POSTSCRIPT.PUTCOMMAND 44 POSTSCRIPT.PUTCOMMAND 16 POSTSCRIPT.SHOWACCUM) (70 \POSTSCRIPTDATA 58 :EOL 31 \POSTSCRIPTDATA 22 \POSTSCRIPTDATA 5 STREAM) ( 53 "showpage" 39 "grestore savepage restore ") POSTSCRIPT.OUTSTR :D8 (L (1 X 0 STREAM)) LAd3 @A d Adj lDRAAHdj kٻHdj KHl ZKk[JLK@Il @Adj Adj Al H @HIJKlLd3@=jABI[I jh]HkXL^MKHKHº@Jl AjAdd @l0 AA d@Hl h(323 BOUT 306 CHCON 286 BOUT 276 \FZEROP 258 BOUT 167 \GETBASEFIXP 156 %%ARRAY-OFFSET 140 %%ARRAY-BASE 124 BOUT 95 \GETBASEFIXP 82 %%ARRAY-BASE 63 %%ARRAY-OFFSET 37 %%ARRAY-TYPE-NUMBER 19 STRINGP 12 \PS.BOUTFIXP) (299 FLOATP 292 RATIO 183 FDEV 176 STREAM) () POSTSCRIPT.PUTBITMAPBYTES :D8 (L (2 DELIMFLG 1 BITMAP 0 STREAM)) AAAHlAk`Bhjh_@l @l< @ dkdj@l l@l @l jIkIkL OOKkOOOulN3@ dkdj@l l@l @l jJO_@MOl @MOl NlؾOk_Ok_@ dkdj@l l@l @l jOm_OjL_3@l @l> @ dkdj@l l@l @l Hk _IkjIkL OOhjOkj$OKKOOOjO&O$,JO(OO* O,k_,O&k_&O(k_(O*k_*O,_"lO"OO"_OO"_OO"_O"k_"jlO5@ dkdj@l l@l @l j_@lB @l3 nO"@lF @lF@MO"l @MO"l O"n_"Ol_dJO_ KOOjO0O."JO2O O4k_4O0k_0O2k_2O4_"lO"OO"_OO"_OO"_O"k_"jlO5@ dkdj@l l@l @l j_@lB @l2 nO"@lF @lF@MO"l @MO"l @MO l @MO l O"n_"Ol_BJO_ lO5@ dkdj@l l@l @l j_O lO lO l@lB @l4 Ol_@MO l @MO l Ok_Ok_Ok_Ol_,@ dkdj@l l@l @l JOOjK Ok_OjL_(1255 \MOVEBYTES 1240 \BOUT 1231 \BOUT 1161 BOUT 1147 BOUT 1121 BOUT 1112 BOUT 1080 \BOUT 1071 \BOUT 999 BOUT 985 BOUT 967 BOUT 953 BOUT 930 BOUT 914 BOUT 905 BOUT 892 \BOUT 883 \BOUT 712 BOUT 698 BOUT 675 BOUT 659 BOUT 650 BOUT 637 \BOUT 628 \BOUT 429 BITMAPCREATE 421 \BOUT 412 \BOUT 398 \BOUT 371 BOUT 363 BOUT 331 \BOUT 322 \BOUT 262 BOUT 248 BOUT 221 \BOUT 212 \BOUT 133 \BOUT 124 \BOUT 87 BOUT 79 BOUT) (1200 STREAM 1040 STREAM 852 STREAM 597 STREAM 434 BITMAP 377 STREAM 291 STREAM 181 STREAM 93 STREAM 57 ARRAYP 52 PS.BITMAPARRAY 42 BITMAP 25 BITMAP 16 BITMAP 5 BITMAP) () POSTSCRIPT.PUTCOMMAND :D8 (P 5 STR# P 3 S#S P 2 IMAGEDATA P 1 STREAM P 0 S.STRS) eka!I0hJh4J$I J0IJ HlMdLha[g@I dkIl /djIl lIl Il IK Mk](138 POSTSCRIPT.OUTSTR 130 \BOUT 121 \BOUT 106 \BOUT 91 \BOUT 45 \SETXFORM.PSC 33 POSTSCRIPT.SHOWACCUM) (75 STREAM 66 :EOL 14 STREAM) () POSTSCRIPT.SET-FAKE-LANDSCAPE :D8 (P 10 MT P 9 MR P 8 MB P 7 ML P 6 P P 5 C P 4 P0 P 3 C0 P 2 LAND P 1 OLAND P 0 IMAGEDATA I 1 ROTATION I 0 STREAM)  @0 H"lZjhZ[\]^____AIj AA hZH"@ @jd HH2odKKhjdLLhJQMKMLKKH _LHk_H _LHkհSMLKKMKLH k_H_LH k_H_HMHN2HOHO HOHO HJ"Hi0@ (401 \DSPRESET.PSC 88 \DSPTRANSLATE.PSC 79 POSTSCRIPT.SHOWACCUM 59 \FZEROP) (391 \POSTSCRIPTDATA 381 \POSTSCRIPTDATA 370 \POSTSCRIPTDATA 359 \POSTSCRIPTDATA 348 \POSTSCRIPTDATA 337 \POSTSCRIPTDATA 327 \POSTSCRIPTDATA 317 \POSTSCRIPTDATA 306 \POSTSCRIPTDATA 292 \POSTSCRIPTDATA 276 \POSTSCRIPTDATA 262 \POSTSCRIPTDATA 220 \POSTSCRIPTDATA 205 \POSTSCRIPTDATA 191 \POSTSCRIPTDATA 176 \POSTSCRIPTDATA 104 \POSTSCRIPTDATA 95 \POSTSCRIPTDATA 68 \POSTSCRIPTDATA 16 \POSTSCRIPTDATA 5 STREAM) ( 112 -16383) POSTSCRIPT.SHOWACCUM :D8 (P 1 KERN P 0 IMAGEDATA I 0 STREAM) @0H$@g YHk I@oIo L@oD@o @H HC I!@ol oIoo @o @ dkdj@l l@l @l Hh$h(190 \BOUT 181 \BOUT 143 POSTSCRIPT.OUTSTR 131 CONCAT 97 POSTSCRIPT.OUTSTR 83 POSTSCRIPT.OUTSTR 62 CONCAT 40 EQP 30 STREAMPROP) (150 STREAM 25 KERN 11 \POSTSCRIPTDATA) ( 138 " 0 32 4 -1 roll widthshow" 125 " 6 -1 roll awidthshow" 120 " 0 " 114 " " 107 " 0 " 78 ") " 70 ") S" 57 " 0 3 -1 roll ashow" 51 ") ") POSTSCRIPT.STARTPAGE :D8 (P 4 FONT P 3 A0117 P 1 NEW-PAGE P 0 IMAGEDATA I 0 STREAM) @0!Hh0HKkԺKJJY@goIoIgogogoogog @Hi Hi&Hi4HW@H @ @H n j@ @o @I @ @ @L @ (248 \DSPRESET.PSC 241 \DSPFONT.PSC 234 \TERPRI.PSC 228 \TERPRI.PSC 222 POSTSCRIPT.OUTSTR 215 POSTSCRIPT.OUTSTR 204 RELMOVETO 194 POSTSCRIPT.OUTSTR 180 \DSPRESET.PSC 171 \DSPFONT.PSC 129 \SETXFORM.PSC 121 POSTSCRIPT.PUTCOMMAND) (187 \POSTSCRIPTDATA 164 \POSTSCRIPTDATA 153 \POSTSCRIPTDATA 144 \POSTSCRIPTDATA 135 \POSTSCRIPTDATA 115 :EOL 105 :EOL 90 :EOL 80 :EOL 70 :EOL 53 :EOL 40 \POSTSCRIPTDATA 29 \POSTSCRIPTDATA 16 \POSTSCRIPTDATA 5 STREAM) ( 210 "Page " 110 "%%%%EndPageSetup" 100 " imagesizefactor mul dup scale" 95 0.01 85 "/savepage save def" 75 "%%%%BeginPageSetup" 64 " " 58 "%%%%Page: ") \POSTSCRIPTTAB :D8 (I 0 POSTSCRIPTDATA) l@H@@HNIL NIL () \PS.BOUTFIXP :D8 (L (1 N 0 STREAM)) jA@l- jAbl A@Al0 oA[@08lHIAl l0ǿAl bjImԹ@HIlIK @KLMNlJA d@Hl h(155 BOUT 138 CHCON 33 BOUT 11 BOUT) (120 FDEV 113 STREAM 63 ARRAYP 56 \POSTSCRIPTDATA 49 STREAM) ( 39 1000000000) \PS.SCALEHACK :D8 (P 3 REG P 2 FACTOR P 1 OLDSCALE P 0 IMAGEDATA I 1 SCALEFACTOR I 0 STREAM) g@0!H6hA3JIA ?@ IA HH2hDdKdJ KKJ KKJ KKJ HHJ HHJ HHJ HHJ HH J  HH J  HH,J ,HH.J .HA6Hi0I(333 FIXR 309 FIXR 285 FIXR 261 FIXR 237 FIXR 213 FIXR 189 FIXR 165 FIXR 138 FIXR 120 FIXR 104 FIXR 90 FIXR 53 CL::%%/ 45 POSTSCRIPT.SHOWACCUM 35 EQP) (352 \POSTSCRIPTDATA 342 \POSTSCRIPTDATA 324 \POSTSCRIPTDATA 318 \POSTSCRIPTDATA 300 \POSTSCRIPTDATA 294 \POSTSCRIPTDATA 276 \POSTSCRIPTDATA 270 \POSTSCRIPTDATA 252 \POSTSCRIPTDATA 246 \POSTSCRIPTDATA 228 \POSTSCRIPTDATA 222 \POSTSCRIPTDATA 204 \POSTSCRIPTDATA 198 \POSTSCRIPTDATA 180 \POSTSCRIPTDATA 174 \POSTSCRIPTDATA 156 \POSTSCRIPTDATA 150 \POSTSCRIPTDATA 68 \POSTSCRIPTDATA 60 \POSTSCRIPTDATA 16 \POSTSCRIPTDATA 5 STREAM) () \PS.SCALEREGION :D8 (I 1 REGION I 0 SCALE) 1@A @A @A @A h(41 FIXR 29 FIXR 18 FIXR 8 FIXR) NIL () \SCALEDBITBLT.PSC :D8 (P 6 TEMPBM P 5 BITMAPHEIGHT P 4 BITMAPWIDTH P 3 DESTREGION P 2 SCALE2 P 1 SCALE1 P 0 IMAGEDATA I 14 SCALE I 13 CLIPPEDSOURCEBOTTOM I 12 CLIPPEDSOURCELEFT I 11 CLIPPINGREGION I 10 TEXTURE I 9 OPERATION I 8 SOURCETYPE I 7 HEIGHT I 6 WIDTH I 5 DESTINATIONBOTTOM I 4 DESTINATIONLEFT I 3 STREAM I 2 SOURCEBOTTOM I 1 SOURCELEFT I 0 SOURCEBITMAP) hG3kbC0GHI`3kA@@hDHbEHb FGLb MbFLLb GMMbHDEIFIG [dGdG AjBjFL GM @^"FGk @ABNjdFGGg CoDoEoJFoJGoFoGGgooog CNh Cgog CDE i(356 \MOVETO.PSC 348 POSTSCRIPT.PUTCOMMAND 327 POSTSCRIPT.PUTBITMAPBYTES 319 POSTSCRIPT.PUTCOMMAND 239 BKBITBLT 216 BITMAPCREATE 202 EQP 193 EQP 170 REGIONSINTERSECTP 151 INTERSECTREGIONS 146 CREATEREGION) (343 :EOL 333 :EOL 313 :EOL 290 PAINT 233 REPLACE 130 \POSTSCRIPTDATA 89 \POSTSCRIPTDATA 76 \POSTSCRIPTDATA 63 BITMAP 54 BITMAP 39 POSTSCRIPT.BITMAP.SCALE 27 \POSTSCRIPTDATA 14 STREAM) ( 338 "bitbltsave restore" 308 " thebitimage" 303 " true" 297 " true" 281 " " 275 " scale " 266 " " 258 " translate " 252 " " 246 "/bitbltsave save def ") \SETPOS.PSC :D8 (I 1 IMAGEDATA I 0 STREAM) #@AoAo Ah(h(27 POSTSCRIPT.PUTCOMMAND) (6 \POSTSCRIPTDATA) ( 21 " M " 13 " ") \SETXFORM.PSC :D8 (P 0 CLIP I 2 NORESTORE I 1 IMAGEDATA I 0 STREAM) /A!Ah0B@o @og A6k @A6og A"@o @oAdg*@ @H HdL@LlM g@ @H @L L Al Adl @ H[l @ H[Adl 1IH [H@ HH ػ@KH rn`dIJ[H@ HJػ@ @ @gNNh @H @o @N IJ[H@ HJػlA@A AlbH$@H @l( Hi$@l\ Al(Al)Al\v@A(793 BOUT 779 BOUT 770 \UPDATE.PSC 748 \POSTSCRIPT.PRINTSLUG 729 \TERPRI.PSC 711 \DSPFONT.PSC 703 POSTSCRIPT.OUTSTR 691 \UPDATE.PSC 683 \DSPFONT.PSC 651 POSTSCRIPT.SHOWACCUM 644 \DSPFONT.PSC 631 \TERPRI.PSC 607 \MOVETO.PSC 595 \POSTSCRIPTTAB 585 \TERPRI.PSC 571 \POSTSCRIPTTAB 543 DSPNEWPAGE 519 \TERPRI.PSC 497 \ILLEGAL.ARG 487 POSTSCRIPT.OUTSTR 477 \UPDATE.PSC 469 POSTSCRIPT.SHOWACCUM 430 \UPDATE.PSC 422 POSTSCRIPT.SHOWACCUM 403 \POSTSCRIPT.SPECIALOUTCHARFN 376 \POSTSCRIPT.ACCENTPAIR 345 \POSTSCRIPT.ACCENTFN 325 \POSTSCRIPT.SPECIALOUTCHARFN 299 \POSTSCRIPT.SPECIALOUTCHARFN 279 \TERPRI.PSC 259 GETHASH 239 BOUT 209 BOUT 195 BOUT 178 BOUT 158 BOUT 133 BOUT 124 \UPDATE.PSC 105 \TERPRI.PSC 40 \POSTSCRIPT.CHANGECHARSET) (672 FONTDESCRIPTOR 664 FONTDESCRIPTOR 658 ZAPFDINGBATS 550 \POSTSCRIPTDATA 526 \POSTSCRIPTDATA 460 FUNCTION 412 APPLY* 398 ZAPFDINGBATS 385 DINGBAT 354 ACCENTPAIR 333 ACCENT 320 SYMBOL 307 SYMBOL 254 *POSTSCRIPT-NS-HASH* 84 \POSTSCRIPT.CHARTYPE 16 \POSTSCRIPTDATA 5 STREAM) ( 698 " bboxchk ") \POSTSCRIPT.PRINTSLUG :D8 (L (1 CHAR 0 STREAM)) f@0n@HHH*AlHg @HH*AlH (99 \MOVETO.PSC 66 \BLTSHADE.PSC) (92 \POSTSCRIPTDATA 73 \POSTSCRIPTDATA 60 PAINT 53 FONTDESCRIPTOR 46 \POSTSCRIPTDATA 28 \POSTSCRIPTDATA 20 \POSTSCRIPTDATA 5 STREAM) () \POSTSCRIPT.SPECIALOUTCHARFN :D8 (L (2 FAMILY 1 CHAR 0 STREAM)) @0B@ Y@BIIh H$@H @l( Hi$l A:@l\ @l0Al @l0Al @l0AlذZlA:@l\ @l0Al @l0Al @l0AlذAl(Al)Al\@l\ @A I@I A(242 \DSPFONT.PSC 232 BOUT 224 BOUT 190 BOUT 173 BOUT 153 BOUT 128 BOUT 111 BOUT 91 BOUT 71 BOUT 62 \UPDATE.PSC 49 \DSPFONT.PSC 19 \DSPFONT.PSC) (38 FONTDESCRIPTOR 30 FONTDESCRIPTOR 5 STREAM) () \UPDATE.PSC :D8 (I 1 IMAGEDATA I 0 STREAM) &A0@A A&@A A( @A (35 \SETPOS.PSC 22 \SWITCHFONTS.PSC 10 \SETXFORM.PSC) NIL () \POSTSCRIPT.ACCENTFN :D8 (L (1 CHAR 0 STREAM)) @0H$@H @l( Hi$@l\ oA m QIdj kټIdj LIl ػIdj lD^Lk\KNMLMLº@J A(167 BOUT 131 %%ARRAY-TYPE-NUMBER 116 \GETBASEFIXP 103 %%ARRAY-BASE 84 %%ARRAY-OFFSET 68 SUBSTRING 61 CONCAT 56 OCTALSTRING 45 BOUT 31 BOUT 22 \UPDATE.PSC) (5 STREAM) ( 50 "000") \POSTSCRIPT.ACCENTPAIR :D8 (L (3 UNDER-ACCENTS 2 ACCENTS 1 CHAR 0 STREAM))  @0QH@ @H @l( @l\ oA m Q Ndj k_Ndj _ONl _Ndj lD_Ok_OOOOOO_@O @l) @l( BhJK@o CL@l) laAx@oIo o ^JhJJ@l\ oK m Q Ndj k_Ndj _ONl _Ndj lD_Ok_OOOOOO_@O LhLL@l\ oM m Q Ndj k_Ndj _ONl _Ndj lD_Ok_OOOOOO_@O w@o @oIg o @o A(669 POSTSCRIPT.PUTCOMMAND 658 POSTSCRIPT.PUTCOMMAND 648 FONTPROP 630 POSTSCRIPT.PUTCOMMAND 613 BOUT 565 %%ARRAY-TYPE-NUMBER 548 \GETBASEFIXP 532 %%ARRAY-BASE 511 %%ARRAY-OFFSET 495 SUBSTRING 488 CONCAT 483 OCTALSTRING 471 BOUT 445 BOUT 397 %%ARRAY-TYPE-NUMBER 380 \GETBASEFIXP 364 %%ARRAY-BASE 343 %%ARRAY-OFFSET 327 SUBSTRING 320 CONCAT 315 OCTALSTRING 303 BOUT 280 POSTSCRIPT.PUTCOMMAND 270 CL::%%/ 238 BOUT 221 POSTSCRIPT.PUTCOMMAND 203 BOUT 195 BOUT 184 BOUT 136 %%ARRAY-TYPE-NUMBER 119 \GETBASEFIXP 103 %%ARRAY-BASE 82 %%ARRAY-OFFSET 66 SUBSTRING 59 CONCAT 54 OCTALSTRING 43 BOUT 35 BOUT 27 \UPDATE.PSC 20 POSTSCRIPT.SHOWACCUM) (643 SIZE 258 FONTDESCRIPTOR 5 STREAM) ( 664 " accentor " 653 " " 637 " " 625 " 0 " 477 "000" 309 "000" 275 " " 265 3.0 252 " " 216 ") (" 48 "000") \PSC.SPACEDISP :D8 (I 1 WIDTH I 0 STREAM) @h@ A o (23 POSTSCRIPT.PUTCOMMAND 13 \PSC.SPACEWID 7 DSPFONT) NIL ( 18 " 0 rmoveto ") \PSC.SPACEWID :D8 (I 1 CHAR I 0 FONTDESC) (AdA @  @ (37 CHARWIDTH 31 CHARCODE.DECODE 25 FIXR 19 CHARWIDTH 13 CHARCODE.DECODE) NIL () \PSC.SYMBOLS :D8 (P 1 OLDFONT P 0 IMAGEDATA I 1 CHAR I 0 STREAM) Z@0@ @gIIh @ @H Ao@o @I (87 \DSPFONT.PSC 79 POSTSCRIPT.OUTSTR 60 \UPDATE.PSC 53 POSTSCRIPT.SHOWACCUM 47 \DSPFONT.PSC 13 \DSPFONT.PSC) (36 FONTDESCRIPTOR 28 FONTDESCRIPTOR 22 ZAPFDINGBATS 5 STREAM) ( 74 " bboxchk " 66 "0,161") \POSTSCRIPT.NSHASH :D8 (P 13 A0215 P 12 A0216 P 11 A0214 P 10 KIND P 9 A0211 P 8 CODE2 P 7 A0212 P 6 BASECHAR P 5 UNDERACCENTS P 4 A0210 P 3 CHARCODE P 1 MAPPING I 0 MAPPING-LIST) @!HhYdg𓿱 KIYa L_L__O_OOdgdddgO hvgOhiOgOdgO N Md h8g%IgIkJIIhoI ` Kl`! K_i_OOHX(226 PUTHASH 214 ERROR 154 CHARCODE.DECODE 145 CHARCODE.DECODE 139 CHARCODE.DECODE 94 CHARCODE.DECODE 30 CHARCODE.DECODE) (238 \POSTSCRIPT.CHARTYPE 221 *POSTSCRIPT-NS-HASH* 181 CL:IDENTITY 165 APPLY* 128 ACCENTPAIR 118 ACCENT 103 FUNCTION 84 DINGBAT 73 SYMBOL 18 *) ( 208 "UNRECOGNIZED POSTSCRIPT CHARACTER TYPE") POSTSCRIPTSEND :D8 (I 2 PRINTOPTIONS I 1 FILE I 0 HOST) )o g@AB @AB (38 UnixPrint 29 DOSPRINT 14 MKATOM 9 UNIX-GETPARM) (19 dos) ( 4 "ARCH") (PRETTYCOMPRINT POSTSCRIPTSTREAMCOMS) (RPAQQ POSTSCRIPTSTREAMCOMS ((* ;; "PostScript printer support for Medley") (DECLARE%: EVAL@COMPILE DONTCOPY (RECORDS FONTID PSCFONT \POSTSCRIPTDATA POSTSCRIPTXFORM)) (INITRECORDS \POSTSCRIPTDATA) (FNS POSTSCRIPT.INIT) (ADDVARS (DEFAULTFILETYPELIST (PS . TEXT) (PSC . TEXT) (PSF . BINARY) (PSCFONT . BINARY) (POSTSCRIPT . TEXT)) (*DISPLAY-FONT-NAME-MAP* (AVANTGARDE-BOOK . AB) (AVANTGARDE-DEMI . AD) ( BECKMAN . BM) (BOOKMAN-LIGHT . BL) (BOOKMAN-DEMI . BD) (COURIER . CO) (HELVETICA-NARROW . HN) ( NEWCENTURYSCHLBK . NC) (PALATINO . PA) (TIMES . TS) (ZAPFCHANCERY-MEDIUM . ZM) (ZAPFCHANCERY . ZC) ( ZAPFDINGBATS . ZD))) (* ;; "Font-reading code") (FNS PSCFONT.READFONT PSCFONT.SPELLFILE PSCFONT.COERCEFILE PSCFONTFROMCACHE.SPELLFILE PSCFONTFROMCACHE.COERCEFILE PSCFONT.WRITEFONT READ-AFM-FILE CONVERT-AFM-FILES POSTSCRIPT.GETFONTID POSTSCRIPT.FONTCREATE \POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS POSTSCRIPT.FONTSAVAILABLE) (COMS (* ;; "Until macro in FONT is exported") (MACROS \FSETCHARWIDTH)) (FNS OPENPOSTSCRIPTSTREAM CLOSEPOSTSCRIPTSTREAM) (INITVARS (*POSTSCRIPT-FILE-TYPE* (QUOTE BINARY))) (FNS POSTSCRIPT.HARDCOPYW POSTSCRIPT.TEDIT POSTSCRIPT.TEXT POSTSCRIPTFILEP MAKEEPSFILE) (FNS POSTSCRIPT.BITMAPSCALE POSTSCRIPT.CLOSESTRING POSTSCRIPT.ENDPAGE POSTSCRIPT.OUTSTR POSTSCRIPT.PUTBITMAPBYTES POSTSCRIPT.PUTCOMMAND POSTSCRIPT.SET-FAKE-LANDSCAPE POSTSCRIPT.SHOWACCUM POSTSCRIPT.STARTPAGE \POSTSCRIPTTAB \PS.BOUTFIXP \PS.SCALEHACK \PS.SCALEREGION \SCALEDBITBLT.PSC \SETPOS.PSC \SETXFORM.PSC \STRINGWIDTH.PSC \SWITCHFONTS.PSC \TERPRI.PSC) (* ;; "DIG operations: ") (FNS \BITBLT.PSC \BLTSHADE.PSC \CHARWIDTH.PSC \CREATECHARSET.PSC \DRAWARC.PSC \DRAWCIRCLE.PSC \DRAWCURVE.PSC \DRAWELLIPSE.PSC \DRAWLINE.PSC \DRAWPOINT.PSC \DRAWPOLYGON.PSC \DSPBOTTOMMARGIN.PSC \DSPCLIPPINGREGION.PSC \DSPCOLOR.PSC \DSPFONT.PSC \DSPLEFTMARGIN.PSC \DSPLINEFEED.PSC \DSPPUSHSTATE.PSC \DSPPOPSTATE.PSC \DSPRESET.PSC \DSPRIGHTMARGIN.PSC \DSPROTATE.PSC \DSPSCALE.PSC \DSPSCALE2.PSC \DSPSPACEFACTOR.PSC \DSPTOPMARGIN.PSC \DSPTRANSLATE.PSC \DSPXPOSITION.PSC \DSPYPOSITION.PSC \FILLCIRCLE.PSC \FILLPOLYGON.PSC \FIXLINELENGTH.PSC \MOVETO.PSC \NEWPAGE.PSC) (COMS (* ;; "Character-output, plus special-cases:") (FNS \POSTSCRIPT.CHANGECHARSET \POSTSCRIPT.OUTCHARFN \POSTSCRIPT.PRINTSLUG \POSTSCRIPT.SPECIALOUTCHARFN \UPDATE.PSC \POSTSCRIPT.ACCENTFN \POSTSCRIPT.ACCENTPAIR) (* ;; "Spacing-character (M-quad, etc.) and ballot-box-check &c special-case functions") (FNS \PSC.SPACEDISP \PSC.SPACEWID \PSC.SYMBOLS) (* ;; "The mapping of NS characters to Postscript renderings, both as an AList and as a hashtable") (FNS \POSTSCRIPT.NSHASH) (VARS (*POSTSCRIPT-UNACCENTED-FONTS* (QUOTE (Dancer ZapfDingbats "Dancer" "ZapfDingbats"))) *POSTSCRIPT-NS-TRANSLATIONS*) (GLOBALVARS *POSTSCRIPT-NS-HASH*)) (DECLARE%: EVAL@COMPILE DONTCOPY (MACROS \POSTSCRIPT.FRACTION)) (VARS (\POSTSCRIPT.ORIENTATION.MENU (create MENU ITEMS _ (QUOTE (("Landscape" T "Print this file/document/image in Landscape Orientation") ("Portrait" (QUOTE NIL) "Print this file/document/image in Portrait Orientation"))) TITLE _ "Orientation" CENTERFLG _ T MENUOFFSET _ (create POSITION XCOORD _ -1 YCOORD _ 0) CHANGEOFFSETFLG _ (QUOTE Y))) ( \POSTSCRIPT.ORIENTATION.OPTIONS.MENU (create MENU ITEMS _ (QUOTE (("Ask" (QUOTE ASK) "Always ask whether to print in Landscape or Portrait Orientation") ("Landscape" T "Default printing to Landscape Orientation") ("Portrait" (QUOTE NIL) "Default printing to Portrait Orientation"))) TITLE _ "Default Orientation" CENTERFLG _ T)) PS.BITMAPARRAY \POSTSCRIPT.JOB.SETUP SlopeMenuItems WeightMenuItems) (ADDVARS (BackgroundMenuCommands ("PS Orientation" (QUOTE (SETQ POSTSCRIPT.PREFER.LANDSCAPE (MENU \POSTSCRIPT.ORIENTATION.OPTIONS.MENU) )) "Select the default Orientation for PostScript output" (SUBITEMS ("Ask" (QUOTE (SETQ POSTSCRIPT.PREFER.LANDSCAPE (QUOTE ASK))) "Always ask whether to print in Landscape or Portrait Orientation") ("Landscape" (QUOTE (SETQ POSTSCRIPT.PREFER.LANDSCAPE T)) "Default printing to Landscape Orientation") ("Portrait" (QUOTE (SETQ POSTSCRIPT.PREFER.LANDSCAPE NIL)) "Default printing to Portrait Orientation"))))) (VARS ( BackgroundMenu NIL)) (CONSTANTS (GOLDEN.RATIO 1.618034) (\PS.SCALE0 100) (\PS.TEMPARRAYLEN 20)) ( INITVARS (POSTSCRIPT.BITMAP.SCALE 1) (POSTSCRIPT.EOL (QUOTE CR)) (POSTSCRIPT.IMAGESIZEFACTOR 1) ( POSTSCRIPT.PREFER.LANDSCAPE NIL) (POSTSCRIPT.TEXTFILE.LANDSCAPE NIL) (POSTSCRIPT.DEFAULT.PAGEREGION ( QUOTE (4800 4800 52800 70800))) (POSTSCRIPT.TEXTURE.SCALE 4) (POSTSCRIPTFONTDIRECTORIES (LIST (COND (( EQ (MACHINETYPE) (QUOTE MAIKO)) "{dsk}/USR/LOCAL/LDE/FONTS/POSTSCRIPT/") (T "{DSK}POSTSCRIPT>")))) (\POSTSCRIPT.MAX.WILD.FONTSIZE 72)) (COMS (FNS POSTSCRIPTSEND) ( ADDVARS (PRINTERTYPES ((POSTSCRIPT) (CANPRINT (POSTSCRIPT)) (STATUS TRUE) (PROPERTIES NILL) (SEND POSTSCRIPTSEND) (BITMAPSCALE POSTSCRIPT.BITMAPSCALE) (BITMAPFILE (POSTSCRIPT.HARDCOPYW FILE BITMAP SCALEFACTOR REGION ROTATION TITLE)))))) (ADDVARS (POSTSCRIPT.FONT.ALIST (HELVETICA . HELVETICA) ( HELVETICAD . HELVETICA) (TIMESROMAN . TIMES) (TIMESROMAND . TIMES) (COURIER . COURIER) (GACHA . COURIER) (CLASSIC . NEWCENTURYSCHLBK) (MODERN . HELVETICA) (CREAM . HELVETICA) (TERMINAL . COURIER) ( LOGO . HELVETICA) (OPTIMA . PALATINO) (TITAN . COURIER)) (PRINTFILETYPES (POSTSCRIPT (TEST POSTSCRIPTFILEP) (EXTENSION (PS PSC PSF)) (CONVERSION (TEXT POSTSCRIPT.TEXT TEDIT POSTSCRIPT.TEDIT)))) (IMAGESTREAMTYPES (POSTSCRIPT (OPENSTREAM OPENPOSTSCRIPTSTREAM) (FONTCREATE POSTSCRIPT.FONTCREATE) ( FONTSAVAILABLE POSTSCRIPT.FONTSAVAILABLE) (CREATECHARSET \CREATECHARSET.PSC)))) (INITVARS ( POSTSCRIPT.PAGETYPE (QUOTE LETTER))) (* ;; "NIL means initial clipping is same as paper size. Don't know why the other regions were specified--rmk" ) (APPENDVARS (POSTSCRIPT.PAGEREGIONS (LETTER (0 0 8.5 11) NIL (-0.1 -0.1 8.7 11.2)) (LEGAL (0 0 8.5 14) NIL (-0.1 -0.1 8.7 14.2)) (NOTE (0 0 8.5 11) NIL (-0.1 -0.1 8.7 11.2)))) (GLOBALVARS DEFAULTPRINTINGHOST POSTSCRIPT.BITMAP.SCALE POSTSCRIPT.EOL POSTSCRIPT.FONT.ALIST POSTSCRIPT.PREFER.LANDSCAPE POSTSCRIPT.TEXTFILE.LANDSCAPE POSTSCRIPT.TEXTURE.SCALE POSTSCRIPTFONTDIRECTORIES \POSTSCRIPT.JOB.SETUP \POSTSCRIPT.MAX.WILD.FONTSIZE \POSTSCRIPT.ORIENTATION.MENU \POSTSCRIPTIMAGEOPS POSTSCRIPT.PAGETYPE POSTSCRIPT.PAGEREGIONS) ( DECLARE%: DONTEVAL@LOAD DOCOPY (P (POSTSCRIPT.INIT))) (PROP (FILETYPE MAKEFILE-ENVIRONMENT) POSTSCRIPTSTREAM) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) ( NLAML) (LAMA POSTSCRIPT.PUTCOMMAND))))) (/DECLAREDATATYPE (QUOTE \POSTSCRIPTDATA) (QUOTE (FLAG POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER BYTE WORD)) (QUOTE ((\POSTSCRIPTDATA 0 (FLAGBITS . 0)) (\POSTSCRIPTDATA 0 POINTER) (\POSTSCRIPTDATA 2 POINTER) (\POSTSCRIPTDATA 4 POINTER) (\POSTSCRIPTDATA 6 POINTER) ( \POSTSCRIPTDATA 8 POINTER) (\POSTSCRIPTDATA 10 POINTER) (\POSTSCRIPTDATA 12 POINTER) (\POSTSCRIPTDATA 14 POINTER) (\POSTSCRIPTDATA 16 POINTER) (\POSTSCRIPTDATA 18 POINTER) (\POSTSCRIPTDATA 20 POINTER) ( \POSTSCRIPTDATA 22 POINTER) (\POSTSCRIPTDATA 24 POINTER) (\POSTSCRIPTDATA 26 POINTER) (\POSTSCRIPTDATA 28 POINTER) (\POSTSCRIPTDATA 30 POINTER) (\POSTSCRIPTDATA 32 POINTER) (\POSTSCRIPTDATA 34 POINTER) ( \POSTSCRIPTDATA 36 POINTER) (\POSTSCRIPTDATA 38 POINTER) (\POSTSCRIPTDATA 40 POINTER) (\POSTSCRIPTDATA 42 POINTER) (\POSTSCRIPTDATA 44 POINTER) (\POSTSCRIPTDATA 46 POINTER) (\POSTSCRIPTDATA 48 POINTER) ( \POSTSCRIPTDATA 50 POINTER) (\POSTSCRIPTDATA 52 POINTER) (\POSTSCRIPTDATA 54 POINTER) (\POSTSCRIPTDATA 56 POINTER) (\POSTSCRIPTDATA 58 POINTER) (\POSTSCRIPTDATA 60 POINTER) (\POSTSCRIPTDATA 62 POINTER) ( \POSTSCRIPTDATA 64 POINTER) (\POSTSCRIPTDATA 66 (BITS . 7)) (\POSTSCRIPTDATA 67 (BITS . 15)))) (QUOTE 68)) (ADDTOVAR DEFAULTFILETYPELIST (PS . TEXT) (PSC . TEXT) (PSF . BINARY) (PSCFONT . BINARY) (POSTSCRIPT . TEXT)) (ADDTOVAR *DISPLAY-FONT-NAME-MAP* (AVANTGARDE-BOOK . AB) (AVANTGARDE-DEMI . AD) (BECKMAN . BM) ( BOOKMAN-LIGHT . BL) (BOOKMAN-DEMI . BD) (COURIER . CO) (HELVETICA-NARROW . HN) (NEWCENTURYSCHLBK . NC) (PALATINO . PA) (TIMES . TS) (ZAPFCHANCERY-MEDIUM . ZM) (ZAPFCHANCERY . ZC) (ZAPFDINGBATS . ZD)) (PUTPROPS \FSETCHARWIDTH MACRO (OPENLAMBDA (FONTDESC CHARCODE WIDTH) (\FSETWIDTH (ffetch (CHARSETINFO WIDTHS) of (\GETCHARSETINFO (\CHARSET CHARCODE) FONTDESC)) (\CHAR8CODE CHARCODE) WIDTH))) (RPAQ? *POSTSCRIPT-FILE-TYPE* (QUOTE BINARY)) (RPAQQ *POSTSCRIPT-UNACCENTED-FONTS* (Dancer ZapfDingbats "Dancer" "ZapfDingbats")) (RPAQQ *POSTSCRIPT-NS-TRANSLATIONS* ((* ;; "Mapping of NS characters to Postscript renderings.") (* ;; "First few are for control-codes in old Press fonts (Timesroman, etc.); not strictly NS, but undefined therein so should be OK." ) ("^S" NIL "2,320") (* ; "pressfont em dash") ("^V" NIL "2,261") (* ; "pressfont en dash") ("^G" NIL "0,140") ("0,244" NIL "2,250") (* ; "generic currency symbol") ("0,251" NIL "2,140") (* ; "left single quote") ("0,254" SYMBOL "2,254") (* ; "left arrow") ("0,255" SYMBOL "2,255") (* ; "uparrow") ("0,256" SYMBOL "2,256") (* ; "right arrow") ("0,257" SYMBOL "2,257") (* ; "down arrow") ( "0,260" SYMBOL "2,260") (* ; "degree") ("0,261" SYMBOL "2,261") (* ; "+/-") ("0,264" SYMBOL "2,264") ( * ; "times") ("0,267" NIL "2,264") (* ; "Center-dot") ("0,270" SYMBOL "2,270") (* ; "divide") ("0,271" NIL "2,047") (* ; "right single quote") ("0,274" FUNCTION " f14 ") (* ; "1/4") ("0,275" FUNCTION " f12 ") (* ; "1/2") ("0,276" FUNCTION " f34 ") (* ; "3/4") ("0,322" SYMBOL "2,342") (* ; "registered" ) ("0,323" SYMBOL "2,343") (* ; "copyright") ("0,324" SYMBOL "2,344") (* ; "tm") ("0,334" FUNCTION " f18 ") (* ; "1/8") ("0,335" FUNCTION " f38 ") (* ; "3/8") ("0,336" FUNCTION " f58 ") (* ; "5/8") ( "0,337" FUNCTION " f78 ") (* ; "7/8") ("0,342" NIL "2,235") (* ; "Eth (slashed D?)") ("0,354" NIL "2,237") (* ; "Thorn") ("0,363" NIL "2,236") (* ; "eth") ("0,374" NIL "2,240") (* ; "thorn") ("41,172" DINGBAT "0,110") (* ; "filled star") ("42,42" DINGBAT "0,161") (* ; "ballot-box") ("42,61" APPLY* "0,161" \PSC.SYMBOLS \PSC.SPACEWID NIL) (* ; "Checked ballot-box") ("357,44" NIL "2,261") (* ; "n dash") ("357,45" NIL "2,320") (* ; "m dash") ("357,55" APPLY* "M" \PSC.SPACEDISP \PSC.SPACEWID NIL) (* ; "M quad") ("357,54" APPLY* "N" \PSC.SPACEDISP \PSC.SPACEWID NIL) (* ; "N quad") ("357,56" APPLY* "1" \PSC.SPACEDISP \PSC.SPACEWID NIL) (* ; "FIGURE quad") ("357,57" APPLY* ("M" 0.2) \PSC.SPACEDISP \PSC.SPACEWID NIL) (* ; "This space (1/5M)") ("357,60" NIL "2,262") (* ; "dagger") ("357,61" NIL "2,263") (* ; "double dagger") ("357,062" SYMBOL "2,361") (* ; "angleright") ("357,063" SYMBOL "2,341" ) (* ; "angleleft") ("357,70" SYMBOL "2,315") (* ; "perpendicular") ("357,101" NIL "2,275") (* ; "per mil o/oo") ("357,104" ACCENTPAIR "<" NIL "/") (* ; "not less than") ("357,105" ACCENTPAIR ">" "/" ) (* ; "not greater than") ("357,110" SYMBOL "2,312") (* ; "parallel") ("357,111" SYMBOL "2,315") (* ; "not parallel") ("357,112" SYMBOL "2,316") (* ; "element") ("357,113" SYMBOL "2,317") (* ; "notelement") ("357,114" SYMBOL "2,047") (* ; "suchthat") ("357,115" SYMBOL "2,334") (* ; "implied by, double arrow left") ("357,116" SYMBOL "2,333") (* ; "iff, double arrow") ("357,117" SYMBOL "2,336") (* ; "implies, double arrow right") ("357,120" SYMBOL "2,253") (* ; "double arrow") ( "357,121" SYMBOL "2,333") (* ; "double arrow") ("357,122" SYMBOL "2,333") (* ; "l/r arrow") ("357,126" SYMBOL "2,307") (* ; "intersection") ("357,127" SYMBOL "2,310") (* ; "union") ("357,130" SYMBOL "2,312") (* ; "reflexsuperset") ("357,131" SYMBOL "2,315") (* ; "reflexsubset") ("357,132" SYMBOL "2,311") (* ; "propersuperset") ("357,133" SYMBOL "2,314") (* ; "propersubset") ("357,137" SYMBOL "2,313") (* ; "notsubset") ("357,141" SYMBOL "2,306") (* ; "emptyset") ("357,142" SYMBOL "2,305") (* ; "circleplus") ("357,144" SYMBOL "2,304") (* ; "circlemultiply") ("357,146" NIL "2,267") (* ; "bullet" ) ("357,147" SYMBOL "2,260") (* ; "center circle (composition), lowered degree") ("357,152" SYMBOL "2,330") (* ; "logicalnot") ("357,154" SYMBOL "2,320") (* ; "angle") ("357,160" SYMBOL "2,136") (* ; "perpendicular") ("357,161" SYMBOL "2,265") (* ; "proportional") ("357,162" SYMBOL "2,272") (* ; "equivalence") ("357,165" SYMBOL "2,362") (* ; "integral") ("357,167" SYMBOL "2,273") (* ; "approxequal") ("357,170" SYMBOL "2,100") (* ; "congruent") ("357,172" SYMBOL "2,345") (* ; "summation") ("357,173" SYMBOL "2,325") (* ; "product") ("357,174" SYMBOL "2,326") (* ; "radical") ( "357,242" SYMBOL "2,246") (* ; "florin") ("357,260" SYMBOL "2,351") (* ; "Ceiling, left ") ("357,261" SYMBOL "2,371") (* ; "Ceiling, right") ("357,262" SYMBOL "2,353") (* ; "Floor, left ") ("357,263" SYMBOL "2,373") (* ; "Floor, right") ("357,264" SYMBOL "2,44") (* ; "exists") ("357,265" SYMBOL "2,42" ) (* ; "forall") ("357,266" SYMBOL "2,331") (* ; "logicaland") ("357,267" SYMBOL "2,332") (* ; "logicalor") ("357,271" SYMBOL "2,321") (* ; "gradient") ("357,272" SYMBOL "2,266") (* ; "partialdiff" ) ("357,313" SYMBOL "2,252") (* ; "spade") ("357,317" DINGBAT "0,63") (* ; "check") ("357,375" FUNCTION " f13 ") (* ; "1/3") ("357,376" FUNCTION " f23 ") (* ; "2/3") ("361,041" ACCENT "0,4" A) ( "361,042" ACCENT "0,1" A) ("361,043" ACCENT "0,2" A) ("361,044" ACCENT "0,6" A) ("361,045" ACCENTPAIR A "0,305") (* ; "A-macron") ("361,046" ACCENTPAIR A "0,306") (* ; "A-breve") ("361,047" ACCENT "0,3" A ) ("361,050" ACCENT "0,5" A) ("361,055" ACCENT "0,7" C) ("361,060" ACCENT "0,13" E) ("361,061" ACCENT "0,10" E) ("361,062" ACCENT "0,11" E) ("361,063" ACCENTPAIR E "0,305") (* ; "E-macron") ("361,065" ACCENT "0,12" E) ("361,066" ACCENTPAIR E NIL "0,316") (* ; "E-ogonek") ("361,076" ACCENT "0,17" I) ( "361,077" ACCENT "0,14" I) ("361,100" ACCENT "0,15" I) ("361,102" ACCENTPAIR I "0,305") (* ; "I-macron") ("361,104" ACCENT "0,16" I) ("361,114" ACCENT "0,20" N) ("361,117" ACCENT "0,24" O) ( "361,120" ACCENT "0,21" O) ("361,121" ACCENT "0,22" O) ("361,122" ACCENT "0,25" O) ("361,123" ACCENTPAIR O "0,305") (* ; "O-macron") ("361,124" ACCENT "0,23" O) ("361,134" ACCENT "0,26" S) ( "361,137" ACCENT "0,32" U) ("361,140" ACCENT "0,27" U) ("361,141" ACCENT "0,30" U) ("361,143" ACCENTPAIR U "0,305") (* ; "U-macron") ("361,145" ACCENT "0,31" U) ("361,155" ACCENT "0,33" Y) ( "361,160" ACCENT "0,34" Z) ("361,165" ACCENTPAIR Y "0,305") (* ; "Y-macron") ("361,166" ACCENTPAIR "0,341" "0,305") (* ; "AE-macron") ("361,167" ACCENTPAIR "0,352" "0,305") (* ; "OE-macron") ("361,241" ACCENT "0,204" a) ("361,242" ACCENT "0,201" a) ("361,243" ACCENT "0,202" a) ("361,244" ACCENT "0,206" a) ("361,245" ACCENTPAIR a "0,305") (* ; "a-macron") ("361,246" ACCENTPAIR a "0,306") (* ; "a-breve") ("361,247" ACCENT "0,203" a) ("361,250" ACCENT "0,205" a) ("361,255" ACCENT "0,207" c) ("361,260" ACCENT "0,213" e) ("361,261" ACCENT "0,210" e) ("361,262" ACCENT "0,211" e) ("361,263" ACCENTPAIR e "0,305") (* ; "e-macron") ("361,265" ACCENT "0,212" e) ("361,266" ACCENTPAIR e NIL "0,316") (* ; "e-ogonek") ("361,267" ACCENTPAIR e "0,317") (* ; "e-caron") ("361,276" ACCENT "0,217" i) ("361,277" ACCENT "0,214" i) ("361,300" ACCENT "0,215" i) ("361,302" ACCENTPAIR "0,365" "0,305") (* ; "i-macron") ("361,304" ACCENT "0,216" i) ("361,314" ACCENT "0,220" n) ("361,317" ACCENT "0,224" o) ("361,320" ACCENT "0,221" o) ("361,321" ACCENT "0,222" o) ("361,322" ACCENT "0,225" o) ("361,323" ACCENTPAIR o "0,305") (* ; "o-macron") ("361,324" ACCENT "0,223" o) ("361,334" ACCENT "0,226" s) ("361,337" ACCENT "0,232" u) ("361,340" ACCENT "0,227" u) ("361,341" ACCENT "0,230" u) ("361,343" ACCENTPAIR u "0,305") (* ; "u-macron") ("361,344" ACCENTPAIR u "0,306") (* ; "u-breve") ("361,345" ACCENT "0,231" u) ( "361,355" ACCENT "0,233" y) ("361,360" ACCENT "0,234" z) ("361,365" ACCENTPAIR y "0,305") (* ; "y-macron") ("361,366" ACCENTPAIR "0,361" "0,305") (* ; "ae-macron") ("361,367" ACCENTPAIR "0,372" "0,305") (* ; "oe-macron") ("361,371" ACCENTPAIR a "0,317") (* ; "a-caron") ("361,375" ACCENTPAIR g "0,317") (* ; "g-caron") (* ;; "Special code assignments for Dictionary of Old English, UToronto:") ( "361,370" ACCENTPAIR a ("0,305" "0,306")) (* ; "a - breve-macron") ("361,372" ACCENTPAIR e "0,306") (* ; "e-breve") ("361,373" ACCENTPAIR e "0,305" "0,56") (* ; "e macron underdot") ("361,374" ACCENTPAIR e ("0,305" "0,306")) (* ; "e - breve-macron") ("361,376" ACCENTPAIR "0,365" "0,306") (* ; "i-breve") ( "362,242" ACCENTPAIR "0,365" "0,317") (* ; "i-caron") ("362,241" ACCENTPAIR "0,365" ("0,305" "0,306")) (* ; " i - breve-macron") ("362,243" ACCENTPAIR n "0,305") (* ; "n-macron") ("362,244" ACCENTPAIR m "0,305") (* ; "m-macron") ("362,245" ACCENTPAIR o "0,317") (* ; "o-caron") ("362,246" ACCENTPAIR o "0,306") (* ; "o-breve") ("362,247" ACCENTPAIR o ("0,305" "0,306")) (* ; "o - breve-macron") ( "362,250" ACCENTPAIR o "0,305" "0,56") (* ; "o-macron underdot") ("362,251" ACCENTPAIR o "0,316") (* ; "o-ogonek") ("362,252" ACCENTPAIR u "0,317") (* ; "u-caron") ("362,253" ACCENTPAIR u ("0,305" "0,306" )) (* ; "u - breve-macron") ("362,254" ACCENTPAIR y "0,306") (* ; "y-breve") ("362,256" ACCENTPAIR y "0,317") (* ; "y-caron") ("362,255" ACCENTPAIR y ("0,305" "0,306")) (* ; "y - breve-macron") (* ; "235 = Eth") (* ; "236 = eth") (* ; "237 = Thorn") (* ; "240 = thorn") (* ;; "NS Greek characters") ( "46,101" SYMBOL "2,101") (* ; "Alpha") ("46,102" SYMBOL "2,102") (* ; "Beta") ("46,103" SYMBOL 0) (* ; "--empty--") ("46,104" SYMBOL "2,107") (* ; "Gamma") ("46,105" SYMBOL "2,104") (* ; "Delta") ( "46,106" SYMBOL "2,105") (* ; "Epsilon") ("46,107" SYMBOL 0) (* ; "Stigma") ("46,110" SYMBOL 0) (* ; "Digamma") ("46,111" SYMBOL "2,132") (* ; "Zeta") ("46,112" SYMBOL "2,110") (* ; "Eta") ("46,113" SYMBOL "2,121") (* ; "Theta") ("46,114" SYMBOL "2,111") (* ; "Iota") ("46,115" SYMBOL "2,113") (* ; "Kappa") ("46,116" SYMBOL "2,114") (* ; "Lambda") ("46,117" SYMBOL "2,115") (* ; "Mu") ("46,120" SYMBOL "2,116") (* ; "Nu") ("46,121" SYMBOL "2,130") (* ; "Xi") ("46,122" SYMBOL "2,117") (* ; "Omicron") ("46,123" SYMBOL "2,120") (* ; "Pi") ("46,124" SYMBOL 0) (* ; "Koppa") ("46,125" SYMBOL "2,122") (* ; "Rho") ("46,126" SYMBOL "2,123") (* ; "Sigma") ("46,127" SYMBOL 0) (* ; "--empty--") ( "46,130" SYMBOL "2,124") (* ; "Tau") ("46,131" SYMBOL "2,125") (* ; "Upsilon") ("46,132" SYMBOL "2,106") (* ; "Phi") ("46,133" SYMBOL "2,103") (* ; "Chi") ("46,134" SYMBOL "2,131") (* ; "Psi") ( "46,135" SYMBOL "2,132") (* ; "Omega") ("46,141" SYMBOL "2,141") (* ; "alpha") ("46,142" SYMBOL "2,142") (* ; "beta") ("46,143" SYMBOL 0) (* ; "(md beta)") ("46,144" SYMBOL "2,147") (* ; "gamma") ( "46,145" SYMBOL "2,144") (* ; "delta") ("46,146" SYMBOL "2,145") (* ; "epsilon") ("46,147" SYMBOL "2,126") (* ; "stigma") ("46,150" SYMBOL 0) (* ; "digamma") ("46,151" SYMBOL "2,172") (* ; "zeta") ( "46,152" SYMBOL "2,150") (* ; "eta") ("46,153" SYMBOL "2,161") (* ; "theta") ("46,154" SYMBOL "2,151") (* ; "iota") ("46,155" SYMBOL "2,153") (* ; "kappa") ("46,156" SYMBOL "2,154") (* ; "lambda") ( "46,157" SYMBOL "2,155") (* ; "mu") ("46,160" SYMBOL "2,156") (* ; "nu") ("46,161" SYMBOL "2,170") (* ; "xi") ("46,162" SYMBOL "2,157") (* ; "omicron") ("46,163" SYMBOL "2,160") (* ; "pi") ("46,164" SYMBOL 0) (* ; "(koppa)") ("46,165" SYMBOL "2,162") (* ; "rho") ("46,166" SYMBOL "2,163") (* ; "sigma" ) ("46,167" SYMBOL "2,126") (* ; "(fl sigma)") ("46,170" SYMBOL "2,164") (* ; "tau") ("46,171" SYMBOL "2.165") (* ; "upsilon") ("46,172" SYMBOL "2,146") (* ; "phi") ("46,173" SYMBOL "2,143") (* ; "chi") ( "46,174" SYMBOL "2,171") (* ; "psi") ("46,175" SYMBOL "2,167") (* ; "omega") (* ;; "NS Miscellaneous symbols") ("041,142" SYMBOL "2,271") (* ; "notequal") ("041,145" SYMBOL "2,243") (* ; "lessequal") ("041,146" SYMBOL "2,263") (* ; "greaterequal") ("041,147" SYMBOL "2,245") (* ; "infinity") ("041,150" SYMBOL "2,134") (* ; "therefore") ("041,155" SYMBOL "2,262") (* ; "second") ( "356,055" SYMBOL "2,055") (* ; "minus") ("356,106" SYMBOL "2,340") (* ; "lozenge") ("356,163" SYMBOL "2,351") (* ; "topleftbracket") ("356,164" SYMBOL "2,353") (* ; "bottomleftbracket") ("356,165" SYMBOL "2,352") (* ; "centerbracket") ("356,166" SYMBOL "2,371") (* ; "toprightbracket") ("356,167" SYMBOL "2,373") (* ; "bottomrightbracket") ("356,176" SYMBOL "2,176") (* ; "similar") ("356,314" SYMBOL "2,251") (* ; "heart") ("356,340" SYMBOL "2,374") (* ; "toprightbracce") ("356,341" SYMBOL "2,357") (* ; "braceextend") ("356,342" SYMBOL "2,375") (* ; "centerrightbracce") ("356,343" SYMBOL "2,376") (* ; "bottomrightbracce") ("356,344" SYMBOL "2,354") (* ; "topleftbracce") ("356,345" SYMBOL "2,356") (* ; "bottomleftbracce") ("356,346" SYMBOL "2,355") (* ; "centerleftbracce") ("356,355" SYMBOL "2,363") (* ; "integraltop") ("356,356" SYMBOL "2,365") (* ; "integralbottom") ("356,357" SYMBOL "2,364") (* ; "integralcenter"))) (RPAQ \POSTSCRIPT.ORIENTATION.MENU (create MENU ITEMS _ (QUOTE (("Landscape" T "Print this file/document/image in Landscape Orientation") ("Portrait" (QUOTE NIL) "Print this file/document/image in Portrait Orientation"))) TITLE _ "Orientation" CENTERFLG _ T MENUOFFSET _ (create POSITION XCOORD _ -1 YCOORD _ 0) CHANGEOFFSETFLG _ (QUOTE Y))) (RPAQ \POSTSCRIPT.ORIENTATION.OPTIONS.MENU (create MENU ITEMS _ (QUOTE (("Ask" (QUOTE ASK) "Always ask whether to print in Landscape or Portrait Orientation") ("Landscape" T "Default printing to Landscape Orientation") ("Portrait" (QUOTE NIL) "Default printing to Portrait Orientation"))) TITLE _ "Default Orientation" CENTERFLG _ T)) (RPAQ PS.BITMAPARRAY (READARRAY-FROM-LIST 16 (QUOTE BYTE) 0 (QUOTE (48 49 50 51 52 53 54 55 56 57 65 66 67 68 69 70 NIL)))) (RPAQQ \POSTSCRIPT.JOB.SETUP ("/bdef {bind def} bind def" "/ldef {load def} bdef" "/S /show ldef" "/M /moveto ldef" "/DR {transform round exch round exch itransform} bdef" "/L {gsave newpath setlinewidth 0 setlinecap" " M lineto currentpoint stroke grestore M} bdef" "/L1 {gsave newpath 0 setdash setgray setlinewidth 0 setlinecap" " M lineto currentpoint stroke grestore M} bdef" "/F {findfont exch scalefont setfont} bdef" "/CLP {newpath M dup 0 rlineto exch 0 exch rlineto" " neg 0 rlineto closepath clip newpath} bdef" "/R {gsave setgray newpath M dup 0 rlineto exch 0 exch" " rlineto neg 0 rlineto closepath eofill grestore} bdef" "/ellipsedict 9 dict def" "ellipsedict /mtrx matrix put" "/ellipse" " { ellipsedict begin" " /endangle exch def" " /startangle exch def" " /orientation exch def" " /minorrad exch def" " /majorrad exch def" " /y exch def" " /x exch def" " /savematrix mtrx currentmatrix def" " x y translate" " orientation rotate" " majorrad minorrad scale" " 0 0 1 startangle endangle arc" " savematrix setmatrix" " end } bdef" "/concatprocs" " {/proc2 exch cvlit def" " /proc1 exch cvlit def" " /newproc proc1 length proc2 length add array def" " newproc 0 proc1 putinterval" " newproc proc1 length proc2 putinterval" " newproc cvx" " } bdef" "/resmatrix matrix def" "/findresolution" " {72 0 resmatrix defaultmatrix dtransform" " /yres exch def /xres exch def" " xres dup mul yres dup mul add sqrt" " } bdef" "/thebitimage" " {/maskp exch def" " /bihgt exch def" " /biwid exch def" " /byte 1 string def" " /strbufl biwid 8 div ceiling cvi def" " /strbuf strbufl string def" " maskp not{{1 exch sub} currenttransfer concatprocs settransfer} if" " biwid bihgt" " maskp { true } { 1 } ifelse" " [biwid 0 0 bihgt 0 0]" " {/col 0 def" " {currentfile byte readhexstring pop 0 get" " dup 16#B2 eq {pop" " currentfile byte readhexstring pop 0 get 1 add" " currentfile byte readhexstring pop pop /nbyte byte 0 get def" " { strbuf col nbyte put /col col 1 add def} repeat}" " {dup 16#B3 eq {pop /col col" " currentfile byte readhexstring pop" " 0 get add 1 add def}" " {16#B4 eq {currentfile byte readhexstring pop pop} if" " strbuf col byte 0 get put /col col 1 add def} ifelse" " } ifelse" " col strbufl ge { exit } if } loop" " strbuf }" " maskp { imagemask } { image } ifelse" " } bdef" "/setuserscreendict 22 dict def" "setuserscreendict begin" " /tempctm matrix def" " /temprot matrix def" " /tempscale matrix def" "end" "/setuserscreen" " {setuserscreendict begin" " /spotfunction exch def" " /screenangle exch def" " /cellsize exch def" " /m tempctm currentmatrix def" " /rm screenangle temprot rotate def" " /sm cellsize dup tempscale scale def" " sm rm m m concatmatrix m concatmatrix pop" " 1 0 m dtransform /y1 exch def /x1 exch def" " /veclength x1 dup mul y1 dup mul add sqrt def" " /frequency findresolution veclength div def" " /newscreenangle y1 x1 atan def" " m 2 get m 1 get mul m 0 get m 3 get mul sub" " 0 gt { { neg } /spotfunction load concatprocs" " /spotfunction exch def } if" " frequency newscreenangle /spotfunction load setscreen" " end" " } bdef" "/setpatterndict 18 dict def" "setpatterndict begin" " /bitison" " {/ybit exch def /xbit exch def" " /bytevalue bstring ybit bwidth mul xbit 8 idiv add get def" " /mask 1 7 xbit 8 mod sub bitshift def" " bytevalue mask and 0 ne" " } bdef" "end" "/bitpatternspotfunction" " {setpatterndict begin" " /y exch def /x exch def" " /xindex x 1 add 2 div bpside mul 1 sub cvi def" " /yindex y 1 add 2 div bpside mul 1 sub cvi def" " xindex yindex bitison" " {/onbits onbits 1 add def 1}" " {/offbits offbits 1 add def 0} ifelse" " end" " } bdef" "/setpattern" " {setpatterndict begin" " /cellsz exch def" " /angle exch def" " /bwidth exch def" " /bpside exch def" " /bstring exch def" " /onbits 0 def /offbits 0 def" " cellsz angle /bitpatternspotfunction load setuserscreen" " {} settransfer" " offbits offbits onbits add div setgray" " end" " } bdef" "%% - - - - - Fraction-setting code, to support NS fonts better - - - - -" "/fractiondict 20 dict def" "/fractionshow " "{ fractiondict begin" "/denom exch def " "/num exch def " "/regfont currentfont def" "/fractfont currentfont [.65 0 0 .6 0 0] makefont def " "gsave newpath 0 0 moveto " "(1) true charpath flattenpath pathbbox " "/height exch def pop pop pop" " grestore" "0 .4 height mul rmoveto" "fractfont setfont num show" "0 .4 height mul neg rmoveto regfont setfont (\244) show" "fractfont setfont denom show regfont setfont end } bdef" "/f14 { (1) (4) fractionshow } bdef" "/f12 { (1) (2) fractionshow } bdef" "/f34 { (3) (4) fractionshow } bdef" "/f18 { (1) (8) fractionshow } bdef" "/f38 { (3) (8) fractionshow } bdef" "/f58 { (5) (8) fractionshow } bdef" "/f78 { (7) (8) fractionshow } bdef" "/f13 { (1) (3) fractionshow } bdef" "/f23 { (2) (3) fractionshow } bdef" "/bboxdict 20 dict def" "/bboxchk { bboxdict begin" "/regfont currentfont def" "/chkfont currentfont [1.25 0 0 1.25 0 0] makefont def " "gsave newpath 0 0 moveto " "(\161) true charpath flattenpath pathbbox " "/height exch def pop pop pop " " grestore " " currentpoint " " .2 height mul .3 height mul rmoveto" "chkfont setfont (\063) show" " moveto" " regfont setfont" "(\161) show end } bdef" "/rencdict 15 dict def" "/encodefont { rencdict begin" "/newname exch def" "/oldfont exch def" "/newcodes [" "8#001 /Aacute" "8#002 /Acircumflex" "8#003 /Adieresis" "8#004 /Agrave" "8#005 /Aring" "8#006 /Atilde" "8#007 /Ccedilla" "8#010 /Eacute" "8#011 /Ecircumflex" "8#012 /Edieresis" "8#013 /Egrave" "8#014 /Iacute" "8#015 /Icircumflex" "8#016 /Idieresis" "8#017 /Igrave" "8#020 /Ntilde" "8#021 /Oacute" "8#022 /Ocircumflex" "8#023 /Odieresis" "8#024 /Ograve" "8#025 /Otilde" "8#026 /Scaron" "8#027 /Uacute" "8#030 /Ucircumflex" "8#031 /Udieresis" "8#032 /Ugrave" "8#033 /Ydieresis" "8#034 /Zcaron" "8#177 /periodinferior" "8#201 /aacute" "8#202 /acircumflex" "8#203 /adieresis" "8#204 /agrave" "8#205 /aring" "8#206 /atilde" "8#207 /ccedilla" "8#210 /eacute" "8#211 /ecircumflex" "8#212 /edieresis" "8#213 /egrave" "8#214 /iacute" "8#215 /icircumflex" "8#216 /idieresis" "8#217 /igrave" "8#220 /ntilde" "8#221 /oacute" "8#222 /ocircumflex" "8#223 /odieresis" "8#224 /ograve" "8#225 /otilde" "8#226 /scaron" "8#227 /uacute" "8#230 /ucircumflex" "8#231 /udieresis" "8#232 /ugrave" "8#233 /ydieresis" "8#234 /zcaron" "8#235 /Eth" "8#236 /eth" "8#237 /Thorn" "8#240 /thorn" " ] def" "/olddict oldfont findfont def /newfont olddict maxlength dict def" "olddict { exch dup /FID ne { dup /Encoding eq" "{ exch dup length array copy newfont 3 1 roll put }" "{ exch newfont 3 1 roll put } ifelse }" " { pop pop } ifelse } forall" "newfont /FontName newname put" "newcodes aload pop" "newcodes length 2 idiv { newfont /Encoding get 3 1 roll put } repeat " "newname newfont definefont pop end } def" " /accentdict 10 dict def " " /accentor { accentdict begin /scaler exch def /delta exch def " "/unders exch def /accents exch def /mainch exch def /scrt (X) def" " /w1 mainch stringwidth pop def " " currentpoint mainch show currentpoint 4 2 roll " "accents { /ch exch def 2 copy moveto " " scrt 0 ch put " " /w2 scrt stringwidth pop def " " w1 w2 sub 2 div delta rmoveto scrt show " " /delta delta 150 scaler mul 9 div add def" " } forall " "unders { /ch exch def 2 copy moveto " " scrt 0 ch put " " /w2 scrt stringwidth pop def " " ch 46 eq { w1 w2 sub 2 div -175 scaler mul 9 div rmoveto scrt show 0 175 rmoveto }" " { w1 w2 sub 2 div 0 rmoveto scrt show } ifelse " " } forall " " pop pop moveto end } def " "%%%%EndProlog" "%%%%BeginSetup")) (RPAQQ SlopeMenuItems ((Italic (QUOTE ITALIC) "This is an Italic Slope font") (Regular (QUOTE REGULAR) "This is a Regular Slope font"))) (RPAQQ WeightMenuItems ((Bold (QUOTE BOLD) "This is a Bold Weight font") (Medium (QUOTE MEDIUM) "This is a Medium Weight font") (Light (QUOTE LIGHT) "This is a Light Weight font"))) (ADDTOVAR BackgroundMenuCommands ("PS Orientation" (QUOTE (SETQ POSTSCRIPT.PREFER.LANDSCAPE (MENU \POSTSCRIPT.ORIENTATION.OPTIONS.MENU))) "Select the default Orientation for PostScript output" ( SUBITEMS ("Ask" (QUOTE (SETQ POSTSCRIPT.PREFER.LANDSCAPE (QUOTE ASK))) "Always ask whether to print in Landscape or Portrait Orientation") ("Landscape" (QUOTE (SETQ POSTSCRIPT.PREFER.LANDSCAPE T)) "Default printing to Landscape Orientation") ("Portrait" (QUOTE (SETQ POSTSCRIPT.PREFER.LANDSCAPE NIL)) "Default printing to Portrait Orientation")))) (RPAQQ BackgroundMenu NIL) (RPAQQ GOLDEN.RATIO 1.618034) (RPAQQ \PS.SCALE0 100) (RPAQQ \PS.TEMPARRAYLEN 20) (CONSTANTS (GOLDEN.RATIO 1.618034) (\PS.SCALE0 100) (\PS.TEMPARRAYLEN 20)) (RPAQ? POSTSCRIPT.BITMAP.SCALE 1) (RPAQ? POSTSCRIPT.EOL (QUOTE CR)) (RPAQ? POSTSCRIPT.IMAGESIZEFACTOR 1) (RPAQ? POSTSCRIPT.PREFER.LANDSCAPE NIL) (RPAQ? POSTSCRIPT.TEXTFILE.LANDSCAPE NIL) (RPAQ? POSTSCRIPT.DEFAULT.PAGEREGION (QUOTE (4800 4800 52800 70800))) (RPAQ? POSTSCRIPT.TEXTURE.SCALE 4) (RPAQ? POSTSCRIPTFONTDIRECTORIES (LIST (COND ((EQ (MACHINETYPE) (QUOTE MAIKO)) "{dsk}/USR/LOCAL/LDE/FONTS/POSTSCRIPT/") (T "{DSK}POSTSCRIPT>")))) (RPAQ? \POSTSCRIPT.MAX.WILD.FONTSIZE 72) (ADDTOVAR PRINTERTYPES ((POSTSCRIPT) (CANPRINT (POSTSCRIPT)) (STATUS TRUE) (PROPERTIES NILL) (SEND POSTSCRIPTSEND) (BITMAPSCALE POSTSCRIPT.BITMAPSCALE) (BITMAPFILE (POSTSCRIPT.HARDCOPYW FILE BITMAP SCALEFACTOR REGION ROTATION TITLE)))) (ADDTOVAR POSTSCRIPT.FONT.ALIST (HELVETICA . HELVETICA) (HELVETICAD . HELVETICA) (TIMESROMAN . TIMES) (TIMESROMAND . TIMES) (COURIER . COURIER) (GACHA . COURIER) (CLASSIC . NEWCENTURYSCHLBK) (MODERN . HELVETICA) (CREAM . HELVETICA) (TERMINAL . COURIER) (LOGO . HELVETICA) (OPTIMA . PALATINO) (TITAN . COURIER)) (ADDTOVAR PRINTFILETYPES (POSTSCRIPT (TEST POSTSCRIPTFILEP) (EXTENSION (PS PSC PSF)) (CONVERSION (TEXT POSTSCRIPT.TEXT TEDIT POSTSCRIPT.TEDIT)))) (ADDTOVAR IMAGESTREAMTYPES (POSTSCRIPT (OPENSTREAM OPENPOSTSCRIPTSTREAM) (FONTCREATE POSTSCRIPT.FONTCREATE) (FONTSAVAILABLE POSTSCRIPT.FONTSAVAILABLE) (CREATECHARSET \CREATECHARSET.PSC))) (RPAQ? POSTSCRIPT.PAGETYPE (QUOTE LETTER)) (APPENDTOVAR POSTSCRIPT.PAGEREGIONS (LETTER (0 0 8.5 11) NIL (-0.1 -0.1 8.7 11.2)) (LEGAL (0 0 8.5 14) NIL (-0.1 -0.1 8.7 14.2)) (NOTE (0 0 8.5 11) NIL (-0.1 -0.1 8.7 11.2))) (POSTSCRIPT.INIT) (PUTPROPS POSTSCRIPTSTREAM FILETYPE :TCOMPL) (PUTPROPS POSTSCRIPTSTREAM MAKEFILE-ENVIRONMENT (:PACKAGE "INTERLISP" :READTABLE "INTERLISP")) (PUTPROPS POSTSCRIPTSTREAM COPYRIGHT ( "Venue This program or documentation contains confidential information and trade secrets of Venue. Reverse engineering, reverse compiling and disassembling of object code are prohibited. Use of this program or documentation is governed by written agreement with Venue. Use of copyright notice is precautionary and does not imply publication or disclosure of trade secrets" 1989 1990 1991 1992 1993 1994 1995 1997 1998 2018 2021)) NIL