(FILECREATED " 8-Aug-85 01:04:39" ("compiled on " {PHYLUM}LISP>INSPECTARRAY.;2) " 5-Aug-85 20:35:10" recompiled changes: CMLARRAYP ICMLARRAY.GETSTATUSWINDOWGROUP MENUW.MAKEREGIONS MENUW.REPAINTFN ONED.DOWINDOWCOMFN TWOD.DOWINDOWCOMFN in "INTERLISP-D 5-Aug-85 ..." dated " 5-Aug-85 20:48:34") (FILECREATED " 8-Aug-85 01:03:48" {PHYLUM}LISP>INSPECTARRAY.;2 75157 changes to: (VARS INSPECTARRAYCOMS) (FNS ICMLARRAY.GETSTATUSWINDOWGROUP MENUW.MAKEREGIONS MENUW.REPAINTFN ONED.DOWINDOWCOMFN TWOD.DOWINDOWCOMFN CMLARRAYP) previous date: "28-Jul-85 17:38:39" {PHYLUM}LISP>INSPECTARRAY.;1) CMLARRAYP D1 (L (0 DATUM)) @`@`NIL (14Q VECTORTYPE# 4 ARRAYTYPE#) () COMPUTEONEDFIELDWIDTHA0001 D1 (NAME ERRORSET L (0 NIL) P 3 SIZE P 2 MAX P 1 I F 4 RESETVARSLST F 5 SLICE F 6 FONT F 7 RESETY) Ago hhTcUj kjdIHUI V [JKIkYJci(55Q PLSTRINGWIDTH 51Q SLICEREF 30Q SLICEDIMENSION 11Q PRINTLEVEL) (2 PRINTLEVEL) ( 6 (2 . 5)) COMPUTEONEDFIELDWIDTH D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 1 FONT I 0 SLICE F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q COMPUTEONEDFIELDWIDTHA0001) (24Q ERROR 13Q INTERNAL) ( 10Q (COMPUTEONEDFIELDWIDTHA0001)) COMPUTETWODCOLUMNWIDTHA0001 D1 (NAME ERRORSET L (0 NIL) P 3 SIZE P 2 MAX P 1 I F 4 FONT F 5 SLICE F 6 J F 7 MACROY) 7oT Uj kjdIHUIV T [JKIkYJci(42Q PLSTRINGWIDTH 36Q SLICEREF 14Q SLICEDIMENSION 7 PLSTRINGWIDTH) NIL ( 3 " ") COMPUTETWODCOLUMNWIDTH D1 (P 3 RESETSTATE P 2 MACROY P 0 OLDVALUE I 2 FONT I 1 J I 0 SLICE F 4 RESETVARSLST) >o 1gHhhTcYog gIcgI KJ(71Q ERROR! 64Q APPLY 41Q COMPUTETWODCOLUMNWIDTHA0001 6 PRINTLEVEL) (55Q PRINTLEVEL 45Q ERROR 36Q INTERNAL 14Q PRINTLEVEL) ( 33Q (COMPUTETWODCOLUMNWIDTHA0001) 3 (2 . 5)) COMPUTETWODTOTALWIDTH D1 (P 1 J I 1 FONT I 0 SLICE) "@k kjdIHJ@IA ԺIkYJ(26Q COMPUTETWODCOLUMNWIDTH 4 SLICEDIMENSION) NIL () CREATE.ARRAYSLICE D1 (P 21Q VALUE P 20Q PAIR P 14Q I P 11Q REALINDICES P 10Q SECONDINDEX P 7 FIRSTINDEX P 6 INDEXLIST P 5 REFLIST P 4 SETLIST P 3 EXCESS P 2 LKEEPS P 1 DIMS P 0 RANK I 1 KEEPS I 0 ARRAY) (@v@ A  HJ[kKoKl oA h@hHkjROdOaO \d]d^Hkj2OdOO_`d@dLdMdNdOdO Kl _dO dOA _ d_"@O O"oO _OOh__Ok_cO&_A .ONOk _NOk _O_OOh__Ok_=O&_(400Q NTH 364Q NTH 347Q ASSOC 302Q HELP 263Q ARRAY-DIMENSION 244Q ASSOC 220Q EQP 110Q \APPEND2 54Q HELP 16Q LENGTH 12Q ARRAY-DIMENSIONS) (151Q ICMLARRAY.ARRAYSLICETYPE# 3 ARRAY) ( 275Q "KEPT LEVEL OUT OF RANGE" 50Q "TOO FEW DIMS KEPT" 35Q "TOO MANY DIMS KEPT") DISPLAY.ONEDSLICE D1 (P 0 ONEDWINDOW I 1 SLICE I 0 MAINWINDOW) Z@g H@Ao @gH gA H Hg Hd H@gg Hgg h(126Q PUTWINDOWPROP 113Q ATTACHWINDOW 75Q MAINWINDOW 67Q ONEDRIGHTW.RESHAPEFN 64Q GETWINDOWUSERPROP 54Q ONED.RESHAPEFN 47Q PUTWINDOWPROP 36Q PUTWINDOWPROP 25Q ICMLARRAY.GETONEDWINDOWGROUP 6 GETWINDOWUSERPROP) (123Q ONED.DOWINDOWCOMFN 120Q DOWINDOWCOMFN 110Q TOP 105Q LEFT 61Q RIGHTWINDOW 43Q SLICE 32Q ONEDWINDOW 3 ONEDWINDOW) ( 22Q (GACHA 12Q)) DISPLAY.TWODSLICE D1 (P 0 TWODWINDOW I 1 SLICE I 0 MAINWINDOW) e@g H@Ao @gH $gA H Hg Hg Hd H@gg Hgg h(141Q PUTWINDOWPROP 126Q ATTACHWINDOW 110Q MAINWINDOW 102Q TOPW.RESHAPEFN 77Q GETWINDOWUSERPROP 67Q RIGHTW.RESHAPEFN 64Q GETWINDOWUSERPROP 54Q TWOD.RESHAPEFN 47Q PUTWINDOWPROP 36Q PUTWINDOWPROP 25Q ICMLARRAY.GETTWODWINDOWGROUP 6 GETWINDOWUSERPROP) (136Q TWOD.DOWINDOWCOMFN 133Q DOWINDOWCOMFN 123Q TOP 120Q LEFT 74Q TOPWINDOW 61Q RIGHTWINDOW 43Q SLICE 32Q TWODWINDOW 3 TWODWINDOW) ( 22Q (GACHA 12Q)) DISPLAYSLICE D1 (P 2 SLICE P 1 CURRENTSLICE P 0 CMLARRAY I 1 LEVELS I 0 MAINWINDOW) @g @g HAjBKEM ZI@gJ J k l@J j k D@g @g _gLOh_NOh^KLkԼO&@g @g @J h(244Q DISPLAY.TWODSLICE 234Q CLOSEW 231Q GETWINDOWUSERPROP 221Q DETACHWINDOW 216Q GETWINDOWUSERPROP 132Q CLOSEW 127Q GETWINDOWUSERPROP 117Q DETACHWINDOW 114Q GETWINDOWUSERPROP 103Q EQP 77Q SLICERANK 72Q DISPLAY.ONEDSLICE 63Q EQP 57Q SLICERANK 53Q PUTWINDOWPROP 37Q CREATE.ARRAYSLICE 15Q GETWINDOWUSERPROP 6 GETWINDOWUSERPROP) (226Q TWODWINDOW 213Q TWODWINDOW 143Q ALL 124Q ONEDWINDOW 111Q ONEDWINDOW 47Q CURRENTSLICE 12Q CURRENTSLICE 3 CMLARRAY) () ICMLARRAY D1 (P 4 STATUSWIDTH P 3 MAINWINDOW P 2 DISPLAYEDLEVELS P 1 FONT P 0 RANK I 2 WHERE I 1 ASTYPE I 0 CMLARRAY) B o hB o BBb@voBHkj2 ON7l@vkOgj_OOh__Ok_O&_OZoI Hll lMMl\@LIJB [HjdJ K(253Q DISPLAYSLICE 241Q ICMLARRAY.GETSTATUSWINDOWGROUP 215Q WIDTHIFWINDOW 202Q STRINGWIDTH 34Q PROMPTPRINT 23Q REGIONP 13Q PROMPTPRINT 3 WINDOWP) (124Q ALL 107Q ARRAY 52Q ARRAY) ( 176Q "A" 61Q (GACHA 12Q) 31Q "USING LOWER LEFT CORNER" 10Q "CMLARRAY INSPECTOR OF FIXED SIZE") ICMLARRAY.GETONEDWINDOWGROUP D1 (P 7 RIGHTWINDOW P 6 DISPLAYWINDOW P 5 DWBOTTOM P 4 DWLEFT P 3 RWWIDTH P 2 DWWIDTH P 1 DWHEIGHT I 2 FONT I 1 SLICE I 0 MAINWINDOW) M B Aj nHHnAB lHHlgB l c @ JK\jLj@ Kպ@ _OkI]jdM@ _OkعjdJI hdi ^dgg Ngg Ngg Ngg nN NgA BN jdKI hdi _dgg Ogg Ogg OgKj OgKn Ogi BO NgO NLM N ONg N(511Q ATTACHWINDOW 500Q ONED.RESHAPEFN 474Q MOVEW 466Q PUTWINDOWPROP 455Q DSPFONT 447Q PUTWINDOWPROP 436Q PUTWINDOWPROP 421Q PUTWINDOWPROP 406Q PUTWINDOWPROP 373Q PUTWINDOWPROP 360Q PUTWINDOWPROP 344Q CREATEW 336Q CREATEREGION 327Q DSPFONT 322Q PUTWINDOWPROP 312Q DSPRIGHTMARGIN 303Q PUTWINDOWPROP 271Q PUTWINDOWPROP 257Q PUTWINDOWPROP 245Q PUTWINDOWPROP 232Q CREATEW 224Q CREATEREGION 175Q \INSUREWINDOW 140Q \INSUREWINDOW 126Q \INSUREWINDOW 104Q \INSUREWINDOW 75Q WIDTHIFWINDOW 67Q STRINGWIDTH 43Q WIDTHIFWINDOW 40Q COMPUTEONEDFIELDWIDTH 14Q HEIGHTIFWINDOW 10Q SLICEDIMENSION 3 FONTHEIGHT) (506Q RIGHT 461Q RIGHTWINDOW 443Q NOSCROLLBARS 426Q MAXSIZE 413Q MINSIZE 403Q SCROLLBYREPAINTFN 400Q SCROLLFN 370Q ONEDRIGHTW.RESHAPEFN 365Q RESHAPEFN 355Q ONEDRIGHTW.REPAINTFN 352Q REPAINTFN 316Q SLICE 300Q ONED.BUTTONEVENTFN 275Q BUTTONEVENTFN 266Q ONED.SCROLLFN 263Q SCROLLFN 254Q ONED.RESHAPEFN 251Q RESHAPEFN 242Q ONED.REPAINTFN 237Q REPAINTFN 63Q A) () ICMLARRAY.GETREGIONFN D1 (P 2 WINDOWREGION P 1 STATE P 0 WINDOW I 2 INFO I 1 MOVINGPOINT I 0 FIXEDPOINT) yBBH ZAdJkkJJkkIgBgJkJkAdJJkJJkAJJkAJJkA(12Q WINDOWREGION) (63Q OPEN 54Q CLOSED) () ICMLARRAY.GETSTATUSWINDOWGROUPA0001 D1 (NAME ERRORSET F 0 WIDTH F 1 SHEIGHT F 2 CMLARRAY F 3 SWINDOW) !g jdPQ oR hi ch(32Q CREATEW 25Q CONCAT 15Q CREATEREGION 5 SETTOPVAL) (2 *PRINT-ARRAY*) ( 21Q "Inspector of ") ICMLARRAY.GETSTATUSWINDOWGROUP D1 (P 10Q MACROY P 7 MACROX P 6 MWINDOW P 5 PWINDOW P 4 SWINDOW P 3 MHEIGHT P 2 PHEIGHT P 1 SHEIGHT P 0 RANK I 4 WHERE I 3 DISPLAYEDLEVELS I 2 FONT I 1 WIDTH I 0 CMLARRAY F 11Q RESETVARSLST) M @ B li B B li 4 gd Wc_og _gO OcOLgg Lgg Lg@ Hj Lgg LgC jdAJ hdi ]dgg gM LgM HkIjdAK ohi ^gg Ngg Ngg Ngg Ngg LD5d L  L MLg HkNLg LDJHkKj(471Q ATTACHWINDOW 455Q ATTACHWINDOW 445Q STATUSW.REPAINTFN 441Q MOVEW 436Q GETBOXPOSITION 425Q \INSUREWINDOW 414Q \INSUREWINDOW 403Q PUTWINDOWPROP 370Q PUTWINDOWPROP 355Q PUTWINDOWPROP 342Q PUTWINDOWPROP 327Q PUTWINDOWPROP 315Q CREATEW 304Q CREATEREGION 270Q PUTWINDOWPROP 260Q DSPSCROLL 251Q PUTWINDOWPROP 236Q CREATEW 230Q CREATEREGION 221Q PUTWINDOWPROP 210Q PUTWINDOWPROP 175Q EQP 170Q PUTWINDOWPROP 160Q PUTWINDOWPROP 146Q PUTWINDOWPROP 132Q ERROR! 115Q SETTOPVAL 100Q ICMLARRAY.GETSTATUSWINDOWGROUPA0001 55Q GETTOPVAL 40Q HEIGHTIFWINDOW 31Q FONTHEIGHT 25Q HEIGHTIFWINDOW 22Q FONTHEIGHT 16Q HEIGHTIFWINDOW 7 FONTHEIGHT 3 ARRAY-RANK) (466Q BOTTOM 452Q BOTTOM 400Q MENUW.CURSOROUTFN 375Q CURSOROUTFN 365Q MENUW.CURSORMOVEDFN 362Q CURSORMOVEDFN 352Q MENUW.BUTTONEVENTFN 347Q BUTTONEVENTFN 337Q MENUW.RESHAPEFN 334Q RESHAPEFN 324Q MENUW.REPAINTFN 321Q REPAINTFN 264Q PRTWINDOW 254Q ON 246Q NILL 243Q PAGEFULLFN 215Q DISPLAYEDLEVELS 205Q STATUSW.BUTTONEVENTFN 202Q BUTTONEVENTFN 164Q CMLARRAY 155Q DON'T 152Q RESHAPEFN 143Q STATUSW.REPAINTFN 140Q REPAINTFN 106Q *PRINT-ARRAY* 75Q INTERNAL 51Q *PRINT-ARRAY*) ( 310Q "Current Slice" 72Q (ICMLARRAY.GETSTATUSWINDOWGROUPA0001)) ICMLARRAY.GETTWODWINDOWGROUP D1 (P 14Q CORNERWINDOW P 13Q RIGHTWINDOW P 12Q TOPWINDOW P 11Q DISPLAYWINDOW P 10Q DWBOTTOM P 7 DWLEFT P 6 CWHEIGHT P 5 CWWIDTH P 4 RWWIDTH P 3 TWHEIGHT P 2 DWWIDTH P 1 DWHEIGHT I 2 FONT I 1 SLICE I 0 MAINWINDOW) $B Aj nHHnAB nHHnB gB l gB l B @ JL_jOj_@ Lպ@ _OkIK_jdO_@ _OkKչjdJI hdi _dgg Ogg Ogg Ogg nO OgA BO jdJK hdi _dgg Ogg Ogg OgjK OgnK nO Ogi BO OgO jdLI hdi _dgg Ogg Ogg OgLj OgLn Ogi BO OgO jdMN hdi _dgMN OgMN OOO O OOg OOg OOg O(1037Q ATTACHWINDOW 1025Q ATTACHWINDOW 1013Q ATTACHWINDOW 1001Q TWOD.RESHAPEFN 774Q MOVEW 763Q PUTWINDOWPROP 750Q PUTWINDOWPROP 734Q CREATEW 726Q CREATEREGION 717Q PUTWINDOWPROP 705Q DSPFONT 677Q PUTWINDOWPROP 666Q PUTWINDOWPROP 651Q PUTWINDOWPROP 636Q PUTWINDOWPROP 623Q PUTWINDOWPROP 610Q PUTWINDOWPROP 574Q CREATEW 566Q CREATEREGION 557Q PUTWINDOWPROP 545Q DSPFONT 537Q PUTWINDOWPROP 526Q DSPRIGHTMARGIN 516Q PUTWINDOWPROP 501Q PUTWINDOWPROP 466Q PUTWINDOWPROP 453Q PUTWINDOWPROP 440Q PUTWINDOWPROP 424Q CREATEW 416Q CREATEREGION 407Q DSPFONT 401Q PUTWINDOWPROP 370Q DSPRIGHTMARGIN 360Q PUTWINDOWPROP 345Q PUTWINDOWPROP 332Q PUTWINDOWPROP 317Q PUTWINDOWPROP 303Q CREATEW 275Q CREATEREGION 244Q \INSUREWINDOW 201Q \INSUREWINDOW 167Q \INSUREWINDOW 141Q \INSUREWINDOW 132Q HEIGHTIFWINDOW 127Q FONTHEIGHT 123Q WIDTHIFWINDOW 115Q STRINGWIDTH 106Q WIDTHIFWINDOW 100Q STRINGWIDTH 71Q HEIGHTIFWINDOW 66Q FONTHEIGHT 43Q WIDTHIFWINDOW 40Q COMPUTETWODTOTALWIDTH 14Q HEIGHTIFWINDOW 10Q SLICEDIMENSION 3 FONTHEIGHT) (1034Q RIGHT 1022Q TOP 1010Q TOP 755Q MAXSIZE 742Q MINSIZE 712Q RIGHTWINDOW 673Q NOSCROLLBARS 656Q MAXSIZE 643Q MINSIZE 633Q SCROLLBYREPAINTFN 630Q SCROLLFN 620Q RIGHTW.RESHAPEFN 615Q RESHAPEFN 605Q RIGHTW.REPAINTFN 602Q REPAINTFN 552Q TOPWINDOW 533Q NOSCROLLBARS 506Q MAXSIZE 473Q MINSIZE 463Q SCROLLBYREPAINTFN 460Q SCROLLFN 450Q TOPW.RESHAPEFN 445Q RESHAPEFN 435Q TOPW.REPAINTFN 432Q REPAINTFN 375Q SLICE 355Q TWOD.BUTTONEVENTFN 352Q BUTTONEVENTFN 342Q TWOD.SCROLLFN 337Q SCROLLFN 327Q TWOD.RESHAPEFN 324Q RESHAPEFN 314Q TWOD.REPAINTFN 311Q REPAINTFN 111Q A 74Q A) () INVERTREGION D1 (P 0 REGION I 1 AREGION I 0 WINDOW) +Ahdd@HHHHggn h(47Q BITBLT) (40Q INVERT 35Q TEXTURE 3 ICMLARRAY.ACTIVEREGION) () LISTNCHARS D1 (P 5 ITEM P 3 I P 1 TOTALCHARS P 0 TCDRLEVEL I 4 RDTBL I 3 FLG I 2 FONT I 1 DEPTH I 0 LST) ^A kA@jdJLkYd@ H-l+HKLMdAkCD CD kԼJKkԻmk(111Q NCHARS 103Q LISTNCHARS 47Q LENGTH 15Q PRINTLEVEL 7 EQP 2 PRINTLEVEL) NIL () LISTSTRREGION D1 (I 4 RDTBL I 3 FLG I 2 STREAM I 1 DEPTH I 0 LST) hB hB B @BCD B (34Q CREATEREGION 31Q FONTHEIGHT 25Q PLSTRINGWIDTH 15Q FONTDESCENT 11Q DSPYPOSITION 4 DSPXPOSITION) NIL () LISTSTRWIDTH D1 (P 6 ITEM P 4 I P 2 TOTALWIDTH P 1 WIDTHOFSPACE P 0 TCDRLEVEL I 4 RDTBL I 3 FLG I 2 FONT I 1 DEPTH I 0 LST) A gBCD AgBCD gBCD @jdKMZd@ H7gBCD /HLMNdAkBCD BCD IԽKLkԼjIgBCD (205Q STRINGWIDTH 154Q STRINGWIDTH 145Q LISTSTRWIDTH 115Q STRINGWIDTH 100Q LENGTH 55Q STRINGWIDTH 41Q STRINGWIDTH 25Q PRINTLEVEL 21Q STRINGWIDTH 7 EQP 2 PRINTLEVEL) (177Q %) 107Q -- 47Q %( 33Q % 13Q &) () MENU.GETLEVEL D1 (P 5 NEWVALUE P 4 LEVEL P 3 PRTWINDOW P 2 CMLARRAY P 1 LEVELS P 0 MAINW I 1 DIM I 0 WINDOW) @ @g RHg ZHg [IAk \K oAo LoK ]dKMo g\;M ]djMMJA M\Hg ^ oM N IAk L@ h(233Q MENUW.REPAINTFN 225Q NTH 215Q PRIN1 211Q CONCAT 200Q TERPRI 174Q GETWINDOWUSERPROP 156Q ARRAY-DIMENSION 133Q READ 130Q OPENSTRINGSTREAM 115Q STREQUAL 77Q PROMPTFORWORD 66Q CONCAT 52Q TERPRI 44Q NTH 34Q GETWINDOWUSERPROP 24Q GETWINDOWUSERPROP 12Q GETWINDOWUSERPROP 3 MAINWINDOW) (171Q PRTWINDOW 121Q ALL 31Q PRTWINDOW 21Q CMLARRAY 7 LEVELS) ( 205Q "ILLEGAL VALUE " 112Q "ALL" 73Q "TYPE A LEVEL VALUE OR ALL" 63Q " :" 56Q "NEW LEVEL FOR DIM ") MENUW.APPLY D1 (P 2 SLICEDIM P 1 LEVELS P 0 MAINW I 0 WINDOW) i@ @g BIj[(LZkJdl*@ g ] oM -gLkؼKHg@g Hdg h(145Q DISPLAYSLICE 142Q GETWINDOWUSERPROP 131Q PUTWINDOWPROP 126Q COPY 123Q GETWINDOWUSERPROP 67Q PRIN1 56Q TERPRI 52Q GETWINDOWUSERPROP 44Q MAINWINDOW 12Q GETWINDOWUSERPROP 3 MAINWINDOW) (137Q DISPLAYEDLEVELS 120Q LEVELS 114Q DISPLAYEDLEVELS 76Q ALL 47Q PRTWINDOW 7 LEVELS) ( 63Q "NOT A VALID SLICE") MENUW.BUTTONEVENTFN D1 (P 1 SELECTEDREGION P 0 ACTIVEREGIONS I 0 WINDOW) m@g @g "@ IU@I @I `lZjJJ @I @g @g I@IlKh(124Q GETWINDOWUSERPROP 114Q PUTWINDOWPROP 104Q INVERTREGION 75Q BLOCK 71Q \FZEROP 46Q GETMOUSESTATE 42Q INVERTREGION 34Q OUTLINEREGION 24Q TOTOPW 15Q GETWINDOWUSERPROP 6 GETWINDOWUSERPROP) (142Q ICMLARRAY.ACTIVEREGION 132Q ICMLARRAY.ACTIVEREGION 121Q ASKING 111Q SELECTEDREGION 52Q LASTMOUSEBUTTONS 12Q SELECTEDREGION 3 ACTIVEREGIONS) () MENUW.CURSORMOVEDFN D1 (P 5 FOUNDIT P 4 AREGION P 3 CURSOR P 1 SELECTEDREGION P 0 ACTIVEREGIONS I 0 WINDOW) j@g @g Hh@ "J"M8IM1I@I @M @gM +MLK LJZMI@I @g h(146Q PUTWINDOWPROP 136Q OUTLINEREGION 114Q INSIDEP 73Q PUTWINDOWPROP 62Q OUTLINEREGION 54Q OUTLINEREGION 26Q CURSORPOSITION 15Q GETWINDOWUSERPROP 6 GETWINDOWUSERPROP) (143Q SELECTEDREGION 106Q ICMLARRAY.ACTIVEREGION 67Q SELECTEDREGION 12Q SELECTEDREGION 3 ACTIVEREGIONS) () MENUW.CURSOROUTFN D1 (P 0 SELECTEDREGION I 0 WINDOW) @g H@H @g h(31Q PUTWINDOWPROP 21Q OUTLINEREGION 6 GETWINDOWUSERPROP) (26Q SELECTEDREGION 3 SELECTEDREGION) () MENUW.MAKEREGIONS D1 (P 14Q HMARK P 13Q FIELDHEIGHT P 12Q FIELDWIDTH P 11Q VMARK P 10Q DIM P 3 ACTIVEREGIONS P 2 LF P 1 HORZINC P 0 LEVELS I 0 WINDOW) @g gh@ h@ CH@ g @gH @ `o@ dLdgh[Ih@ ko j@ `o@ dMdgK[j@g Jl@ H kjh@ Il@ Il  OO:`OOOO dNdgdOKOk_OIl_@gK h(371Q PUTWINDOWPROP 307Q CREATEREGION 252Q FONTHEIGHT 242Q DSPYPOSITION 232Q LENGTH 226Q MOVETO 215Q GETWINDOWPROP 165Q STRINGREGION 151Q RELMOVETO 142Q NCHARS 131Q LINELENGTH 103Q STRINGREGION 67Q MOVETOUPPERLEFT 62Q PUTWINDOWPROP 51Q COPY 46Q GETWINDOWUSERPROP 40Q MAINWINDOW 26Q DSPLINEFEED 21Q STRINGWIDTH 16Q DSPFONT 6 GETWINDOWUSERPROP) (365Q ACTIVEREGIONS 321Q MENU.GETLEVEL 273Q ICMLARRAY.ACTIVEREGIONTYPE# 212Q HEIGHT 177Q MENUW.APPLY 154Q ICMLARRAY.ACTIVEREGIONTYPE# 115Q MENUW.SHOW 72Q ICMLARRAY.ACTIVEREGIONTYPE# 56Q LEVELS 43Q DISPLAYEDLEVELS 11Q A 3 LEVELS) ( 161Q "APPLY" 137Q "SHOW" 77Q "SHOW") MENUW.REPAINTFN D1 (P 7 LEVEL P 6 HMARK P 4 I P 2 SELECTEDREGION P 1 LEVELS P 0 CMLARRAY I 0 WINDOW) @ g @g @g I@ @g @ o@ h@ ojhd@ @ @ H kjo@ LK%@ Ilo@ MJ@J hoL@ Lk\_NOjhd@ MNl^(253Q FLUSHRIGHT 225Q PRINTNUM 212Q OUTLINEREGION 174Q PRIN1 155Q TERPRI 143Q PRIN1 125Q ARRAY-RANK 121Q TERPRI 114Q TERPRI 107Q FLUSHRIGHT 73Q LINELENGTH 65Q PRIN1 55Q DSPRESET 50Q GETWINDOWUSERPROP 40Q MENUW.MAKEREGIONS 27Q GETWINDOWUSERPROP 20Q GETWINDOWUSERPROP 11Q GETWINDOWUSERPROP 3 MAINWINDOW) (45Q LEVELS 24Q SELECTEDREGION 15Q LEVELS 6 CMLARRAY) ( 220Q (FIX 5) 170Q "Level: " 137Q "Dimension:" 77Q "APPLY" 61Q "SHOW ") MENUW.RESHAPEFN D1 (I 0 WINDOW) @ @ (7 MENUW.REPAINTFN 3 MENUW.MAKEREGIONS) NIL () MENUW.SHOW D1 (I 0 WINDOW) @g @ (12Q MENUW.REPAINTFN 6 PUTWINDOWPROP) (3 LEVELS) () ONED.BUTTONEVENTFN D1 (P 6 FOUNDIT P 5 AREGION P 4 CURSOR P 1 SELECTEDREGION P 0 ACTIVEREGIONS I 0 WINDOW) @g @g @ `ljJHh@ "K&N INI@I @N @gN NNML MK[`kjId@IlJh(155Q GETMOUSESTATE 142Q INSIDEP 115Q PUTWINDOWPROP 104Q INVERTREGION 76Q INVERTREGION 50Q CURSORPOSITION 27Q GETMOUSESTATE 24Q TOTOPW 15Q GETWINDOWUSERPROP 6 GETWINDOWUSERPROP) (174Q ICMLARRAY.ACTIVEREGION 161Q LASTMOUSEBUTTONS 134Q ICMLARRAY.ACTIVEREGION 111Q SELECTEDREGION 33Q LASTMOUSEBUTTONS 12Q SELECTEDREGION 3 ACTIVEREGIONS) () ONED.DOWINDOWCOMFN D1 (P 0 COM I 0 ONEDWINDOW F 1 WindowMenu) NQ XddBdg@hddg@g  $gHgHgHg@ @kHh(104Q MAINWINDOW 46Q SHAPEW 43Q GETREGION 6 MENU) (76Q BURYW 70Q SHRINKW 62Q CLOSEW 53Q MOVEW 36Q CLOSED 32Q ICMLARRAY.GETREGIONFN 17Q SHAPEW) () ONED.INDICES D1 (P 6 LEVEL P 5 I P 2 DATA P 1 PRTWINDOW P 0 DISPLAYEDLEVELS I 2 WINDOW I 1 SELECTEDREGION I 0 SLICE) jB g B g AI oI @vkHjLhMKNgoJoNI LMkԽ(136Q PRINTNUM 51Q PRIN1 40Q TERPRI 23Q GETWINDOWUSERPROP 15Q MAINWINDOW 11Q GETWINDOWUSERPROP 3 MAINWINDOW) (115Q ALL 62Q ARRAY 55Q ICMLARRAY.ARRAYSLICE 27Q ICMLARRAY.ACTIVEREGION 20Q PRTWINDOW 6 DISPLAYEDLEVELS) ( 131Q (FIX 5) 123Q (FIX 5) 45Q "INDICES: ") ONED.MAKEREGIONSA0001 D1 (NAME ERRORSET P 20Q VERTMARK P 17Q FHEIGHT P 16Q I P 6 DIM0 P 5 VERTMARKS P 4 ACTIVEREGIONS P 3 FIELDWIDTH P 2 LF P 1 WINDOWHEIGHT P 0 SLICE F 21Q WINDOW F 22Q MACROY) %W"g W"g hW" SHj W"gHW" [ NkIJ3 OO,O_OOh__Ok_OJ_O&_O]NkjW" OdW"gM W"gL W"gjM KIM  W"g gjM W"g g IM  hc$i_ OO`jO KO _dOdgdOLOk_O_^(373Q CREATEREGION 334Q PUTWINDOWPROP 331Q CREATEREGION 324Q LAST 317Q GETWINDOWPROP 311Q GETWINDOWUSERPROP 300Q LAST 270Q GETWINDOWUSERPROP 257Q PUTWINDOWPROP 254Q CREATEREGION 247Q LAST 240Q LAST 225Q PUTWINDOWPROP 213Q PUTWINDOWPROP 171Q FONTHEIGHT 62Q PUTWINDOWPROP 56Q COMPUTEONEDFIELDWIDTH 42Q SLICEDIMENSION 25Q DSPLINEFEED 17Q GETWINDOWPROP 7 GETWINDOWUSERPROP) (410Q ONED.MENUFN 361Q ICMLARRAY.ACTIVEREGIONTYPE# 314Q WIDTH 306Q RIGHTWINDOW 273Q EXTENT 265Q RIGHTWINDOW 233Q EXTENT 221Q ACTIVEREGIONS 207Q VERTMARKS 50Q FIELDWIDTH 14Q HEIGHT 4 SLICE) () ONED.MAKEREGIONS D1 (P 3 RESETSTATE P 2 MACROY P 0 OLDVALUE I 0 WINDOW F 4 RESETVARSLST) >o 1gHhhTcYog gIcgI KJ(71Q ERROR! 64Q APPLY 41Q ONED.MAKEREGIONSA0001 6 PRINTLEVEL) (55Q PRINTLEVEL 45Q ERROR 36Q INTERNAL 14Q PRINTLEVEL) ( 33Q (ONED.MAKEREGIONSA0001) 3 (2 . 5)) ONED.MENUFN D1 (P 5 DATUM P 4 MODE P 3 DATA P 2 OMENU P 1 PMENU P 0 SLICE I 1 SELECTEDREGION I 0 WINDOW F 7 IT) @g ooA4AzHK ]ddMJI \dg/M@ ^ oN @MdlM 0 +dgHA@ gHK cLg HA@ h(221Q ONED.INDICES 201Q SLICEREF 165Q ONED.SETVALUE 146Q INSPECT 141Q DEFAULT.INSPECTW.VALUECOMMANDFN 120Q PRIN1 107Q TERPRI 103Q GETPROMPTWINDOW 63Q MENU 37Q SLICEREF 6 GETWINDOWUSERPROP) (210Q INDICES 172Q SETIT 154Q SET 70Q INSPECT 22Q ICMLARRAY.ACTIVEREGION 3 SLICE) ( 114Q "CAN'T INSPECT NIL" 16Q (create MENU ITEMS _ (QUOTE ((Set (QUOTE SET) "Set item") (Indices (QUOTE INDICES) "Display element indices ") (IT% _% Datum (QUOTE SETIT) "Bind IT to selected item")))) 12Q (create MENU ITEMS _ (QUOTE ((Inspect (QUOTE INSPECT) "Inspect item") (Set (QUOTE SET) "Set item") (Indices (QUOTE INDICES) "Display element indices ") (IT% _% Datum (QUOTE SETIT) "Bind IT to selected item"))))) ONED.PRTELEMENT D1 (P 0 ELT I 3 VMARK I 2 WINDOW I 1 I I 0 SLICE) @A jCB B HB h(27Q PRIN1 22Q MOVETO 15Q FONTDESCENT 4 SLICEREF) NIL () ONED.REPAINTFNA0001 D1 (NAME ERRORSET P 20Q VMARK P 17Q I P 11Q LASTI P 10Q FIRSTI P 7 DIM0 P 6 FIELDWIDTH P 5 LF P 4 VERTMARKS P 3 BOTTOM P 2 TOP P 1 SELECTEDREGION P 0 SLICE F 21Q WINDOW F 22Q RESETVARSLST F 23Q WINDOWREGION F 24Q RESETY F 25Q VMARK) Pgo hhW$c$gd gi W$c$W"g W"g W&W&kW&W"g hW" W"g G Hwj _kLjOkO_OOYOkLOk OOkOOk_dOO_LOk c*LOk OOOYI W"I hc(i_OdO󳏿JOO_Ok_r_OdO󳏿KOO_Ok_r_ OOHOW"O Ok_O_(477Q ONED.PRTELEMENT 335Q INVERTREGION 307Q NTH 273Q NTH 224Q NTH 155Q SLICEDIMENSION 141Q GETWINDOWUSERPROP 131Q DSPLINEFEED 123Q GETWINDOWUSERPROP 72Q GETWINDOWUSERPROP 62Q GETWINDOWUSERPROP 43Q SETTOPVAL 33Q GETTOPVAL 11Q PRINTLEVEL) (136Q FIELDWIDTH 120Q VERTMARKS 67Q SELECTEDREGION 57Q SLICE 37Q PLVLFILEFLG 27Q PLVLFILEFLG 2 PRINTLEVEL) ( 6 (2 . 5)) ONED.REPAINTFN D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 1 WINDOWREGION I 0 WINDOW F 3 LISPXHIST F 4 RESETVARSLST) ,Ah@ bS!Tog hgZ JI(47Q ERROR! 42Q RESETRESTORE 30Q ONED.REPAINTFNA0001 6 DSPCLIPPINGREGION) (36Q ERROR 25Q INTERNAL) ( 22Q (ONED.REPAINTFNA0001)) ONED.RESHAPEFN D1 (P 1 I P 0 SELECTEDREGION I 0 WINDOW) S@g @ @ H@ h@g@g !J L LKI KJZ(111Q EQP 67Q PUTWINDOWPROP 53Q GETWINDOWUSERPROP 30Q ONED.REPAINTFN 21Q ONED.MAKEREGIONS 15Q DSPRESET 6 GETWINDOWUSERPROP) (103Q ICMLARRAY.ACTIVEREGION 50Q ACTIVEREGIONS 44Q SELECTEDREGION 35Q ICMLARRAY.ACTIVEREGION 3 SELECTEDREGION) () ONED.SCROLLFN D1 (P 0 RIGHTWINDOW I 3 FLG I 2 DY I 1 DX I 0 WINDOW) 0@g Bj BH HjBClI@ABC h(54Q SCROLLBYREPAINTFN 30Q \INSUREWINDOW 16Q EQP 6 GETWINDOWUSERPROP) (3 RIGHTWINDOW) () ONED.SETVALUEA0001 D1 (NAME ERRORSET F 0 NEWVALUE F 1 MACROY) ohdghddi  cci(24Q EVAL 20Q TTYIN) (10Q EVALQT) ( 3 "NEWVALUE? ") ONED.SETVALUEA0002 D1 (NAME ERRORSET F 0 WINDOW F 1 RESETVARSLST F 2 VMARK F 3 FIELDWIDTH F 4 I F 5 NEWVALUE F 6 SELECTEDREGION F 7 VERTMARKS F 10Q RESETY F 11Q SLICE) y go hhQcgd gi QcUP S4WTk chddPjRSP ggj WTPR PV P Pg ci(163Q ONEDRIGHTW.RESHAPEFN 160Q GETWINDOWUSERPROP 150Q ONED.RESHAPEFN 143Q INVERTREGION 135Q ONED.PRTELEMENT 124Q BITBLT 111Q FONTHEIGHT 72Q NTH 55Q PLSTRINGWIDTH 42Q SETTOPVAL 32Q GETTOPVAL 11Q PRINTLEVEL) (155Q RIGHTWINDOW 117Q REPLACE 114Q TEXTURE 36Q PLVLFILEFLG 26Q PLVLFILEFLG 2 PRINTLEVEL) ( 6 (2 . 5)) ONED.SETVALUE D1 (P 14Q RESETZ P 13Q RESETY P 12Q LISPXHIST P 11Q RESETSTATE P 10Q MACROY P 6 OLDVALUE P 5 VMARK P 4 NEWVALUE P 3 FIELDWIDTH P 2 VERTMARKS P 1 I P 0 PRTWINDOW I 2 WINDOW I 1 SELECTEDREGION I 0 SLICE F 15Q RESETVARSLST F 16Q LISPXHIST) B g ABg Bg $H 1 gNhhWc_og g_OcgO O@LI W! Wog hg_ Oh(215Q ERROR! 205Q RESETRESTORE 172Q ONED.SETVALUEA0002 151Q SLICESET 141Q ERROR! 132Q APPLY 102Q ONED.SETVALUEA0001 44Q SET.TTYINEDIT.WINDOW 35Q GETWINDOWUSERPROP 26Q GETWINDOWUSERPROP 11Q GETWINDOWUSERPROP 3 MAINWINDOW) (200Q ERROR 167Q INTERNAL 122Q SET.TTYINEDIT.WINDOW 106Q ERROR 77Q INTERNAL 52Q SET.TTYINEDIT.WINDOW 32Q FIELDWIDTH 23Q VERTMARKS 15Q ICMLARRAY.ACTIVEREGION 6 PRTWINDOW) ( 164Q (ONED.SETVALUEA0002) 74Q (ONED.SETVALUEA0001)) ONEDRIGHTW.REPAINTFN D1 (P 15Q FORMAT P 14Q I P 6 LASTI P 5 FIRSTI P 4 DIM0 P 3 VERTMARKS P 2 BOTTOM P 1 TOP P 0 DWINDOW I 1 WINDOWREGION I 0 WINDOW) Ah@ b@ AAkASHg hHg [d \dkKj OqO]LMLkKMk M OzOLk_dOOjKMk @ @ NMgLk h OOdOO@ @ Ok__OdO󳉿IOO_Ok_j_OdOJOtO_Ok__((250Q TERPRI 243Q PRINTNUM 216Q NCHARS 202Q MOVETO 175Q FONTDESCENT 170Q NTH 125Q NTH 64Q LENGTH 57Q GETWINDOWUSERPROP 45Q GETWINDOWUSERPROP 15Q MAINWINDOW 6 DSPCLIPPINGREGION) (210Q FIX 54Q VERTMARKS 42Q SLICE) () ONEDRIGHTW.RESHAPEFN D1 (I 0 WINDOW) @ @h@ (14Q ONEDRIGHTW.REPAINTFN 11Q DSPCLIPPINGREGION 3 DSPRESET) NIL () OUTLINEREGION D1 (P 4 RIGHT P 3 TOP P 2 BOTTOM P 1 LEFT P 0 REGION I 1 ACTIVEREGION I 0 WINDOW) eAAHYHZHHk[HHk\IJLkJkg@ LJLKkkg@ LKIkKkg@ IKIJkkg@ h(141Q DRAWLINE 122Q DRAWLINE 103Q DRAWLINE 64Q DRAWLINE) (134Q INVERT 115Q INVERT 76Q INVERT 57Q INVERT 3 ICMLARRAY.ACTIVEREGION) () PLNCHARS D1 (I 2 RDTBL I 1 FLG I 0 STR) #@djj@AB @jAB (40Q LISTNCHARS 30Q NCHARS 17Q PRINTLEVEL 10Q PRINTLEVEL) NIL () PLSTRINGREGION D1 (I 3 RDTBL I 2 FLG I 1 STREAM I 0 STR) ;@djj @ABC A hA A @ABC A (70Q CREATEREGION 65Q FONTHEIGHT 61Q PLSTRINGWIDTH 51Q FONTDESCENT 45Q DSPYPOSITION 40Q DSPXPOSITION 33Q STRINGREGION 20Q PRINTLEVEL 11Q PRINTLEVEL) NIL () PLSTRINGWIDTH D1 (I 3 RDTBL I 2 FLG I 1 FONT I 0 STR) &@djj@ABC @jABC (43Q LISTSTRWIDTH 31Q STRINGWIDTH 17Q PRINTLEVEL 10Q PRINTLEVEL) NIL () RIGHTW.REPAINTFN D1 (P 15Q FORMAT P 14Q I P 6 LASTI P 5 FIRSTI P 4 DIM0 P 3 VERTMARKS P 2 BOTTOM P 1 TOP P 0 DWINDOW I 1 WINDOWREGION I 0 WINDOW) Ah@ b@ AAkASHg hHg [d \dkKj OqO]LMLkKMk M OzOLk_dOOjKMk @ @ NMgLk h OOdOO@ @ Ok__OdO󳉿IOO_Ok_j_OdOJOtO_Ok__((250Q TERPRI 243Q PRINTNUM 216Q NCHARS 202Q MOVETO 175Q FONTDESCENT 170Q NTH 125Q NTH 64Q LENGTH 57Q GETWINDOWUSERPROP 45Q GETWINDOWUSERPROP 15Q MAINWINDOW 6 DSPCLIPPINGREGION) (210Q FIX 54Q VERTMARKS 42Q SLICE) () RIGHTW.RESHAPEFN D1 (I 0 WINDOW) @ @h@ (14Q RIGHTW.REPAINTFN 11Q DSPCLIPPINGREGION 3 DSPRESET) NIL () SLICEDIMENSION D1 (P 1 REALINDICES P 0 ARRAY I 1 VDIM I 0 SLICE) %@@Aj HI HI (42Q ARRAY-DIMENSION 32Q ARRAY-DIMENSION 23Q EQP) (11Q ICMLARRAY.ARRAYSLICE 3 ICMLARRAY.ARRAYSLICE) () SLICERANK D1 (P 0 REALINDICES I 0 SLICE) @H k kl(20Q EQP 14Q LENGTH) (3 ICMLARRAY.ARRAYSLICE) () SLICEREF D1 (P 3 TWOD? P 2 SECONDINDEX P 1 FIRSTINDEX P 0 REFLIST I 2 INDEX2 I 1 INDEX1 I 0 ASLICE) A@@@ @ IA oA KJB oB gH (76Q APPLY 65Q HELP 46Q HELP) (72Q AREF 25Q ICMLARRAY.ARRAYSLICE 17Q ICMLARRAY.ARRAYSLICE 11Q ICMLARRAY.ARRAYSLICE 3 ICMLARRAY.ARRAYSLICE) ( 61Q "NULL INDEX2" 42Q "NULL INDEX1") SLICESET D1 (P 3 TWOD? P 2 SECONDINDEX P 1 FIRSTINDEX P 0 SETLIST I 3 INDEX2 I 2 INDEX1 I 1 VALUE I 0 ASLICE) D@@@ @ IB oB KJC oC HAgH (101Q APPLY 65Q HELP 46Q HELP) (75Q ASET 25Q ICMLARRAY.ARRAYSLICE 17Q ICMLARRAY.ARRAYSLICE 11Q ICMLARRAY.ARRAYSLICE 3 ICMLARRAY.ARRAYSLICE) ( 61Q "NULL INDEX2" 42Q "NULL INDEX1") STATUSW.BUTTONEVENTFN D1 (P 6 DATA P 5 DATUM P 4 MODE P 3 OMENU P 2 PMENU P 1 ACTIVEREGION P 0 CMLARRAY I 0 WINDOW F 7 IT) @ @g @g oo4I^H ]`lj@I IgY`kjLMddMKJ \dgMddl dgH@ g H ch(234Q AREF 221Q ZEROD.SETVALUE 203Q INSPECT 176Q DEFAULT.INSPECTW.VALUECOMMANDFN 150Q MENU 112Q GETMOUSESTATE 73Q INVERTREGION 53Q GETMOUSESTATE 47Q AREF 21Q GETWINDOWUSERPROP 12Q GETWINDOWUSERPROP 3 TOTOPW) (225Q SETIT 211Q SET 155Q INSPECT 116Q LASTMOUSEBUTTONS 103Q SELECTED 100Q ICMLARRAY.ACTIVEREGION 57Q LASTMOUSEBUTTONS 40Q ICMLARRAY.ACTIVEREGION 16Q ACTIVEREGION 7 CMLARRAY) ( 31Q (create MENU ITEMS _ (QUOTE ((Set (QUOTE SET) "Set value") (IT% _% Datum (QUOTE SETIT) "Bind IT to selected item")))) 25Q (create MENU ITEMS _ (QUOTE ((Inspect (QUOTE INSPECT) "Inspect value") (Set (QUOTE SET) "Set value") (IT% _% Datum (QUOTE SETIT) "Bind IT to selected item"))))) STATUSW.REPAINTFNA0001 D1 (NAME ERRORSET L (0 NIL) F 2 WINDOW F 3 RESETVARSLST F 4 ACTIVEREGION F 5 CMLARRAY F 6 RESETY) go hhScgd gi ScoR `hR hR R U R R HdIRg Rg HdIcU R RgT TRT c i(236Q INVERTREGION 220Q PUTWINDOWPROP 207Q PRIN1 203Q AREF 155Q GETWINDOWUSERPROP 144Q GETWINDOWUSERPROP 123Q CREATEREGION 120Q FONTHEIGHT 114Q PLSTRINGWIDTH 110Q AREF 103Q FONTDESCENT 77Q DSPYPOSITION 72Q DSPXPOSITION 60Q PRIN1 42Q SETTOPVAL 32Q GETTOPVAL 11Q PRINTLEVEL) (225Q ICMLARRAY.ACTIVEREGION 214Q ACTIVEREGION 160Q ICMLARRAY.ACTIVEREGION 152Q ACTIVEREGION 141Q ACTIVEREGION 64Q ICMLARRAY.ACTIVEREGIONTYPE# 36Q PLVLFILEFLG 26Q PLVLFILEFLG 2 PRINTLEVEL) ( 54Q "Value: " 6 (2 . 5)) STATUSW.REPAINTFN D1 (P 7 RESETZ P 6 RESETY P 5 LISPXHIST P 4 I P 2 ACTIVEREGION P 1 LLENGTH P 0 CMLARRAY I 0 WINDOW F 10Q LISPXHIST F 11Q RESETVARSLST) @g h@ @ o@ H igH @ IoHv jhd@ @ o@ H @ @ @ HvjFHvkjo@ LK(HL @ LHvko@ Lk\&W!Wog hg_ Oh(331Q ERROR! 321Q RESETRESTORE 306Q STATUSW.REPAINTFNA0001 253Q PRIN1 225Q PRIN1 221Q ARRAY-DIMENSION 206Q PRIN1 146Q TERPRI 141Q TERPRI 134Q PRIN1 130Q ARRAY-TOTAL-SIZE 123Q PRIN1 113Q TERPRI 106Q FLUSHRIGHT 76Q CONCAT 56Q PRIN1 52Q ARRAY-ELEMENT-TYPE 37Q ARRAY-ELEMENT-TYPE 32Q PRIN1 22Q DSPRESET 13Q LINELENGTH 6 GETWINDOWUSERPROP) (314Q ERROR 303Q INTERNAL 233Q ARRAY 165Q ARRAY 152Q ARRAY 70Q ARRAY 45Q POINTER 3 CMLARRAY) ( 300Q (STATUSW.REPAINTFNA0001) 247Q " x " 202Q "Dimensions: " 117Q "Total Size: " 64Q "Rank: " 26Q "Element Type: ") TOPW.REPAINTFN D1 (P 16Q HMARK P 15Q J P 7 LASTJ P 6 FIRSTJ P 5 DIM1 P 4 CMLARRAY P 3 HORZMARKS P 2 RIGHT P 1 LEFT P 0 DISPLAYW I 1 WINDOWREGION I 0 WINDOW)  Ah@ b@ AAAkcHg hHg [d ]dkKj OWO^MNMkKNk N O]OMk_dOO_jd@ KNk ONOS@ @ _OdO󳣿OIO_Ok__OdO󳝿OJO_Ok__OOOO@ j@ O@ Ok_O_(371Q PRIN1 362Q MOVETO 354Q STRINGWIDTH 221Q TERPRI 214Q TERPRI 175Q NTH 165Q MOVETO 122Q NTH 61Q LENGTH 54Q GETWINDOWUSERPROP 42Q GETWINDOWUSERPROP 15Q MAINWINDOW 6 DSPCLIPPINGREGION) (51Q HORZMARKS 37Q SLICE) () TOPW.RESHAPEFN D1 (P 0 DWINDOW I 0 WINDOW) @g @ @h@ h(26Q TOPW.REPAINTFN 23Q DSPCLIPPINGREGION 15Q DSPRESET 6 GETWINDOWUSERPROP) (3 DISPLAYWINDOW) () TWOD.BUTTONEVENTFN D1 (P 6 FOUNDIT P 5 AREGION P 4 CURSOR P 1 SELECTEDREGION P 0 ACTIVEREGIONS I 0 WINDOW) @g @g @ `ljJHh@ "K&N INI@I @N @gN NNML MK[`kjId@IlJh(155Q GETMOUSESTATE 142Q INSIDEP 115Q PUTWINDOWPROP 104Q INVERTREGION 76Q INVERTREGION 50Q CURSORPOSITION 27Q GETMOUSESTATE 24Q TOTOPW 15Q GETWINDOWUSERPROP 6 GETWINDOWUSERPROP) (174Q ICMLARRAY.ACTIVEREGION 161Q LASTMOUSEBUTTONS 134Q ICMLARRAY.ACTIVEREGION 111Q SELECTEDREGION 33Q LASTMOUSEBUTTONS 12Q SELECTEDREGION 3 ACTIVEREGIONS) () TWOD.DOWINDOWCOMFN D1 (P 0 COM I 0 TWODWINDOW F 1 WindowMenu) NQ XddBdg@hddg@g  $gHgHgHg@ @kHh(104Q MAINWINDOW 46Q SHAPEW 43Q GETREGION 6 MENU) (76Q BURYW 70Q SHRINKW 62Q CLOSEW 53Q MOVEW 36Q CLOSED 32Q ICMLARRAY.GETREGIONFN 17Q SHAPEW) () TWOD.INDICES D1 (P 7 LEVEL P 6 I P 3 FIRSTFLG P 2 DATA P 1 PRTWINDOW P 0 DISPLAYEDLEVELS I 2 WINDOW I 1 SELECTEDREGION I 0 SLICE) {B g B g AI oI @vkHjMh_NLOgKoJioJoOI MNkԾ(157Q PRINTNUM 51Q PRIN1 40Q TERPRI 23Q GETWINDOWUSERPROP 15Q MAINWINDOW 11Q GETWINDOWUSERPROP 3 MAINWINDOW) (120Q ALL 62Q ARRAY 55Q ICMLARRAY.ARRAYSLICE 27Q ICMLARRAY.ACTIVEREGION 20Q PRTWINDOW 6 DISPLAYEDLEVELS) ( 151Q (FIX 5) 142Q (FIX 5) 131Q (FIX 5) 45Q "INDICES: ") TWOD.MAKEREGIONSA0001 D1 (NAME ERRORSET P 35Q VERTMARK P 34Q ACTIVEFIELDWIDTH P 33Q I P 30Q HORZMARK P 27Q FHEIGHT P 26Q J P 15Q J P 11Q DIM1 P 10Q DIM0 P 7 HORZMARKS P 6 VERTMARKS P 5 ACTIVEREGIONS P 4 ACTIVEFIELDWIDTH P 3 FIELDWIDTHS P 2 LF P 1 WINDOWHEIGHT P 0 SLICE F 36Q WINDOW F 37Q MACROY) <Wi_*O OAO"O*_"_(O&O(h_&_$O k_ O_O(&_&_0O,O*!NOkjKO,k oW< O2O,k_,O(_(_:O6O4`O0O8O:O8O. _dOdgO6O,_dOMO6k_6O2_2(1013Q CREATEREGION 725Q STRINGWIDTH 713Q NTH 556Q PUTWINDOWPROP 553Q CREATEREGION 546Q LAST 541Q GETWINDOWPROP 533Q GETWINDOWUSERPROP 522Q LAST 512Q GETWINDOWUSERPROP 501Q PUTWINDOWPROP 476Q CREATEREGION 473Q GETWINDOWPROP 465Q GETWINDOWUSERPROP 454Q LAST 442Q GETWINDOWUSERPROP 431Q PUTWINDOWPROP 426Q CREATEREGION 421Q LAST 413Q LAST 405Q LAST 372Q PUTWINDOWPROP 360Q PUTWINDOWPROP 345Q PUTWINDOWPROP 317Q FONTHEIGHT 160Q PUTWINDOWPROP 111Q COMPUTETWODCOLUMNWIDTH 52Q SLICEDIMENSION 42Q SLICEDIMENSION 25Q DSPLINEFEED 17Q GETWINDOWPROP 7 GETWINDOWUSERPROP) (1030Q TWOD.MENUFN 774Q ICMLARRAY.ACTIVEREGIONTYPE# 536Q WIDTH 530Q RIGHTWINDOW 515Q EXTENT 507Q RIGHTWINDOW 470Q HEIGHT 462Q TOPWINDOW 445Q EXTENT 437Q TOPWINDOW 400Q EXTENT 366Q ACTIVEREGIONS 353Q HORZMARKS 341Q VERTMARKS 62Q FIELDWIDTHS 14Q HEIGHT 4 SLICE) ( 720Q " ") TWOD.MAKEREGIONS D1 (P 3 RESETSTATE P 2 MACROY P 0 OLDVALUE I 0 WINDOW F 4 RESETVARSLST) >o 1gHhhTcYog gIcgI KJ(71Q ERROR! 64Q APPLY 41Q TWOD.MAKEREGIONSA0001 6 PRINTLEVEL) (55Q PRINTLEVEL 45Q ERROR 36Q INTERNAL 14Q PRINTLEVEL) ( 33Q (TWOD.MAKEREGIONSA0001) 3 (2 . 5)) TWOD.MENUFN D1 (P 5 DATUM P 4 MODE P 3 DATA P 2 OMENU P 1 PMENU P 0 SLICE I 1 SELECTEDREGION I 0 WINDOW F 6 IT) @g ooA$AhHKK ]ddMJI \dgMddl 3 .dgHA@ gHKK c Lg HA@ h(177Q TWOD.INDICES 157Q SLICEREF 140Q TWOD.SETVALUE 121Q INSPECT 114Q DEFAULT.INSPECTW.VALUECOMMANDFN 66Q MENU 42Q SLICEREF 6 GETWINDOWUSERPROP) (166Q INDICES 145Q SETIT 127Q SET 73Q INSPECT 22Q ICMLARRAY.ACTIVEREGION 3 SLICE) ( 16Q (create MENU ITEMS _ (QUOTE ((Set (QUOTE SET) "Set item") (Indices (QUOTE INDICES) "Display element indices ") (IT% _% Datum (QUOTE SETIT) "Bind IT to selected item")))) 12Q (create MENU ITEMS _ (QUOTE ((Inspect (QUOTE INSPECT) "Inspect item") (Set (QUOTE SET) "Set item") (Indices (QUOTE INDICES) "Display element indices ") (IT% _% Datum (QUOTE SETIT) "Bind IT to selected item"))))) TWOD.PRTELEMENT D1 (P 0 ELT I 5 HMARK I 4 VMARK I 3 WINDOW I 2 J I 1 I I 0 SLICE) "@AB EHC DC C HC h(36Q PRIN1 31Q MOVETO 24Q FONTDESCENT 16Q PLSTRINGWIDTH 5 SLICEREF) NIL () TWOD.REPAINTFNA0001 D1 (NAME ERRORSET P 32Q HMARK P 31Q J P 26Q VMARK P 25Q I P 16Q LASTJ P 15Q FIRSTJ P 14Q LASTI P 13Q FIRSTI P 12Q DIM1 P 11Q DIM0 P 10Q LF P 7 HORZMARKS P 6 VERTMARKS P 5 RIGHT P 4 LEFT P 3 BOTTOM P 2 TOP P 1 SELECTEDREGION P 0 SLICE F 33Q WINDOW F 34Q WINDOWREGION F 35Q RESETVARSLST F 36Q RESETY) Ogo hhW:c:gd gi W:c:W6g W6g W8W8kW8W8W8W8kW6g W6g hW6 Hj _Hk _OkNjO$O&_OkOjO$O&_OOOOOkNOk OO$O&Ok_dOO_OkOOk OO$O&Ok_ dO O _NOk OOO&I W6I hc