(FILECREATED " 3-Apr-86 00:05:04" ("compiled on " {QV}SOURCES>ARRAY.;14) "12-Nov-85 14:59:23" tcompl'd in "INTERLISP-D 7-Feb-86 ..." dated " 7-Feb-86 11:43:05") (FILECREATED " 7-Oct-85 21:58:47" {QV}SOURCES>ARRAY.;14 37321 changes to: (FNS RANK ADJOIN CROSS) previous date: " 5-Sep-85 19:25:08" {QV}SOURCES>ARRAY.;13) ADJOINA0001A0002 D1 (P 27Q VVD P 26Q VLEVEL P 17Q $$TMP P 16Q V P 15Q GSBA P 14Q GSB P 13Q NOAVD P 12Q ALEVEL P 11Q I P 6 ADJOIN P 5 V P 4 ALENGTH P 3 ATYPE P 2 I P 0 VECTORS F 30Q LABPROPFLAG) ÜeHkgjJdIó²R¿L gKHkdi`Ng &OdOó²iW0²!NghHAk_(dO ó¢±h¿O" Na]g ²LMÉk Ô¼M gð°LkÔ¼Md3¨d–d “g»JkÔZ±ÿma__g ¢±ÂOgO¿OÈ_jð³#O–O ³NO OO °ÓW0²rNk «NkOk ¿OÉk kO O.œO™Nk ¿h_¿O,O*ó³2NkOOkO,¿O.NOOO, ¿OkÔ_¿O,kÔ_,°Í°TOOÉk Ô_°AO3£OµNO O¿OkÔ_°$ ²NO Od ¿OkÔ_‚¿OkÔ_±þa_&¿O$µO&h_$_"¿O(kÔ±þ|O&&_$¿°ó(660Q SHOULDNT 645Q SETAELT 642Q GETAELT 637Q VSCALARPTR 631Q NEXT 621Q VSCALARP 605Q SETAELT 600Q NEXT 554Q GETRELT 514Q SETCODES 511Q GETCODES 473Q SETLEVLAB 470Q GETLEVLAB 440Q SETVALDIM 422Q GETVALDIM 414Q GETRELT 400Q SETDIMLAB 375Q GETDIMLAB 364Q GETDIMLAB 351Q SETAELT 346Q GETAELT 343Q NEXT 334Q NEXT 324Q \FZEROP 274Q SETUP 256Q ARRAYTYPEP 225Q GETAELT 222Q VSCALARPTR 175Q AELTTYPE 167Q GETRELT 152Q ARRAYTYPEP 140Q SETTITLE 135Q APPLY 61Q SETUP 36Q ALLOC.SARRAY 27Q ROWINTOF) (546Q ARRAYFRAME 406Q ARRAYFRAME 302Q GENSTATEBLOCK 267Q ROWMAJOR 253Q VECTOR 233Q FLOATING 200Q FLOATING 161Q ARRAYFRAME 147Q VECTOR 105Q MAKETITLE 56Q ROWMAJOR 51Q GENSTATEBLOCKTYPE# 32Q FULL 10Q INTEGER) () ADJOINA0001 D1 (NAME UERRORSET P 4 I I 1 URESETVARSLST I 0 UERRORNAME F 5 VECTORS) 7ggoUAk\Hó³gL »JµKhZ¹LkÔ°èK&º°øI (64Q APPLY 32Q ARG) (26Q VECTORS 5 ADJOINA0001A0002 2 EAPPLY.CALLER) ( 11Q (1 ...)) ADJOIN D1 (P 0 VECTORS F 1 RESETVARSLST) eoQ (13Q ADJOINA0001) NIL ( 7 (PROGN (ADDSPELL (QUOTE ADJOIN) 1) (ADDSPELL (QUOTE ADJOIN) 2) (QUOTE ADJOIN))) CROSSA0001A0002 D1 (P 45Q LEV P 42Q R P 40Q SPACE P 37Q START P 36Q $$TMP P 35Q $$TMP P 22Q CODES P 21Q VAL P 20Q V P 17Q GSBC P 16Q GSB P 15Q NOCVD P 14Q RUN P 13Q I P 11Q CROSS P 10Q V P 7 CTYPE P 6 I P 1 CSHAPE P 0 VECTORS F 46Q LABPROPFLAG) V&ehdHkØg1HkgNdMó²x¿IHkØH¿IgO kHdi`Og 6OOó¢±ÀOgHk2O(dO&ó¢±¯¿O*WL²"OghHAk_8dO0ó¢±°¿O2 Oa_O:g ²%INOÉk ¿O gð²Hg_°@O:3£O:µINk¿O²+g_°# ²INk¿Od ™g_‚¿NkÔ^±ÿOa_ O ¿OÈ[jð³aK•K ³WOH#OF²%OFjð³@OF–OF ³4jOFó”OODƒODOó³#OO O"¿OHkÙ ¿ODH_FÔ_D¿°ºOO@°“O>OÔ_>¿±ÿXOIO Ú_¿WL¢±OOO k ¿OHkØOO k ¿O Ék k%OJOHó³OOOJO kOJ¿OJkÔ_J°ãO kð’±±O _$¢±¦OœOHkØ ¿h_¿OOO$±‰O<3©O<–O< ²vO d3³4´2WL²%O _$²OœOHkØ ¿h_¿OOO$¿O d _"¿O ¿OOkÙ ¿OÈ\jð³"L•L ³OO O"¿OH°Ô¿OmÿÔ_¿±ý9_.¿O,µO.h_,_*¿O(kÔ_(±ý6O.&_,¿°ña_6¿O4µO6h_4_2¿O8kÔ±ý4O6&_4¿°ó(1406Q SHOULDNT 1375Q SETAELT 1370Q NEXT 1357Q \FZEROP 1332Q SKIP 1320Q RESETUP 1310Q GETAELT 1305Q VSCALARPTR 1276Q SETCODES 1260Q SETVALDIM 1241Q GROUP.HIDDENCODES 1215Q VSCALARP 1175Q SETCODES 1157Q SETVALDIM 1136Q GROUP.HIDDENCODES 1123Q GETVALDIM 1104Q SETLEVLAB 1101Q GETLEVLAB 1050Q GETRELT 1034Q SETLEVLAB 1031Q GETDIMLAB 1013Q SETDIMLAB 1010Q GETDIMLAB 764Q GETRELT 715Q SKIP 704Q SETAELT 677Q NEXT 645Q \FZEROP 611Q \FZEROP 564Q SKIP 554Q RESETUP 544Q GETAELT 541Q NEXT 526Q \FZEROP 472Q GETRELT 455Q SETUP 437Q ARRAYTYPEP 406Q SHOULDNT 372Q GETAELT 367Q VSCALARPTR 360Q SETRELT 350Q VSCALARP 327Q SETRELT 273Q AELTTYPE 265Q SETRELT 262Q GETRELT 243Q ARRAYTYPEP 222Q SETTITLE 217Q APPLY 156Q SETARRAYPROP 106Q SETUP 62Q ALLOC.SARRAY 50Q SETRELT 16Q DROWCREATE) (1340Q GENSTATEBLOCK 1042Q ARRAYFRAME 572Q GENSTATEBLOCK 505Q GENSTATEBLOCK 450Q ROWMAJOR 434Q VECTOR 400Q FLOATING 341Q FLOATING 304Q FLOATING 276Q FLOATING 254Q ARRAYFRAME 240Q VECTOR 167Q MAKETITLE 130Q KEEPS 103Q ROWMAJOR 75Q GENSTATEBLOCKTYPE# 55Q FULL 26Q INTEGER 13Q INTEGER) () CROSSA0001 D1 (NAME UERRORSET P 4 I I 1 URESETVARSLST I 0 UERRORNAME F 5 VECTORS) 7ggoUAk\Hó³gL »JµKhZ¹LkÔ°èK&º°øI (64Q APPLY 32Q ARG) (26Q VECTORS 5 CROSSA0001A0002 2 EAPPLY.CALLER) ( 11Q (1 ...)) CROSS D1 (P 0 VECTORS F 1 RESETVARSLST) eoQ (13Q CROSSA0001) NIL ( 7 (PROGN (ADDSPELL (QUOTE CROSS) 1) (ADDSPELL (QUOTE CROSS) 2) (QUOTE CROSS))) DEALA0001 D1 (NAME UERRORSET P 7 DEAL P 6 K P 5 DROW P 4 I P 2 N I 1 URESETVARSLST I 0 UERRORNAME F 10Q N F 11Q LABPROPFLAG) WdI ¸jHó²²oi ¿Ii ¿i ¿¿HlJkJ KLó³%kL ¾MNML MLMN ¿¿LmÿÔ¼°ÚM W™OhJ O(174Q SETTITLE 171Q MAKETITLE 154Q VFROMR 137Q SETRELT 133Q SETRELT 130Q GETRELT 121Q GETRELT 111Q RAND 74Q GENROW 56Q UERROR! 52Q TERPRI 45Q PRIN2 37Q PRIN1 25Q UERRORPRINT? 14Q FIXR 11Q CONV.ARITH) NIL ( 33Q "Invalid N: ") DEAL D1 (I 0 N F 0 RESETVARSLST) oP (7 DEALA0001) NIL ( 3 (PROGN (ADDSPELL (QUOTE DEAL) 1) (ADDSPELL (QUOTE DEAL) 2) (QUOTE DEAL))) ELEMENTTYPEA0001 D1 (NAME UERRORSET P 2 A I 1 URESETVARSLST I 0 UERRORNAME F 3 A) SdI J (20Q AELTTYPE 10Q CONV.ARRAY) NIL () ELEMENTTYPE D1 (I 0 A F 0 RESETVARSLST) oP (7 ELEMENTTYPEA0001) NIL ( 3 (PROGN (ADDSPELL (QUOTE ELEMENTTYPE) 1) (ADDSPELL (QUOTE ELEMENTTYPE) 2) (QUOTE ELEMENTTYPE))) FORMATA0001 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 2 A) RdI É(10Q CONV.ARRAY) (14Q ARRAYFRAME) () FORMAT D1 (I 0 A F 0 RESETVARSLST) oP (7 FORMATA0001) NIL ( 3 (PROGN (ADDSPELL (QUOTE FORMAT) 1) (ADDSPELL (QUOTE FORMAT) 2) (QUOTE FORMAT))) GENVECA0001A0002 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 0 UARG F 1 INITIAL) P ch(3 CONV.ARITH) NIL () GENVECA0001A0003 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 0 UARG F 1 INITIAL) P cÉk lð¢h(25Q UERROR! 16Q GETRELT 3 CONV.VECTOR) (10Q ARRAYFRAME) () GENVECA0001 D1 (NAME UERRORSET P 22Q I P 21Q ROW P 20Q VAL P 16Q SF P 15Q I P 14Q DF P 13Q ROW P 11Q GV P 10Q N P 7 D P 6 S P 5 END P 4 INITIAL P 1 UARG P 0 INITIAL I 1 URESETVARSLST I 0 UERRORNAME F 23Q RESETVARSLST F 24Q INITIAL F 25Q END F 26Q LABPROPFLAG) ’W(dHd3³Jg žHÉk lð³3gW& ²)gW& ²²oi ¿Ii ¿i ¿¿HW*dK @ Ld3›¾MNó’k°Imÿ°Edk µoi ¿i ¿¾Ldl µoi ¿i ¿NÕ_¿MNÕO×kØ_kOñ²oi ¿i ¿¿N¤M²EOhdOgO#k_¿NOé_¿OOó³OOOOOêè¿OkÔ_°åO°5ONhdOgk_$Oó³O"O$O ¿O OÔ_ ¿O$kÔ°ãO" _W,²dL3µNoMoO OoM°ò(616Q CONCAT 603Q SETTITLE 600Q CONCAT 544Q VFROMR 517Q SETRELT 473Q DROWCREATE 440Q SETRELT 367Q DROWCREATE 341Q UERROR! 335Q TERPRI 330Q PRIN1 317Q UERRORPRINT? 267Q UERROR! 263Q TERPRI 256Q PRIN1 245Q UERRORPRINT? 240Q GETAELT 235Q AELTPTR1 225Q UERROR! 221Q TERPRI 214Q PRIN1 203Q UERRORPRINT? 176Q GETAELT 173Q AELTPTR1 136Q CONV.ARITH 121Q UERROR! 115Q TERPRI 110Q PRIN2 102Q PRIN1 70Q UERRORPRINT? 63Q GENVECA0001A0003 51Q GENVECA0001A0002 34Q GETRELT 21Q ARRAYTYPEP) (470Q INTEGER 374Q FLOATP 364Q FLOATING 56Q UERRORGUARD 44Q UERRORGUARD 26Q ARRAYFRAME 16Q VECTOR) ( 612Q "->" 572Q " by " 565Q "->" 324Q "Inconsistent increment and bounds" 252Q "NIL in INITIAL" 210Q "NIL in INITIAL" 76Q "Invalid INITIAL: ") GENVEC D1 (I 1 END I 0 INITIAL F 0 RESETVARSLST) oP (7 GENVECA0001) NIL ( 3 (PROGN (ADDSPELL (QUOTE GENVEC) 1) (ADDSPELL (QUOTE GENVEC) 2) (QUOTE GENVEC))) IDLARRAYPA0001 D1 (NAME UERRORSET P 0 A I 1 URESETVARSLST I 0 UERRORNAME F 1 A) QHg ´H hð(20Q VSCALARP 12Q ARRAYTYPEP) (7 ARRAY) () IDLARRAYP D1 (I 0 A F 0 RESETVARSLST) oP (7 IDLARRAYPA0001) NIL ( 3 (PROGN (ADDSPELL (QUOTE IDLARRAYP) 1) (ADDSPELL (QUOTE IDLARRAYP) 2) (QUOTE IDLARRAYP))) ORDERA0001A0002A0003A0004A0005 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 0 UARG F 1 CFN) P c´h(12Q UERROR! 3 CONV.SCALAR) NIL () ORDERA0001A0002A0003A0004 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 0 CFN F 1 RESETVARSLST) Pd² «gQ ´h(23Q UERROR! 16Q ORDERA0001A0002A0003A0004A0005 6 FNTYP) (12Q UERRORGUARD) () ORDERA0001A0002A0003 D1 (NAME UERRORSET P 6 OV P 5 CFN P 4 V P 3 UARG P 2 CFN I 1 URESETVARSLST I 0 UERRORNAME F 7 V F 10Q CFN F 11Q RESETVARSLST F 12Q LABPROPFLAG) oWdI WdgW ²oi ¿i ¿¿JL ÉM W²!NhLM´oMlð‘Mƒoh N(153Q SETTITLE 150Q MAKETITLE 105Q VFROMR 102Q ORDERROW 71Q CONV.SIMARRAY 57Q UERROR! 53Q TERPRI 46Q PRIN1 35Q UERRORPRINT? 30Q ORDERA0001A0002A0003A0004 11Q CONV.VECTOR) (74Q ARRAYFRAME 23Q UERRORGUARD) ( 142Q "user form" 126Q " by " 42Q "Illegal comparison function") ORDERA0001A0002 D1 (I 1 CFN I 0 V F 0 RESETVARSLST) oP (7 ORDERA0001A0002A0003) NIL ( 3 (PROGN (ADDSPELL (QUOTE ORDER) 1) (ADDSPELL (QUOTE ORDER) 2) (QUOTE ORDER))) ORDERA0001 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 0 V F 1 CFN) goPQ(13Q EAPPLY.CALLER) (2 ORDERA0001A0002) ( 6 (1 NIL)) ORDER D1 (I 1 CFN I 0 V F 0 RESETVARSLST) oP (7 ORDERA0001) NIL ( 3 (PROGN (ADDSPELL (QUOTE ORDER) 1) (ADDSPELL (QUOTE ORDER) 2) (QUOTE ORDER))) ORDERROW D1 (P 7 V P 6 J P 4 U P 3 I P 1 TT P 0 N I 1 C I 0 X) ¦@ÈkH A³ g@ “gŽg@ “g‚gb¿Hdló—¿kH ¿HlKJó³[@IK ¼kKkÕMNó³>L@IN _ ³-OLlA³#ININkÔ INkÔIN ¿¿NmÿÔ¾°ÁKkÔ[°¥I(223Q SETRELT 217Q SETRELT 214Q GETRELT 203Q GETRELT 156Q EQP 151Q GETRELT 146Q GETRELT 122Q GETRELT 117Q GETRELT 75Q ORDERROW1 46Q ROWTYPEP 32Q ROWTYPEP 15Q GENROW) (56Q ULESSP 52Q LESSP 42Q ROWFLOAT 36Q ILESSP 26Q ROWINT 3 ROWHEADER) () ORDERROW1 D1 (P 3 J P 2 M P 1 V P 0 I I 1 R I 0 L F 4 TT F 5 X F 6 C) —@1l A@Õó’±‰UT@AÔl× ºA»JUTH Y ³IJlVšHkÔ¸°äKmÿÔ»JUTK Y ¨JIlV³åKdHó²#¿THTK TKTH ¿¿HkÔ¸KmÿÔ°Ÿ@lÔó•@K ¿Hb¿±ÿsh(213Q ORDERROW1 165Q SETRELT 161Q SETRELT 156Q GETRELT 147Q GETRELT 117Q EQP 113Q GETRELT 110Q GETRELT 54Q EQP 50Q GETRELT 45Q GETRELT 33Q GETRELT 30Q GETRELT) NIL () RANKA0001A0002A0003 D1 (NAME UERRORSET P 22Q .AF. P 21Q K P 17Q J P 16Q J P 15Q I P 14Q NNIL P 12Q SCR P 11Q RANK P 10Q RX P 7 X P 6 L P 5 AE P 2 A I 1 URESETVARSLST I 0 UERRORNAME F 23Q A F 24Q LABPROPFLAG) ¾W&dI !J ÉMÈM hdNg! Nj"k_Oó’±úMOO _¿OkÔOdNó³¿OMOO ³1OµimÿÔ_¿O¢±€OOó²\OOÔlÜjð²OOÔl×°HOkÔ_°³OÊádjð•¿g°dkð”¿gŠlð“g‚gð¨ON _¿OOÔo×O_¿Ojð³Od3 “OÕ‚Oé_¿‰OOÕkÔ_¿OOO"O ó³OOO" O¿O"kÔ_"°æO_kÔ±ÿ`JÉ¼JÉ»dK¿dg¿O$LLÈkØÍ¿L¿O$OOÈkØÍ¿O¿O$O$É ¿O$_W(²JO ¿OhJ O(671Q SETTITLE 666Q MAKETITLE 656Q LAB.COPYDIMS 634Q MAKEOFFSETS 445Q SETRELT 440Q GETRELT 325Q FLOATROW 312Q SHOULDNT 156Q EQP 153Q GETRELT 150Q GETRELT 114Q GETRELT 111Q GETRELT 57Q DROWCREATE 43Q ORDERROW 21Q CONV.SIMARRAY 11Q CONV.ARRAY) (627Q ARRAYFRAME 622Q ARRAYFRAME 601Q ROWHEADER 574Q ROWHEADER 567Q ARRAYFRAME 547Q ROWHEADER 543Q ROWHEADER 537Q ARRAYFRAME 524Q SIMPLE 510Q ARRAYFRAME 501Q ARRAYFRAME 474Q ARRAYFRAMETYPE# 315Q FLOATING 306Q INTEGER 276Q FLOATING 264Q POINTER 54Q INTEGER 35Q ROWHEADER 24Q ARRAYFRAME) ( 341Q 2.0) RANKA0001A0002 D1 (I 0 A F 0 RESETVARSLST) oP (7 RANKA0001A0002A0003) NIL ( 3 (PROGN (ADDSPELL (QUOTE RANK) 1) (ADDSPELL (QUOTE RANK) 2) (QUOTE RANK))) RANKA0001 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 0 A) goP(12Q EAPPLY.CALLER) (2 RANKA0001A0002) ( 6 (2777Q)) RANK D1 (I 0 A F 0 RESETVARSLST) oP (7 RANKA0001) NIL ( 3 (PROGN (ADDSPELL (QUOTE RANK) 1) (ADDSPELL (QUOTE RANK) 2) (QUOTE RANK))) REDUCEA0001A0002A0003 D1 (NAME UERRORSET P 7 RESULT P 6 GSBA P 4 STARTINGVAL P 3 F P 2 A I 1 URESETVARSLST I 0 UERRORNAME F 10Q F F 11Q A F 12Q STARTINGVAL F 13Q REDUCENARGS) šWdI W ³ ²oi ¿Wi ¿i ¿¿WWJ ”J ºjJÉ Ùjð‘LJg LµlWñ´ JN _¿NÈ]jð³M•M ³OJN lK°ÙO(216Q COPYAELT 213Q NEXT 202Q \FZEROP 154Q COPYAELT 151Q NEXT 127Q SETUP 112Q NLOGICALELTS 77Q CONV.VECTOR 72Q VSCALARP 56Q UERROR! 52Q TERPRI 45Q PRIN2 36Q PRIN1 24Q UERRORPRINT? 17Q FNTYP 11Q CONV.ARRAY) (163Q GENSTATEBLOCK 124Q ROWMAJOR 105Q ARRAYFRAME) ( 32Q "Invalid F: ") REDUCEA0001A0002 D1 (I 2 STARTINGVAL I 1 F I 0 A F 0 RESETVARSLST) oP (7 REDUCEA0001A0002A0003) NIL ( 3 (PROGN (ADDSPELL (QUOTE REDUCE) 1) (ADDSPELL (QUOTE REDUCE) 2) (QUOTE REDUCE))) REDUCEA0001 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 0 REDUCENARGS) 4goPjñ´ gk Pkñ´ gl Plñ´ gl (61Q EAPPLY.CALLER 55Q ARG 37Q ARG 22Q ARG) (50Q REDUCENARGS 32Q REDUCENARGS 16Q REDUCENARGS 2 REDUCEA0001A0002) ( 6 (2777Q)) REDUCE D1 (P 0 REDUCENARGS F 1 RESETVARSLST) eoQ (13Q REDUCEA0001) NIL ( 7 (PROGN (ADDSPELL (QUOTE REDUCE) 1) (ADDSPELL (QUOTE REDUCE) 2) (QUOTE REDUCE))) RESHAPEA0001A0002A0003A0004 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 0 UARG F 1 A) P ch(3 CONV.SCALAR) NIL () RESHAPEA0001A0002A0003A0005 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 0 UARG F 1 A) P ch(3 CONV.ARRAY) NIL () RESHAPEA0001A0002A0003A0006 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 0 UARG F 1 NEWSHAPE) P c´h(12Q UERROR! 3 CONV.SCALAR) NIL () RESHAPEA0001A0002A0003A0007 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 0 UARG F 1 NEWSHAPE) P ch(3 CONV.VECTOR) NIL () RESHAPEA0001A0002A0003A0008 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 0 UARG F 1 NEWFORMAT) P c´h(12Q UERROR! 3 CONV.SCALAR) NIL () RESHAPEA0001A0002A0003A0009 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 0 UARG F 1 NEWFORMAT) -PlPoµ²oi ¿Pi ¿i ¿ch(47Q UERROR! 43Q TERPRI 36Q PRIN2 30Q PRIN1 16Q UERRORPRINT? 11Q MISSPELLED?) NIL ( 24Q "Invalid format specification: " 6 (FULL SYMMETRIC)) RESHAPEA0001A0002A0003 D1 (NAME UERRORSET P 24Q I P 22Q GSBNEW P 21Q GSBOLD P 20Q .AF. P 17Q I P 15Q NEWARRAY P 14Q SROW P 10Q NEWFORMAT P 7 NEWSHAPE P 6 A P 5 UARG P 4 NEWFORMAT P 3 UARG P 2 NEWSHAPE P 1 UARG P 0 A I 1 URESETVARSLST I 0 UERRORNAME F 25Q RESETVARSLST F 26Q LABPROPFLAG F 27Q A F 30Q NEWSHAPE F 31Q NEWFORMAT) uW.dHd3³@d²=d`ð³5¿gW* ²)gW* ²²oi ¿Ii ¿i ¿¿HW0dJd²d²;d`ð³3¿gU ²(gU ²²oi ¿Ii ¿i ¿¿HH3¢Hµ„É W²9JhH ¿Jkg¿JÉk k\Kó³JkLHL ¿LkÔ°ìJ(225Q SETLEVLAB 222Q GETDIMLAB 201Q GETRELT 166Q SETDIMLAB 155Q SETTITLE 152Q MAKETITLE 135Q VFROMR 124Q ROWINTOF 104Q UERROR! 100Q TERPRI 73Q PRIN2 65Q PRIN1 53Q UERRORPRINT? 46Q SHAPEA0001A0003 35Q SHAPEA0001A0002) (173Q ARRAYFRAME 163Q Dimension 130Q ARRAYFRAME 42Q UERRORGUARD 31Q UERRORGUARD 22Q ARRAYFRAMETYPE#) ( 61Q "Invalid A: ") SHAPE D1 (I 0 A F 0 RESETVARSLST) oP (7 SHAPEA0001) NIL ( 3 (PROGN (ADDSPELL (QUOTE SHAPE) 1) (ADDSPELL (QUOTE SHAPE) 2) (QUOTE SHAPE))) SHIFTA0001A0002A0003A0004 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 0 UARG F 1 FILL) P ch(3 CONV.SCALAR) NIL () SHIFTA0001A0002A0003A0005 D1 (NAME UERRORSET I 1 URESETVARSLST I 0 UERRORNAME F 0 UARG F 1 FILL) P ch(3 CONV.VECTOR) NIL () SHIFTA0001A0002A0003 D1 (NAME UERRORSET P 27Q GSBF P 26Q I P 24Q I P 22Q GSBV P 21Q I P 17Q GSBS P 16Q SH P 15Q VL P 14Q FL P 13Q DIST P 12Q LEFT P 11Q OUT P 6 FILL P 5 SHIFT P 4 V P 3 UARG P 2 FILL I 1 URESETVARSLST I 0 UERRORNAME F 30Q SHIFTNARGS F 31Q RESETVARSLST F 32Q V F 33Q SHIFT F 34Q FILL F 35Q LABPROPFLAG) !W4dI W6dI W8dJd3³?d²O@ó³jOBkð²dO O@ O2O4O@ Ùjð‘kO2O4O@ kÔ_B¿O4O@ #k_FODó³OOF O@ð™O2OFOB¿OFkÔ°àO@mÿÔ_@¿°“O