^!2D p,COMPILE-DATADGJC,LMI-EXP1^FF Dp,COMPILER,VERSIONDFpB QFASL-SOURCE-FILE-UNIQUE-ID1DplFSMAKE-FASLOAD-PATHNAMEDpGLOBALQUOTEEXP1DB7pB5NILDB7DGJCDVIDB7,LMSCREEN-METHODSDB7LISPDB7FpB MODEpB ,ZETALISPpB ,PACKAGEpB DVIpB BASEF 1DplSIlDEFFLAVOR2DB7SCREEN-DVI-DOCUMENTDB7DIMAGE-WIDTHIMAGE-HEIGHTDORIGIN-XFDORIGIN-YFCPREVIOUS-PAGE-PTRDB7DDOCUMENTDB7B;1DREMPROPDB7*SCREEN-RESOLUTION*DB7pB(,SYSTEM-CONSTANT1DpBU,DEFVAR-1BlFDpB ,PROPERTYSHEET-BIT-ARRAYpBURESOURCE-CONSTRUCTOR  F F B}F@plTVMAIN-SCREENpBMAKE-SHEET-BIT-ARRAYDDpB(,ARG-MAPDDÀIGNOREDCWDCHDpSYSTEM,FUNCTION-PARENTBzDEFRESOURCEDEOB}DByBzpBURESOURCE-PARAMETIZER FF BF@LISTDDBDDBDBDBBzBEOB1D pBUINITIALIZE-RESOURCEDB7BzDB7B}DB7B;DB7B;DB7B;DB7BDB7DB7FDB7B;1DANDB;DÀPROGNDSETFDÁDOCUMENTATIONDB7BzDB7BB;DpB METHODBXpB lINITIALIZE1}LFLBA0@pB,ALU-IORpB,ALU-SETZBlBXǀD1EpBUlFLAVOR-VAR-SELF-REF-INDEXEB7EBXBZ1EBEB7EBXB[pB ,SET-PRINTER-NAMESCREENpB SET-PRINTER-RESOLUTIONpB SET-PRINTER-MAX-FONTSF@pB SET-FONTMAPpBUlSIMPLE-MAKE-ARRAYÀART-QCALLOCATE-RESOURCEBz1EBEB7EBXÀBUFFERpB lSET-BUFFERpB SET-FONTNUMSDDpB ,MACROS-EXPANDEDDFILL-POINTERBSENDDBDDpBU.OPERATION.DpB(lLOCAL-MAPDB;DCLXDCLYD r[ |r B[ DB[DB[DB[D@@|DE@|@!@@D D  D D||DD DZ DZBA||AE|DEDAE|AEBEDEDAEBE|BEDED|BE||DEDB[DB[D@@|DE@|@!@O BDBBXpB START-OUTPUT  @F B FA@BXÀFORMATl~& Computing page 1 ... DDBDDBEOB DBBXpB lEND-OUTPUT @F BFA@BXDDBDDBO(BDBBXpB ,DO-PAGES'/'tFB+A@ SELFTERMINAL-IOTOTAL-PAGESBX1EBEB7EBXFILE-BUFFERFBAD-DVIMissing bopF(FFF,1EBEB7EBXBbpB CLEAR-WINDOWpB DO-SCREEN-PAGECSHOW-IMAGEpB ,ANY-TYIFDD F0F1F2F3F4F5F6F7F8F9F0CVIEW-PAGEBEEPD VFND@VFP1EBEB7EBXB\1EBEB7EBXB_DF/ NFPD PF\DF?FCGIVE-HELPCDESCRIBE-SETTINGSDDBDCCHAR-CODECCHAR-BITSCHAR-UPCASESELECTQLOOPBDECFBBSIGNED-QUADBINCFCBGET-BYTEDOTIMESCMOVE-BACKDBDDBDBD B;B;DÁPREV-PAGE-PTRDCIDCADCBDCCDCDDCURRENT-PAGEDDESIRED-PAGEDNUMERIC-ARGDÀINPUTDpBU.SELECTQ.ITEM. D@DZA|CM@E@E@`Z@!@E@E@`ZJ[ X @E@E@`2@!@E@E@`J[D@E@E@`ZJ[E@E@E@`3J[F@E@E@`3J[G@E@E@`3@!DET8DEDER|[EE|ZFE|ZGB8@EBE@E@E@`R@!CCEAUY|H|IJ EB[Kw@Kx9DKEZZxa||KEZ [Zx|KEZz| [Z xKE8 |K |K#zKELD8 |JsKER3JG|Lu8JE XD|JEr[s[IDHEIIEHJLED8JE8|JEI3ID|IEr[s[IDHEIIEHJLED 8IEJE8|JESH|Lu8||+|Lu8|%LE D8D!RLE"D8P|2LE#D8$Q|Lu8%ES|Lu8%_OB+1DBkDB7ÀINTROBp1DBtB This is the DVI File display program with user interface stolen from the DPRESS programBs % FBs@BB3BFB;~A nG GOTO page n nN NEXT page(s) nP PREVIOUS page(s) /Move page down \Move page up H Home window Return Goto left end of paper Q QUIT S Describe settings ?Print this wonderfully useful information You can also use the mouse to move the page around. Just hold down any mouse button and move. The page will follow until you release the button. Bugs to bhlim@vx.Press space to refresh: BKBZpB UNTYIDDBDByBDBDDB E D@ @w8  |@8E D@OBsDBBXpB ,SET-CHAR*hF>B`@ÀBITMAPCONVBC*FONT-DEFINITIONS*BXpB ,GET-HASH1EBEB7EBXCURRENT-FONTGLYPH2BITMAP1EBEB7EBXPIXEL-HBF 1EBEB7EBXPIXEL-V1EBEB7EBXBDDBD PIXEL-ROUNDÁCHAR-DVI-WIDTHB|ÁFD-RASTER-INFOCFD-BITMAPSÁCHAR-Y-OFFSETÁCHAR-X-OFFSETCCHAR-WIDTHCHAR-HEIGHTCFD-FONT-DIRECTORYBDBDDBDCHARCODEDBDDÀFNTDEFDCCHAR-DIMSDBDBDBDB @ D @`EJ[A`BAE`CAE`DAE`E@E`EJ[V X @@E`EJ[CEB@E`EMD"8DD|[RU8D8DD|[RU8DCED|[Rs[BED||DDDSDESAE`2r|0OBDBBXpB ,SET-RULE!TF3B@@B3BBBXBBBBpB DRAW-RECTANGLEBdBhDDBDB|BBRULE-PIXELSDBDDBDÀPARAMSDBDDCHTDCWDDPIXEL-HTDPIXEL-WDG@IAD@s|0[BDAs|0[C@E08AE-8D r|0 D|[ RZCEs[BE D DD@s|0SD DDCEBED 2 DD@s|0S2 DA3 r|0[ OBDBBXpB ,PUT-CHAR-pFCB`@BB3BBBXBBBBBF BpB BITBLTBdBhDDBDBBBBBBBBDBDDBDBDBDDBDBDBDBDBDB @ D @`EJ[A`BAE`CAE`DAE`E@E`EJ[V X @@E`EJ[CEB@E`EMD"8DD|[RU8D8DD|[RU8DCED|[Rs[BED||DDDSDESDDCEBED||DDS2DES2O0BDBBXpB ,PUT-RULENF0B3 @B3BBBXBBBBBBdBhDDBDBBBDBDDBDBDBDDB DB GIA@48AE18D r|0 D|[ RZDAs|0[s[D@s|0[ D DD@s|0SD DDDAs|0[D@s|0[D 2 DD@s|0S2OEB3DBBXpB BOP4F&BHF@BBlBXF1EBEB7EBXXPAGE-OFFSETB1EBEB7EBXYPAGE-OFFSET1EBEB7EBXCV1EBEB7EBXB1EBEB7EBXCX1EBEB7EBXCY1EBEB7EBXCZBBpB EMPTY-STACKlUndefinedBDDBDBCDVI-ROUNDDBDDBDBD 2DZ DDZ D 2 DB[DO}BHDBBXpB EOP F BF@BXDDBDDBDBOBDBBXpB RIGHT  FBF@BBXBBDDBDBB|DBDDBDDELTA-HD3r|0 OBDBBXpB lW  FBF@BBXBbBBDDBDBB|DBDDBDÀNEW-WE8E D2 r|0 OBDBBXpB lX  FBF@BBXBgBBDDBDBB|DBDDBDÀNEW-XE8E D2 r|0 OBDBBXpB DOWN  FBF@BBXB^BDDBDBB|DBDDBDDELTA-VD3r|0 OBDBBXpB lY  FBF@BBXBlB^BDDBDBB|DBDDBDÀNEW-YE8E D2 r|0 OBDBBXpB lZ  FBF@BBXBqB^BDDBDBB|DBDDBDÀNEW-ZE8E D2 r|0 OBDBBXpB ,SET-FNT7F$B @BBX1EBEB7EBXFONTMAP1EBEB7EBXFONTNUMSBB;Undefined fontBBBDDBDBÁALTER-FONTDEFBBBByCGET-FNTNUMDBDDBDFONT-NUMBERDBDDBB;D| D@`A@@EAU 8 D@EJ[8@E@EJ[ X @ D  X@ D A@|OBB "Q F/BÐ@BF BBÀART-1BCLOAD-BYTEDDBDpBUlXR-BQ-LISTB~DBDDÀGLYPHDBDBDBD DÀWIDTHDÀHEIGHTDÁBYTES-PER-ROWDROWD.ROW*BYTES-PER-ROW.DBYTEDBITSD.8*BYTE.DBEZr@EZrA@ @AE@ VEZ |0[B|C'CEBsD|EEDEE3J[|EsGFHGEH35 X @FE|HSDCEGEH3NHHE UYEEEBUYCCEUYOBBÁREFRESH-IMAGE F@F BCFA@pB REFRESH-IMAGEDDBDBDBDDDOCOSBCDBBXBKV@FkBTAP@INHIBIT-SCHEDULING-FLAGpB,CURRENTLY-PREPARED-SHEETpB,ALU-SETAB3pBPREPARED-SHEETBXpBlSHEET-CAN-GET-LOCKpBSHEET-PREPARE-SHEET-INTERNALBBBBdBhARRAY-DIMENSIONSDDBDB|CDESTRUCTURING-BINDWHENpB,SHEET-BOTTOM-MARGIN-SIZEpBSHEET-HEIGHTpBSHEET-INSIDE-BOTTOMpB,SHEET-RIGHT-MARGIN-SIZEpBSHEET-WIDTHpBlSHEET-INSIDE-RIGHTpBSHEET-TOP-MARGIN-SIZEpB,SHEET-INSIDE-TOPpBSHEET-LEFT-MARGIN-SIZEpBlSHEET-INSIDE-LEFTpBlSHEET-SCREEN-ARRAYpBlSHEET-IS-PREPAREDpBSHEET-FLAGSpBSHEET-OUTPUT-HOLD-FLAGNEQpBPREPARE-SHEETDBDDBDBDDALUDB.DB0DCFROM-ARRAYDÀFROM-XDÀFROM-YDTO-ARRAYDTO-XDTO-YDÀSXMINDÀSYMINDÀSXMAXDÀSYMAXDLEFTDTOPDRIGHT+1DBOTTOM+1DCNEW-WIDTHDCNEW-HEIGHTDA-WIDTHDA-HEIGHTEV D t 8} D`Z8 X D DVDDDD|| D`DDHGFEDCBA@ D` D` D` D`S D` D`SLKJIKEAE[G3s[LEBE[H3s[POGEIU8IEMIEGSDGEMHEJU8JENJEHSEHENOEMSPENSRQZGxREZDxAE8QEZQBE8REZR@CGS@CKTDESUXDESEZ DE 8DESEZD8DES3DEETUXEETEZ EE 8EETEZE8EET3E@EQERECEDEEEFEMENEOBTCHANDLE-MOUSE-INPUT#` XF=BA`@pB,MOUSE-YpB,MOUSE-XpBlMOUSE-LAST-BUTTONSB3FxpBMOUSE-SET-BLINKER-DEFINITIONpB lCHARACTERpB lONpB SET-CHARACTERpFONTSMOUSEBKBpB MOUSE-BUTTONPROCESS-WAITlMove MouseDpB ,INTERNALBCMOVE-IMAGEBCpBMOUSE-STANDARD-BLINKERDDBDBgBhBByDBDDBeDBDDBLIPDÀWINDOWDBcDBhDCDXDCDYDpB INTERNAL-FEF-OFFSETSF DE/E D|| DD | @@x8 D@@Gt9@EZA@EZB@IZCAE t9DY D|| DD |DDBECBEDBSCEDCSEDEDEEOBB F FBF@BBBDDBDDÀOLD-XDÀOLD-YDZED [xED [OBB FF BF@pB lMOVE-IMAGEDDBDBDBDDBeDBDBDEOBDBBXB 7FKB @B[B]BBaB3BXBdBhBcBepBDRAW-RECTANGLE-INSIDE-CLIPPEDBBDDBD BBBBBvBxBzB|BBzDBDDBDBDBDBDDINSIDE-LEFTDCINSIDE-TOP DS DS D` D`A@EV D t 8} D`Z8 X D DVEZEZE 8EZDE[33 D2 EDE[33 DS@S DE[SASD ĂE8DE[33EZ DE[S@S D2ASD DE[33E DE[S@S DSO*BBI F @FBIFA@B3BFBKBDDBDBDBDDBNĀ O7BIBY FF BYF@BYDDBDBDBDDBeDBDBDEOFBYDBBXBYVFBGà@B4B2BXBl~:|Computing Page ~D ... B9BDFB;B<F(FFF,FF CFIND-THE-POSTAMBLEDO-PAGEBIDDBD ByBzB{B|B}B~BBBDBDDBDBDBDBD B;B;DBDBDBDBDBDBDB8DÀBYTES E DŁE5]8 D D@! D@ESZA|CM@E@E@`Z@!@E@E@`ZJ[ X@E@E@`2@!@E@E@`J[D@E@E@`ZJ[E@E@E@`3J[F@E@E@`3J[G@E@E@`3@!DET8DEDER|[EE|ZFE|ZGB8@EBE@E@E@`R@!CCEAUYEU8EZA8DS5=8Hw D D@`Z@! D D@`ZJ[H )X|HY DAAE@`HERZ23@! D D@`Z@! D D@`ZJ[ D D@`Z@! D D@`ZJ[3I D D@`I3@! D D@`Z@! D D D@`J[D D D@`ZJ[E D D@`3J[F D D@`3J[G D D@`3@!DET8DEDER|[EE|ZFE|ZG@! D@DSABw|CM@E@E@`Z@!@E@E@`ZJ[ X@E@E@`2@!@E@E@`J[D@E@E@`ZJ[E@E@E@`3J[F@E@E@`3J[G@E@E@`3@!DET8DEDER|[EE|ZFE|ZGB8@EBE@E@E@`R@!CCEAUYOkBGBW F@F BWFA@BHDDBDBDBDDBeOxBWDBBXBHE\F^ByAp@CTRANSLATION-ARRAYBBBXBBBB9FB;Missing bop - do pageF(FFBDBGFÁGET-PARAMETERSDDBDGET-MESSAGE-NAMEByBB{BB|B}DBDDBDBDDBDBDBDBDBDBDCMND D D||D D DZ DZA@||@E|DE D@E|@EAEDE D@EAE|AEDE D|AE||DE D D D@`Z@! D D@`ZJ[X D D@`2@! D D@`J[B D D@`ZJ[C D D@`3J[D D D@`3J[E D D@`3@!BET8BEBER|[CE|ZDE|ZEB[D D D@`Z@! D D@`ZJ[F XB[DFEJ[FE OByDBBXpB NORMAL-ENDING  @F BFA@BXDEALLOCATE-RESOURCEBzBDDBDDBD OBDBBXpB ,ABNORMAL-ENDING  @F BFA@BXBBzBDDBDDBD OBDBBXpB XXXAF*B0@B2BXBHB9PARSE-XXX-STRINGÀINTERNÁSTRING-UPCASE,ÁSCREEN-DVI-XXXB;unknown \special command: ~ADDBDÀCONSPBB|DBDDBDBfDBDDÀSTRINGDÀOFFSETDCOMMAND@E D@`A@ D D@`3@! DAE D@`@E|ED @@BBGy8 @ @BD 8 @ @BDZDBDBOBCREAD-32-LE  HFBA @pB TYIF DDBDB8BDBDDÀSTREAMDBDDCJDCN|AA A@E}|Z 3AEZA|@3@9AOBWRITE-32-LE  FB@pB TYODDBDB8BDBDDBDBDBDDB@ D@E}|Z 3E|@3@ |@9OBREAD-BITMAP-FILEF XF.BA`@BpB ABORTFSÁOPEN-8B-INPUTBBBB"pB lSTRING-INCMAKE-ARRAYpB DISPLACED-TOpB TYPECART-STRINGÀERRORPpB CLOSEDDBDBÀPROG2WITH-OPEN-STREAMDBDDFILENAMEDBDB;DpBU.FILE-ABORTED-FLAG.DDIM0DDIM1DBDpBUl.PROG2-TEMPORARY.DADE/E @@ @@B @@C @ @BEC V@DEBECs|0DDDDEDAwE@8@X@DAŭO0BVIEW-BITMAP-FILE # DFB1A@pB,ALU-XORB3BpB CLEAR-SCREENB BDDBDBDBDDBDBDDÀARRAY@@  DD@E|[@E|[@E||| OFB1DBypB BITMAPB + FBI`@B F-BBBBDDBDBBDBDDBeDBDBDDB.DB0B;DB#DBDB+DCDE/E@B @BA @B@EDCwEB8 BXB DCŭO_BIÁPROBE-DEFAULTS $ FB` @pB2PARSE-PATHNAMECPROBE-FILEpB ,BACK-TRANSLATED-PATHNAMEpB ,TRUENAMEpB NEW-PATHNAMEB,DEFAULTSpB B)pB NEWESTDDBDBDBDDBDFILEDBDDÀLPATHDÀPROBE@@@@AD D D D DAx@DAOB`DBypB IMPRESS-BITMAPB3KFMBA ÁMAGNIFICATIONBBiB FYBB`FORMS-FROM-FILEBBBBpB MAGNIFICATIONEVALUATE-OFFSETpB ,H-OFFSETpB ,V-OFFSETǀ KpB lPRINTER-RESOLUTIONpB BUFFERDDBDLOCFGETFBBBBhDBDDBeDBDBD DDEFAULTSDÀHSIZEDÀVSIZEDBDH-OFFSETDV-OFFSETDB.DB0B;DB#DBDB+DDIVISOR@bx DI DE/E @H @HE@8 @@G@HAAHAB@HF@HGKJIwKH8HXHDIŭID@D|zz@ID@D|zzD@ID@D|zzEDAL|D[FsLE0|D[GsLE0DELE0EELE0DAOBBQ TF6BAP@plEHlCONDITION-HANDLERSC*PACKAGE*ÁSTRING-APPENDCSUBSTRINGl"ÁSTRING-SEARCH,{\tt \char '042}F^ÀG7320ÀERRORpBUCONDITION-CASE-THROWFIND-PACKAGEUSERREAD-FROM-STRINGl(l)pB ,CONDITION-NAMESB;lError in parsing \special command: ~S~%~ApB REPORT-STRINGDDBDBCCONDITION-BIND-IFpBUSELECT-MEMQÂCATCH-CONTINUATION-IFCCONDITION-CASE-IFÁCONDITION-CASEDBDDBDBDDBB;B;DBcDB @ @E|@ D E|@3ŀ @ D@Y D.[DDDDE[ADE[BV@VDECCADDDE8DECOBLOAD-PAINT-ARRAY'g TF@BAP@BPAINTMAKE-PACKAGEBl.DRAWING.SPECIALPUTPROPBCMAKUNBOUNDLOADpB SET-DEFAULT-PATHNAMEpB ,VERBOSECARRAY-TYPEB"ÀART-8BB;cant handle grey scale arrayslFile ~S doesnt contain a paint saved imageDDBDÀUNLESSÂINHIBIT-STYLE-WARNINGSDBDDBDBDDÀSYMBOLDBADBwB;B;DÀVALUESBATRUENAMEX @ D@ DX @EE @@ @DC[C 8CGZDGDXCCD@EDEDB@EZAAE{ 8@At8AE[u8AEBEAE{ 8@At8AE[u8DBOBDBypB lSAVED-PAINT-IMAGEB(j[FBB@@ BBBBiBoB,DEFAULTSBqBsBCPIXEL-ARRAY-WIDTHCPIXEL-ARRAY-HEIGHTBBBBǀ KBBDDBDBBBBhDBDDBeDBDBD DBwDBDBADB.DB0DBDBDBDBDE@B @@ D D D DA8@AGA@BC@BDIDAD|zz@IDAD|zzF@IDAD|zzGDAH|D[CsHE0|D[DsHE0FEHE0GEHE0DAO0BB%_ lF:BA@EOFB FjOPENpB ,PATHNAMEpB ,GENERIC-PATHNAMEpB2READ-ATTRIBUTE-LISTpB2,FILE-ATTRIBUTE-BINDINGSBBREADNREVERSEBBDDBDBBBBBÁWITH-OPEN-FILEDBDDBDBD B;DB#DCGPDVARSDVALSB;B;DFORMDÀFORMSDBDB+DADE/E @@@A A B BE@ DEBDCDEFE[E 8EGZFGFXEEF@HwGwVGEHEZH@@EGt9@Hŀ[JIAwJ@8@X@DAŭOZB1DpBU,FASL-RECORD-FILE-MACROS-EXPANDEDDB7D=DBDC}DBL6(DB ѠDB;LDBiDB gkDB_[DBDBDBY+DB'}DBNjDB81DB;DBbWDBtgDB#DBan\DB(DBcyDB~DB|<mNDBz8DBx?DBvDBt_cDBr`DBp DBnVDBlhDBj0DBhcDBgyDB%hDBU6B DBu0jGDBP\&DBZ HDBS-PDB[-PDBK-PDBC-PDBZ hDBZ (DB{-PDBMDB[sDB~GlDB}y]DB|[;DB{\DBz !DByDqWDBxEDBwj`DBvTkDBuYփDB9\DB%DBN