COMMENT ⊗ VALID 00607 PAGES
C REC PAGE DESCRIPTION
C00001 00001
C00079 00002 .MLLIT ITS TOPS10 TOPS20 SAIL TENEX CMU ML BIGNUM OBTSIZ PTCSIZ NEWRD JOBQIO HNKLOG SFA NIOBFS USELESS DBFLAG CXFLAG NARITH
C00084 00003
C00088 00004 LVRNO LVRNO ZZZ ZZZ DEFAULT
C00092 00005 D10 D20 ZZZ SEGLOG OBTSIZ DXFLAG
C00094 00006 GETTAB
C00100 00007
C00103 00008 NIL A B C AR1 AR2A NACS T TT D R F FREEAC P FLP FXP SP
C00105 00009 LERR ACALL AJCALL LER3 ERINT PP STRT SERINT TP IOJRST STRT7 UUOMAX CALL JCALL CALLF JCALLF NCALL NJCALL NCALLF NJCALF NUUOCLS NERINT NERINT
C00109 00010
C00113 00011 %SY %SYHKL %SYKIL %SYLCL %SYGBL BYTSWD
C00116 00012 LS ST.LS $FS ST.$FS FX ST.FX FL ST.FL BN ST.BGN SY ST.SY SA ST.SA VC ST.VAC $PDLNM ST.$PDLNM $XM ST.$XM $NXM ST.$NXM PUR ST.PUR HNK ST.HNK DB ST.DB CX ST.CX DX ST.DX RN NUM ST.
C00119 00013
C00122 00014
C00125 00015 %%% %%% LABEL
C00130 00016 NBITMACS NBITMACS XX YY
C00133 00017
C00137 00018 SYMVC SYMARGS SYMPNAME SY.ONE SY.LAP SY.PUR SY.CCN SY.OTC SY.ZER SY.
C00140 00019 ASAR TTSAR AS.SFA AS.JOB AS.FIL AS.RDT AS.OBA AS.DX AS.CX AS.DB AS.SX AS.FX AS.FL AS.GCP TTS.CL TTS.BM TTS.IM TTS.BN TTS.TY TTS.IO TTS.CN TTS.GC TTSDIM TTS.1D TTS.2D TTS.3D TTS.4D TTS.5D
C00146 00020 FI.EOF FO.EOP FJ.INT FI.BBC FI.BBF TI.BFN FT.CNS F.GC F.MODE FBT.CM FBT.SA FBT.CP FBT.LN FBT.EC FBT.SE FBT.FU FBT.ND FBT.SC F.CHAN F.JFN F.FLEN F.FPOS L.6DEV L.6DIR L.6FNM L.6EXT L.6VRS L.6DEV L.6DIR L.6FNM L.6EXT L.6VRS L.D6BT L.N6BT L.F6BT F.DEV F.FN1 F.FN2 F.RDEV F.RFN1 F.RFN2 F.DIR F.FNM F.EXT F.VRS LOPOFA TI.ST1 TI.ST2 ATO.LC AT.CHS AT.LNN AT.PGN FO.LNL FO.PGL FO.RPL LONBFA FB.BYT FB.BFL FB.BVC FB.IBP FB.BP FB.CNT FB.HED FB.NBF FB.BWS FB.BUF
C00159 00021 J.INTF J.CINT J.LFNM J.CRUFT J.GC J.INTB J.STAD J.UIND LOJOBA J.SYMS
C00161 00022 SR.CAL SFCALI SR.WOM SR.UDL SO.OPN SO.CLO SO.REN SO.DEL SO.TRP SO.PR1 SO.TYI SO.UNT SO.TIP SO.IN SO.EOF SO.TYO SO.PRO SO.FOU SO.RED SO.RDL SO.PRT SO.PRC SO.MOD SO.POS SO.ICL SO.OCL SO.OUT SR.FML SR.FUN SR.PNA SR.FUS SR.LEN STPFL NM
C00166 00023
C00168 00024 %HISEG %LOSEG CURSTD %LOSEG %HISEG CURSTD
C00170 00025
C00171 00026 ZZZ ZZZ
C00172 00027 PGTPMK NPGTPS
C00174 00028 ZZY ZZ ZZX ZZY
C00177 00029 NPURTR NIOCTR
C00180 00030 N2DIF
C00183 00031 NPRO
C00185 00032 ZZ ZZ ZZ GS SEGBYT LONUM HINUM PAGSIZ PAGMSK PAGKSM NPAGS NNUMTP NTYPES
C00190 00033 SEGSIZ SEGMSK SEGKSM NSEGS BTBSIZ SGS%PG BTSGGS ALPDL ALFXP ALFLP ALSPDL ALFXP ALFLP ALPDL ALSPDL
C00193 00034 IB.ALARM IB.TIMER IB.PARITY IB.FLOV IB.PURE IB.PCPURE IB.SYSUUO IB.AT3 IB.AT2 IB.AT1 IB.DEBUG IB.RVIOL IB.CLI IB.PDLOV IB.LTPEN IB.MAR IB.MPV IB.SCLK IB.1PROC IB.BREAK IB.ILAD IB.IOC IB.VALUE IB.DOWN IB.ILOP IB.DMPV IB.AROV IB.42BAD IB.C.Z IB.TTY IB.PDLOV IB.MPV
C00197 00035 TOPN BOTN NPURTR NIOCTR N2DIF NPRO %LOSEG %HISEG FIRSTLOC STDLO STDHI CURSTD STDLO STDHI CURSTD
C00200 00036 GOINIT GOINI7 SUSCON LISPGO LISPSW SUSFLS KA10P
C00203 00037 TWENTY THIRTY FORTY UUOGLEEP JPCSAV
C00205 00038 NSFC NSFC NSFC
C00207 00039 UNBND2 ABIND3 SETXIT SPECX AYNVSFX 1DIMS ARYGET ARYGT4 ARYGT8 1DIMF ANYGET 1DIMD ADYGET 1DIMZ AZYGET SPSV
C00210 00040 INTFLG NOQUIT UNREAL REALLY ERRSVD IMASK LFAKP LFAKFXP FAKP FAKFXP CMUP MONL6P UPIINT CCOCW1 CCOCW2 TENEXP VTS20P INTPC1 INTPC2 INTPC3 PDLSVT SUPSAV LV2SVT LV2SVF LV2ST2 LV3SVT LV3SVF LV3ST2 DSMSAV CINTAB CINTSZ
C00217 00041 STTYW1 STTYW2 STTYL1 STTYL2 STTYA1 STTYA2 CCOC1 CCOC2 XACTW XACTL STDTIW SACTW1 SACTW2 SACTW3 SACTW4 SACTL1 SACTL2 SACTL3 SACTL4 UISTAK GCRSR PDLSTH PDLSTA PDLSTB PDLSTC
C00221 00042 CHNTB TMPC DPAGEL DLINEL LJOBTB JOBTB
C00223 00043 TTYIF1 TTYIF2 FI.EOF FI.BBC FI.BBF TI.BFN FT.CNS F.MODE F.CHAN F.FLEN F.FPOS F.DEV F.FN1 F.FN2 F.RDEV F.DEV
C00228 00044 TTYOF1 TTYOF2 FO.EOP FT.CNS F.MODE F.CHAN F.FLEN F.FPOS F.DEV F.FN1 F.FN2 F.RDEV F.DEV FO.LNL FO.PGL FO.RPL
C00230 00045 SWS ERRTN CATRTN EOFRTN PA4 INHIBIT ERRSW BFPRDP CATID CATSPC CATLIS CATUWP CATCAB CATALL CATCOM LEP1 KMPLOSES UIRTN RSXTB PNMK1 GCD.A UNBND3 SIXMK2 SAVMAR GCD.B AUNBD EXP.S ATAN.S UNMTMP FPTEM IFLT9 EQLP GCD.C ATAN.X GWDCNT GCD.D ATAN.Y GWDORG GWDRG1
C00235 00046 EXPL5 GCD.UH BKTRP EV0B FLAT1 MEMV UAPOS GCD.VH LPNF AUNBR DLTC RINF APFNG1 TABLU1 AUNBF MNMX0 GRESS0 GRESS0 CFAIL CSUCE BACTYF BOOLI TOPAST PLUS0 PLUS3 PLUS6 PLUS8 RM4 SWNACK RDBKC RDNSV RDDSV RDIBS RDINCH CORBP MKNCH
C00239 00047 PNBP PNBUF JCLBF ATMBF REMFL VETBL0 DVS1 DVS2 DVSL DD1 DD2 DD3 DDL NORMF QHAT BNMSV FACF FACD AGDBT YAGDBT TSAVE DSAVE RSAVE FSAVE NRD10FL LJCLBF UUOH ERROR ERBDF UUOFN UUTSV UUTTSV UURSV UUALT9 UUPSV UUOBKG LUUSV LSWS
C00242 00048 FFS FFX FFL FFY FFA NFF FFY2 NPFFS NPFFX NPFFL NPFFY2 EPFFS EPFFX EPFFL EPFFY2 EFVCS NFVCP FFVC ETVCFLSP
C00246 00049 GCMKL PROLIS MFFS MFFX MFFL MFFY MFFA NFFS NFFX NFFL NFFY NFFA GCWHO GCWHO1 GCWHO2 GCWHO3 GCACSAV GCNASV GCP GCFLP GCFXP GCSP PANICP GCMRKV GCTIM GCTM1 GCUUSV IRMVF GCRMV ARPGCT
C00251 00050 ZFFS ZFFX ZFFL ZFFY ZFFA SFSSIZ SFXSIZ SFLSIZ SSYSIZ SSASIZ OFSSIZ OFXSIZ OFLSIZ OSYSIZ OSASIZ GFSSIZ GFXSIZ GFLSIZ GSYSIZ GSASIZ
C00254 00051 FSSGLK FXSGLK FLSGLK SYSGLK SASGLK S2SGLK BTSGLK IMSGLK PRSGLK BTBAOB MAINBITBLT GC98 GC99 PFSSIZ PFXSIZ PFLSIZ PS2SIZ
C00257 00052 BPSH BPSL HINXM HIXM MAXNXM HBPORG HBPEND NPDLL NPDLH PDLFL1 PDLFL2 XFFS XFFX XFFL XFFY XFFA XPDL XFLP XFXP XSPDL ZPDL ZFLP ZFXP ZSPDL C2 FLC2 FXC2 SC2 ZSC2 OC2 OFLC2 OFXC2 OSC2
C00261 00053 USRHNK SENDI ICALLI INTAR UNRC.G UNRRUN UNRTIM UNREAR LIPSAV IPSWD1 IPSWD2 IPSDF1 IPSDF2 IPSPC IPSD IPSR IPSF MXIPDL LINTPDL INTPDL ACBASE INTMAI INTPAR INTCLK INTTTI INTPOV INTILM INTNXM REEINT REENOP APRSVT REESVT INTALL %PIPAR %PIWRO %PIMPV %PIILO
C00266 00054 MUNGP ERRPAD ERRPST BFTMPS SQ6BIT SQSQOZ LDBYTS LDOFST LDAAOB LDTEMP LD6BIT LDAPTR LDBPTR LDF2DP LDASAR LDBSAR LDXBLT LDXSIZ LDXSM1 LDXDIF LDHLOC LDEOFJ LFTMPS LDHSH2 LDHSH2 LDHSH2 LDX%FU LDXPSP LDXOFS LDXPNT LDXLPC LDXLPL LDXHS1 LDXHS2 LDXPFG
C00272 00055 USN EVPUNT UWUSN D10PTR D10ARD D10NAM D10REN %TXTOP %TXSFL %TXSFT %TXMTA %TXCTL %TXASC RDOBJ8 ALGCF AFILRD GNUM RNOWS RBACK RBLOCK
C00275 00056 RNTN2 BPPNR GAMNT GSBPN ADDSAR TOTSPC LLIP1 INSP RTSP1 RTSP3 LOSEF RWG FLOV9A FLOV9B CPJSW PSYMF POFF PSMS PSMTS PSMRS PS.S STQLUZ NOPFLS SAWSP PURDEV PURFN1 PURFN2 PURSNM SYSDEV SYSFN1 SYSFN2 SYSSNM SJCLBUF
C00279 00057 RSXTB1 RCT IOBAR1 IOBAR2
C00280 00058 PURTBL ZZW ZZZ $ NLBTSG NHBTSG ZZX ZZX ZZZ
C00283 00059 FPURF7 FPURF1 FPUR1Q FPUR1A FPURF4 IP0 IP7 IP7 IP1
C00287 00060 NFLSS FLSTBL ZZX ZZX ENTVEC FLSPA1 FLSPA3 FLSDIE FLSSTARTUP NOSHARE SHAREP SHARP1 SHRLOD FLSLSP FLSPA4 FLSPA5 FLSVAL FLSVA1 FLSADJ FLSMSK FLSPA6 PURCHK SYSFIL SYSCHN PDUMPL PURCKS PUROPN PUROP1 PUROP2 PURRWO PDUMP PURCHN PURSTI PURISP PURPTR
C00296 00061 KILHG4 KILHG2 KILHG3 KILHGH KILHG1 KILHG1 KILHG2 E.START GETHGH GETHG1 GETHG2 GETHG1 RETHGH GLSLUY GLSLUA CHKHGH GLSLZ4 GLSLZ0 GLSLZA GLSLZ1 GLSLM1 GLSLZ2 GLSLM2 GLSLZ3 GLSLM3 SGANAM SGADEV SGAPPN SGAEXT LDRIHS LDRHS1 LDSCRU
C00307 00062 ZZ LOBITSG TOP.PG BTBLKS LOBITSG
C00309 00063 ST STDISP GCBMRK GCBCDR GCBCAR GCB ZZZ GCBFOO ZZZ GCST BTB. LXXBSG NNPUSH N0PUSH N0.0PUSH BPURPG $$$NIL EPRNT1 EPRNT2 EPRNT3 ERROR1 EROR1Z EROR1A MSGFCK CMSGFCK
C00323 00064 ERROR9 LERFRAME EROR9A ERRRTN ERR2 LSPRT0 CLSPRET
C00326 00065 ERROR3 EROR3C EROR3E EROR3F
C00328 00066 ERROR5 EROR5F EROR5A EROR6A ERRV
C00331 00067 ERRIOJ ERIOJ1 ERIOJ2 ERIOJ3 ERIOJ4 ERIOJ5 ERIOJ8 ERIOJ7 ERIO6B ERIOJ6 ERIO6A ERIOJ9 ERTBL ERFNF% ERIPP% ERPRT% ERFBM% ERAEF% ERISU% ERTRN% ERNSF% ERNEC% ERDNA% ERNSD% ERILU% ERNRM% ERWLK% ERNET% ERPOA% ERBNF% ERCSD% ERDNE% ERSNF% ERSLE% ERLVL% ERNCE% ERSNS% ERFCU% ERLOH% ERNLI% LERTBL
C00340 00068 PDLOV PDLH0 PDLOV1 PDLRET PDLH4 PDLLOS PDLMSG
C00345 00069 PDLOV5 PDLOV6
C00347 00070 ERRBAD UUOGL1 UUOGL2 UUOGL7 UUOGL8
C00349 00071 UUONVE NTHIEN NTHER LASTER UUOMER UUOFER REMAIR UNOVER OVFLER UNFLER ER4 ADEAD EG1 INTNCO BADOB
C00352 00072 DFPER DEFNER REVER PNGE PNGE1 NASER SBADSP CA.DER CA.DE1 CA.DE2 CA.DE3
C00354 00073 NILSETQ TSETQ XSETQ STORE5 STOREE CSTOR7 RPLCA0 RPLCD0 RPLCA1 RPLCD1 %ARR0A %ARR0 %ARR0B LDGETQ LDXERR LDALREADY LDATE9 LDATER
C00357 00074 IBSERR BASER %LVERR %LNERR
C00358 00075 NIHIL VERITAS PURITAS POVPDL POVFLP POVFXP POVSPDL MESMAJ UNRECOV FLNMER $ARERR IARERR FXNMER NMV3 CAMMES MES5 MES6 MES14 MES18 MES19 MES20 MES21 EMS12 EMS13 EMS15 EMS16 EMS18 EMS21 EMS22 EMS25 EMS26 EMS29 EMS31 EMS34 STRTCR RDRM1 RDRM2 RDRM3 RDRM4 RDRM5 RDRM6 RDRM7 RDRM8 RDRM9 RDRM11
C00363 00076 ERRERC ERRERO ERERER EVAL.A EVAL.1 .UDT .UDT1 .UDT2
C00365 00077 ESB6 WNAERR WNAER1 QF3A QF2A QF1A UUOH3C UUOH3A UUOUER UUOUE1 UUOUE2 EPRINT
C00367 00078 EV3B EV3A EV3J IAP2A IAP2J WNAL0 WNALOSE WNAL1 STERR WNAFOSE FASLUR FASLUH FASLNX FASLNC LDFERR
C00369 00079 LMBERR LXPRLZ DOERRE GETLE GETLE1 SETWNA SIGNPE PROPER RMPER0 LFYER GENSY8 ARGCM8 ARGCM0 ARGCM1 ARGCM2
C00371 00080 PTRCKE .STOLZ TYOAGE GTRDT9 EOFER RDLNER EOFE IIOERR OIOERR MAPWNA MEMQER DLTER LIST.9 SUSPE
C00374 00081 GTPDL1 RAND9 S2WNAL TYPKER S1WNAL GRCTIE FRERR CRSRP2 ALST0 LFY0 ALCK0 PRGER1 DOERR DO5ER
C00376 00082 ATAN.7 EXP.ER EXPER1 SIN.ER COS.ER SQR$ER LOG.ER NUMER ARTHER 1EQNF 1GPNF 2EQNF 2GPNF ALHNKE
C00378 00083 GCMLOSE GCMLS1 GCMLS2 GCMES GCLSMS GCLUZ0 GCLUZ GCLUZ1 GCLUZ2 GCLUZ3 GCLUZ5 GCLUZ4 GCLUZ6 GCLUZ7 GCPDLOV DIE
C00382 00084 ERRADR ERRAD1 ERRDCD CPRIN1 ERRO2E ERRO2Q ERRO2A ERRO2C ERRO2H ERRO2G ERRO2B ERRO2R
C00385 00085 BEGFUN $ERROR ERRERB ERRERN ERRERD SUBR
C00387 00086 ERRFRAME EPR6 EPR7 EPR5 EPR1 EPR4 EPR3
C00390 00087 ERRPRINT OFCAN
C00392 00088 LSPRET LSPRT1 HACENT LISP1 LISP2 LISP2A LISP2B
C00396 00089 STDIFL TLTERPRI TLTERX TLTER1
C00399 00090 $TLREAD TLREAD TLRED1 TLRED2 TLREDF TLEVAL CEVAL NILBAD CSETZ PDLCHK PDLCRP
C00405 00091 LINMDP TLPRINT TLPR1 IPRIN1 TLVRSS TLVRS1 SIXJBN
C00409 00092 ERINIT ERINIX ERINI8 ERIN8G ERINI0
C00412 00093 ERINI2 ERINI5 ERIN5C ERIN5D ERIN5A ERIN5B ERINI6 ERIN6A ERINI3 SARTOB SATOB1 SATOB7 LPROGZ PDLFLS
C00415 00094 SPECBIND SPEC1 SPEC2 SPEC6 SPEC5 SPEC4 SPEC4A SPEC3
C00418 00095 ERRPOP ERRPNU UBD0 UBD UBD1 UBDP UBDWIO UBD4 UNBIND UNBND0 UNBND1 UNBND1 UNBNDP UNBWIO
C00423 00096 BIND BIND4 BIND5 CBIND4 BIND1 POPBJ CPOPBJ MAKVC MAKVC0 MAKVC1 MAKVCX MAKVC3
C00426 00097 C1CONS %NCONS NCONS ACONS BGNMAK BNCONS
C00428 00098 SIXMAK SIXMK1 .UDT4 SIXATM SIXAT1 PNBFAT PNBFA1 PNBFMK PNBFM6 PPNATM PPNAT2 PPNAT4 PPNAT6 PPNAT3 PPNAT5
C00433 00099 CATPUS CATPS1 CATBAR CTCALL THRALL THROW5 THROW1 THROW6 THRNXT THROW7 THROW3 THRXIT THRSPC THRCAB THROW4 ERUNDO ERR0 GOBRK IOGBND EPOPJ
C00440 00100 BRGEN BRLP1 BRLP BRLP2 BRLP4 BRLP3
C00443 00101 .STORE .STOR0 .STOR1 .STOR2 .STOR4 .STOR4
C00446 00102 .SET .SET1 FWNACK FWNAC1 LWNACK ERSTP LERSTP ERUN0 ERR1A ERR1 EPC1
C00450 00103 UIBRK UNWPRO UNWPR2 UNWPR1 UNWPUS UNWNCM UNWNXT UNWPRT
C00456 00104 CIN0 CONS1PFX CONS1FX CONSPFX CONSFX CONSIT BAPOPJ ZPOPJ POPNVJ CCPOPJ 0POPJ POP2J CPOPJ POP3J POPAJ1 S1PAJ POPAJ CPOPAJ POP1J1 POPJ1 POP1J CPOP1J M1TTPJ POPCJ CPOPCJ UNLKFALSE UNLKTRUE PX1J CPXDFLJ PXDFLJ POPXDJ CPXDJ
C00460 00105 SAV5 SAV5M1 SAV5M2 SAV5M3 CPOPXJ SAV3 SAV2 SAV1 RST3 RST2 RST1 RST5 R5M1PJ RST5M1 CR5M1PJ RST5M2 RST5M3 SAVX5 SAVX3 RSTX5 PXTTTJ POPXTJ RSTX3 RSTX2 RSTX1 CPOPNVJ
C00462 00106 $ERRFRAME $EVALFRAME $UIFRAME L$EVALFRAME AFPOPJ $APPLYFRAME
C00464 00107 FLTSK1 FLTSK2 FLTSKP FLTSTB FLTSFX FLTSFL NVSKP2 NVSKIP NVSKTB NVSKFL
C00468 00108 NMSKP2 NMSKIP NMSKTB NMSKFX NMSKFL
C00470 00109 LR70 D10.0 D1.0E8 CDUPL1 CCMPL1 CDBL1 CFIX1 CFLOAT1 R70 ZZZ XC IFIX IFLOAT IFLT5 IFLT1 IFLT2 IFLT4 IFLT3
C00473 00110 FLNV1X EFLNV1 FLNV1 EDBNV1 DBNV1 CXNV1X ECXNV1 CXNV1 EDXNV1 DXNV1 RSXST NPUSH 0PUSH 0.0PUSH CINTREL INTREL CHECKI ERSETUP
C00478 00111 .LCALL .LCAF5 .LCAF7 .LCAFX .LCAFL .LCADB .LCACX .LCADX
C00482 00112 NORET .RSET NOUUO LIST LISTX LISTX3 KLIST JLIST ILIST ILIST1 ILIST3 GTRDTB GTRDT8
C00485 00113 NOINTERRUPT NOINT0 CHECKU CHECKQ NOINT1 NOINT5 NOINT3 NOINT4 NOINTA NOINT2 ENOINT
C00488 00114 CARCDR %CADDDR %CADDAR %CADDR %CADAR %CADR %CAAR %CAR %CDDDDR %CDDDAR %CDDDR %CDDAR %CDDR %CDAR %CDR %CAADDR %CAADAR %CAADR %CAAAR %CDADDR %CDADAR %CDADR %CDAAR %CAAADR %CAAAAR %CDDADR %CDDAAR %CDAADR %CDAAAR %CADADR %CADAAR
C00491 00115 %CARCDR zz AD ICADRP IC.RP
C00494 00116 CRSUBRS
C00497 00117 CR0 CR1 CR1A CR2 CR3 CR7 CR4 CR5 CR6
C00499 00118 NTH NTHCDR NTHCD5 NTHCD6 NTHCD1 NTHCD0 NTHCD2 NTHCD4
C00501 00119 PNGNK PNGNK1 PNGNK2 SYCONS SYCON2 SYCON1 PSYCONS PNCONS PNG2 CPXTJ
C00504 00120 XCONS CONS CONS1 CONS3 $NCONS $XCONS LIST. %PDLNC %PDLXC %PDLC %XCONS %CONS %CONS1 %CONS3 %C2NS $C2NS FIX2 FIX1 FXCONS FIX1A FWCONS FLCONX FLOAT2 FLOAT1 FLCONS FPCONS
C00510 00121 DBL1 DBCONS DBCONS DBL1 CXCONX CMPL1 CXCONS CXCONS CMPL1 DUPL1 DXCONS DXCONS DUPL1
C00512 00122 %HUNK1 %HUNK2 %HUNK3 %HUNK4 %CXR %RPX CXR CXR2 RPLACX RPLX2 CXR30 CXR31 CXR3 CXR33 CXR34
C00515 00123 %CXR %CXR2 %RPX %RPX2 %HUNK1 %HNK2A %HUNK2 %HUNK3 %HNK4A %HUNK4 %HNKRA %HNK4R
C00519 00124 HNKSZ0 HUNKSIZE HNKSZ1 HNKSZ3 HUNKP MHUNKE MAKHUNK MHUNK7 MHUNK6 MHUNK5 HUNK
C00522 00125 ALHNKL ALHNLA ALHNLD ALHNLY ALHNLX ALHUNK ALHNKD ALHNKF
C00526 00126 ATOM LATOM SPATOM SPAT1 PRPLSE PLIST PRPNIL RPLIZ SETPLIST RPSNIL STENT VALLCE VALLOC VALLC1 VLCNIL
C00529 00127 SASSQ SASSOC ASSOC ASSQ FALSE IASSOC IASSQ IASSC0 IASSC3 IASSC7 IASSCX IASSC4 IASLOS IASSQ0 IASSQF IASWIN DISPL0 DISPLACE DISPL2 DISPL1
C00533 00128 $GET GET3 GET0 GET1 SARGET ARGET ARGET1 PNGET PNGT1 PNGT0
C00535 00129 GETL GETLA GETL5 GETL1 GETL0 GETL1A GETL4
C00536 00130 PUTPROP CSET0C CSET0Q CSET0 CSET0A BRETJ SPROG2 CSET7 CSET2 CSET2A $CADR $CAR C$CAR CSET4 CSET4A REMPROP REMP0 REMP1 REMP20 REMP7 CSET4C REMP3 REMP3A
C00541 00131 NOTNOT NOT $NULL TRUE CNOT LAST LAST5 LAST4 LLASTCK LASTCK LAST1 LAST2 BOUNDP $RUNTIME RNTM1
C00545 00132 $TIME TIME3 TIME8 ZZZ ZZZ
C00549 00133 EQUAL EQUAL0 EQUAL1 EQL1A EQL1B EQLLST EQLTBL EQLNM4 EQLNM2 EQLNUM EQLOSE EQLBIG EQLHNK EQLHN3 EQLHN1 EQLHN2 EQLHN4 EQLH4A EQLH4X EQLHN5 USRSAB USRAB USRHPP TFALSE USRHNP
C00556 00134 NCONC APPEND APP2 APP3 .NCONC .NCNC1 .NCNC2 .NCNC3 .APPEND APP1 AR1RETJ SUBS4 REVERSE REV1 APRVCK REV4 NREVERSE NRECONC NREV1 GENSYM GENSY0 GENSY2 GENSY3 GENSY1 GENSY7 GENSY6 GENSY5
C00561 00135 MEMBER SMEMBER SMEMQ MEMQ2 MEMQ3 MEMQ4 MEMBR MEMB2 MEMB3 AR2ARETJ MEMB4 SUBST SUBS0A SUBS1 SUBSTH SUBSH0 SUBST8 SUBST5 SUBST6 CRETJ SPROG3
C00565 00136 DELQ DELETE DLT3 DLT2 DLT1 .DELQ .DELETE MEMQ MEMQ1
C00567 00137 NUMP TYPEP TYPNIL %SYMBOLP NMCK0 NUMCHK PDLNKJ PDLNMK PDLNM0 NMK1 PNMK2 CPDLNKJ
C00570 00138 GCPRO %GCPRO GCPR1 GCPR2 .GCPRO .GCPR5 GCPR3 GCPR4 GCRL1 GCREL GCLOOK SXHASH ATMHSH BNHSH AHSH1 AHSH2 NILHSH SXHSH0 SXHSLS
C00574 00139 SXHSH8 SXHSH7 SXHSH4 SYMHSH SXHSH5 SXHSH6 SXHSH9 SXHSD1 SXHSD2 SXHSC1 SXHSZ1 SXHS1A SXHHS0 SXHS1 SXHS1B SXHS1F
C00577 00140 MAPATOMS MAPAT1 MAPAT2 MAPAT9
C00579 00141 MAPLIST MAPCAR $MAP MAPC MAPCON $MAPCAN MAPL0 MAPL1 MAPL1B
C00583 00142 MAPL3 CMAPL6 MAPL3A MAPL6 MAPL6A MAPL7 MAPL7A MAPL2 MAPL21 MAPL40 MAPL4 CMAPL3 MAPL22 MAPL23 MAPL24
C00587 00143 MAPL5 MAPL5A MAPL8 MAPL8B MAPL8C MAPL8A .MAP .MAP1 SET SETCK
C00590 00144 $BREAK $BRK0 CB CN.BB UDFB UBVB WTAB UGTB WNAB GCLB PDLB GCOB IOLB FACB BKCOM BKCOM0 BKCOM2 BKCOM4 CBKCM0 BKCOM1 BKCOM3
C00594 00145 INTERN INTRN3 INTRN1 INTRN INTRN4 MAKF MAKF1 MAK2 MAK4 MAK3
C00597 00146 MAKA3 MAKA3B MAKA3A MAKA0 MAKA MAKA2 MAKA5 MAKA4 MAK1
C00599 00147 RINTERN RINTN0 INTRN2 RINTN1
C00601 00148 IMPLODE MAKNAM CRINTERN MKNM1 MKNM2 RDL12 MKNM4 CHNV1X CHNV1 CHNV1D CHNV1A CHNV1B CHNV1C
C00603 00149 DEFPROP DEF1 DEF1B DEF9 DFPR2 DFPR1
C00605 00150 DEFUN DEF7 DEF3 DEF3B DEF3X DEF3L DEF3A DEF6 DEF5 DEF4
C00612 00151 TYIPEEK $$PEEK TYPK1 TYPK1C TYPK1F TYPK1H TYPK3 TYPK3C TYPK4 TYPK5 TYPK6 TYPK9 TYPK9A
C00616 00152 QUIT VALRET VALSTR VLRT2 VALS1 VALERR
C00619 00153 RETVAL RETSTR VLRT1 VLRT5 VLRT3 VLRT9 VLRT3A VLRT9 SIDDTP
C00623 00154 SUSPEND SUSP0C SUSP0 SUSP11 SUSP12 SUSP1 SUSP14 FLSNOT SUSP24 SUSP25 SUSP3
C00631 00155 SAVHGH SAPWIN
C00634 00156 ARGS ARGS1 ARGS1A ARGSCU ARGSC1 ARGS3 ARGS5 ARGS6 ARGCLB ARGCL3 ARGS0
C00637 00157 EVALFRAME FRM2A FRM3 FRM3A FRM4A FRM4 FRM5 FRM5A FRM7 FRM8 FRM2B GTPDLP GTPDL5 GTPDL2 GTPDL3 GTPDL4 GTP4A GTPX0 GTPX1
C00642 00158 FRETURN FRETRY FRETR1 FRP1 FRP2 FRP2A FRP4 FRP3 FRP3QA
C00646 00159 $GETCHARN GETCHAR GETCH1 GETCH2 GETCH3 GETCH4 GETCH8 GTCTB SUBLIS SUBLSA SUBL1 SUBL1B SUBL1A SUBLOSE SUBL3Q SUBL3Z
C00649 00160 SUBL2 SUBL3A SUBL3 SUBL4 SBL1 SBL5 SBL4 SBL2 SBL2A SBL2B
C00651 00161 SAMEPNAMEP ALPHALESSP ALPL3 ALPLP1 ALPL2 SYSP SYSP3 SYSP6 SYSPZ1 SYSPZ GCTWA GCTWI GCTWX
C00655 00162 COPYSYMBOL CPSY3 CPSY CPSY0 CPSY1 CPSY4
C00657 00163 SETSYNTAX RSSYN1 RSSYN2 RSSYN3 RSSYN5 RSSYN7 RSSYN8 CTRUE RSSYN4
C00659 00164 SSCHTRAN SSSYNTAX SSSYN1 GRCTI SMACRO SMCR1 GETMAC
C00662 00165 SSMACRO SSMC43 SSM4 SSM4AA SSM3 SMCR2 SSM1 SSGCREL SSGCPRO SSGCP1 SSPROQ SSPROX SSGRL2 SSGRL1
C00666 00166 AUTOLOAD
C00667 00167 SYSCALL SCSL0 SCSL1 SCSL1A SCSL6 SCSL3 SCSL4 SCSL5 SCSTMA SCSFAI SCSXIT SCSXT1 SCSTAT STATER SSTATUS STATUS STAT1 STAT2 STAT3 STAT6 STAT6A STAT7 STAT8
C00675 00168 STSGVAL CQSSTATUS STSSVAL STSSV1 STSSTNIL STLOOK STLK1 STSCH STSCH1 STSCH2
C00677 00169 SNOFEATURE SFEATURE SSFEATURE SSFEA1 SSFEA2 SSNOFEATURE SSSSLU SSSSS SSSS SSSSS1 SARRAY
C00680 00170 SSPLSS SPLSS SCHTRAN SSYNTAX
C00681 00171 STTY STTY1 ZZZ STTY3 STTY4 ZZZ ZZZ
C00685 00172 SSTTY SSTTY1 SSTTY3 SSTTY7 SSTTY3 SSTTY4 SSTTY5 SSTTY3 SSTTY4 SSTTY2 TTY2ST TTYSAC
C00692 00173 SFRET
C00693 00174 SUUOLINKS SUUOL1 SSUUOLINKS SSUUL1 SCLI SSCLI CLIVAR SNOINT
C00697 00175 STIME SDATE STCVT SRCDIR SUNAME SUSERID SJNAME SSUBSYSTEM SJNUMBER SHOMEDIR SHSNAME SHSNA1 SHSNA2
C00700 00176 SHSNAME SDATE STIME STIM2 SSUBSYSTEM SDATE STIME STIM2 SSUBSYSTEM SJNAME SJNUMBER SUSERID SUSER1 SUNAME
C00704 00177 STIME STIME1 SDATE SDATIM SJNAME SSUBSYSTEM SRCDIR SUSERID SUNAME SJNUMBER
C00707 00178 SSLINMODE ZZX
C00709 00179 SDOW SDOWQX SDOW SDOWQX SDOW SDOWQX
C00711 00180 SABBREVIATE SSABBREVIATE SSABB1 SMEMFREE
C00712 00181 SSYST0 SSYSTEM SSYST2 SSYST7 SSYST1 SSYST3 SSYST5 SSYST4 SSYST6
C00714 00182 SSGCTIM SGCTIM SGCTM1 SLVRNO SFILESYSTEM.TYPE SOPSYSTEM.TYPE SSITE STTYREAD SLAP SLAP1 SSTTYREAD SSLAP SSLAP1
C00716 00183 SLINMODE STERPRI STERP1 SSTERPRI
C00717 00184 SCRFUN SCRFIL SLOSEF SSLOS0 SSLOSEF BPDLNKJ
C00718 00185 SJCL SJCL2 SJCL4 SDDTP SJCL SJCL1A SJCL1 SJCL2 SJCL4 SJCL3
C00721 00186 STTYTYPE STTYSIZE STTYS1 STTSZ9 SOSPEED SOSSP9
C00723 00187 STTYTYPE STTYSIZE STTYS1 D10TNM
C00726 00188 STTYTYPE STTYSIZE STTYS1
C00727 00189 STTYSCAN STSCN1 SSTTYSCAN SSTSC1 STTYCONS STCON1 SSTTYCONS SSTCO1 SSTC2 SSTC1
C00731 00190 STTYINT SSTTYINT SSTIN1 SSTIN2 SSTIN3 SSTIN4
C00734 00191 SPDLMAX SSPDLMAX SGCSIZE SSGCSIZE SGCMAX SSGCMAX SGCMIN SSGCMIN SPDLSIZE SPURSIZE SSPCSIZE SPDLROOM SSGP1 SSGP1A SSGP1C SSGP1D SSGP2A
C00737 00192 SSGPGT SSGPLZ SSGP3$ SSG3A1 SSGP3A SSGP3Z SSGP3Y SSGPPT SSGM1 SSGM2 SSGMRV SSGP4
C00740 00193 SSGS1 SSGX1 SSPM1 CSETP1 CSETNS CSETP2 CSETP3 CSETP7
C00743 00194 SRANDOM SRAND3 SSRAN0 SSRANDOM SSRAN3 SSRAN6 SSRAN8 SSCALLI SSSENDI SSSENA SSSEN1 SSSEN0 SSUSRHNK
C00746 00195 SSWHO1 SSWHO2 SSWHO3 SWHO1 SWHO1A SWHO2 SWHO3 SIXNUM SMAR SSMAR SSMAR5
C00748 00196 SSGCWHO SITS SITS9
C00750 00197 STBA LSSTBA
C00753 00198 LSTBA
C00756 00199
C00758 00200 STBSS LSST
C00761 00201 STBS
C00764 00202
C00768 00203 CURSORPOS CRSRPS CRSR10 CRSFA5 CRSFAY CRSFA4 CRSFA2 CRSFAZ CRSRP8 CRSFA1 CRSRP0 CRSR20 CRSRP5 CRSRP7 CRSR71 CRSRP3 CRSRP6 CRSRP4 CRSR40 CRSRP9 ZZZ ZZZ CRSR11 CRSR12 CRSR13 CRSR14 CRSRP1 CRSRMP CRSRM1 CRSRN
C00775 00204 %%FUNCTION .FUNC4 .FUNC1 .FUNC2 .FUNC3 AEVAL
C00777 00205 ALIST ALST1
C00782 00206 ALST2 ALST3 ALST3A ALST4 ALST4A ALST4C ALST5 ALST5A AL5AB
C00785 00207 ALST7 ALST6 ALST6A ALST6B ALST7A AUNBIND AUNBN0 AUNBN1 AUNBN2 AUNBN3 AUNBN4 AUNBN5 AUNBN6 AUNBN7 IAP4A APFNG CAUNBIND APLBL APLBL1
C00789 00208 LISTIFY LFY3 LFY1 PNPUT $PNGET $PNG.R $PNG3 $PNG3A $PNG4 $PNG.D $PNGX DEPOSIT EXAMINE MAKNUM MUNKAM
C00792 00209 $SLEEP ALARMCLOCK ALCK3 ALCK4 ALCK1 ALCK5 ALCK7 ALCK2 M30.
C00795 00210 REMOB REMOB2 REMOB7 REMOB3 REMOB4 REMOB1 ARG ARGXX ARG3 SETARG ARGCOM
C00797 00211 SBSYM VCLSYM VCSYM TLSYM TSYM PLSYM PSYM POF TOF PSYM1
C00800 00212 PSYMP PSYMQ PSYMX CPSYMX PSYMP1 PSYMSB FCN.B
C00803 00213 TOF1 POF1 PSYMVC PSVC1 PSVC2 PSVC3 PUFY
C00805 00214 ZZ PSMTB LPSMTB P. PL. VC. VCL. T. TL. SB. BB PSYMT PSYMT1 PSYMT2 PSYMT3 PSYMTT PSYMTL
C00809 00215 PPTBL1 PPTBL2 PPTBL6 PPTBL3 PPTBL4 PPTBL5 PPTBL7 PPTBL9 PPTBL8
C00812 00216 XPURIFY PURIFY FPURF2 IPUR1 IPUR2
C00816 00217 IPUR4 IPUR5 IPUR9 IPURE$ IPUR6A IPUR6 IPUR7 IPUR3A IPUR3
C00820 00218 RSXTB2 RCT0
C00824 00219 TLRCT ZZ .NOPOINT CTY TYOI CTYP TYO1C TYO1TB
C00832 00220 PRNARG PRNAR$ PRNAR0 PRNAR3 PRNAR7 PRNTTY PRNAR2 PRNAR4 PRNAR5 PRNAR6 PRNARA PRNAR8 PRNAR9 PNAGX CPNAGX
C00837 00221 MPFLOK MPFLO1 MPFLO3 MPFLO2 PRNARK PRNRK3 PRNRK1 PRNRK2 PRTSTO PRTSO1 PRTSTR PRTST1 PRTST2 PRTSTL
C00842 00222 TYO$ %TYO %TYO1 TYO $TYO TYOPR TYO1 TYO6 STRTYO TYO6A TYO6B TYO5 TYO2 TYO2A TYO2Z TYO2B TYO4 TYOARG
C00845 00223 TYOFA TYOFIL TYOF TYOFS1 TYOFS0 TYOF0D TYOF0E TYOF0G TYOF2 TYOFXL TYOFE
C00850 00224 TYOF3 TYOFBS TYOFTB TYOFLF TYOFFF TYOF7 TYOFCR
C00853 00225 TYOF4 TYOF6 TYOF4A TYOXCT C$ INTTYR TYOF5 TYOF5Y TYOF4C TYOF4J
C00857 00226 %TERPRI TRP$ TERPRI TERP1 ITERPRI PTYO PTYO1 PTYO3 PTYO2
C00860 00227 PRINT %PRO PRINTOBJECT %PRO3 %PROX %PRINT $PRINT CTY1 CTY2 PRIN1B PRIN1 %PRIN1 %PR1 $PRIN1 %PR1A PRINC %PRINC %PRC $PRINC X X
C00865 00228 PR.PRC PR.ATR PR.NUM PR.NVB PR.EFC PR.NLS PRINTY PRINTF PRINTA PRINT3 PRINT4 PRINH6 PRIN7A PRIN8A
C00869 00229 PRINTY PRINTF APRINT PRINTA PRINT0 PRIN0A PRINT1 PRIN1Q PRINT2
C00872 00230 PRINT3 PRIN3A FLTHNK SENDFL SENDPR SENDP1 SNDPR0 PRN3NH PRIN3F PRINT4 PRINT5 PRINT6 PRINT7 PRINH6 PRIN7A PRIN7B PRINT8 PRIN8A PRINT9
C00881 00231 PRINH0 PRINH8 PRINH2 PRHN2B PRINH3 PRHN3A PRHN3B
C00883 00232 PRINX PRIN1A PRIN1Z PRINA1 PRINA2 PRINA3 PRINA4 PRINX5 PRINL4
C00886 00233 PRNSR PRNJB PRNFL PRNF5 PRNF6 PRNJ2 PRNF1 PRNSTO PRNJ1 PRNSR1
C00890 00234 PRINSY PRINN PRINIL PRNN1 PRNN2A PRNN2B PRNN2C PRNN2 PRNN3 PRNN3A PRNN3B PRNN3C
C00894 00235 PRNN4 PRNN4A PRNN4B PRNN5 PRNN5A VBARPOPJ PRNN6 PRNN6A
C00896 00236 MAPNAME MAPNM1 MAPNM2 MAPNM3 PRINLP PLP1 PRINLQ
C00898 00237 PRINI PRI2D PRI2C PRI2Q PRI2A PRINI2 PRINI9 PRINI3 FP7A1 FP7B PRINI5 PRINI7 PRI.
C00901 00238 PRI2B PRI2B3 PROMAN PRINRM PRINR0 PRINR1 PRINR2 PRINR3 PRINR4 PRINR5 PRINR6 PRINR9
C00904 00239 PRINDB DFP0 PRINO FP0 FP0A FP0B FP1 FP3 FP3A FP3A1 FPX0
C00909 00240 FP3
C00911 00241 DFP3A DFP3A1 DFP3A2 DFP3A8 DFP3A9
C00914 00242 FP4 FP4A FP4E0 FP4E1
C00916 00243 FP4E FP4E2 FP4E2A FP4B
C00919 00244 FP4B1
C00920 00245 PRINCX PRNCX2 PRNCX3 PRNCX4 PRINDX PRNDX2 PRNDX5
C00922 00246 PRINB PRINB0 PRINBQ PRINBZ PRBAB PRINB3 PNFBLP
C00924 00247 PRBFNA PRBFIN PRINBI PRINBJ PRBNUF PRINB4
C00926 00248 FLATSIZE FLAT5 FLAT4 FLAT3 FLAT2 CFLAT2 %FLO FLATOBJECT FLATO2 FLATC FLAT7 FLATC1 FLTC1A FLATC2 FLATC3 FLAT7A $EXPLODEC $$EXPU $$EXPLODEN $$EXSN $$EXP0 $$EXP1 EXPLY1 EXPLY2 EXPLY3 EXPLY4 EXPLY9
C00932 00249 EXPLODE EXPL0 EXPL4 EXPL1 EXPL3 EXPL6 EXPL2
C00933 00250 BAKTRACE BAKLIST BKTR0 BKTR3 BKTR2 BKTR1 BKTR2X
C00937 00251 BKTR1A BK1A2 BK1A4 BK1A1 BK1A1C BK1A3 BK1A1B
C00940 00252 BKTR1B BKTR1C BKTR1F BKT1B1 BKT1F1 BKT1F2 BKTR1H BKTR1E BKTR1D BKTR1G BKTR1I BKTRR3 BKTRR5 UREAD UREAD2 UREAD1 UREOF UCLOSE
C00945 00253 UAPPEND UWRITE UWRT0 UWRT1 UWRT2
C00948 00254 UFILE0 UFILE UFILE5 SCRUNIT CRUNIT
C00950 00255 UGREAT UGRT1 UPROBE UKILL
C00952 00256 TTSR TTSR1
C00954 00257 RSQUEEZE SQUEEZE SQZCHR SQOK SQNOTL SQNOTD SQ%$
C00957 00258 5BTWD $5BTWD 5BTWD0 5BTWD1 5BTWD9 UNSQOZ UNSQZ1 UNSQZ2 UNSQZ3
C00959 00259 PUTDDTSYM PUTDD0 PUTDD2 PUTDD4 PUTDX
C00961 00260 LAPSETUP LAP5HAK L5H1 L5H2 L5XIT L5ERSTP L5SPBND L5H3 L5MKUNBD L5INHIBIT L50.0P L5NILP LAPSMH LAPSM1 LAPST2 LSYMPUT FSLSTP FSLST2
C00966 00261 LSYMS LGSYMS LLSYMS ZZ LAPSIX ZZ LAPFIV LAP5P GETDDTSYM GETDDJ GETDD1 GETDDG LGTSPC PAGEBPORG PGBP4
C00971 00262 MAKUBE MAKUNBOUND MAKUN1 $PURIFY FPURF0 FPURF3 ZEROP MINUSP PLUSP ZMP MINUS MNSFX
C00976 00263 ADD1 SUB1 SUB11 A1S1FX A1S11 A1S1BG ABSOV
C00978 00264 COMPR DIFFA PLUSA TIMESA QUOA QUOOV QUOAK QUOAK2 QUOAK1
C00981 00265 T1 .QUO .TIMES .DIF .PLUS T21 QUOTIENT TIMES DIFFERENCE PLUS T22 T20 T24 T4 T7 T7A T7X T7X1 T7O ZFZCHK ZFZCH9
C00984 00266 T5 T6 T6A T3 T15 T14 T14EX2 T14E T14EX T14EX1 FXIDEN FLIDEN ABS
C00986 00267 REMAINDER REMAI2 FLOAT FIX4 FLOAT4 IFXERR $IFIX $IFIX1 $FIX
C00989 00268 .GREAT .LESS LESSP GREATERP GTR1 GTR9 MIN MAX MXF MXS MAXFIN MAX923
C00991 00269 GRSUC2 GRSUC1 GRS923 GRSUCE GRSFIN GRSF1 GRFAIL GRSWF GRSWX
C00992 00270 ADD1 SUB1 REMAINDER MINUS ABS MINUSP PLUSP ZEROP
C00994 00271 $IFIX $FIX FIX4 FLOAT FIXFLO FLOAT3
C00995 00272 MIN MAX MINMAX .GREAT .LESS LESSP GREATERP MNMX1 MNMX9 GRESS GRUSE
C00997 00273 .DIF DIFFERENCE DIF2 .QUO QUOTIENT QUO2 QUO3
C00999 00274 .TIMES TIMES QUO1 .PLUS PLUS DIF1 PLUS1 PLUS7 PLUS5 PLUS3A PLUS4 PLUS9 PLUS2 PLUS2A PLUS2V T7O0
C01001 00275 EXPT XPTLL XPT.X XPTLX XPTLX1 XPTLX2 XPTOV
C01004 00276 XPTXX0 XPTXX XPTXX5 XPTXX3 XPTXX4 2XPT 2BGXPT 2BGXP1
C01006 00277 XPTBL XPT.B XPTZX0 EXPT6B EXPT6C EXPT1A EXPT1 EXPT3 EXPT2 EXPT4 XPTBX XPTBX1
C01010 00278 XPTII XPTI$ XPTZL 1.0PJ XPTZL1 XPTZL2 XPTZX XPTZX1 XPTM1
C01012 00279 RANDOM RAND1 IRAND IRAND0 IRAND3 IRAND5 RNDM1 RNDM2 RNDM0 RNDM1A RNDM2A
C01014 00280 HAULONG .HAU 4HAU 3HAU1 1HAU 2HAU 3HAU
C01015 00281 HAIPART 0HAI 0HAI1 0HAI2 0HAI3 3HAI 3HAI1 3HAI2 3HAI3
C01018 00282 LNGTER LENGTH LNGTH0 LNG1A LNGTH1 LNGTE1 LNGTH2 LNGTH5 LNGTH6 BIGP
C01020 00283 BOOLE BOOLL BOOLG BOOL1 ODDP1 ODDP ODDP2 ODDP21 ODDP4 ODDP3
C01022 00284 $FSC $ASH $ROT $LSH SHIFTX SHIFTY $LOADB %LOADB .LODB1 $LDB %LDB .LDB2 $DEPOB %DEPOB .DPOB1 $DPB %DPB .DPB1 .DPB2 .GCD .GCD0 .GCD3 .GCD1 .GCD2 GCD0 GCD GCDXX
C01026 00285 $EQUAL $EQL1 $IEQ IEQUAL $LESS $GREAT $IGL1 $IGL IGRT IADD1 $ADD1 ISUB1 $SUB1
C01028 00286 $ARITH IARITH I$B I$ART2 ARITH IARDS ARIT0
C01030 00287 IDIFFERENCE IPLUS IQUOTIENT ITIMES $DIFFERENCE $PLUS $QUOTIENT $TIMES IARZAR
C01031 00288 $SIN SIN. SIN.0 SIN.1 SIN.2 SIN.XT PI%2 SIN.CF COS COS.
C01035 00289 SQRT SQRT. SQRT.. SQRT.1
C01036 00290 SQRT SQRT. SQRT..
C01041 00291 SQRT SQRT. SQRT.. SQRT.2 SQRT.3
C01044 00292 LOG LOG. LOG.. LOG.1 LOG.2 ROOT2 LOG.CF NUMFLT NUMFL3
C01046 00293 ATAN ATAN. ATAN.1 ATAN.2 ATAN.3 ATAN.4 PI% ATAN.C
C01049 00294 EXP EXP. EXP.. EXP.A EXP.1 EXP.2 EXP.RX EXP.3 EXP.CF FPWUN INTLG C1.0E5 YPOCB BCOPY BCOP1 BNARSV BNARRS
C01054 00295 PLOV PLOV2 PL1BN TIMOV TIM1BN T2 T12 PL2BN
C01056 00296 TIM2BN T11 T13 T13X BNDF BNPL BNPL1 T19A T19B T19C BNXTIM BNTIM
C01058 00297 DIVSEZ REM2BN DV2BN DV1BN BNDV
C01060 00298 DV2BN1 DV2BN2 BNFXLP DV2BN3 D1FIN
C01062 00299 BNTRUN BNTR4 BNTRSZ BNTRS1 BNPJ2 BNCV BNCVTM T17 T16 T23
C01065 00300 BNSUB BNADD BN4 BN15 BN20 BN7 BN9 BNADD2 BN14 BN8 BN5 BN13 BN6
C01067 00301 BNSUB2 BN10 BN11 BN11A BN12 BNM1 BNM2
C01071 00302 BNMUL BNM5 BNM4 BNM3
C01074 00303 BNQUO BNQUO1 BQ1 BQ2
C01076 00304 BQCC BQGEST BQZQ BQCOPY BQNORM
C01078 00305 BQ6 BQSRRM BQSHRM BQVET BQSHRT REMFIN BQ10 BQDD BQ11
C01080 00306 BQ5 BQ7 BQ8 BQ9 BQ9A BQ9B
C01082 00307 BQEFIN BQSH0 BQ1DF BQGESS BQCHEK BQC2 BQC1 BQFIN
C01084 00308 BQSUB BQSUB0 BQSUB7 BQSUB1 BQSUB6
C01086 00309 BQSUB3 BQSUB4
C01089 00310 FLBIGF FLBIG FLBIGX FLBIGZ FLTB1 FLBIGQ FLBIGO
C01091 00311 FIXBIG FXBFV FXBFZ FBFIN FXBFQ MNSBG POP4J
C01093 00312 ABSBG0 ABSBG REMBIG GRBB GRBBL GRBR
C01095 00313 GRFXB GRBFX GRBF GRB1 GRB12 GRB13 GRB14 GRB2 GRBBEL GRBBE2
C01097 00314 1HAI 1HAI1 2HAI 2HAI2 2HAI0 2HAI3 2HAI4
C01100 00315 GCDBG GCDBG0 GCDBG1 GCDBG2 GCDBGU GCDBHU GCDBG4
C01104 00316 GCDBGV GCDBHV BNLWFL BNLWFX BNLWXX GCDBGO GCDBGT GCDBX GCDOV GCDOV1
C01106 00317 POP3UB POP2UB EVALHOOK EVNH3 EVNH0 OEVAL OEVL1 EVAL EVAL0
C01109 00318 EV0 EV0A EV0ALS EVAPH EV0H EVTB1 EV2 EVTB2 EE1 EE2 EE2A ETT EAL EAL2 EFM
C01115 00319 EFX AEXP EXP3 CIAPPLY EFS ELSB ELSB1 ESAR EAR EAR3 EAR1
C01117 00320 ESB ESB4 ESB2 ESB1 ESB3 ESB3A ESB3C EV3 EV4 EV4B EV3C EFMER EWHEN SYMEV0 SYMEVAL EVSYM EE1A
C01121 00321 APPLY APPWT1 .APPLY AP3 AP3A APPWTA AP2 AP4
C01124 00322 SUBRCALL RETTYP %LSUBRCALL PTRCHK
C01126 00323 %ARRAYCALL %ARR7 FUNCALL FUNCA1
C01128 00324 %LXFC liap0 liap0a liap0b liap1 liavec liavc0 liavc9
C01132 00325 IAPPLY ILP1 IALIS ILP1B
C01135 00326 APTB1 IAPATM IAPAT2 IAPAT3 IATT IAPIAL IAPIA1 IIAL IAPSAR IAPARR IAPSBR IAPSB1 IAPAR1 IAHNK IAPXPR IAPLSB IAP2
C01139 00327 IAPLMB IPLMB1 IAP5 IAP5C IAP5B IPLMB2 IPLMB4 IPLM4A IPLM4B IPLMB5 LMBLP LMBLP1 LMBLP2 IPROGN IAP3 CUNBIN IAP4
C01143 00328 FUNCTION QUOTE DECLARE $COMMENT SETQ SET1 SET0 $AND $OR ANDOR
C01145 00329 PROG PRG1 PRG1Z PG0 LPRP PG1 PG1A PG0A VBIND PBIND PBIND1 PBIND2 PROGV RETURN PRXIT ERRP4 RHAPJ CQFUNCTION
C01149 00330 GO GO2 GO1 PG5 PG5A GO3 GO3B GO3A
C01151 00331 DO DO4A DO4 DO4C DO7 DO7A DO9
C01153 00332 DO8 DO2 DO4D DO5 DO5Q DO5Q1 DO5F DO5B
C01155 00333 DO5E DO5D DO5G DO5C DO6 DO6A DO6C
C01157 00334 COND1 COND CON3 COND2 CON2 BKERST BKRST3 BKRST4 BKRST0 BKRST2 BKRST1
C01160 00335 ERRSET ERRST3 ERRNX ERR ERR3A ERR3 CATCH .CATCH .CATC1 CATCHB CATCB2 CATCB1 CATCHALL UNWINP UNWERR PTNTRY UNWINC PTEXIT UNWINE THROW .THROW CATHRO WIOSPC WIOSP0 WIOSP1 WIOBND WIOBN0 WIOBN1 WIOUNB WIOUN0 WIOUN1
C01171 00336 CASEQ CASEE CASEF CASES CASE1 CASE1E CASE1H CASE1D CASE1B CASE1A CASE1Z CASE1G CASE1Q CASEBQ CASEBZ CASEM CASECK CASEEQ CASEAQ CASE1C IF IF1A
C01177 00337 SETF SETF2S SETF5 SETF1 SETF2C STF2C1 STF2C2 SETF1B SETF1C SETF2A STF2A5 STF2A7 STF2A9 CSETF5 SETF2G STF2G2 EVALCAR SETF3
C01184 00338 $PUSHER $PUSH
C01187 00339 $POPER $POP $POP4 $POP2 $POP1 $PUSH1 TNILER
C01189 00340 STORE STORE7 STORE9 BREAK SIGNP SIGNP0 SPTB
C01192 00341 PROG1 PROG2 PRG12Z PROGN PROGN1 EQ RPLACA RPLACD RPLCD3 RPLCD2
C01194 00342 GCRET GCNRT GC MINCEL GCCNT GCCNT1 GCCNT4 LPROG3 GCCNT0
C01196 00343 WHL AGC4 AGC AGC1 AGC1Q GCP4 GCP4A GCP4B
C01201 00344 GCP5 GSTRT0 GSTR0A GSTRT1 GSTRT2 GSTRT3 GSTRT5 GSTRT7 GSTRT8 GSTRT6 GCWHL2 GCWHL3 GCWHL9
C01205 00345 GCP6 GCP6Q0 GCP6Q1 GCP6Q2 GCP6Q3 GCP6Q4 GCP6Q5 GCP6Q6 GCP6Q8 GCP6Q9 GCP6R0
C01208 00346 GCP6B1 GCP6B2 GCP6A GCP6F1 GCP6F GCP6F0 GCP6D GCP6D1 GSTRT9 GCWHL6
C01211 00347 CGCMKL GCP6H GCP6H1 GCP6H8 GCP6H3 GCP6H4 GCP6H5 GCP6G GCP6H0
C01213 00348 GCP6H7 GCP6H2 GCP6H9 GCP6J1 GCP6J3 GCP6J9
C01216 00349 GCP7
C01217 00350 GCSWP GCSW1 GCSW2 GCSW2A GCSW5 GCSW7
C01220 00351 GCSWTB GCSW7A
C01222 00352 GCSWS GCFSSWP GFSP1 GFSP2 GFSCNT GFSP4 GFSP5 LPROG1 GCSWY GSYMSWP GYSP7 GYSP1 GYSP2 GYCNT GYSP3 LPROG6 GYSP5 GYSP5A GYSP5B
C01226 00353 GCSWD GCSWC GCSWZ GCSWH1 GCHSW1 GH1SP1 GH1SP2 GHCNT1 GH1SP4 GH1SP5 GH1SP6 LPROGH
C01228 00354 GCSWH2 GCHSW2 GH2SP1 GHCNT2 GH2SP5 GH2SP7 LPROGK GCSWA GSARSWP GSSP0 GSSP1 GSSP2 GSSP7 GSSP8 GSCNT LPROG4
C01231 00355 GCPNT GCPNT1 GCPNT2 GCPNT6
C01232 00356 GCE0 GCE0C0 GCE0C1 GCE0C5 GCE0C2 GCE0C3 GCE0C9 GCE0C6 GCE0K3 GCE0C7 GCE0C4 GCE0K2 GCE0K1
C01235 00357 GCE0E
C01237 00358 GCEND GCRSR0
C01240 00359 GCINBT GCINB0 GCWHR GCWHR8 GCWHR2 GCWHR9
C01243 00360 GCACRS GCACR $GCMKAR GCMKAR GCMKA1 GCGEN GCP8A GCP8A1
C01246 00361 GCMARK GCMRK0 GCMRK3 GCMRK6 GCMRK7 GCMRK4 GCMRK5 GCMKND GCMRK8 GCMRK1 GCMRK2 GCMK2A GCMK2B GCHNLN
C01252 00362 LSPGCM LSPGCS KLGCVC KLGCM1 KLGCND KLGCM2 KLGCSY KLGCSA ZZZ ZZZ KLGCSW KLGS1 KLGS1A KLGS1D
C01255 00363 GSGEN RTSPC2 RTSP2A GGEN2 GGEN1 GFSPC GTSP5A BPSGC BPSGX
C01257 00364 GCP8K GCP8J GCP8I GCP8G GCP8C GCP8B GCP8D GCP8H GCP8L GCP8L5 TWAP
C01260 00365 STGPNT GCBT
C01262 00366 RETSP RTSP2 RTSP7 RTSP9 RTSP5 RTSPC1
C01267 00367 GTSPC1 GTSP1B GTSPC8 GTSPC2 GRELAR GREL1 CZECHI GTSPC8
C01271 00368 CNLAC BPNDST GTSPC3 GT3Z GT3H GT3B GT3A GT3C GT3D GT3D2 GT3D4 GT3G
C01277 00369 PURCOPY PCOPY9 PCOPLS PCONS PCOPFX PFXCONS PFXC1 PFXC3
C01280 00370 PCOPFL PFLCONS PCOPCX PCXCONS PCOPDB PDBCONS PDBC3 PCOPDX PDXCONS PCOPBN PBNCONS
C01283 00371 PCOPSY PCOPS1 PCOPS3 PCOPHN PCOPH5 PCOPH2 PCOPH3
C01287 00372 GETCOR GTCOR4 GTCOR6 LHVB0 LHVBAR LHVB3 LHVB4 LHVB1
C01290 00373 PDLST0 PDLST8
C01293 00374 PDLOV PDLH0A PDLH2 PDLH2A PDLH2B PDLH3A PDLH4
C01297 00375 MORPDL PDLMSG PDLST9 PDLH5 PDLH6
C01299 00376 GRBPSG GTNPSG GTNPS8
C01303 00377 GTNPS3
C01306 00378 GCGRAB GCGRB1
C01308 00379 GRBSEG GRBSG1 GCWORRY GRABWORRY GCWR0A GCWR0B GCWOR2 GCWR2A GCWR2B
C01313 00380 GCWR2C GCWR3A GCWR3B GCWR3F GCWOR4 GCWR4Q GCWOR6 GCWOR7
C01317 00381 GCWORG GCWORS GCWFOO GCWORX GCWRX1 GCWRX2 LPROG9 GCWORN
C01320 00382 ALIMPG ALIMP3
C01323 00383 RECLAIM RECL1 RECL2 RECLFW REBIG RECL9 RECL9A
C01326 00384 MAKVC3 MAKVC4 MAKVC8
C01329 00385 LDPRG9 ARGCL7 MAKVC9 MAKVC5 MAKVC6
C01331 00386 $ALLOC $ALLC6 $ALLC9 $ALLC7 $ALLC8 $ALLC4
C01333 00387 $ALLC0 $ALLC5 $ALLC3 $ALLC2 RS.FF RS.VMO RS.SQX RS.BRK RS.SCO RS.WSP RS.DOT RS.MAC RS.SLS RS.RBO RS.SL1 RS.PNT RS.SL9 RS.ALT RS.ARR RS.SGN RS.DIG RS.XLT RS.LTR NWTNE NWTNN RS.FF RS.VMO RS.SQX RS.BRK RS.SCO RS.WSP RS.LP RS.DOT RS.RP RS.MAC RS.SLS RS.RBO RS.SL1 RS.PNT RS.SL9 RS.ALT RS.ARR RS.SGN RS.DIG RS.XLT RS.LTR NWTNE NWTNN RS.CMS RS.SCS RS.OBB RS.WTH RS.SEE
C01342 00388 $READCH RDCH$ READCH RDCH3 $ASCII RDCH2
C01343 00389 XINCALL INCAST INCSEO XINCA1 INCALL INCAL4 INCST2 INCST3 INCST4 INCAL5 INCAL1 INCALZ INBIND INBN4 INBN1 INBN9 LINBN9 INCAL2 INCST1 INCAL7 EOFBN0 EOFBIND EOFBN3 EOFBN5 CEOFBN5
C01351 00390 EOF EOF2 EOF8 EOF1 EOF7 EOF4 EOF9 EOF5 EOFZ
C01353 00391 INPU0 INPUSH INPU1 INPU12 INPU2 INPU3 INPOP INPU5 INPU6 INPU7 INPU8
C01355 00392 TYI$ %TYI TYI UNTYI UNTYI3 SUNTYI
C01358 00393 $PEEK $DEVICE $DEV$ $DEV0 $DEV1 $DEV1A $DEV1B
C01360 00394 $DEV2 $DEVLM $DVLMX $DVLMQ $DVLM0 $DVLM1 $DEVPS $DVPS1 $DVPS0 $DVPSX $DVPS2 $DVPS3
C01365 00395 $DEV4 TYIXCT $DEV4B $DEV4C TYIXCT TYIXCT $DEVS4 $DEV4S $DEV4U $DEV4Z $DEV4T $DEVAH TYICAL $DVAH1 $DEV4M
C01372 00396 $DEV5A $DEV5 $DEV5K $DEVBUF TYICA1 $DEV5R $DEV5S $DEV5M
C01377 00397 $DEV6 $DEV6W $DEV6A $DEV6B $DEVECO $DEVEF $DVEF1 $DVEF0
C01380 00398 $DEVSFA $DEVP1 $DEVP2 $DEVPE INFGT0 INFGET $DVLUZ INFLZZ INFLUZ
C01383 00399 BYTEAC MKNR6C MKR6DB
C01384 00400 READLIST RDLPEK RDLTYI RDLTY1 RDLTY3 RDLTY9 RDLTY2 RDLPK1 RDLUNTYI READ6C R6C1
C01386 00401 READ$ IREAD IREAD1 OREAD READ READ0 READS0 READST
C01389 00402 READ0B RD0B1 RD0B2A RD0BRM RVRCT
C01391 00403 READ0A RMCER REKRD REKRD1 RDOBJ3 RDOBJ1 RDOBJ RDOBJ0
C01394 00404 RDJ2A RDOBJ5 RDOBJ2 RDJ2A1 RDOBJ6 RDJ6A RDOBJ7 ER1 RDOBJ4 RD8W RD8N
C01396 00405 RDNUM RDNUM2 RDNM10 RDNUM1 RDNUM8 RDNUM7 RDNUM9 RDNM9E RDNM9B RDNM9C
C01399 00406 RDNUM0 RDNUM6 RDNM8A RDNMF RDNM2 RDNM2A RDFXNM RDFX1 RDFL1
C01401 00407 RDNUM5 RDNUMD RDNUMB RDIBOV RD10OV RDNUMC
C01403 00408 RDFXEX RX1 RX1 RDFX2
C01404 00409 RDFLNM RDFL3 RDFL3A RDFL2A RDFL2D RDL2D0 RDL2D3 RDL2D1 RDFL2E RDL2EB RDL2EA RDL2E0 RDL2E1 RDL2EC RDL2A0 RDL2A2 RDL2A1 RDL2A3
C01408 00410 RDLST RDLSTA RDLSAA RDHNK1 RDLST1 RDLST0 RDHNKA RDLST3 RDLS3Y RDLSX RDLSX1 RDLS3D RDLST4 RDLS4A RDLS4B RDHNK RDSKWH RDSKWX
C01414 00411 RDOBM2 RDOBJM RDSMCK RDALPH RDA0 RDA1 RDA3 RDA4 RLAST RLAST1 RDCHO1 RDCHO4 RDCHO3 RDCHO RDCHO2
C01418 00412 RD10OV RDIBOV RDBG10 RDBG1A RDBGIB RDBGIA .RDMULP .TIMER .TM.PL
C01420 00413 RDRGSV RDRGRS RDEXOF RDEX3 RDBIGN RDBIGM
C01422 00414 RDBGEX RDBGXM RDBFSH RDBXFL RDCBG RDCBG1 RDNM2B
C01424 00415 RDCHAR RDCH1 RDBK RDNMX RDNUM4 RDNM4A
C01426 00416 RDROM RDROM1 RDROM2 RDROM3 RDROM7 RDAEND IRDA IRDA1 RDIN
C01428 00417 ER2 ER3 RDNMER RDSME2 RDSME1 RDSMER
C01429 00418 RDQTE RDSEMI RDSMI0 RDSMI1 RDVBAR RDDBLQ RDVB5 RDVB2 RDVB3 RDVB4 CTRLQ CTRLS
C01433 00419 %TXMTA %TXCTL %TXASC TTYBUF TTYB1 TTYB1E TTYB7 TTYB7E TTYB7G TTYB7F TTYB7H TTYB7N CLRSRN TTYB2 TTYB3 TTYB3A TTYB4 TTYB4C TTYB4G TTYB4J TTYB4M TTYB5 TTYB5H TTYB5K TTYB5M TTYB6 TTYB6C TTYB6J TTYB6Q TTYB9 TTYB9A TTYB9B TTYB9D TTYB9J TTYB8
C01443 00420 TTYBRC TTYBR1 TTYPSH TTYPS1 TTYATM TTYBCH TTYBLT TTYBL4 TTYBL1 TTYBL2
C01447 00421 RUBOUT RUB1CH RUB1C1 RUB1C3
C01450 00422 %READLINE %RDLN5 %RDLN6 %RDLNZ ARYTP1 NPARTP LARYTP ARYTYP ARYIN1 ARYIN2
C01455 00423 DIMSTB DIMFTB DIMDTB DIMZTB
C01457 00424 TTDEAD TTDEDC ARRAY %%ARRAY ARRY0 ARRY0B ARRY0C ARRY0F ARRY0G ARRY1 ARRY1A
C01460 00425 ARRYQ0 ARRYQ1 ARRYQ2 ARRYQ3 ARRYQ4 ARRYQ5 ARRY1D ARRY1F ARRY2 ARRY2A ARRY2B
C01462 00426 ARRY2C ARRYAE ARRY2F ARRY2H
C01465 00427 ARRY3A ARRY6 ARRY6Q ARRY6A
C01467 00428 ARRY7 ARRY7A ARRY7B ARRY4 ARRY5 ARRY5D ARRY5F ARRY5G ARRY8
C01472 00429 AREGET AREGT2 AREGT0 AREGT1
C01473 00430 MKFLAR MKFXAR MKDTAR MKLSAR MKAR1 SACONS ADIMS0 ADIMS ADIMS1
C01476 00431 BLTARRAY BLTAR1 BLTXIT BLTALZ BLTALS
C01478 00432 .REA3 .REA3C .REA3D .REA3E C.REA2 ARYSIZ ARYSZ3 ARYSZ4 ARYSZ6 ARYSZ5 ARYSZ7
C01482 00433 OBAFIX OBAFX1 OBAFX3 RDTFIX RDTFX2
C01484 00434 BLTO1 BLTO3 BLTO4
C01488 00435 BLTI1 BLTI4 BLTI3 BLTI5 BLTI6 BLTI8
C01494 00436 .REARRAY .REA4B .REA4A .REA4 .REA5 .REA6 .REA6A .REA7 .REA7A .REA2 .REALOSE GETSP GETSP0 AGTSPC GETSP1 .REA1 .REA1A
C01499 00437 AYNV1 AYNV5 AYNV4 AYNV3 AYNV2 AYNV0 AYNVER AYNVE1 2DIMS 2DIMS1 2DIMF 2DIMF1 2DIMD 2DIMD1 2DIMZ 2DIMZ1
C01503 00438 3DIMF 3DIMS 3DIMX 4DIMF 4DIMS 5DIMF 5DIMS
C01506 00439 FILLARRAY FILLA0 FILLA1 FILLA4 FILLA5 FILLA2 FILLA3 FILLD1 FILLD3 FILLD6 FILLZ1 FILLZ3 FILLZ6 OPNCLR FILLA6 FILLA9 FILLA8 FILLA7 FILLUZ
C01511 00440 LISTARRAY LISTA3 LISTAZ LISTA7 LISTA1 LISTA2 LISTA5 LISTA6 LISJOB LISFIL LISTD5 LISTD6 LISTZ5 LISTZ6 LLDAT ILDAT LLDSTB LDAGEN LDPRLS LDDDTP LDBGEN LDNPDS
C01519 00441
C01534 00442 IALB FASLOAD LDXXY1
C01536 00443 LDDISM LDRTHS LDXQQ5 LDXQQ2 LDXQQ3 LDXQQ6 LDXQQ8 LDXQQ7
C01542 00444 LDXXX1 LDXXX9
C01544 00445 LDXHHK LDXHAK LDXHK1 LDXHK2 LDXHK3 LDXHK5
C01548 00446 LDXHAK LDXFLC LDXIRL LDREL LDABS LDABS1 LDABS0 LDBIN LDBIN1 LDBIN2 LDTTBL
C01553 00447 LDGTSP LDGS0A LDGS0H LDGSP1 LDGSP3 LDGSP5 LDGSP4 LDGSP6
C01556 00448 LDSPC LDSPC1 LDQAT LDQATX LDQAT1 LDQAT2
C01559 00449 LDQLS LDQLS3 LDQLS1 LDQLS2 LDQLS5 LDQLS4 LDQLPRO LDQPR0 LDQPR1 LDGPRO
C01562 00450 LDPRC LDPRC1 PRCHAK LDPRC2 LDPRC3 LDPRC4 LDPRC5 LDPRC6 LDPRC7
C01566 00451 PRCHAK PRCSMS PRCHA1 PRCH1A PRCH1B PRCHA4 PRCHA3 PRCHA2 PRCH2A PRTRTS
C01572 00452 LDSMSH LDZA2 LDZAOK LDZA1 LDSMNS
C01576 00453 LDGET LDGET1 LDGET2 LDGT5A LDGET4 LDGT5B
C01579 00454 LDGETX LDGETJ LDGETV LDGETW LDGET6 LDGDDT LDGDDT LDGDDT LDXCT LDMASK LDLHRL
C01582 00455 LDAREF LDARE1 LDGLB LDATM LDATBL LDATPN LDATP1 LDATP2 LDATP3 LDATP4 LDATP8
C01585 00456 LDATFX LDATX0 LDATX1 LDATX2 LDATX3 LDATFL LDATL0 LDATL1 LDATL2 LDATL3
C01587 00457 LDATBN LDATB1 LDATB2 LDATB3 LDATB6 LDATB8 LDATB7 LDAEXT LDRFRF
C01589 00458 LDENT LDENT4 LDNRDF LDPARG LDPRG3
C01593 00459 LDPUT LDPUT7 LDPUT0 LDPUT4 LDPUT5 LDPUT1 LDPUTM LDPUT2 LDPT2A LDPUT3 LDLOC LDLOC5
C01598 00460 LDEVAL LDEVL7 LDEV0 LDEV4 LDEV5 LDEV2 LDEV1
C01602 00461 LDBEND LDBEN1 LDFEND LDFEN2 LDFEN3 LDNPUR LDZPUR
C01605 00462 LDSDPL LDSDP1 LDSDP2 LDSDP3
C01607 00463 LDEOMM LDEOM1 LDTRYI LDLRSP LDRSPT
C01609 00464 LDLIST LDLIS0 LDLIS1 LDLTBL LDLATM LDLLST LDLDLS LDLLS1 LDLLS3 LDOWL LDLHNK LDLEND
C01612 00465 ZZ ZZZ ZZ ZZZ LDFNM2 LDGTW0 LDGTWD LDGTW1 LDGTW9 LDGTW0 LDGTWD LDGTW1 LDGTE1 LDGTWE LDGTW0 LDGTWD LDGTW1 LDGTW6 LDGTW4
C01619 00466 ALCHAN ALCHN0 ALCHN1 ALCH1A ALCHN2 ALCHN3 ALCHN9
C01623 00467 ALFILE UNLKPJ
C01626 00468 AFILEP XFILEP FILEP AFOSP XFOSP
C01628 00469 OFILOK IFILOK ATFLOK ATOFOK ATIFOK TFILOK TIFLOK TOFLOK XIFLOK XOFLOK FILOK NFILE FILOK0 FILOK1 FILNOK
C01631 00470 NML6BT NML6B5 NML6BZ NML6B0 NML6B2 DFNWD DFFNWD NML6FN NML6UF DFNWD DFFNWD NML6FN NML6UF NML6F5 NML6F2 NML6F4 NML6F3 NML6DV NML6D0 NML6PP NML6D1 NML6D8 NML6D7 NML6D4 SARGHT
C01651 00471 IDNTB LIDNTB IDNDLS PPNGET IDND IDNDA IDNDA IDND1 IDND2 IDND3 IDNDS IDNDX
C01656 00472 NAMELIST 6BTNML 6BTNL3 6BTNL4
C01659 00473 SHORTNAMESTRING NAMESTRING 6BTNMS X6BTNSL 6BTNSL 6BTNS 6BNS0A 6BTNS0 6BTNS4 6BTNS5 6BTNS8 6BTNS1 6BTNS2 6BTNS3 6BTNS2 6BNS3A 6BTNS3 6BTNS6 6BNS6A 6BNS7A 6BTNS7 6BNS7B
C01669 00474 NMS NMS.CQ NMS.CA NMS.DV NMS.FN NMS.DT NMS.XT NMS.LB NMS.CM NMS.RB NMS.ND NMS.ST NMS6BF NMS6B0 NMS6BT NMS6B1 NMS6B8 NMS6B6 NMS6B5 NMS6B7 NMS6B9 NMS6B4 NMS6BQ NMS6BL NMS6DV NMS6SN NMS6PD NMS6LB NMS6L1 NMS6CM NMS6RB NMS6R2 NMS6R1 NMS6ST NMS6PP
C01683 00475 NMS6BB NMS6BA NMS6B0 NMS6BT JFN6BT JS%OUT JFN6BC JFN6BX JFN6BU RLJLUZ JFN6BY JFN6ER JFN6BA JFN6BB LFGB20 LFGB10
C01689 00476 IFL6BT FILSFA FIL6BT FIL6B0 FIL6DF FIL6B1 FIL6B2 NMH6BT QIOSAV LQIOSV
C01692 00477 MERGEF MRGF1 DMRGF DMRGF7 ZZZ ZZZ DMRGF5 DMRGF6 TNXUDI TNXUD0 TNXUD3 TNXUD6 TNXUD5 TNXUD2 TNXU9P TNXU9D TNXST9 TNXDIE IMRGF MRGF2 MRGF3 C6BTNML TRUNM9 TRUENAME TRUNMZ TRU6BT TRUNM2 TRUNM8 TRUNM0 SUREAD SUWRITE
C01702 00478 2MERGE PROBEF PROBEZ PROBF0 D10RFN PROBF6 PROBF8 PROBF9
C01708 00479 $RENAMEF RENAM2 RENM2A RENAM3 RENAM1 RENAM0 RENM0A RENM0B RENM1A RENAM7 RENAM8 RENAM4 RENAM5 RNAM5A RENAM4 RENAM5 RENAM6 RENAM9 XCIOL RFNAME CNAMEF CNAME3 CNAME2 CNAME1 CNAMER CNAER1 CNAER2
C01717 00480 $DELETEF $DELNS $DEL6 $DEL3 $DEL7 $DEL5 $DEL4 $DEL5 $DEL9 $DEL9A
C01722 00481 CLOSE0 $CLOSE ICLOSE ICLOS6 CLOSE9 JCLOSE CLOSE4
C01725 00482 FORCE FORSF1 FORCE1 FORCE9 IFORCE IFORC1 FORCE6 IOTTTT SIOT
C01729 00483 SFMD0 SFILEMODE SFMD0A SFMD1
C01733 00484 LOAD LOAD5 LOAD6 LOAD7 LOAD7A LOAD8 LOAD1 ZZ LOAD3 LOAD2 LOAD4 $FASLP FASLP1 FASLP8 FASLP9 FASLP2 FASLP2 INCLUDE .INCLUD INCLU1 INCEOF
C01743 00485
C01748 00486 $OPEN $OPNNS OPEN0J OPEN1A OPEN1C OPN1F1 OPEN1F OPEN1G OPEN1K OPEN1H OPEN1Z
C01752 00487 OPMDS LOPMDS OPBITS
C01754 00488 OPEN1L OPEN1Y OPEN1S OPEN1M OPEN1N OPEN1P OPEN1R OPEN1Q
C01761 00489 OPEN1T
C01764 00490 OPEN3 OPEN3C SOPEN3C OPEN3D OPN3D1 OPEN3E OPEN3F OPEN3M OPEN3N OPEN3D OPEN3E
C01774 00491 OPEN3G OPEN3P OPEN3K OPEN3L OPN3LA OPN3LB OPN3LC OPEN3J OPN3JA OPEN3Q OPEN3H OPEN3V OPEN3Z
C01782 00492 OPNBO1 OPNAO1 OPNBI1 OPNAI1 OPNA6 OPNTI1
C01785 00493 OPNTO1 OPNTO5 OPNTO6
C01789 00494 TTYGET TTYSET SCML CNSGET OPNAT3 OPNAT5 OPEN4
C01791 00495 OPNLZS OPNLZR OPNAND OPNLZ1 OPNALZ OPENLZ OPNLZ0 OPNLZ1 OPNLZ3 OPNLZ2
C01793 00496 OPENUP FILLEN ACCESS RCHST
C01795 00497 OPEN9A OPEN9B OPEN9D
C01798 00498 OPEN9C $EOPEN $EOPN1 $EOPN2 $EOPN3 $EOPN6 $EOPN5 $EOPN7 $EOPN8 $EOPN9 $EOPN4
C01805 00499 DEFAULTF SSCRFILE ENDPAGEFN EOFFN EOFFN0 EOFFNZ EOFFN2 EOFFN5 EOFFNY EOFFN7
C01808 00500 $LISTEN $LSTN3 $LSTNS $LSTN4 $LSTN6 $LSTN5 LISTEN
C01811 00501 LINEL PAGEL CHARPOS LINENUM PAGENUM FLFWNA FLNSFL FLFROB FLFRFL FLFRF1 FLFRB1 FLFB1A FLFRB3 FLFRB5 FLFRB6 FLFRB8 FLFRB7
C01815 00502 $IN $INNOS $INTST $IN2 $IN1 $IN3 INB6 $IN4 $IN5M $IN7 INB4 $IN8 INSIOT IB4
C01823 00503 $OUT $OUTNS $OUT3 $OUT2 $OUT1
C01826 00504 FILEPOS FPOS0E FPOS0B FPOS0C FPOS0D FPOS0 FPOS0A FPOS1 FP1SF1 FPOS1A FPOS1C FPOS2
C01829 00505 FPOS5 FP5SF1 FPOS5A FPOS6 FPOSZ FPOS6C FPOS6B FPOS6A FPOS7 $LENWT $LENGTHF $LENFL
C01837 00506 CNPCHK VAROPT
C01840 00507 CNPCOD CNPCUR CNPCD1 CNPCD2 CNPC9
C01844 00508 CNPOK RCPOS RCPS1 RSTCUR RSTCU3
C01848 00509 CNP.X CNP.B CNP.M CNP.C CNP.T CNP.IL CNP.DL CNP.A CNP.D CNP.F CNP.H CNP.H1 CNP.I CNP.Z CNP.U CNP.V CNPBBL CNPBL CNPL CNPU CNPF CLRSRN
C01852 00510 OPNTTY OPNT0 OPNT1 OPNT1A OPNT2 COPNT2
C01856 00511 CLRIN CLRI3 CLRIN9
C01858 00512 CLROUT CLROSF CLRISF CLRO3 CLRO4 CLRO4 RCPOS1
C01861 00513 TTYMOR TTYMO3 TTYMO1 TTYMO2 TTYMOZ
C01863 00514 STCREA STCREN STMASK STCRE4 STCRE5 STCRE6 STCRE3 STCRE2 SCREBS STCRE1 STKNOT STKNOL STCAL1 STCALL ISTCAL ISTCA0 ISTCSH ISTCA1 ISTCA2 STPRED STSTOR STGET STDISW STDIOB STDIS1 STDIS2 STSYSL STRSLN STGETD STGETU STGPNA STGFUN STGWOM STGWO1 STGWO2 STSTOD STSTOU STSTU1 STSPNA STSFUN STSWO1 STSWOM
C01877 00515
C01878 00516 PIHOLD PINBL STDMSK DBGMSK STDMS2 DBGMS2 INTVEC TTYDF1 TTYDF2 LINTVEC
C01882 00517 DISMSK DISMSK STDMSK STDMSK STDMSK DBGMSK CHNTAB LEVTAB ENBINT ENBIN2 ENBIN1 REAINT DALINT DISINT DSMINT INTSUP $PDLOV INTNXP INTIRD INTMPV INTIWR INTILO INTMER INTASS ASSIN1 ASSRET
C01895 00518 ENBINT REAINT REAIN1 DISINT DALINT INTRPT MAILINT DSMINT INTERR PARINT NXMINT ILMINT SAIMER EYEINT SAIIMS SAIDSP
C01909 00519 ENBINT REAINT REAIN2 REAIN1 DISINT DALINT APRTRP $PDLOV DSMINT UCHINT REETRP REETR1
C01917 00520 INTXIT INTXT2 INTXT9 INTLOS INTLS1 INTLS9 XUINT XUINT9
C01922 00521 MEMERR MPVERR PURERR ILOPER ILOPR1 PARERR MEMER5 MEMER7 MEMER8 UIMPAR UIMILO UIMWRO UIMMPV $XLOST $XLOSE MEMER8 UIMPAR UIMILO UIMWRO UIMMPV IOCERR IOCERA IOCER8 IOCER9
C01930 00522 CHNINT CHNI1H CHNIZ TTYI1 CHNI2
C01936 00523 CHNI4 CHNI4A CHNI5 CHNI8 CHNI4C CHNI4H
C01938 00524 JOBINT TTYICH TTYIC1
C01941 00525 CN.W CN.W0 CN.Z CN.Z0 ALTP CN.Z ALTP CN.Z CKI2I CTRLG CN.X CN.G CN.G1
C01945 00526 REALCLOCK RUNCLOCK RCLOK1 FNYINT FNYIN0 RCLOK2
C01947 00527 CLIINT TTRINT SYSINT MARINT
C01948 00528 YESIN1 UISTK1 UISTK2 TMDAMI TMDAM2 QMARK
C01950 00529 PURPGI PPGI5A PPGI3 PPGI5 PPGI6
C01952 00530 UIMPAR UIMILO UIMWRO UIMMPV UIFCLI UIFMAR UIFTTR UIFSYS NUINT1 NUINT2
C01956 00531 UINT UINTEX UINTX1 UINT2 UINT3 HHCTB UINTPU
C01959 00532 YESINT UINT0 UIXPUSH UISWS UISAVT UIFRM UISAVA
C01964 00533 UINT30 UINT31 UINT32 UINT33 UINT40 UINT0X UINT0N UINT0Z UINT88 EUINT0 UINT45 UINT46 UINT49 UINT90 UINT91
C01969 00534 CKI0 CKI2 CKI2A CKI2F CKI2F1 CKI3 CKI3B RQITR CKI4A CKI1 CKI1A
C01972 00535 UUOH0 UUOH2 UUOH2A UUOACL UUOAJC UUOH0B UUOH0A
C01975 00536 UUOH1 UUOH0C UUOH1A UUOH3B
C01977 00537 UUOTRT UUAT UUST UUFST UULT UUET UUFET UUNAF UUALT UUMCT UUALT1
C01980 00538 UUOBNC UUOBAK UUBKG1 UUOBK7 UUOBK0 UUOBK1 UUOBK8 UUOBK5 UUOBK6
C01982 00539 UUOSBR UUOSB2 UUOSB3 UUOSB5 UUOSB6 UUOSB7 UUOSB4 UUOXT0 UUOXIT UUOXT1 UUOXCT UUOACS
C01985 00540 UUOARR UUOS0 UUOS03 UUOAR2 UUONVL FIX7 UUOS1E UUOS2E UUOE3
C01988 00541 UUOS0E UUOS0F UUOE2 UUOSE1 UUOS1
C01990 00542 UUOX4B UUOLSB UUOLB3 UUOLB4 UUOFUL
C01993 00543 UUOS9 UUOS7 UUOS7A UUOS7H UUOS7K
C01995 00544 UUOS2A UUOS2 UUOS2Q CILIST UUOS1A
C01997 00545 UUOS4 UUF2N UUOS6 UUOS6Q UUOS11
C01999 00546 UUOS3 UUOS4A UUOEX2 UUOS UUOEXP UUOEX4 UUOS10 UUS10A
C02001 00547 UUL2N UUOS5 UUOS5A UUOS5B UUOS5C
C02004 00548 ARGCHK ARGLCK ARGCK1 ARGCK2 ARGCK0 ARGCK4 ARGCK3 ARGCK5 ARGPDL ARGP0 ARGP1 PDLARG PAERR PDLA2
C02006 00549 STRTOUT ERP0E ERP0F ERP0A ERBPLOC ER7PLOC ERP1 ERP5 ERP5A ERP7A ERP7 ERP0D ERP0C ERP3 ERP4 ERP6 ERP6A ENDFUN
C02010 00550 LISP LISP17 LIHAC LISP43
C02015 00551 PPNUSNSET UDIRSET UDRS5 UDRS4 UDRS1 UDRS1A UDRS1B UDRS2 UDIRS6 UDIRS7 UDIRS8 UDRS8A UDIRSX TNXSET TNXST0 TNXST2 TNXST4 TNXST1 D10SET
C02025 00552 JCLSET JCST4 JCST2 JCST5 JCST1 JCST3
C02028 00553 SFXTBL SFXTBI PROTB
C02030 00554 $IWAIT INTSFX SPWIN SPWIN1
C02033 00555 IWLOOK INTXCT
C02035 00556 INTSYP INTSYQ INTSYX INTROT INTPPC INTC2X INTC2Y INTACT INTTYX INTACX INTZAX INTBAK INTBK1 INTOK IWWIN IWSTAK
C02038 00557 PATCH EPATCH NPURPG INUM PFXEST SYMEST LSYALC GSNSYSG GSNSY2 GSNPFXSG KNOB KNOB
C02041 00558 C.. C. PNL F.
C02044 00559 PNL S. B. ZZ A C.
C02047 00560 BLSTIM DEDSAR DBM BSYSAR OBARRAY READTABLE PRDTBL TTYIFA TTYOFA INIIFA ESYSAR
C02051 00561 C. BXVCSG BXVCSG EVCSG SY2ALC TRUTH QUNBOUND SYALC S. ESYMGS
C02053 00562 $$$TRUTH $$$UNBOUND B. INR70 IPPN1 IPPN2 F. EPFXGS BPURFS PWIOINT $$UNBOUND $$NIL VNIL $$TRUTH VT VTRUTH SUNBOUND
C02056 00563 SSSBRL ASBRL SYSBRL SBRL QGRTL IGSBV QLSTF.X PRMCLS BSYSAP QFL.ER ER$AL QFL.HE HE$AL QFL.AL AL$AL QFL.DY DY$AL QFL.LE LE$AL QFL.HM HM$AL QFL.LT LT$AL ESYSAP
C02059 00564 Q%ALD QA%DDD IRATBL IRACOM BNM23A BNM23B BN.1A BNV2A QTLIST QLSPOUT QLSPOUT QUWL QURL LGOR
C02061 00565 QNILSETQ QTSETQ QXSETQ ARQLS $QMLST QSJCL SPCNAMES PURSPCNAMES PDLNAMES
C02063 00566 RDQTEB
C02065 00567 QBIGNUM ITSCSR IPPN1 IPPN2
C02071 00568
C02073 00569
C02077 00570
C02079 00571
C02082 00572
C02083 00573
C02085 00574
C02090 00575
C02092 00576
C02094 00577
C02097 00578 DOLLRP
C02100 00579 PFSLAST ESYSVC LISAR TYIMAN UNTYIMAN UNREADMAN READPMAN FASLP TIRPATE ARGLOC ARGNUM
C02102 00580 BFVCS INFVCS SYMSYL NXXASG NXXZSG BXXASG NXXASG BXXZSG NXXZSG NSY2SG ZZ ZZZ XHINUM XLONUM IN0
C02105 00581 BXXPSG NXXPSG NPURFS FIRSTW QXSET1 NUNMRK PLLISP FEATLS OPSYFT SITEFT FILEFT
C02108 00582 BPROTECT TLF BLF VCTRS QF1SB PA3 GCPSAR RDLARG SUDIR FEATURES LDFNAM LDEVPRO NILPROPS DEOFFN DENDPAGEFN UUSRHNK USENDI UCALLI LPROTECT
C02110 00583 Q. V. IGCMKL OBTFS LFSALC FSALC VBP1 VBPE1 IGCFX1 IGCFX2 LFWSALC FWSALC NIFWAL
C02112 00584 BBIGPRO BN235 BNM235 BNM236 BNV2 BN.1 LBIGPRO BBNSG NBNSG BXXBSG NXXBSG BLSTIM NBITB ZZ BTBLKS BFBTBS NBPSSG NFXPSG NFLPSG NPSG NSPSG NXFXPSG NXFLPSG NXPSG NXSPSG NNXMSG NNXMSG ZZX ZZX SPDLORG PDLORG FLPORG FXPORG ZZX ZZX SPDLORG PDLORG FLPORG FXPORG
C02117 00585 OBTL INITIALIZE
C02120 00586 INIT2A INIT2B INIT2F INIT2P INIT2E INIT2X
C02123 00587 INIBS INIBS1 INIBS2 INIT5
C02126 00588 BZERSG BSYSSG IN10ST IN10S5 IN10S8
C02129 00589 ININTR INIRND BINIT9 BINIT9
C02131 00590 INIT1Z INIT1W INIT1E INIT1A INIT1B INIT1M INIT1J INIT1K INIT1F INIT1G INIT1H INIT1D INIT1C INIT1V INIT1X INIT2A INIT2B INIT7A INIT7B INIT99 INITO1 INITO2 INITO3 INIT1Q INIT1S
C02139 00591 NOTINIT INIBSP INIBD INIBD1 KLINIT KLINI1 KLINI2
C02142 00592 LOPDL LOFXPDL LOSPDL LOFLPDL ALBPS
C02143 00593 XLABEL
C02144 00594 FAKJCL ALLF AINFIL ATYF LICACR ALERR ALLTYO ATYOI ALLECO SAILP4 SAIP1 SAIP2 SAIP3 ALLTYI ATI2 ATI1 ALLTYC ALOIOT
C02148 00595 ALLRUB ALLNUM ALNM2 ALNM27 ALNM3 ALNMOK ALSYER ALNMER ALLNER
C02150 00596 ALNM1 ALNM1A DECDIG DDIG1
C02152 00597 ALOFIL ALOINI ALOFL2 ALOJCL ALOIN1 ALOFL4 ALOFL1 ALOFL5 ALOFL6 ALFDEF
C02155 00598 ALLFIL ALLFL1 ALLFL2 ALCLUZ ALCLZ1 ALLTTS ALHELP
C02158 00599 ALFLER ALCERR ALFL6 ALFL6A ALF6A0
C02160 00600 %ALLOC ALFDE1 ALJ1 ALJ1A ALJ1A1 ALJ1A2 ALJ1B ALJ1B1 ALJ1B2 ALJ2 ALJ2Q ALJ2A ALJ2A1 ALJ3 E.ALJO ALJ1 ALJ1A ALJ1A1 ALJ1A2 ALPPN1 ALJ1A3 ALJ1B ALJ1B2 ALJ2 ALJ2Q HAFPPN HAFPP1 ALJ3 ALLCB1 ALLOCB
C02172 00601 ALLOCA ALLOC1
C02174 00602 ALCORX ALCORE ALCORX ALCORE ALLOCC
C02176 00603 ALLCZX
C02178 00604 ALLCPD
C02180 00605 ALLCPD ALCPD1 SYMMV6 ALQX1 ALSGHK ALQX2
C02185 00606 ALLDONE SYMMOV SYMMV1 LPROGS
C02186 00607 INIIF1 INIIF2 FI.EOF FI.BBC FI.BBF F.MODE F.CHAN F.FLEN F.FPOS F.DEV F.RDEV F.DEV F.DIR F.FNM F.EXT F.VRS AT.CHS AT.LNN AT.PGN LONBFA FB.BYT FB.BFL FB.BVC FB.IBP FB.BP FB.CNT FB.HED FB.NBF FB.BWS FB.BUF LINIFA EINIFA ENDLISP ENDHI
C02192 ENDMK
C⊗;
;.MLLIT ITS TOPS10 TOPS20 SAIL TENEX CMU ML BIGNUM OBTSIZ PTCSIZ NEWRD JOBQIO HNKLOG SFA NIOBFS USELESS DBFLAG CXFLAG NARITH
;;; -*-MIDAS-*-
;;; **************************************************************
;;; ***** MACLISP ****** LISP INTERPRETER AND SYSTEM *************
;;; **************************************************************
;;; ** (C) COPYRIGHT 1980 MASSACHUSETTS INSTITUTE OF TECHNOLOGY **
;;; ****** THIS IS A READ-ONLY FILE! (ALL WRITES RESERVED) *******
;;; **************************************************************
.SYMTAB 16001. ;ENSURE ROOM FOR MANY SYMBOLS
TITLE ***** MACLISP ****** LISP INTERPRETER AND SYSTEM *************
.NSTGWD ;NO STORAGE WORDS PLEASE UNTIL FIRSTLOC
.XCREF A,B,C,AR1,AR2A,T,TT,D,R,F,P,FXP,%
.MLLIT==1
SUBTTL ASSEMBLY PARAMETERS
IF1,[ ;***** CONDITIONAL ASSEMBLY FLAGS AND PARAMETERS *****
;" FOR ASSLIS - DO NOT PUT ANY OTHER DOUBLE QUOTES ON THIS PAGE
ITS==0 ;1 FOR RUNNING UNDER THE ITS MONITOR
TOPS10==0 ;1 FOR RUNNING UNDER DEC TOPS-10 MONITOR
TOPS20==0 ;1 FOR RUNNING UNDER DEC TOPS-20 MONITOR
SAIL==0 ;1 FOR RUNNING UNDER SAIL MONITOR
TENEX==0 ;1 FOR RUNNING UNDER THE TENEX MONITOR
CMU==0 ;1 FOR RUNNING UNDER THE CMU MONITOR
;LATER WE WILL DEFINE D10==TOPS10\SAIL\CMU AND D20==TENEX\TOPS20
ML==0 ;1 SAYS THIS LISP IS FOR ML (OR MC) INSTEAD OF AI (ONLY IF ITS==1)
BIGNUM==1 ;MULTIPLE PRECISION ROUTINES FLAG
OBTSIZ==777 ;LENGTH OF OBLIST
PTCSIZ==40 ;MINIMUM SIZE FOR PATCH AREA
NEWRD==0 ;NEW READER FORMAT ETC
JOBQIO==1 ;SUPPORT FOR INFERIOR PROCEDURES
HNKLOG==9 ;LOG2 OF SIZE (IN WORDS) OF LARGEST HUNK (0 => NO HUNKS)
SFA==1 ;1 FOR SFA I/O
NIOBFS==1 ;NUMBER OF I/O BUFFERS FOR D10 SYSTEMS
USELESS==1 ;NOT PARTICULARLY IMPORTANT FEATURES, LIKE:
; 1) ROMAN NUMERAL READER AND PRINTER
; 2) PRINLEVEL AND PRINLENGTH
; 3) DOUBLE-PRECISION INPUT OF SINGLE-PRECISION FLONUMS
; 4) CURSORPOS
; 5) GCD
; 6) DUMPARRAYS, LOADARRAYS [AUTOLOADED IN NEWIO]
; 7) RECLAIM, AND RETSP FEATURE WHICH RETURNS BPS CORE TO TS SYSTEM
; 8) PURIFY, AND PURE-INITIAL-READ-TABLE
; 9) CLI INTERRUPT SUPPORT
; 10) MAR-BREAK SUPPORT
; 11) AUTOLOAD PROPERTIES FOR ALLFILES ETC.
; 13) CLEVER TERPRI-BEFORE-THE-PARENS HACK
; 14) HUGE TABLE FOR RANDOM NUMBER GENERATOR
; 15) Exchange A and CONSed hunk for REES and RWK
DBFLAG==0 ;1 FOR DOUBLE-PRECISION FLOATING-POINT NUMBERS
CXFLAG==0 ;1 FOR COMPLEX ARITHMETIC
;; IF EITHER THE DBFLAG OR CXFLAG ARE SET, THE THE FLAGS KA, KI, AND KL MUST BE
;; SET. OR ELSE, MAYBE, GO THRU AND REMOVE THEIR USAGE. JONL - 10/16/80
NARITH==0 ;1 FOR NEW ARITHMETIC PACKAGE
;" FOR ASSLIS - DOUBLE QUOTES ARE OKAY NOW
;
;;; IF1
SUBTTL STORAGE LAYOUTS
;;; STORAGE LAYOUT FOR ITS
;;;
;;; BZERSG 0 - - LOW PAGES
;;; ACCUMULATORS, TEMPORARY VARIABLES,
;;; INITIAL READTABLE AND OBARRAY
;;; BSTSG ST: - - SEGMENT TABLES
;;; BSYSSG FIRSTL: INITIAL SYSTEM CODE (PURE)
;;; BSARSG INITIAL SAR SPACE
;;; BVCSG INITIAL VALUE CELL SPACE
;;; BXVCSG [EXTRA VALUE-CELL SEGMENTS - - POSSIBLY NONE]
;;; BIS2SG SYMBOL-BLOCKS
;;; BSYMSG SYMBOL-HEADERS
;;; BSY2SG **SYMBOL-BLOCKS
;;; BPFXSG **FIXNUMS
;;; BPFSSG **LIST-STRUCTURE
;;; BPFLSG [**FLONUMS - - POSSIBLY NONE]
;;; BIFSSG LIST-STRUCTURE
;;; BIFXSG FIXNUMS
;;; BIFLSG FLONUMS
;;; BBNSG BIGNUMS
;;; BBITSG BIT BLOCKS FOR GC
;;; BBPSSG START OF BINARY PROGRAM SPACE
;;; C(BPSL) (ALLOC IS IN THIS AREA)
;;; V(BPORG) START OF BPS UNUSED FOR PROGRAMS
;;; V(BPEND) ARRAYS START NO LOWER THAN THIS
;;; C(BPSH) LAST WORD OF BPS
;;; ... BINARY PROGRAM SPACE GROWS UPWARD ...
;;; C(HINXM) LAST WORD OF GROSS HOLE IN MEMORY
;;; ... LIST STRUCTURE GROWS DOWNWARD ...
;;; PUSHDOWN LISTS WITH HOLES BETWEEN:
;;; FXP, FLP, P, SP
;;;
;;; C(NPDLL) LOW WORD OF NUMBER PDL (LOW OF FXP)
;;; C(NPDLH) HIGH WORD OF NUMBER PDL + 1 (HIGH+1 OF FLP)
;;;
;;; STORAGE LAYOUT FOR DEC10
;;;
;;; ***** LOW SEGMENT *****
;;; BZERSG 0 - - LOW PAGES
;;; ACCUMULATORS, TEMPORARY VARIABLES,
;;; INITIAL READTABLE AND OBARRAY
;;; BSTSG ST: - - SEGMENT TABLES
;;; BSARSG INITIAL SAR SPACE
;;; BVCSG INITIAL VALUE CELL SPACE
;;; BXVCSG [EXTRA VALUE-CELL SEGMENTS - - POSSIBLY NONE]
;;; BIS2SG SYMBOL-BLOCKS
;;; BSYMSG SYMBOL-HEADERS
;;; BIFSSG LIST-STRUCTURE
;;; BIFXSG FIXNUMS
;;; BIFLSG FLONUMS
;;; BBNSG BIGNUMS
;;; BBITSG BIT BLOCKS FOR GC
;;; PUSHDOWN LISTS:
;;; FXP, FLP, P, SP
;;; C(NPDLL) LOW WORD OF NUMBER PDL (LOW OF FXP)
;;; C(NPDLH) HIGH WORD OF NUMBER PDL + 1 (HIGH+1 OF FLP)
;;; BBPSSG START OF BINARY PROGRAM SPACE
;;; (ALLOC IS IN THIS AREA)
;;; V(BPORG) START OF BPS UNUSED FOR PROGRAMS
;;; V(BPEND) ARRAYS START NO LOWER THAN THIS
;;; C(BPSH) LAST WORD OF BPS (FIXED, SET BY ALLOC)
;;; C(HIXM) HIGH WORD OF EXISTING MEMORY
;;; C(MAXNXM) HIGHEST WORD OF NXM THAT MAY BE USED
;;;
;;; ***** HIGH SEGMENT *****
;;; BSYSSG INITIAL SYSTEM CODE (PURE)
;;; BSY2SG **SYMBOL-BLOCKS
;;; BPFXSG **FIXNUMS
;;; BPFSSG **LIST-STRUCTURE
;;; BPFLSG [**FLONUMS - - POSSIBLY NONE]
;;; BPFSSG INITIAL PURE LIST STRUCTURE
;LVRNO LVRNO ZZZ ZZZ DEFAULT
;;; IF1
SUBTTL VARIOUS PARAMETER CALCULATIONS
IFNDEF LVRNO,LVRNO==.FNAM2
IFE LVRNO-SIXBIT \MID\,[
PRINTX /What is LISP's version number (type four octal digits) ?/
.TTYMAC VRS
LVRNO=SIXBIT \VRS\
TERMIN
]
.ELSE,[
LVRNO==<LVRNO←-6>+<SIXBIT \1\> ;HACK FOR CROSSING 1000'S
IFN <<LVRNO←-30>&77>-'9, LVRNO==LVRNO+<1←36> ;HACK FOR CROSSING 2000'S
;;; REMEMBER! SOMEDAY WE MAY HAVE TO CROSS TO 3000'S - JONL, 9 JUL 1980
] ;END OF IFGE LVRNO
PRINTX \MACLISP VERSION \ ;PRINT OUT VERSION OF THIS LISP
.TYO6 .OFNM2
PRINTX \ [\ ;WATCH OUT FOR THE BRACKETS!
.TYO6 LVRNO
PRINTX \] ASSEMBLED ON \
.TYO6 .OSMIDAS
PRINTX \ AT \
IFE <.SITE 0>, PRINTX \UNKNOWN SITE\
.ELSE REPEAT 20, IFE <.SITE .RPCNT>,[.ISTOP] .TYO6 <.SITE .RPCNT>
PRINTX \
\ ;TERPRI TO FINISH VERSION MESSAGE
;;; HACK FLAGS AND PARAMETERS
DEFINE ZZZZZZ X,SYM,VAL
IFSE [X]-, PRINTX \* \
.ELSE PRINTX \ \
PRINTX \SYM=VAL
\
TERMIN
PRINTX \INITIAL SWITCH VALUES (*=EXPERIMENTAL):
\
;X=- => EXPERIMENTAL SWITCH
IRPS S,X,[ITS,TOPS10,TOPS20,SAIL,TENEX-CMU-
ML,BIGNUM,OBTSIZ,JOBQIO,HNKLOG,USELESS,
DBFLAG-CXFLAG-NARITH-SFA-]
ZZZZZZ [X]S,\S
TERMIN
EXPUNGE ZZZZZZ
PRINTC \REDEFINITIONS:
\
.INSRT TTY:
PRINTC \
\
IFNDEF HSGORG,HSGORG==400000
;;; ALL FLAGS WHICH ARE NON-ZERO MUST BE ONES: MUCH CONDITIONAL
;;; ASSEMBLY DOES ARITHMETIC WITH THEM.
IRP FOO,,[ITS,TOPS10,TOPS20,SAIL,TENEX,CMU
ML,BIGNUM,NEWRD,JOBQIO,USELESS
DBFLAG,CXFLAG,NARITH,SFA]
IFN FOO, FOO==:1
.ELSE FOO==:0
TERMIN ;USE OF ==: PREVENTS CHANGING THEM RANDOMLY
;;; CHECK MUTUALLY EXCLUSIVE FLAGS OF WHICH ONE MUST BE SET
DEFINE MUTXOR FLAGS,DEFAULT
ZZZ==0
IRP X,Y,[FLAGS]
ZZZ==ZZZ+X
IRP Z,,[Y]
IFN X*Z, .FATAL BOTH X AND Z SPECIFIED AMONG {FLAGS~
TERMIN
TERMIN
IFE ZZZ,[
PRINTX \NONE OF {FLAGS~ SPECIFIED - ASSUMING DEFAULT==:1
\
EXPUNGE DEFAULT
DEFAULT==:1
] ;END OF IFE ZZZ
EXPUNGE ZZZ
TERMIN
IRP OS,,[ITS,DEC,SAIL,TENEX,CMU]FLAG,,[ITS,TOPS10,SAIL,TENEX,CMU]
IFE .OSMIDAS-<SIXBIT \OS\>, MUTXOR [ITS,TOPS10,TOPS20,SAIL,TENEX,CMU]OS
TERMIN
;D10 D20 ZZZ SEGLOG OBTSIZ DXFLAG
;;; IF1
D10==:TOPS10\SAIL\CMU ;SWITCH FOR DEC-10-LIKE SYSTEMS
D20==:TOPS20\TENEX ;SWITCH FOR DEC-20-LIKE SYSTEMS
IFNDEF PAGING, PAGING==:D20\ITS ;SWITCH FOR PAGING SYSTEMS
IFNDEF HISEGMENT, HISEGMENT==:D10*<1-PAGING> ;ASSUME HISEGMENT FOR DEC-10
;;; INSIST FORCIBLY ALTERS A PARAMETER IF NECESSARY.
DEFINE INSIST COND,SET
COND,[
IRPS X,,[SET]
ZZZ==X
EXPUNGE X
SET
IFN X-ZZZ,[
PRINTX \ COND =>SET
\
]
EXPUNGE ZZZ
.ISTOP
TERMIN
] ;END OF COND
TERMIN
;;; CANONICALIZE BITS
INSIST IFE ITS, JOBQIO==:0
INSIST IFG SAIL*<6-NIOBFS>, NIOBFS==:6
SEGLOG==:11 ;LOG2 OF # OF WORDS PER SEGMENT (WARNING! BUILT INTO NCOMPLR!)
INSIST IFG HNKLOG-SEGLOG, HNKLOG==:SEGLOG-1
OBTSIZ==:OBTSIZ\1 ;MUST BE ODD
DXFLAG==:DBFLAG*CXFLAG
;GETTAB
;;; IF1
IFE .OSMIDAS-<SIXBIT \ITS\>,[
DEFINE $INSRT $%$%$%
.INSRT $%$%$% >
PRINTX \ ==> INSERTED: \
.TYO6 .IFNM1
PRINTX \ \
.TYO6 .IFNM2
PRINTX \
\
TERMIN
] ;END OF IFE .OSMIDAS-<SIXBIT \ITS\>,
.ELSE,[
DEFINE $INSRT $%$%$%
.INSRT $%$%$%!.MID
PRINTX \INSERTED: \
.TYO6 .IFNM1
PRINTX \.\
.TYO6 .IFNM2
PRINTX \
\
TERMIN
] ;END OF .ELSE
;;; MAKE SURE THE SYMBOLS WE WILL NEED ARE DEFINED.
;;; THEY MAY NOT BE IF ASSEMBLING FOR A DIFFERENT OPERATING SYSTEM
DEFINE FLUSHER DEF/
IRPS SYM,,[DEF]
EXPUNGE SYM
.ISTOP
TERMIN
TERMIN
DEFINE SYMFLS TARGETSYS,OS,.DEFS.,DEFFER,CHKSYM,.BITS.,CHKBIT
IFE <.OSMIDAS-SIXBIT\OS\>,[
IFE TARGETSYS,[
PRINTX \FLUSHING OS SYMBOL DEFINITIONS
\
$INSRT .DEFS.
DEFFER FLUSHER
IFSN .BITS.,,[
PRINTX \FLUSHING OS BIT DEFINITIONS
\
EQUALS DEFSYM,FLUSHER
$INSRT .BITS.
EXPUNGE DEFSYM
] ;END OF IFSN .BITS.
] ;END OF IFE TARGETSYS
] ;END OF IFE <.OSMIDAS-SIXBIT\OS\>
TERMIN
DEFINE SYMDEF TARGETSYS,OS,.DEFS.,DEFFER,CHKSYM,.BITS.,CHKBIT
IFN TARGETSYS,[
IFN <.OSMIDAS-SIXBIT\OS\>,[
PRINTX \MAKING OS SYMBOL DEFINITIONS
\
$INSRT .DEFS.
DEFFER
IFSN .BITS.,,[
PRINTX \MAKING OS BIT DEFINITIONS
\
$INSRT .BITS.
] ;END OF IFSN .BITS.,,
] ;END OF IFN <.OSMIDAS-SIXBIT\OS\>
.ELSE,[
IFNDEF CHKSYM,[
PRINTX \FUNNY - RUNNING ON OS, BUT CHKSYM UNDEFINED; MAKING OS SYMBOL DEFINITIONS
\
$INSRT .DEFS.
DEFFER
] ;END OF IFNDEF CHKSYM
IFSN .BITS.,,[
IFNDEF CHKBIT,[
PRINTX \FUNNY - RUNNING ON OS, BUT CHKBIT UNDEFINED; MAKING OS BIT DEFINITIONS
\
$INSRT .BITS.
] ;END OF IFNDEF CHKBIT
] ;END OF IFSN .BITS.,,
] ;END OF .ELSE
] ;END OF IFN TARGETSYS
TERMIN
IFN D20, EXPUNGE RESET
IRP HACK,,[SYMFLS,SYMDEF]
HACK ITS,ITS,ITSDFS,.ITSDF,.IOT,ITSBTS,%PIC.Z
HACK TOPS10,DEC,DECDFS,.DECDF,LOOKUP,DECBTS,.GTSTS
HACK TOPS20,TENEX,TNXDFS,.TNXDF,JSYS,TWXBTS,GJ%FOU
HACK TENEX,TENEX,TNXDFS,.TNXDF,JSYS,TWXBTS,GJ%FOU
HACK SAIL,SAIL,SAIDFS,.DECDF,SPCWAR,DECBTS,.GTSTS
TERMIN
;;; CONFLICTS WITH UNLOCKI MACRO AND SEGSIZ VARIABLE
IFN D10,[
IFE SAIL,[
IFN <.OSMIDAS-SIXBIT\CMU\>,[
;THE FOLLOWING ARE THE SPECIAL CMU UUOs:
DEFINE .CMUCL DEF
DEF SRUN=:47000777756
DEF USRDEF=:47000777757
DEF JENAPX=:47000777760
DEF IMPUUO=:47000777761
DEF PRIOR=:47000777762
DEF LNKRDY=:47000777763
DEF INT11=:47000777764
DEF RSTUUO=:47000777765
DEF UNTIME=:47000777766
DEF TIME=:47000777767
DEF STOP=:47000777770
DEF UNLOCK=:47000777771
DEF JENAPR=:47000777772
DEF MSGPOL=:47000777773
DEF MSGSND=:47000777774
DEF DECCMU=:47000777775
DEF CMUDEC=:47000777776
TERMIN
PRINTX \MAKING CMU-SPECIFIC "CALL" DEFINITIONS
\
.CMUCL FLUSHER
.CMUCL
] ;END OF IFN <.OSMIDAS-SIXBIT\CMU\>
] ;END OF IFE SAIL
IFN SAIL, EXPUNGE SEGSIZ
EXPUNGE UNLOCK
] ;END OF IFN D10
COMMENT | MAKE @ PROGRAM UNDERSTAND POTENTIAL FILE INSERTIONS
;TABS IN FRONT OF $INSRT'S ARE NECESSARY TO FAKE OUT UNIFY PROGRAM
$INSRT ITSDFS
$INSRT DECDFS
$INSRT TNXDFS
$INSRT SAIDFS
$INSRT ITSBTS
$INSRT DECBTS
$INSRT TWXBTS
| ;END OF COMMENT
IFN D10,[
DEFINE HALT
JRST 4,.!TERMIN
EXPUNGE .VALUE
EQUALS .VALUE HALT
DEFINE .LOSE <A>
JRST 4,.-1!TERMIN
] ;END OF IFN D10
IFN D20,[
GETTAB==:47←33 41
DEFINE HALT
HALTF!TERMIN
EXPUNGE .VALUE
EQUALS .VALUE HALTF
DEFINE .LOSE <A>
HALTF!TERMIN
] ;END OF IFN D20
;
;;; IF1
;;; CALL IS A DEC UUO, BUT WE USE THAT NAME FOR A LISP UUO
EXPUNGE CALL
;;; DON'T HACK THIS $INSRT - UNIFY DEPENDS ON IT
;;@ DEFNS 228 STANDARD AC, UUO, AND MACRO DEFINITIONS
;;; ***** MACLISP ****** STANDARD AC, UUO, AND MACRO DEFINITIONS *
;;; **************************************************************
;;; ** (C) COPYRIGHT 1980 MASSACHUSETTS INSTITUTE OF TECHNOLOGY **
;;; ****** THIS IS A READ-ONLY FILE! (ALL WRITES RESERVED) *******
;;; **************************************************************
;;; THIS FILE CONTAINS:
;;; STANDARD SYMBOLIC ACCUMULATOR DEFINITIONS.
;;; UUO DEFINITIONS:
;;; ERROR CALLS AND STRING TYPEOUT.
;;; COMPILED CODE TO INTERPRETER INTERFACES.
;;; VARIOUS UUOS USEFUL FROM DDT.
;;; .GLOBAL DECLARATIONS.
;;; .FORMAT DECLARATIONS.
;;; TYPE BIT DEFINITIONS FOR USE WITH SEGMENT TABLE
;;; MACROS FOR CONDITIONALIZING SINGLE LINES OF CODE.
;;; GENERAL MACRO DEFINITIONS [THAT ANY LOSER MIGHT WANT].
;;; SYMBOL BLOCK-STRUCTURE DEFINITIONS
;;; SYMBOLIC NAMES RELATED TO ARRAYS.
;;; SYMBOLIC NAMES RELATED TO FILES.
;;; THE DEFINITIONS FOR MACLISP CONTAINED HEREIN
;;; ARE RELATIVELY STABLE. THIS FILE MAY BE .INSRT'D BY MIDAS
;;; FILES ASSEMBLED IN .FASL MODE TO DEFINE THESE THINGS.
;;; THE .GLOBAL DECLARATIONS IN PARTICULAR ARE FOR THE
;;; BENEFIT OF THESE .FASL FILES.
;;; IT IS A GOOD IDEA FOR .FASL FILES TO USE THE FASEND MACRO
;;; IN PLACE OF THE USUAL END STATEMENT.
;;; SYMBOLS FOR COMPILED CODE
IFNDEF ITS, ITS==:1
IFNDEF TOPS10, TOPS10==:0
IFNDEF TOPS20, TOPS20==:0
IFNDEF SAIL, SAIL==:0
IFNDEF TENEX, TENEX==:0
IFNDEF CMU, CMU==:0
IFNDEF D10, D10==:TOPS10\SAIL\CMU
IFNDEF D20, D20==:TOPS20\TENEX
IFNDEF PAGING, PAGING==:ITS\D20
IFNDEF BIGNUM, BIGNUM==:1
IFNDEF JOBQIO, JOBQIO==:1
IFNDEF SFA, SFA==:1
;NIL A B C AR1 AR2A NACS T TT D R F FREEAC P FLP FXP SP
SUBTTL ACCUMULATOR USAGE
NIL=:0 ;ATOM HEADER FOR NIL
A=:1 ;ARG 1; VALUE; MARKED FROM BY GC
B=:2 ;ARG 2; MARKED FROM BY GC
C=:3 ;ARG 3; MARKED FROM BY GC
AR1=:4 ;ARG 4; MARKED FROM BY GC
AR2A=:5 ;ARG 5; MARKED FROM BY GC
NACS==:5 ;NUMBER OF ACS MARKED FROM BY GC - NO OTHER ACS MARKED
T=:6 ;-<NO. OF ARGS> FOR LSUBR CALL; ALSO USED FOR JSP T,
TT=:7 ;TEMP; OFTEN USED FOR ARGS TO INTERNAL ROUTINES
D=:10 ;SOMEWHAT LESS TEMPORARY THAN TT
R=:11 ;DITTO; SOMETIMES USED FOR JSP R,
F=:12 ;SOMEWHAT LESS TEMPORARY THAN D AND R
FREEAC=:13 ;UNUSED BY LISP, EXCEPT SAVED-USED-RESTORED BY GC
P=:14 ;SUBROUTINE AND SYSTEM PDL POINTER ("REGULAR PDL")
FLP=:15 ;FLONUM PDL POINTER ("FLOPDL")
FXP=:16 ;FIXNUM PDL POINTER ("FIXPDL")
SP=:17 ;LAMBDA-BINDINGS PDL POINTER ("SPECIAL PDL")
;;; PDL POINTERS ARE ALWAYS KEPT IN ACS. PDL POINTERS ARE NOT
;;; MARKED FROM, BUT PDL DATA ON REGULAR AND SPECIAL PDLS ARE
;;; PROTECTED FROM GARBAGE COLLECTION.
;;; FLP IS NOT USED BY LISP, EXCEPT AT LDATFL AND ERRIOJ,
;;; BUT PRIMARILY BY COMPILED NUMERICAL CODE.
;;; DO NOT DO RANDOM PUSH/POPS ON SP - USE BIND AND UNBIND ROUTINES.
;LERR ACALL AJCALL LER3 ERINT PP STRT SERINT TP IOJRST STRT7 UUOMAX CALL JCALL CALLF JCALLF NCALL NJCALL NCALLF NJCALF NUUOCLS NERINT NERINT
SUBTTL DEFINITIONS OF UUO'S
;;; NOTE: LERR < LER3 < ERINT < SERINT -- SEE ERRFRAME.
LERR=:1←33 ;LISP ERROR; AC FIELD=0 => MSG IS SIXBIT, ELSE S-EXP
ACALL=:2←33 ;KLUDGY FAST UUO FOR NCALLS TO ARRAYS
AJCALL=:3←33 ;AJCALL:ACALL :: JCALL:CALL
LER3=:4←33 ;EPRINT, THEN LERR
ERINT=:5←33 ;A CORRECTABLE ERROR
PP=:6←33 ;SEXP TYPE OUT FROM DDT
STRT=:7←33 ;STRING TYPEOUT (sixbit format - stops on unquoted "!")
SERINT=:10←33 ;LIKE ERINT, BUT S-EXPRESSION MESSAGE.
TP=:11←33 ;PRINTS ST ENTRY FOR A GIVEN LOCATION
IOJRST=:12←33 ;JRST TO ADR AFTER PUTTING I/O ERROR MSG IN C
STRT7=:13←33 ;STRING TYPEOUT (ascii format - stops on 0 byte)
UUOMAX==:13 ;NO OF ERROR-TYPE UUO'S
CALL=:14←33 ;BASIC CALL FROM COMPILED CODE TO INTERFACE TO INTERPRETER
JCALL=:CALL+1←33 ;4.1 BIT ON MEANS JRST TO FUNCTION RATHER THAN PUSHJ
CALLF=:CALL+2←33 ;4.2 BIT ON MEANS NEVER CONVERT UUO INTO PUSHJ [OR JRST]
JCALLF=:CALL+3←33
NCALL=:20←33 ;4.5 BIT MEANS NUMBER FUNCTION CALL
NJCALL=:NCALL+1←33
NCALLF=:NCALL+2←33
NJCALF=:NCALL+3←33
NUUOCLS==:NJCALF←-33-CALL←-33
;;; SPECIAL INTERPRETATION OF STRT AC FIELD:
;;; AC FIELD OUTPUT TO
;;; 0 OUTFILES IF ^R SET; TTY IF ^W SET
;;; 17 MSGFILES
;;; X FILE(S) IN ACCUMULATOR X
;;; ERINT AND SERINT ARE DECODED BY THEIR ACCUMULATOR FIELDS.
;;; HERE ARE SOME SYMBOLS FOR REFERENCING THEM.
NERINT==0
IRPS X,,[UDF,UBV,WTA,UGT,WNA,GCL,FAC,IOL]
%!X=:ERINT .IRPCNT,
%%!X=:SERINT .IRPCNT,
DEFINE X CRUFT
%!X [SIXBIT ≤CRUFT≤]
TERMIN
NERINT==NERINT+1
TERMIN
;;; SHORT FORM ATOM WHAT IS IT?
;;;
;;; 0) UDF UNDEF-FNCTN UNDEFINED FUNCTION (FUNCTION IN A)
;;; 1) UBV UNBND-VRBL UNBOUND VARIABLE BEING EVAL'ED (ATOM IN A)
;;; 2) WTA WRNG-TYPE-ARGS WRONG TYPE OF ARGUMENTS FOR A FUNCTION (ARG IN A)
;;; 3) UGT UNSEEN-GO-TAG GO TO A TAG THAT'S NOT THERE (TAG IN A)
;;; 4) WNA WRNG-NO-ARGS WRONG NUMBER OF ARGS TO A FUNCTION (FORM IN A)
;;; 5) GCL GC-LOSSAGE GC LOST (A = NAME OF SPACE: LIST...)
;;; 6) FAC FAIL-ACT RANDOM LOSSAGE (ARG IS UP TO CALLER)
;;; 7) IOL IO-LOSSAGE ;I/O LOSSAGE
;
SUBTTL TABLE OF GLOBAL SYMBOLS USED BY COMPILED FUNCTIONS
;;; THE RELATIVE POSITIONS OF THESE SYMBOLS GET BUILT INTO FASL FILES,
;;; SO BE VERY CAREFUL ABOUT DISTURBING THE ORDER OF EXISTING SYMBOLS!
;;; GLBSYM AND SIXSYM MUST ALWAYS HAVE CORRESPONDING ENTRIES.
DEFINE GLBSYM B
IRP A,,[.SET,.MAP,PRINTA,SPECBIND,UNBIND,IOGBND,.LCALL
.UDT,ARGLOC,INUM,ST,FXNV1,PDLNMK,PDLNKJ,FIX1A
FIX1,FLOAT1,IFIX,IFLOAT,FXCONS,FLCONS,ERSETUP,ERUNDO
GOBRK,CARCDR,.STORE,NPUSH,PA3,QUNBOUND,FLTSKP,FXNV2
FXNV3,FXNV4,FIX2,FLOAT2,AREGET]
B
TERMIN
IRP A,,[%HUNK1,%HUNK2,INTREL,INHIBIT,NOQUIT,CHECKI,0PUSH,0.0PUSH,NILPROPS,VBIND
%CXR,%RPX,%CONS,%NCONS,%XCONS,%C2NS,%HUNK3,%HUNK4,%PDLC,%PDLXC,%PDLNC
PTNTRY,PTEXIT,SFCALI,UNWPUS]
B
TERMIN
TERMIN
DEFINE SIXSYM B ;SIXBIT NAMES -- MUST MATCH GLBSYM
IRP A,,[*SET,*MAP,PRINTA,SPECBIND,UNBIND,IOGBND,*LCALL
*UDT,ARGLOC,INUM,NUMVAL,FXNV1,PDLNMK,PDLNKJ,FIX1A
FIX1,FLOAT1,IFIX,IFLOAT,FXCONS,FLCONS,ERSETUP,ERUNDO
GOBRK,CARCDR,*STORE,NPUSH,PA3,MAKUNBOUND,FLTSKP,FXNV2
FXNV3,FXNV4,FIX2,FLOAT2,AREGET]
B
TERMIN
IRP A,,[%HUNK1,%HUNK2,INTREL,INHIBIT,NOQUIT,CHECKI,0PUSH,0*0PUSH,NILPROPS,VBIND
%CXR,%RPX,%CONS,%NCONS,%XCONS,%C2NS,%HUNK3,%HUNK4,%PDLC,%PDLXC,%PDLNC
PTNTRY,PTEXIT,SFCALI,UNWPUS]
B
TERMIN
TERMIN
;;; ADDITIONAL SYMBOLS FOR LAP AND .FASL HACKERS.
;;; THE ORDER OF THESE IS NOT CRITICAL.
DEFINE XTRSYM B
IRP A,,[CPOPJ,CCPOPJ,POPAJ,POP1J,CINTREL,LWNACK,SIXMAK,SQUEEZE,MKFXAR,FWCONS
SACONS,CFIX1,1DIMF,2DIMF,SEGLOG,R70,ARGLOC,ARGNUM,TTSAR,Q..MIS,MAKVC,SUNBOUND
IN0,TYIMAN,READ6C,READ0A,GCMKL,DEDSAR,BRGEN,RINTERN,LPNF,PNBUF
ALFILE,ALCHAN,XFILEP,FIL6BT,6BTNML,SIXATM,CHNTB,%HNK4R,GRBPSG,HNKLOG,IAPPLY]
B
TERMIN
IFN PAGING,[
IRP A,,[FLSTBL]
TERMIN
] ;END of IFN PAGING
IFN ITS,[
IRP A,,[GETCOR,IOCINS,J.STADR,J.CRUFT]
B
TERMIN
] ;END OF IFN ITS
IFN D10,[
IRP A,,[PPNATM,CMUP]
B
TERMIN
] ;END OF IFN D10
IFN D20,[
IRP A,,[TENEXP]
B
TERMIN
] ;END OF IFN D20
IFN BIGNUM,[
IRP A,,[BNCONS,NVSKIP]
B
TERMIN
] ;END OF IFN BIGNUM
IFN JOBQIO,[
IRP A,,[JOBTB,LOJOBA]
B
TERMIN
] ;END OF IFN JOBQIO
IFN SFA,[
IRP A,,[AFOSP,XFOSP]
B
TERMIN
] ;END IFN SFA
TERMIN
GLBSYM [.GLOBAL A]
XTRSYM [.GLOBAL A]
;%SY %SYHKL %SYKIL %SYLCL %SYGBL BYTSWD
SUBTTL SYMBOLS FOR NUMBER-OF-ARGS CHECKING, AND .FORMAT
;;; SYMBOLS TO BE USED WITH FWNACK AND LWNACK.
;;; ORDINARILY ONE WRITES
;;; JSP TT,FWNACK
;;; FAXXX,,QZZZZZ
;;; IN EACH SYMBOL, THE 3.1 BIT (THESE ARE LEFT-HALF SYMBOLS)
;;; MEANS FSUBR. THE 3.2 BIT MEANS 0 ARGS IS OKAY; 3.3, 1 ARG;
;;; 3.4, 2 ARGS; ... ; 4.8, 15. ARGS; 4.9, > 15. ARGS.
;;; ITEMS IN THIS IRP MUST HAVE FIRST FOUR CHARS UNIQUE!!!
;;; IF YOU ADD STUFF HERE, ALSO FIX UP FASEND.
.SEE FASEND
IRP X,,[02,1N,12,23,2N,0,1,2,4,01,012,01234,0234,3456,1234567
13456,234,345,234567,76543,45]
LA!X==0
IRPC Q,,[X]
IFSN Q,N, LA!X==LA!X+2←Q
.ALSO ZZ==Q
.ELSE LA!X==LA!X+<<777774←ZZ>&7777777>
TERMIN
FA!X==LA!X+1
TERMIN
;;; THE FOLLOWING FORMATS ARE HEREBY DECLARED ILLEGAL AS
;;; BEING REDUNDANT AND/OR GROSSLY CONFUSING.
;;; SEE THE MIDAS MANUAL FOR DETAILS.
;;; ,A
;;; ,A C
;;; ,A,
;;; ,A,C
;;; A B C
;;; A,
;;; A,B
;;; A,B C
;;; A,B,
;;; A,B,C
IRP X,,[14,15,16,17,25,30,34,35,36,37]
.FORMAT X,0
TERMIN
;;; FLAG BITS FOR SQUOZE SYMBOLS IN DDT
%SY==1,,537777
%SYHKL==:400000 ;HALF KILLED
%SYKIL==:200000 ;FULLY KILLED
%SYLCL==:100000 ;LOCAL
%SYGBL==:40000 ;GLOBAL
;;; A FEW RANDOMLY USEFUL DEFINITIONS TO KEEP THINGS SYMBOLIC
;;; BUT WATCH OUT! DONT JUST RANDOMLY THINK YOU CAN CHANGE NASCII
;;; AND HAVE THINGS WIN, ESPECIALLY THE PACKING OF CHARS FOR
;;; PNAMES, AND THE SPECIAL OBARRAY ENTRIES FOR SCOS.
IFN SAIL, NASCII==:1000 ;NUMBER OF ASCII CHARS
.ELSE NASCII==:200 ;NUMBER OF ASCII CHARS
BYTSWD==:5 ;NUMBER OF ASCII BYTES PER WORD
;LS ST.LS $FS ST.$FS FX ST.FX FL ST.FL BN ST.BGN SY ST.SY SA ST.SA VC ST.VAC $PDLNM ST.$PDLNM $XM ST.$XM $NXM ST.$NXM PUR ST.PUR HNK ST.HNK DB ST.DB CX ST.CX DX ST.DX RN NUM ST.
SUBTTL DEFINITIONS OF BIBOP TYPE BITS FOR USE IN THE SEGMENT TABLE
.SEE ST
LS==:400000 ;4.9 1=LIST STRUCTURE, 0=ATOMIC
ST.LS==:400000
$FS==:200000 ;4.8 FREE STORAGE (BIT 4.9 SHOULD BE ON ALSO)
ST.$FS==:200000
FX==:100000 ;4.7 FIXNUM STORAGE
ST.FX==:100000
FL==:40000 ;4.6 FLONUM STORAGE
ST.FL==:40000
BN==:20000 ;4.5 BIGNUM HEADER STORAGE
ST.BGN==:20000
SY==:10000 ;4.4 SYMBOL HEADER STORAGE
ST.SY==:10000
SA==:4000 ;4.3 SAR STORAGE (BIT 3.8 SHOULD BE ON ALSO)
ST.SA==:4000
VC==:2000 ;4.2 VALUE CELL STORAGE (BIT 4.9 SHOULD BE ON ALSO)
ST.VAC==:2000
$PDLNM==:1000 ;4.1 NUMBER PDL AREA
; (ONE OF THE NUMBER TYPE BITS SHOULD BE ON ALSO)
ST.$PDLNM==:1000
;3.9 400 RESERVED - AVOID USING (FORMERLY $FLP)
$XM==:200 ;3.8 EXISTENT (RANDOM) AREA
ST.$XM==:200
$NXM==:100 ;3.7 NONEXISTENT (RANDOM) AREA
ST.$NXM==:100
PUR==:40 ;3.6 PURE SPACE
; (ONE OF BITS 4.8-4.5, 3.8, OR 3.4-3.2 ALSO ON)
ST.PUR==:40
HNK==:20 ;3.5 HUNK OF ONE KIND OR ANOTHER (BIT 4.9 ON ALSO)
ST.HNK==:20
DB==:10 ;3.4 DOUBLE-PRECISION FLONUMS
ST.DB==:10
CX==:4 ;3.3 COMPLEX NUMBERS
ST.CX==:10
DX==:2 ;3.2 DOUBLE-PRECISION COMPLEX NUMBERS
ST.DX==:2
;3.1 1 UNUSED (USE THIS BEFORE BIT 3.9)
RN==:$XM+$NXM ;RANDOMNESS!
NUM==:FX+FL+BN+DB+CX+DX ;NUMBERNESS!
ST.==:1,,<ST.LS+ST.FX+ST.BGN+ST.SA+ST.$PDLNM+ST.$NXM+ST.HNK+ST.CX+1>
;
SUBTTL ONE-LINE CONDITIONAL MACROS
;;; THESE HELP MAKE SOME CODE LESS MESSY TO READ.
;;; PREFACING A LINE OF CODE WITH ONE OF THESE SYMBOLS TELLS MIDAS
;;; TO ASSEMBLE THAT LINE ONLY UNDER THE SPECIFIED CONDITION.
;;; EXAMPLE:
;;;
;;; FOO: MOVE A,(P)
;;; 10$ PUSHJ P,10HACK ;THIS LINE IS FOR DEC-10 ONLY
;;; MOVE A,-1(P)
;;; Q% PUSHJ P,OLDHAK ;THIS LINE IS FOR OLD I/O ONLY
;;; POPJ P,
DEFINE 10$
IFN D10,TERMIN
DEFINE 10%
IFE D10,TERMIN
DEFINE IT$
IFN ITS,TERMIN
DEFINE IT%
IFE ITS,TERMIN
DEFINE 20$
IFN D20,TERMIN
DEFINE 20%
IFE D20,TERMIN
DEFINE 10X
IFN TENEX,TERMIN
DEFINE SA$
IFN SAIL, TERMIN
DEFINE SA%
IFE SAIL,TERMIN
DEFINE CMU$
IFN CMU,TERMIN
DEFINE CMU%
IFE CMU,TERMIN
DEFINE T10$
IFN TOPS10,TERMIN
DEFINE T10%
IFE TOPS10,TERMIN
DEFINE 20X
IFN TOPS20,TERMIN
;;; NEWRD IS FOOLISH NEW READER FLAG (HISTORICAL ARTIFACT -- FLUSH EVENTUALLY)
DEFINE NW$
IFN NEWRD,TERMIN
DEFINE NW%
IFE NEWRD,TERMIN
DEFINE BG$
IFN BIGNUM,TERMIN
DEFINE BG%
IFE BIGNUM,TERMIN
DEFINE DB$
IFN DBFLAG,TERMIN
DEFINE DB%
IFE DBFLAG,TERMIN
DEFINE CX$
IFN CXFLAG,TERMIN
DEFINE CX%
IFE CXFLAG,TERMIN
DEFINE DX$
IFN DXFLAG,TERMIN
DEFINE DX%
IFE DXFLAG,TERMIN
DEFINE HN$
IFN HNKLOG,TERMIN
DEFINE HN%
IFE HNKLOG,TERMIN
DEFINE KA
IFN KA10,TERMIN
DEFINE KAKI
IFN KA10+KI10,TERMIN
DEFINE KI
IFN KI10,TERMIN
DEFINE KIKL
IFN KI10+KL10,TERMIN
DEFINE KL
IFN KL10,TERMIN
DEFINE PG$
IFN PAGING,TERMIN
DEFINE PG%
IFE PAGING,TERMIN
DEFINE SFA$
IFN SFA,TERMIN
DEFINE SFA%
IFE SFA,TERMIN
DEFINE HS$
IFN HISEGMENT,TERMIN
DEFINE HS%
IFE HISEGMENT,TERMIN
DEFINE REL$
IFE D20\<D10*PAGING>,TERMIN
DEFINE REL%
IFN D20\<D10*PAGING>,TERMIN
;
SUBTTL GENERAL MACROS
DEFINE CONC A,B ;HAIRY CONCATENATOR MACRO
A!B!TERMIN
DEFINE LOCKI ;LOCK OUT USER INTERRUPTS UNTIL UNLOCKI'D
PUSH FXP,INHIBIT
SETOM INHIBIT
TERMIN
DEFINE UNLOCKI ;RELEASE THE USER-INTERRUPT LOCK, AND CHECK TO SEE
PUSHJ P,INTREL ;IF ANY INTERRUPTS WERE STACKED UP WHILE IN LOCKED STATE
TERMIN
DEFINE LOCKTOPOPJ ;LOCK ALL THE ENSUING CODE UNTIL THE
PUSH P,CINTREL ;EXITING POPJ P,
LOCKI
TERMIN
DEFINE UNLKPOPJ ;UNLOCK, THEN POPJ P,
JRST INTREL
TERMIN
.SEE CHNINT
DEFINE .5LOCKI ;HALF-LOCK INHIBIT
PUSH FXP,INHIBIT
HRROS INHIBIT
TERMIN
DEFINE .5LKTOPOPJ
PUSH P,CINTREL
.5LOCKI
TERMIN
IRP PL,,[,FX]
DEFINE SAVE!PL AL/ ;CALLED LIKE SAVE A B C
IRPS AC,,AL
PUSH PL!P,AC
TERMIN
TERMIN
DEFINE RSTR!PL AL/ ;CALLED LIKE RSTR C B A
IRPS AC,,AL
POP PL!P,AC
TERMIN
TERMIN
TERMIN
DEFINE MACROLOOP COUNT,NAME,C ;FOR EXPANDING MANY MACROS
IFSN C,, .CRFOFF
REPEAT COUNT,[ CONC NAME,\.RPCNT
]
IFSN C,, .CRFON
TERMIN
;SKIP IF TYPE, USING TT AS TEMP, ACCORDING TO BIBOP TYPE BITS
DEFINE SKOTT /Z
SKOTT% N,L,Z
TERMIN
;SKIP IF NOT TYPE, USING TT AS TEMP, ACCORDING TO BIBOP TYPE BITS
DEFINE SKOTTN /Z
SKOTT% E,GE,Z
TERMIN
DEFINE SKOTT% N,L,X,TYP
IFN TT-<X>, HRRZ TT,X
LSH TT,-SEGLOG
IFN <TYP>-LS,[
MOVE TT,ST(TT)
TLN!N TT,<TYP>
]
.ELSE SKIP!L TT,ST(TT)
TERMIN
;%%% %%% LABEL
DEFINE % ;THIS IS GOOD FOR LIST STRUCTURE
,,.+1!TERMIN
DEFINE INFORM R,S,T,U,V,W,X,Y,Z,$,%
PRINTX ≤ R!S!T!U!V!W!X!Y!Z!$!%
≤
TERMIN
DEFINE WARN R,S,T,U,V,W,X,Y,Z,$,%
WARN1 [R!S!T!U!V!W!X!Y!Z!$!%]
TERMIN
DEFINE WARN1 CRUFT
IFL 40-.LENGTH ≤CRUFT≤,[ .ERR ######
PRINTX ≤ ###### CRUFT
≤
]
.ELSE .ERR ###### CRUFT
TERMIN
;;; USEFUL MACRO FOR .FASL FILES. CAUSES LOADING TO PRINT MESSAGE.
DEFINE VERPRT NAME,VRS=[???]
IFN .FNAM2-SIXBIT /MID/,[
%%%==.fnam2
.SXEVAL ((LAMBDA (X)
(COND ((STATUS NOFEATURE NOLDMSG)
(TERPRI MSGFILES)
(TYO #73 MSGFILES)
(PRINC (QUOTE L/o/a/d/i/n/g/ NAME/ ) MSGFILES)
(PRINC X MSGFILES)
(TYO #40 MSGFILES)))
(PUTPROP (QUOTE NAME) X (QUOTE VERSION)))
(MAKNAM (DELQ #40
(QUOTE (#<<<%%%&<770000,,0>>←-36>+40>
#<<<%%%&<7700,,0>>←-30>+40>
#<<<%%%&<77,,0>>←-22>+40>
#<<<%%%&770000>←-14>+40>
#<<<%%%&7700>←-6>+40>
#<<%%%&77>+40> )))))
]
.ELSE [
.SXEVAL (COND ((STATUS NOFEATURE NOLDMSG)
(TERPRI MSGFILES)
(TYO #73 MSGFILES)
(PRINC (QUOTE L/o/a/d/i/n/g/ NAME/ VRS/ ) MSGFILES)))
.SXEVAL (DEFPROP NAME VRS VERSION)
]
TERMIN
;; Silent VERPRT, which doesn't print the message, just does the DEFPROP
;; of the version property
DEFINE SVERPRT NAME,VRS=[???]
IFN .FNAM2-SIXBIT /MID/,[
%%%==.fnam2
.SXEVAL (PUTPROP (QUOTE NAME)
(MAKNAM (DELQ #40
(QUOTE (#<<<%%%&<770000,,0>>←-36>+40>
#<<<%%%&<7700,,0>>←-30>+40>
#<<<%%%&<77,,0>>←-22>+40>
#<<<%%%&770000>←-14>+40>
#<<<%%%&7700>←-6>+40>
#<<%%%&77>+40> ))))
(QUOTE VERSION))
]
.ELSE [
.SXEVAL (DEFPROP NAME VRS VERSION)
]
TERMIN
;MACRO TO HANDLE UNWIND-PROTECT
; UNWINDPROTECT CODE,CONTINUATION-CODE
;CAUSES CONTINUATION TO BE INVOKED AFTER CODE IS EXECUTED
;THE STATE OF THE PDLS MUST BE THE SAME BEFORE AND AFTER CODE EXECUTES.
; CODE SHOULD BE THOUGHT OF AS A FUNCTION CALL.
; CODE IS THE CODE TO BE INVOKED AND PROTECTED.
; CONT IS THE "CONTINUATION" TO BE RUN WHEN UNWINDING THE STACK, OR AFTER
; CODE IS RUN
DEFINE UNWINDPROTECT CODE,CONT,\LABEL
JSP TT,PTNTRY ;SETUP AN UNWIND PROTECT
JRST LABEL
CONT
POPJ P,
LABEL:
CODE
;ASSUMPTION IS THAT FOLLOWING JSP CLOBBERS THE WORLD
JSP TT,PTEXIT ;RUN CONTINUATION, PRESERVES A
TERMIN
;;; HERE COME THE RANDOM "RPG" MACROS FOR IN-LINING THE PDL-FIXUP CODE
DEFINE PFIXPDL AC
HRRZ AC,P
MOVE P,C2
SUBI AC,(P)
HRLS AC
ADD P,AC
TERMIN
DEFINE FXPFIXPDL AC
HRRZ AC,FXP
MOVE FXP,FXC2
SUBI AC,(FXP)
HRLS AC
ADD FXP,AC
TERMIN
DEFINE FLPFIXPDL AC
HRRZ AC,FLP
MOVE FLP,FLC2
SUBI AC,(FLP)
HRLS AC
ADD FLP,AC
TERMIN
DEFINE SPFIXPDL AC
HRRZ AC,SP
MOVE SP,SC2
SUBI AC,(SP)
HRLS AC
ADD SP,AC
TERMIN
;NBITMACS NBITMACS XX YY
IF1,[
;;; FEATURE SO THAT HAIRY SUMS OF BITS MAY BE WRITTEN NICELY.
;;; BITMAC FOO,FOO.
;;; CAUSES THE FORM
;;; FOO<A+B+C>
;;; TO EXPAND INTO THE FORM
;;; FOO.A+FOO.B+FOO.C
NBITMACS==0
DEFINE BITMAC XX,YY,ZZ=[1,,525252]
DEFINE XX<BITS>
IRPS J,K,[BITS]
YY!!J!K!TERMIN TERMIN
BITMA1 XX,YY,[ZZ]\NBITMACS
NBITMACS==NBITMACS+1
TERMIN
DEFINE BITMA1 XX,YY,ZZ,NN
DEFINE BTMC!NN
EXPUNGE XX,YY
XX==ZZ
YY==ZZ
IFSN [ZZ], IFGE <.TYPE ZZ>, EXPUNGE ZZ
TERMIN
TERMIN
IRP FOO,,[%TB,%TI,%TJ,%TX,%TO,%TS,%TC,%TG,%TT,%PI,%PJ]
IFDEF FOO, SV$!FOO==FOO .SEE BITMAC
.ELSE SV$!FOO==1,,525252
EXPUNGE FOO
TERMIN
BITMAC AS,AS. ;LH ASARS
BITMAC TTS,TTS.,[1,,725252] ;LH TTSARS
BITMAC FBT,FBT. ;LH F.MODE WORD IN FILE ARRAYS
BITMAC RS.,RS. ;FOR READER SYNTAX BITS
BITMAC RS%,RS%,525252 ;READER SYNTAX BITS, LH SHIFTED INTO RH
BITMAC IB,IB.,[525252,,525252] ;WORD 1 INTERRUPT BITS
BITMAC %TB,%TB,SV$%TB ;LH .TTY USER VARIABLE
BITMAC %TI,%TI,SV$%TI ;LH TTY IOCHNM BITS (SOME PER-IOT)
BITMAC %TJ,%TJ,SV$%TJ
BITMAC %TX,%TX,SV$%TX ;RH TTY CHARACTER BITS
BITMAC %TO,%TO,SV$%TO ;LH TTYOPT VARIABLE
BITMAC %TS,%TS,SV$%TS ;LH TTYSTS VARIABLE
BITMAC %TC,%TC,SV$%TC ;LH TTYCOM VARIABLE
BITMAC %TG,%TG,SV$%TG ;6-BIT BYTE TTYST1,TTYST2 GROUPS
BITMAC %TT,%TT,SV$%TT ;LH TTYTYP VARIABLE
BITMAC %PI,%PI,SV$%PI ;FULL WORD .PIRQC VARIABLE
BITMAC %PJ,%PJ,SV$%PJ ;LH .PIRQC VARIABLE
] ;END OF IF1
;
;;; MACRO FOR .FASL LOSERS WHO .INSRT THIS FILE TO USE
;;; IN PLACE OF THE "END" PSEUDO. THIS GENERATES AN "END"
;;; AFTER PERFORMING SOME CLEANUP. MANY SYMBOLS ARE EXPUNGED
;;; SO THAT .FASL FILES WILL NOT SPEND INFINITE TIME TRYING TO
;;; PASS THEM TO DDT.
DEFINE FASEND
IF2,[
EXPUNGE NIL A B C AR1 AR2A NACS T TT D R F FREEAC P FLP FXP SP
EXPUNGE LERR ACALL AJCALL LER3 ERINT PP STRT SERINT TP IOJRST UUOMAX
EXPUNGE CALL JCALL CALLF JCALLF NCALL NJCALL NCALLF NJCALF NUUOCLS
EXPUNGE NERINT NASCII
EXPUNGE %UDF %UBV %WTA %UGT %WNA %GCL %FAC %IOL
EXPUNGE %%UDF %%UBV %%WTA %%UGT %%WNA %%GCL %%FAC %%IOL
EXPUNGE ASAR TTSAR
EXPUNGE AS.SFA AS.JOB AS.FIL AS.RDT AS.OBA AS.SX AS.FX AS.FL AS.DB AS.CX
EXPUNGE AS.DX AS.GCP
EXPUNGE TTS.CL TTS.IM TTS.BN TTS.TY TTS.IO TTS.CN TTS.GC
EXPUNGE TTSDIM TTS.1D TTS.2D TTS.3D TTS.4D TTS.5D
EXPUNGE FI.EOF FO.EOF FI.BBC FI.BBF TI.BFN FT.CNS F.GC
EXPUNGE F.MODE FBT.CM FBT.SA FBT.CP FBT.LN FBT.AP FBT.CC FBT.ND
EXPUNGE F.CHAN F.JFN F.FLEN F.FPOS F.DEV F.SNM F.PPN F.FN1 F.FN2
EXPUNGE F.RDEV F.RSNM F.RFN1 F.RFN2
EXPUNGE F.DIR F.FNM F.EXT F.VRS
EXPUNGE L.6DEV L.6DIR L.6FNM L.6EXT L.6VRS L.D6BT L.N6BT L.F6BT
EXPUNGE LOPOFA
EXPUNGE TI.ST1 TI.ST2 TI.ST3 TI.ST4 ATO.LC
EXPUNGE AT.CHS AT.LNN AT.PGN FO.LNL FO.PGL FO.RPL LONBFA
EXPUNGE FB.BFL FB.BVC FB.BYT FB.IBP FB.BP FB.CNT FB.HED FB.NBF
EXPUNGE FB.BWS FB.ROF FB.BUF
EXPUNGE J.INTF J.LFNM J.GC J.INTB J.STAD J.UIND LOJOBA J.SYMS J.CRUF
EXPUNGE SR.CAL SFCALI SR.WOM SR.UDL SR.FML SR.FUN SR.PNA SR.FUS SR.LEN
EXPUNGE SO.OPN SO.CLO SO.REN SO.DEL SO.TRP SO.PR1 SO.TYI SO.UNT SO.TIP
EXPUNGE SO.IN SO.EOF SO.TYO SO.OUT SO.FOU SO.RED SO.RDL SO.PRT SO.PRC
EXPUNGE SO.MOD SO.POS
EXPUNGE ST.LS ST.$FS ST.FX ST.FL ST.BGN ST.SY ST.SA ST.VAC ST.$PDLNM
EXPUNGE ST.$XM ST.$NXM ST.PUR ST.HNK ST.DB ST.CX ST.DX ST.
IRP X,,[02,1N,12,23,2N,0,1,2,4,01,012,01234,0234,3456,1234567
13456,234,345,234567,76543,45]
EXPUNGE LA!X FA!X
TERMIN
MACROLOOP NBITMACS,BTMC,*
] ;END OF IF2
END
TERMIN
;SYMVC SYMARGS SYMPNAME SY.ONE SY.LAP SY.PUR SY.CCN SY.OTC SY.ZER SY.
SUBTTL SYMBOL BLOCK-STRUCTURE DEFINITIONS
;;; FORMAT OF SYMBOL HEADER FOR BIBOP:
;;; THE MAIN HEADER OF A SYMBOL IS A SINGLE WORD IN SYMBOL SPACE.
;;; THE RIGHT HALF CONTAINS THE PROPERTY LIST, AND THE LEFT HALF
;;; POINTS TO THE REST OF THE HEADER, WHICH IS IN THE IS2 OR SY2 AREA.
;;; SINCE THE REST OF THE HEADER (ALSO CALLED A "SYMBOL BLOCK") MUST
;;; LIE ON AN EVEN WORD BOUNDARY, THE LOW BIT OF THE LEFT HALF OF
;;; THE MAIN HEADER IS NORMALLY ZERO. THIS BIT IS USED BY THE
;;; GARBAGE COLLECTOR FOR MARKING PURPOSES, AND THEN RESET TO ZERO.
;;; THE SYMBOL BLOCK IS 2 WORDS LONG:
;;; <VARIOUS BITS>,,<POINTER TO VALUE CELL>
;;; <ARGS PROPERTY>,,<PNAME LIST>
;;; THE "VARIOUS BITS" ARE:
;;; 4.9-3.9 ONES (FOR NO PARTICULARLY GOOD REASON)
;;; 3.9 ZERO (RESERVED FOR SPECIAL VALUE CELL/LAP HACK)
;;; 3.8 1 => SYMBOL BLOCK MAY BE PURE (SEE GCMARK)
;;; 3.7 ONE IFF COMPILED CODE NEEDS THE SYMBOL
;;; 3.6 ONE IFF COMPILED CODE REFERENCES BY OTHER THAN CALL UUO
;;; (IMPLIES 3.7 WHICH *MUST* ALSO BE ON)
;;; 3.5-3.1 ZERO (SO CAN INDIRECT THROUGH THE WORD TO GET VALUE)
;;; THE ARGS PROPERTY IS IN THE SAME FORMAT FASLOAD USES,
;;; TWO NINE-BIT BYTES DECODED AS FOLLOWS:
;;; 0 => NIL
;;; 777 => 777 (EFFECTIVELY INFINITY)
;;; N => N-1, N NOT 0 OR 777
;;; THUS 000006 = (NIL . 5), 004005 = (3 . 4), AND 002777 = (1 . 777)
SYMVC==0 ;BITS,,VC
SYMARGS==1 ;ARGS PROP,,PNAME
SYMPNAME==1
SY.ONE==:777000 ;ONES (NO GOOD REASON!!)
SY.LAP==:400
SY.PUR==:200
SY.CCN==:100
SY.OTC==:040
SY.ZER==:037
SY.==:1,,<SY.ONE+SY.PUR+SY.OTC>
;ASAR TTSAR AS.SFA AS.JOB AS.FIL AS.RDT AS.OBA AS.DX AS.CX AS.DB AS.SX AS.FX AS.FL AS.GCP TTS.CL TTS.BM TTS.IM TTS.BN TTS.TY TTS.IO TTS.CN TTS.GC TTSDIM TTS.1D TTS.2D TTS.3D TTS.4D TTS.5D
SUBTTL FORMAT OF ARRAYS
;;; ARRAYS ARE POINTED TO BY A TWO-WORD SAR (SPECIAL ARRAY CELL).
;;; SARS RESIDE IN A SPECIAL SPACE CALLED SAR SPACE.
ASAR==:0 ;SAR POINTER POINTS TO ASAR (CODE DEPENDS ON THIS)
TTSAR==:1 ;TTSAR COMES JUST AFTER IT
;;; THE FIRST WORD OF THE SAR, CALLED THE ASAR, POINTS TO THE ARRAY
;;; HEADER; PUSHJ'ING INDIRECTLY THOUGH IT GETS TO THE ARRAY
;;; SUBSCRIPT EVALUATION CODE. THE LEFT HALF, EXCLUDING THE
;;; INDIRECT AND INDEX BITS, CONTAINS VARIOUS BITS DESCRIBING
;;; THE TYPE OF THE ARRAY:
AS.SFA==:200000 ;SFA ARRAY
AS.JOB==:100000 ;JOB ARRAY
AS.FIL==:40000 ;FILE ARRAY
AS.RDT==:20000 ;READTABLE
AS.OBA==:10000 ;OBARRAY
AS.DX==:4000 ;DUPLEX ;THESE ARE
AS.CX==:2000 ;COMPLEX ; THE ACCESS
AS.DB==:1000 ;DOUBLE ; METHODS -
AS.SX==:400 ;S-EXPRESSION ; EXACTLY ONE
AS.FX==:200 ;FIXNUM ; SHOULD BE SET
AS.FL==:100 ;FLONUM ; IN EACH ASAR
AS.GCP==:40 ;GC SHOULD USE AOBJN PTR TO MARK ARRAY
;;; THE SECOND WORD, CALLED THE TTSAR, POINTS TO THE ARRAY DATA
;;; AND IS INDEXED BY ACCUMULATOR TT. ITS LEFT HALF, EXCLUDING
;;; AGAIN THE INDIRECT AND INDEX BITS, CONTAIN MORE INFORMATION
;;; ABOUT THE ARRAY:
TTS.CL==:40000 ;CLOSED FILE
TTS.BM==:20000 ;TOPS-10 I/O BUFFER HAS BEEN MOVED
TTS.IM==:2000 ;1 => IMAGE ;BOTH 0
TTS.BN==:1000 ;1 => BINARY (FIXNUM) ; => ASCII
TTS.TY==:400 ;0 => DSK-TYPE, 1 => TTY
TTS.IO==:200 ;0 => IN, 1 => OUT
TTS.CN==:100 ;COMPILED CODE NEEDS THIS SAR
TTS.GC==:40 ;USED AS MARK BIT BY GC
TTSDIM==:410300 ;BYTE POINTER FOR # OF DIMENSIONS (1-5)
TTS.1D==:100000 ;DEFINITIONS
TTS.2D==:200000 ; FOR SPECIFYING
TTS.3D==:300000 ; NUMBER OF
TTS.4D==:400000 ; ARRAY
TTS.5D==:500000 ; DIMENSIONS
;;; S-EXPRESSION ARRAYS HAVE THE FOLLOWING FORM:
;;; -<# WDS FOR GC MARK>,,<1ST WD OF DATA TO MARK>
;;; HEADER: JSP TT,<N>DIMS ;ASAR POINTS HERE; N=# OF DIMS
;;; <ADDRESS OF SAR> ;LH USED BY FLASH
;;; <DIMENSION 1>
;;; ...
;;; <DIMENSION N>
;;; DATA: <ENTRY 0>,,<ENTRY 1> ;TTSAR POINTS HERE
;;; ... ;DATA PACKED 2/WD
;;; <ENTRY X-1>,,<ENTRY X>
;;;
;;; THE FORMAT OF A NUMBER ARRAY IS AS FOLLOWS:
;;; <GC AOBJN PTR> ;PROBABLY MEANINGLESS
;;; HEADER: PUSH P,CFIX1 ;CFLOAT1 FOR A FLONUM ARRAY
;;; JSP TT,<N>DIMF ;N=# OF DIMS
;;; <ADDRESS OF SAR> ;LH USED BY FLASH
;;; <DIMENSION 1>
;;; ...
;;; <DIMENSION N>
;;; DATA: <ENTRY 0> ;TTSAR POINTS HERE
;;; <ENTRY 1> ;FULL-WORD DATA 1/WD
;;; ...
;;; <ENTRY X>
;;; THE AOBJN POINTER AT THE TOP OF EACH ARRAY IS MEANINGFUL ONLY
;;; IF THE AS.GCP BIT IS 1 IN THE ARRAY'S ASAR; IT INDICATES
;;; WHAT ENTRIES IN THE ARRAY GC SHOULD MARK. FOR S-EXPRESSION
;;; ARRAYS, THIS IS GENERALLY THE ENTIRE ARRAY; FOR OBARRAYS,
;;; IT INCLUDES THE BUCKETS BUT NOT THE SCO TABLE. FOR
;;; READTABLES, WHICH ARE OTHERWISE FIXNUM ARRAYS, UNDER NEWRD
;;; THE GC AOBJN POINTER INDICATES THAT THE LIST OF CHARACTER
;;; MACRO FUNCTIONS SHOULD BE MARKED.
;;; NOTE THAT IF SUCH AN AOBJN POINTER IS OF THE FORM <-N>,,<DATA>,
;;; THEN 2*N ENTRIES ARE MARKED; THE LEFT HALF IS THE NUMBER
;;; OF WORDS TO BE MARKED, WITH TWO ENTRIES PER WORD.
;;; CORRESPONDS TO ARRAY TYPE BITS IN ASAR'S.
;FI.EOF FO.EOP FJ.INT FI.BBC FI.BBF TI.BFN FT.CNS F.GC F.MODE FBT.CM FBT.SA FBT.CP FBT.LN FBT.EC FBT.SE FBT.FU FBT.ND FBT.SC F.CHAN F.JFN F.FLEN F.FPOS L.6DEV L.6DIR L.6FNM L.6EXT L.6VRS L.6DEV L.6DIR L.6FNM L.6EXT L.6VRS L.D6BT L.N6BT L.F6BT F.DEV F.FN1 F.FN2 F.RDEV F.RFN1 F.RFN2 F.DIR F.FNM F.EXT F.VRS LOPOFA TI.ST1 TI.ST2 ATO.LC AT.CHS AT.LNN AT.PGN FO.LNL FO.PGL FO.RPL LONBFA FB.BYT FB.BFL FB.BVC FB.IBP FB.BP FB.CNT FB.HED FB.NBF FB.BWS FB.BUF
SUBTTL FORMAT OF FILE ARRAYS
;;; FILE ARRAYS ARE ARRAYS WHICH HAVE THE AS.FIL BIT SET
;;; IN THE ASAR AND SOME EXTRA BITS IN THE TTSAR DESCRIBING
;;; THE TYPE OF ARRAY.
;;; A FILE ARRAY CONTAINS A NUMBER OF VARIABLES RELATED TO
;;; THE FILE, AND POSSIBLY A BUFFER FOR DATA.
;;; THE PREFIX OF EACH NAME OF A FILE ARRAY COMPONENT INDICATES THE
;;; TYPES OF FILE ARRAYS TO WHICH IT IS APPLICABLE. THUS TI.ST1
;;; IS ONLY FOR TTY INPUT FILE ARRAYS.
;;; NOTE: COMPONENTS MARKED (RELOC) MUST HAVE THEIR RIGHT
;;; HALVES RELOCATED WHEN THE ARRAY IS MOVED.
.SEE GT3D
;;; THE FOLLOWING ARE INDICES INTO THE FILE ARRAY'S DATA AREA
;;; (I.E. THEY ARE USED TO INDEX THROUGH THE TTSAR).
FI.EOF==:0 ;EOF FUNCTION
FO.EOP==:0 ;END OF PAGE FUNCTION
FJ.INT==:0 ;INTERRUPT FUNCTION FOR USR DEVICE
FI.BBC==:1 ;BUFFERED BACK CHARS FOR ASCII FILES
; LEFT HALF: SINGLE CHAR (3.8=1 IF ANY,
; SO CAN DISTINGUISH ^@ FROM NONE)
; RIGHT HALF: LIST OF CHARS FOLLOWING THE ONE
; IN THE LEFT HALF
.SEE $DEVICE
FI.BBF==:2 ;LIST OF BUFFERED BACK FORMS (NOT IMPLEMENTED)
TI.BFN==:3 ;BUFFER-FORWARD (PRESCAN) FUNCTION FOR READ
FT.CNS==:4 ;ASSOCIATED TTY FILE FOR OTHER DIRECTION
.SEE STTYCONS
;;; SLOTS 5, 6, AND 7 ARE RESERVED FOR EXPANSION.
F.GC==:10 ;NUMBER OF SLOTS GC SHOULD EXAMINE
F.MODE==:10 ;MODE BITS
FBT.CM==:400000 ;4.9 0=BUFFERED, 1=CHARMODE
FBT.SA==:200000 ;4.8 SAIL CHARACTER SET (OUTPUT ONLY)
FBT.CP==:100000 ;4.7 CURSORPOS WILL SUCCEED (?)
; ON ITS, REFLECTS %TOMVU (CAN MOVE UP)
.SEE OPNTO1
FBT.LN==:40000 ;4.6 HANDLE TTY IN LINE MODE
SA$ FBT.AP==:20000 ;4.5 OPENED IN APPEND MODE
SA% 10% FBT.AP==:20000 ;4.5 OPENED IN APPEND MODE
SA% 10$ FBT.AP==:0 ;4.5 NOT YET HACKED FOR VANILLA TOPS-10
FBT.EC==:10000 ;4.4 OUTPUT TTY IN ECHO AREA (ITS ONLY)
FBT.SE==:2000 ;4.2 TTY CAN SELECTIVELY ERASE
FBT.FU==:1000 ;4.1 TTY SHOULD READ/PRINT FULL 12.-BIT
; CHARACTERS (FIXNUM MODE)
FBT.ND==:400 ;3.9 DON'T MEREGEF WITH DEFAULTF (NEVER LEFT ON
; IN OPTIONS WORD)
IT% FBT.CA==:0 ;THIS SHOULD WORK CORRECTLY
IT$ FBT.CA==:40 ;3.6 CLA DEVICE (ITS ONLY)
FBT.SC==:20 ;3.5 SCROLL MODE
;THE RIGHT HALF IS USED TO INDEX VARIOUS TABLES.
;1.4-1.3 0=ASCII, 1=FIXNUM, 2=IMAGE
;1.2 0=DSK, 1=TTY
;1.1 0=INPUT, 1=OUTPUT
F.CHAN==:11 ;I/O CHANNEL NUMBER
;FOR ALL IMPLEMENTATIONS, THIS IS THE INDEX INTO
.SEE CHNTB ; THE CHANNEL TABLE.
;FOR THE ITS AND D10 IMPLEMENTATIONS, IT IS
; ALSO THE I/O CHANNEL NUMBER.
F.JFN==:12 ;THE JOB-FILE NUMBER FOR THIS FILE
F.FLEN==:13 ;THE LENGTH OF THE FILE, OR -1 IF RANDOM ACCESS IS IMPOSSIBLE.
; MAY NOT BE UP-TO-DATE ON AN OUTPUT FILE, BUT FILEPOS
.SEE FPOS5 ; UPDATES IT FIRST IN THIS CASE.
F.FPOS==:14 ;FILE POSITION
;FOR SINGLE MODE FILES, THIS IS THE ACTUAL FILE POSITION.
;FOR BLOCK MODE, THIS IS THAT OF THE BEGINNING OF
.SEE FB.BUF ; THE BUFFER IN THE FILE ARRAY, AND ONE
.SEE FB.B ; MUST LOOK AT FB.BVC AND FB.CNT
.SEE FB.CNT ; (OR WHATEVER) TO CALCULATE THE EXACT FILEPOS.
;THE POSITION IS MEASURED IN CHARACTERS FOR ASCII FILES,
; AND WORDS FOR FIXNUM FILES.
;THIS VALUE MAY BE GARBAGE IF F.FLEN IS NEGATIVE.
;;; SLOTS 15-17 ARE RESERVED.
IFN ITS+D10,[
;;; FROM F.DEV TO F.RFN2 ARE USED BY JOB ARRAYS ALSO.
;;; MUST HAVE (F.DEV, F.SNM/F.PPN, F.FN1, F.FN2) IN THAT ORDER.
;;; DITTO FOR (F.RDEV, F.RSNM/F.RPPN, F.RFN1, F.RFN2).
L.6DEV==:1 ;LENGTH OF DEVICE NAME IN "SIXBIT" FORM
L.6DIR==:1 ;LENGTH OF DIRECTORY NAME
L.6FNM==:1 ;LENGTH OF FILE NAME
L.6EXT==:1 ;LENGTH OF EXTENSION (TYPE)
L.6VRS==:0 ;LENGTH OF VERSION (GENERATION)
] ;END OF IFN ITS+D10
IFN D20,[
;;; FOR D20, "SIXBIT" FORM IS REALLY AN ASCIZ STRING.
L.6DEV==:8 ;LENGTH OF DEVICE NAME IN "SIXBIT" FORM
L.6DIR==:8 ;LENGTH OF DIRECTORY NAME
L.6FNM==:8 ;LENGTH OF FILE NAME
L.6EXT==:8 ;LENGTH OF EXTENSION (TYPE)
L.6VRS==:2 ;LENGTH OF VERSION (GENERATION)
] ;END OF IFN D20
L.D6BT==:L.6DEV+L.6DIR ;LENGTH OF DEVICE/DIRECTORY "SIXBIT" FORM
L.N6BT==:L.6FNM+L.6EXT+L.6VRS ;LENGTH OF FILE NAMES IN "SIXBIT" FORM
L.F6BT==:L.D6BT+L.N6BT ;LENGTH OF TOTAL FILE SPEC IN "SIXBIT" FORM
;;; THESE ARE THE NAME WHICH WERE GIVEN TO OPEN.
F.DEV==:20 ;DEVICE NAME
IFE D20,[
IT$ F.SNM==:F.DEV+L.6DEV ;SYSTEM NAME (SNAME)
10$ F.PPN==:F.DEV+L.6DEV ;PROJECT-PROGRAMMER NUMBER
F.FN1==:F.DEV+L.D6BT ;FILE NAME 1
F.FN2==:F.FN1+L.6FNM ;FILE NAME 2 (D10: EXTENSION)
;;; THESE ARE THE NAMES RETURNED BY THE TRUENAME FUNCTION.
F.RDEV==:F.DEV+L.F6BT ;"REAL" DEVICE NAME
IT$ F.RSNM==:F.RDEV+L.6DEV ;"REAL" SYSTEM NAME
10$ F.RPPN==:F.RDEV+L.6DEV ;"REAL" PPN
F.RFN1==:F.RDEV+L.D6BT ;"REAL" FILE NAME 1
F.RFN2==:F.RFN1+L.6FNM ;"REAL" FILE NAME 2
] ;END OF IFE D20
IFN D20,[
F.DIR==:F.DEV+L.6DEV ;DIRECTORY
F.FNM==:F.DIR+L.6DIR ;FILE NAME
F.EXT==:F.FNM+L.6FNM ;EXTENSION
F.VRS==:F.EXT+L.6EXT ;VERSION
;;; THE "REAL" FILE NAMES ARE NOT STORED, BUT FETCHED BY JSYS EACH TIME.
; F.RDEV
; F.RDIR
; F.RFNM
; F.REXT
; F.RVRS
] ;END OF IFN D20
LOPOFA==:70 .SEE ALFILE ;LENGTH OF PLAIN OLD FILE ARRAY
IFL LOPOFA-<F.DEV+L.F6BT>, WARN [DEFINITION OF LOPOFA IS TOO SMALL]
IFN ITS+D20+SAIL,[
;;; FOR ITS, THESE ARE TTYST1 AND TTYST2 FOR GIVING TO TTYSET.
;;; FOR D20, THESE ARE THE CCOC WORDS FOR GIVING TO SFCOC.
;;; FOR SAIL, THESE ARE THE ACTIVATION WORDS FOR SETACT.
TI.ST1==:LOPOFA+0 ;TTY STATUS WORD 1
TI.ST2==:LOPOFA+1 ;TTY STATUS WORD 2
IT% TI.ST3==:LOPOFA+2 ;TTY STATUS WORD 3
IT% TI.ST4==:LOPOFA+3 ;TTY STATUS WORD 4
] ;END OF ITS+D20+SAIL
ATO.LC==:LOPOFA+4 ;LAST CHARACTER FLAG FOR ASCII OUTPUT:
;ZERO: NORMAL STATE.
;POSITIVE: LAST CHARACTER OUTPUT WAS A SLASH,
; SO THE AUTOMATIC TERPRI SHOULD BE INHIBITED.
;NEGATIVE: LAST CHARACTER OUTPUT WAS A <CR>,
; SO IT MAY BE NECESSSARY TO SUPPLY A <LF>.
AT.CHS==:LOPOFA+5 ;CHARPOS
AT.LNN==:LOPOFA+6 ;LINENUM
AT.PGN==:LOPOFA+7 ;PAGENUM
FO.LNL==:LOPOFA+10 ;LINE LENGTH
;NORMALLY INITIALIZED TO 1 LESS THAN THE ACTUAL WIDTH
; OF THE DEVICE TO ALLOW FOR SLASH OVERRUN.
.SEE STERPRI ;MAY BE NEGATIVE, IN WHICH CASE THE
; MAGNITUDE IS THE ACTUAL VALUE.
FO.PGL==:LOPOFA+11 ;PAGE LENGTH
FO.RPL==:LOPOFA+12 ;"REAL" PAGEL FOR TTYS
;;; SLOTS 13-17 ARE RESERVED FOR EXPANSION.
LONBFA==:LOPOFA+20 ;LENGTH OF NON-BUFFERED FILE ARRAY
;;; EVERYTHING AFTER THIS IS ONLY FOR FILES WITH BUFFERS
FB.BYT==:LONBFA+0 ;NUMBER OF DATA BYTES PER WORD
FB.BFL==:LONBFA+1 ;LENGTH OF BUFFER IN BYTES
FB.BVC==:LONBFA+2 ;# VALID CHAARS IN BUFFER (ONLY INPUT FILES)
IFN ITS+D20,[
FB.IBP==:LONBFA+3 ;INITIAL BUFFER BYTE POINTER (RELOC)
FB.BP==:LONBFA+4 ;CURRENT BUFFER BYTE POINTER (RELOC)
FB.CNT==:LONBFA+5 ;COUNT OF REMAINING BYTES IN BUFFER
] ;END OF ITS+D20
IFN D10,[
FB.HED==:LONBFA+3 ;ADDRESS OF 3-WORD BUFFER RING HEADER
FB.NBF==:LONBFA+4 ;NUMBER OF BUFFERS
FB.BWS==:LONBFA+5 ;SIZE OF BUFFER IN WORDS (NOT COUNTING BUFFER HEADER)
SA$ FB.ROF==:LONBFA+6 ;(NEGATIVE) RECORD OFFSET IN BYTES, I.E. FILEPOS
; OF THE PHYSICAL BEGINNING OF THE FILE
] ;END OF IFN D10
FB.BUF==:LONBFA+10 ;BEGINNING OF BUFFER
;FOR ITS AND D20, THE DATA BUFFER BEGINS HERE.
;FOR D10, THE BUFFER RING STRUCTURE BEGINS HERE.
;FOR TTY INPUT FILES, THE "BUFFER" IS AN ARRAY
; OF INTERRUPT FUNCTIONS FOR EACH ASCII CHARACTER.
;J.INTF J.CINT J.LFNM J.CRUFT J.GC J.INTB J.STAD J.UIND LOJOBA J.SYMS
SUBTTL FORMAT OF JOB ARRAYS
IFN ITS,[
;;; JOB ARRAYS ARE ARRAYS WHICH HAVE THE AS.JOB BIT SET
;;; IN THE ASAR. THE TTS.CL BIT IS RELEVANT HERE ALSO,
;;; INDICATING A CLOSED JOB ARRAY.
;;; THE ARRAY CONTAINS VARIOUS DATA ASSOCIATED WITH THE JOB.
;;; NOTE: COMPONENTS MARKED (RELOC) MUST HAVE THEIR RIGHT
;;; HALVES RELOCATED WHEN THE ARRAY IS MOVED.
;;; THE FOLLOWING ARE INDICES INTO THE FILE ARRAY'S DATA AREA
;;; (I.E. THEY ARE USED TO INDEX THROUGH THE TTSAR).
J.INTF==:0 ;INTERRUPT FUNCTION (NEEDED BY INT SYSTEM)
J.CINT==:1 ;CHANNEL INTERRUPT FUNCTION
J.LFNM==:2 ;LOAD FILE NAMELIST?
J.CRUFT==:3 ;RANDOM CRUFT (USUALLY PROPERTY LIST)
J.GC==:4 ;NUMBER OF SLOTS GC SHOULD EXAMINE
;SLOTS 3-12 RESERVED
;;; F.DEV THROUGH F.RFN2 (12 TO 21) APPLY TO JOB ARRAYS ALSO.
J.INTB==:LOPOFA+0 ;INTERRUPT BIT, OR ZERO FOR FOREIGN JOB
J.STAD==:LOPOFA+1 ;START ADDRESS
J.UIND==:LOPOFA+2
LOJOBA==:FB.BUF
J.SYMS==:FB.BUF ;START OF SYMBOL TABLE, IF ANY
] ;END OF IFN ITS
;SR.CAL SFCALI SR.WOM SR.UDL SO.OPN SO.CLO SO.REN SO.DEL SO.TRP SO.PR1 SO.TYI SO.UNT SO.TIP SO.IN SO.EOF SO.TYO SO.PRO SO.FOU SO.RED SO.RDL SO.PRT SO.PRC SO.MOD SO.POS SO.ICL SO.OCL SO.OUT SR.FML SR.FUN SR.PNA SR.FUS SR.LEN STPFL NM
IFE SFA, SFCALI==-1
IFN SFA,[
SUBTTL FORMAT OF SFA OBJECTS
;;; AN SFA OBJECT HAS THE AS.SFA BIT SET IN THE ASAR. TTS.CL IS IGNORED.
;;; THE FOLLOWING ARE INDICIES INTO THE SFA ARRAY AND ARE UNMARKED FROM:
SR.CAL==:0 ;THE LISP CALL UUO XCT'ED TO INVOKE THE SFA FUNCTION
SFCALI==:SR.CAL ;FOR COMPILED CODE
SR.WOM==:1 ;WHICH-OPERATIONS MASK: ENCODED MASK OF THE OPERATIONS THAT
; THE SFA CAN PERFORM. USED FOR QUICK TESTING IN CERTAIN
; DISPATCH CASES. BITS AS FOLLOWS:
SR.UDL==:2 ;USER DATA LENGTH
;;; ***NOTE: THE HALVNESS OF THE BITS MUST NOT CHANGE ***
;LH BITS
SO.OPN==:400000 ;OPEN
SO.CLO==:200000 ;CLOSE
SO.REN==:100000 ;RENAMEF
SO.DEL==:040000 ;DELETEF
SO.TRP==:020000 ;TERPRI
SO.PR1==:010000 ;PRIN1
SO.TYI==:004000 ;TYI
SO.UNT==:002000 ;UNTYI
SO.TIP==:001000 ;TYIPEEK
SO.IN==:000400 ;IN
SO.EOF==:000200 ;EOFFN
SO.TYO==:000100 ;TYO
SO.PRO==:000040 ;PRINT-OBJECT
SO.FOU==:000020 ;FORCE-OUTPUT
SO.RED==:000010 ;READ
SO.RDL==:000004 ;READLINE
SO.PRT==:000002 ;PRINT
SO.PRC==:000001 ;PRINC
;RH BITS
SO.MOD==:400000 ;FILEMODE
SO.POS==:200000 ;FILEPOS
SO.ICL==:100000 ;CLEAR-INPUT
SO.OCL==:040000 ;CLEAR-OUTPUT
SO.OUT==:020000 ;OUT
SR.FML==:3 ;FIRST MARKED LOCATION
SR.FUN==:3 ;RH IS SFA FUNCTION
SR.PNA==:4 ;RH IS PRINTNAME
SR.FUS==:5 ;LH IS FIRST USER SLOT
SR.LEN==:5 ;NUMBER OF WORDS NEEDED BY THE SYSTEM
] ;END IFN SFA
;;; Size of hunks
IFDEF SEGLOG, HNKLOG==SEGLOG-1
IFNDEF SEGLOG, HNKLOG==11;;@ END OF DEFNS 228
;;; DON'T HACK THIS $INSRT - UNIFY DEPENDS ON IT
;;@ MACS 74 LOTSA MOBY MACROS
;;; ***** MACLISP *** RANDOM MIDAS MACROS FOR USE IN LISP SOURCE *
;;; **************************************************************
;;; ** (C) COPYRIGHT 1980 MASSACHUSETTS INSTITUTE OF TECHNOLOGY **
;;; ****** THIS IS A READ-ONLY FILE! (ALL WRITES RESERVED) *******
;;; **************************************************************
SUBTTL RANDOM MACROS
;;; MACRO TO REMOVE SYMBOLS OF THE FORM "GXXXXX"
DEFINE GEXPUN
DEFFLUSH
.GSSET 0
STPFL==0
.TAG FOO FLUSH
IFE STPFL, .GO FOO
TERMIN
DEFINE DEFFLUSH \SYM
DEFINE FLUSH \ZZX
IFSE SYM,ZZX, STPFL==1
EXPUNGE ZZX
TERMIN
TERMIN
DEFINE HAOLNG NM,N
RADIX 2
NM==HAOWNG \N
RADIX 8
TERMIN
DEFINE HAOWNG A
.LENGTH /A/
TERMIN
DEFINE MAYBE DEF
IF1,[
IRPS SYM,,[DEF]
IFNDEF SYM, DEF
.ISTOP
TERMIN
]
TERMIN
DEFINE TBLCHK START,LENGT
IFN .-<START>-<LENGT>, WARN [WRONG LENGTH TABLE]
TERMIN
;
;;; "POP IMMEDIATE" MACRO TRIES TO DECREMENT A PDL POINTER IN THE BEST WAY.
DEFINE POPI <AC,N>
;; IFN KL10, ADJSP AC,-<N> .STOP
IFDEF R70, IFDEF LR70, IFL <N>-LR70, SUB AC,R70+<N> .STOP
SUB AC,[<N>,,<N>]
TERMIN
;;; "PUSH N SLOTS" MACRO PUSHES ZERO WORDS ONTO A PDL.
DEFINE PUSHN <AC,N>
IFE <N>, .STOP
IFE <N>-1, PUSH AC,R70 .STOP
IFE AC-P,{
PUSHN1 AC,N,NPUSH
.STOP~
IFE AC-FXP,{
PUSHN1 AC,N,0PUSH
.STOP~
IFE AC-FLP,{
PUSHN1 AC,N,0.0PUSH
.STOP~
WARN [PUSH AC,N UNKNOWN PDL]
TERMIN
DEFINE PUSHN1 <AC,M,XPUSH>
IFLE <M>-N!XPUSH, JSP T,XPUSH-<M> .STOP
JSP T,XPUSH-N!XPUSH
PUSHN1 AC,<M-N!XPUSH>,XPUSH
TERMIN
;%HISEG %LOSEG CURSTD %LOSEG %HISEG CURSTD
SUBTTL $LOSEG, $HISEG,
IFN D10,[
IFN HISEGMENT,[
DEFINE $LOSEG ;MACRO TO SWITCH TO LOW SEGMENT FOR 2SEG ASSEMBLY
IFN %LOSEG+1,[
%HISEG==.-HILOC
LOC FIRSTLOC+%LOSEG
%LOSEG==-1
CURSTD==STDLO
] ;END OF IFN %LOSEG+1
.ELSE WARN [ALREADY IN LOW SEGMENT]
TERMIN
DEFINE $HISEG ;MACRO TO SWITCH TO HIGH SEGMENT FOR 2SEG ASSEMBLY
IFN %HISEG+1,[
%LOSEG==.-FIRSTLOC
LOC HILOC+%HISEG
%HISEG==-1
CURSTD==STDHI
] ;END OF IFN %HISEG+1
.ELSE WARN [ALREADY IN HIGH SEGMENT]
TERMIN
] ;END IFN HISEGMENT
IFE HISEGMENT,[
DEFINE $LOSEG
TERMIN
DEFINE $HISEG
TERMIN
] ;END IFE HISEGMENT
] ;END OF IFN D10
;
SUBTTL PIONAGAIN, PIPAUSE, PION, TICCMAP
IFN ITS,[
DEFINE PIPAUSE ;DISABLE INTERRUPT SYSTEM
.SUSET PIHOLD
TERMIN
DEFINE PIONAGAIN
.SUSET PINBL
TERMIN
DEFINE PION
.SUSET PINBL
TERMIN
] ;END OF IFN ITS
IFN D10\D20,[
DEFINE PIPAUSE
PUSHJ P,DALINT
TERMIN
DEFINE PIONAGAIN
PUSHJ P,REAINT
TERMIN
DEFINE PION
PUSHJ P,ENBINT
TERMIN
] ;END OF IFN D10\D20
IFN D20,[
;DO THE "BODY' WITH "CODE" SUCCESSIVELY SET TO TERMINAL-INTERRUPT-CONTROL OPTIONS
DEFINE TICMAP {BODY~
IRP CODE,,[CB,CD,CG,CW,CX,CZ,CA,CV,CE,CF]
BODY
TERMIN
TERMIN
] ;END OF IFN D20
;ZZZ ZZZ
SUBTTL FUMBLE, STUMBLE, AND GRUMBLE
DEFINE FUMBLE FF,RIDER,SPECS ;FOR SPACES
STUMBLE FUMBLE,FF,RIDER,0,SEGSIZ,[SPECS]
TERMIN
DEFINE GRUMBLE PDL,RIDER,SPECS ;FOR PDLS
STUMBLE GRUMBLE,PDL,RIDER,20,100,[SPECS]
TERMIN
DEFINE STUMBLE NAME,FF,RIDER=[IFE 0],LO,HI,%SPECS
ZZZ==0
IRP SPEC,,[%SPECS]
IRP COND,VALS,[SPEC]
IFN COND,[
IRP M,,[MIN,MAX]Q,,[LO,HI]V,,VALS
RIDER,[
IFL V-Q, M!!FF==:Q
.ELSE M!!FF==:V
]
.ELSE M!!FF==:0
TERMIN
ZZZ==ZZZ+1
]
.ISTOP
TERMIN
TERMIN
IFN ZZZ-1, WARN \ZZZ,[ SPECS SUCCEEDED FOR NAME FF]
EXPUNGE ZZZ
TERMIN
;PGTPMK NPGTPS
SUBTTL PGBOT, [PGTOP], PAGEUP, SEGUP, SPCBOT, SPCTOP
;;; NOTE THAT PGBOT DEFINES PGTOP FOR THE NEXT USE, WHILE
;;; PGTOP IS AUTO-EXPUNGING (AND VICE VERSA).
DEFINE DPGBOT
DEFINE PGBOT SPC
PGTPMK==.
DEFINE PGBOT SPC1
WARN [ILLEGAL PGBOT SPC1]
TERMIN
DEFINE PGTOP SPC1,CRUFT
IFSN SPC1,SPC, WARN [PGTOP SPC1 DOESN'T MATCH PGBOT SPC]
CONC CPG,\NPGTPS,: CONSTANTS
CONC ECPG,\NPGTPS,::
PGTOP1 \NPGTPS,\.-PGTPMK,[CRUFT]
NPGTPS==NPGTPS+1
DPGBOT
TERMIN
TERMIN
DEFINE PGTOP SPC,CRUFT
WARN [ILLEGAL PGTOP SPC,CRUFT]
TERMIN
TERMIN
DPGBOT
DEFINE PGTOP1 N,SIZE,STUFF
PRINTX ≤ P!N: SIZE [STUFF]
≤
TERMIN
.XCREF PGTOP1
DEFINE PAGEUP
REL$ LOC .RL1+<<.-.RL1+CURSTD+PAGSIZ-1>&PAGMSK>-CURSTD
REL% LOC <<.-CURSTD+PAGSIZ-1>&PAGMSK>-CURSTD
TERMIN
DEFINE SEGUP PT
REL$ LOC .RL1+<<PT-.RL1+CURSTD+SEGSIZ-1>&SEGMSK>-CURSTD
REL% LOC <<PT+CURSTD+SEGSIZ-1>&SEGMSK>-CURSTD
TERMIN
;ZZY ZZ ZZX ZZY
DEFINE SPCBOT SPC
REL$ ZZ==.-.RL1
REL% ZZ==.
ZZY==.TYPE B!SPC!SG
IFN <17-ZZY>*<3-ZZY>*<11-ZZY>,[
IFN B!SPC!SG-., WARN [FORMERLY B!SPC!SG=]\B!SPC!SG,[, BUT NOW B!SPC!SG=]\ZZ
]
IFN <ZZ+CURSTD>&SEGKSM, WARN \ZZ+CURSTD,[=BAD BOUNDARY FOR B!SPC!SG]
B!SPC!SG==.
TERMIN
;;; NOTE WELL! ZZW MUST BE SAFE ACROSS THE SPCTOP MACRO
DEFINE SPCTOP SPC,TYP,CRUFT
ZZ==.
SEGUP .
ZZX==<.-B!SPC!SG>/SEGSIZ
ZZY==.TYPE N!SPC!SG
IFN <17-ZZY>*<3-ZZY>*<11-ZZY>,[
IFN N!SPC!SG-ZZX, WARN [FORMERLY N!SPC!SG=]\N!SPC!SG,[, BUT NOW N!SPC!SG=]\ZZX
]
N!SPC!SG==ZZX
IFL ZZX-5, SPCTP1 \ZZX,[CRUFT]\<.-ZZ>
IFGE ZZX-5, SPCTP2 \ZZX,[CRUFT]\<.-ZZ>
TERMIN
DEFINE SPCTP1 N,CRUFT,U
IRP Q,,[0,1,2,3,4]R,,[ZERO,ONE,TWO,THREE,FOUR]
IFE N-Q,[
PRINTX ≤ ***** R CRUFT SEGMENT≤
IFN N-1, PRINTX \S\
IFN U, PRINTX \ [U UNUSED WORDS]\
PRINTX \
\
]
IFE N-Q, .ISTOP
TERMIN
TERMIN
DEFINE SPCTP2 N,CRUFT,U
IRP Q,,[5,6,7,10,11,12,13,14,15,16,17,20,21,22
23,24,N]R,,[FIVE,SIX,SEVEN,EIGHT,NINE,TEN
ELEVEN,TWELVE,THIRTEEN,FOURTEEN,FIFTEEN,SIXTEEN,SEVENTEEN
EIGHTEEN,NINETEEN,TWENTY,N (OCTAL)]
IFE N-Q,[
PRINTX ≤ ***** R CRUFT SEGMENT≤
IFN N-1, PRINTX \S\
IFN U, PRINTX \ [U UNUSED WORDS]\
PRINTX \
\
]
IFE N-Q, .ISTOP
TERMIN
TERMIN
.XCREF SPCTP1 SPCTP2
;NPURTR NIOCTR
SUBTTL PURTRAP, IOCTRAP, 2DIF, AND INTPRO MACROS
;;; FEATURE FOR AUTOMATIC TRAPOUT ON PURE PAGE VIOLATIONS
;;; STANDARD USAGE IS TO REPLACE
;;; MOVEM X,Y ;COULD CAUSE PURE PAGE TRAP
;;; WITH
;;; PURTRAP PATCH-LOC,AC, MOVEM X,Y
;;; IF THE INSTRUCTION CAUSES A PURE PAGE VIOLATION,
;;; THEN THE PURE PAGE TRAP HANDLER WILL TRANSFER TO FOO,
;;; WITH ALL ACS, ETC. INTACT (HOPEFULLY), RATHER THAN
;;; ERRORING OUT, WHICH IS THE DEFAULT. SEE PURPGI.
;;; FOR DEC-10, THERE IS AN EXPLICIT CHECK FOR TRYING TO CLOBBER
;;; THE HISEG.
;;; A SIMILAR FEATURE FOR IOC TRAPS
;;; STANDARD USAGE IS:
;;;
;;; BAR: XCT D ;D HAS .IOT
;;; IOCTRAP TT,FOO,N ;N IS OPTIONAL
;;; <MORE CODE>
;;;
;;; IF THE INSTRUCTION AT BAR CAUSES AN IOC ERROR,
;;; THEN THE IOC ERROR CODE IS PUT INTO ACCUMULATOR TT,
;;; AND CONTROL TRANSFERRED TO FOO WITH ALL OTHER ACS INTACT.
;;; IF N IS GIVEN, ONLY IOC ERROR CODE N IS TRAPPED.
IFN ITS+D20,[
DEFINE PURTRAP X,B-INST
INST
PURTR1 \.-1,\NPURTR,D,X
NPURTR==NPURTR+1
TERMIN
DEFINE PURTR1 L,N,AC,X
DEFINE ZZP!N
CAIN AC,L
HRROI AC,X
TERMIN
TERMIN
;;; FOR COMMENTS ON 2DIF, SEE BELOW
DEFINE 2DIF INST,X,Y
<INST>\<,,<X>-<Y>>
TERMIN
] ;END OF IFN ITS+D20
DEFINE IOCTRAP AC,X,N
IOCTR1 \.-1,\NIOCTR,AC,X,N
NIOCTR=NIOCTR+1
TERMIN
DEFINE IOCTR1 L,N,AC,X,N
DEFINE ZZI!N
IFSN [N],[
CAIE D,N
JRST .+3
]
CAIN R,L
MOVE R,[SETZ X(AC)]
TERMIN
TERMIN
;N2DIF
IFN D10,[
DEFINE PURTRAP X,B-INST
HS$ CAIL B,HILOC
HS$ JRST X
INST
TERMIN
] ; END -- IFN D10,
;Hack for PWIOINT for WITHOUT-INTERRUPTS, in BIND
;PURTRAP is OK for non-D10, but must check explicitly for PWIOINT in D10
;I'm not sure if this HS$ is the right thing. It wants to check in all cases
;where a pure trap won't happen, such as PLISP at SAIL --RWK
IFE D10,[
DEFINE BNDTRAP LBL,X,B-INST
IFSN LBL,,LBL:
PURTRAP X,B, INST
TERMIN
] ;END -- IFE D10
IFN D10,[
DEFINE BNDTRAP LBL,X,B-INST
CAIN B,PWIOINT
JRST X
IFSN LBL,,LBL:
INST
TERMIN
] ;END -- IFN D10,
IFN D10,[
;;; FEATURE FOR TWO-SEGMENT DEC-10 ASSEMBLIES TO WIN ON THE
;;; MANY INSTRUCTIONS IN LISP WHICH ARE OF THE FORM
;;; JRST FOO-BAR(X)
;;; WHERE FOO IS IN ONE SEGMENT AND BAR IN THE OTHER.
;;; THE CORRECT WAY TO WRITE THE ABOVE INSTRUCTION IS
;;; 2DIF JRST (X),FOO,BAR
DEFINE 2DIF INST,X,Y
IFN %HISEG+1, 2DIF1 \.-HILOC,HILOC,[X][Y]\N2DIF
IFE %HISEG+1, 2DIF1 \.-FIRSTLOC,FIRSTLOC,[X][Y]\N2DIF
N2DIF==N2DIF+1
INST
TERMIN
;;; A COUPLE OF CROCKS:
;;; [1] THE .CRFON AND .CRFOFF IN ZZD!N INTERACT WITH
;;; THOSE IN THE MACROLOOP MACRO.
;;; [2] THE OFFSETS ALLOW ADDRESSES CONTAINING . IN
;;; THE 2DIF'ED INSTRUCTION (KNOCK PLASTIC).
;;; I.E. THE OFFSET F+L-. IS A HACK SO THAT
;;; ANY .'S IN X OR Y WILL REFER TO THE 2DIF'D
;;; INSTRUCTION AND NOT TO THE PLACE WHERE THE ZZD!N
;;; GETS EXPANDED.
DEFINE 2DIF1 L,F,X,Y,N
.CRFOFF
DEFINE ZZD!N
.CRFON
OFFSET F+L-.
MOVEI T,X
SUBI T,Y
OFFSET 0
.CRFOFF
HRRM T,F+L
TERMIN
.CRFON
TERMIN
;;; THE ZZD MACROS GET EXPANDED IN THE INIT ROUTINE.
] ;END OF IFN D10
;NPRO
DEFINE INTPRO W
REL$ PROENT \.-.RL1,W,\NPRO
REL% PROENT \.,W,\NPRO
TERMIN
DEFINE PROENT L,W,N
DEFINE PRO!N
REL$ W,,L+.RL1
REL% W,,L
TERMIN
NPRO==NPRO+1
TERMIN
DEFINE NOPRO ;BEGINS INTERVAL WITH NO INT PROTECTION
INTPRO INTOK
TERMIN
DEFINE SFXPRO ;CODE PROMISES TO RETURN THROUGH AN SFX CELL
INTPRO INTSFX
TERMIN
DEFINE XCTPRO ;FOLLOWING INSTRS MUST BE XCT'D BEFORE INT
INTPRO INTXCT
TERMIN
DEFINE BAKPRO ;MUST BACK UP TO HERE IF INT HAPPENS
INTPRO INTBAK
TERMIN
DEFINE SPECPRO H ;USED A SPECIALIZED PROTECTION ROUTINE
INTPRO H
TERMIN
;;; NO PROTECTION FOR ABSOLUTE LOCATIONS FROM 0 UP TO NEXT INTERVAL
DEFINE PRO0
INTOK,,0
TERMIN
;;; THE PRO MACROS ARE EXPANDED AT PROTB (Q.V.)
;ZZ ZZ ZZ GS SEGBYT LONUM HINUM PAGSIZ PAGMSK PAGKSM NPAGS NNUMTP NTYPES
SUBTTL ST AND GCST HACKERS
IFN PAGING,[
;;; THESE MACROS ACTUALLY FILL IN THE SEGMENT TABLES, FOR ITS ASSEMBLIES
DEFINE $ST SPC,BITS
IFN .-ST-<B!SPC!SG/SEGSIZ>,[
WARN [SEGMENT TABLE PHASE ERROR - TABLE LOC=]\.-ST,[, B!SPC!SG/SEGSIZ=]\B!SPC!SG/SEGSIZ
LOC ST+<B!SPC!SG/SEGSIZ>
]
IFN N!SPC!SG, $ST1 SPC,\N!SPC!SG,BITS
TERMIN
DEFINE $ST1 SPC,N,XBITS
ST.!SPC:
ZZ==0
IRP TYPE,,[LIST,FIXNUM,FLONUM,BIGNUM,SYMBOL,RANDOM,ARRAY]BB,,[LS,FX,FL,BN,SY,RN,SA]
IFN <XBITS>&BB,[
REPEAT N, <XBITS>,,Q!TYPE
ZZ==ZZ+1
]
TERMIN
IFN ZZ-1, WARN [IMPROPER TYPE BITS FOR SPC SPACE: ]\XBITS
TERMIN
;;; THERE ARE NO INITIAL HUNKS!!!
;;; THESE MACROS HAVE THEREFORE NOT BEEN HACKED FOR HUNKS!!!
DEFINE $GCST SPC,LINK,BTBP,BITS
IFSE LINK,L, L!SPC!SG==0
IFN .-GCST-<B!SPC!SG/SEGSIZ>,[
WARN [GCST PHASE ERROR - TABLE LOC=]\.-GCST,[, B!SPC!SG/SEGSIZ=]\B!SPC!SG/SEGSIZ
LOC GCST+<B!SPC!SG/SEGSIZ>
]
IFN N!SPC!SG, $GCST1 \N!SPC!SG,SPC,LINK,BTBP,BITS
TERMIN
DEFINE $GCST1 N,SPC,LINK,BTBP,BITS
GS.!SPC:
REPEAT N,[
ZZ==(BITS)
IFSE BTBP,B, ZZ==ZZ+BTB.←<5-SEGLOG>
.ALSO BTB.==BTB.+BTBSIZ
IFSE LINK,L, ZZ==ZZ+L!SPC!SG←<22-<SEGLOG-5>>
.ALSO L!SPC!SG==.-GCST
ZZ
]
TERMIN
] ;END OF IFN PAGING
IFE PAGING,[
;;; THIS MACRO MAKES UP THE CODE THAT INITIALIZES THE SEGMENT TABLES
DEFINE 10ST SPC,STENT=[$XM,,QRANDOM]GCENT=0,LINK,BITS
IFN N!SPC!SG,[
MOVEI T,B!SPC!SG
LSH T,-SEGLOG
MOVE TT,[STENT]
REPEAT N!SPC!SG, MOVEM TT,ST+.RPCNT(T)
IFN GCENT,[
MOVSI TT,GCENT
REPEAT N!SPC!SG,[
IFSN BITS,,[
HRRI TT,(AR1)
ADDI AR1,1
] ;END OF IFSN BITS,,
MOVEM TT,GCST+.RPCNT(T)
] ;END OF REPEAT N!SPC!SG
] ;END OF IFN GCENT
IFSN LINK,,[
IFG N!SPC!SG-1,[
HRLI T,-N!SPC!SG+1
DPB T,[SEGBYT,,GCST+1(T)]
AOBJN T,.-1
] ;END OF IFG N!SPC!SG-1
HRRZM T,LINK
] ;END OF IFSN LINK,,
] ;END OF IFN N!SPC!SG
TERMIN
] ;END OF IFE PAGING
;;; $<GS>T IN DDT IS GOOD FOR LOOKING AT GCST
GS==<777000,,>\<<1←<22-<SEGLOG-5>>>-1>
;;; FOR FETCHING LINK FIELD WITH A LDB
SEGBYT==<22-<SEGLOG-5>>←14+<22-SEGLOG>←6
;;@ END OF MACS 74
SA% LRCT==:NASCII+10 ;SPACE SUFFICIENT FOR CHARS AND SWITCHES
SA$ LRCT==:1010
10$ LIOBUF==:200 ;LENGTH OF STANDARD VANILLA I/O BUFFER
LONUM==400 ;MINIMUM MAGNITUDE OF LOWEST NEGATIVE INUM
HINUM==1000 ;MINIMUM MAGNITUDE OF LARGEST POSITIVE INUM
;SOME CODE ASSUMES HINUM IS AT LEAST 777
;MUCH CODE ASSUMES HINUM IS AT LEAST 177 (FOR ASCII CHARS)
IFN ITS, PAGLOG==:12 ;LOG2 OF PAGE SIZE
; (DAMN WELL BETTER BE 12 FOR ITS!!!
IFN D10, PAGLOG==:11 ; SOME CODE ASSUMES IT WILL BE 11 OR 12)
IFN D20, PAGLOG==:11
IFE D10*PAGING, MEMORY==:<1,,0> ;SIZE OF MEMORY!!!
IFN D10*PAGING, MEMORY==:776000 ;ON D10 SYSTEMS, CAN'T USE ALL OF MEMORY
PAGSIZ==:1←PAGLOG ;PAGE SIZE
PAGMSK==:<777777←PAGLOG>&777777 ;MASKS ADDRESSES TO PAGE BOUNDARY
PAGKSM==:PAGMSK#777777 ;MASKS WORD ADDRESS WITHIN PAGE
NPAGS==:MEMORY/PAGSIZ ;NUMBER OF PAGES IN MEMORY
NNUMTP==:2+BIGNUM+DBFLAG+CXFLAG+DBFLAG*CXFLAG ;NUMBER OF NUMBER TYPES
NTYPES==:3+HNKLOG+1+NNUMTP+1 ;NUMBER OF DATA TYPES, COUNTING RANDOM
;SEGSIZ SEGMSK SEGKSM NSEGS BTBSIZ SGS%PG BTSGGS ALPDL ALFXP ALFLP ALSPDL ALFXP ALFLP ALPDL ALSPDL
;;; IF1
SEGSIZ==:1←SEGLOG ;SEGMENT SIZE
SEGMSK==:<777777←SEGLOG>&777777 ;MASKS ADDRESSES TO SEGMENT BOUNDARY
SEGKSM==:SEGMSK#777777 ;MASKS WORD ADDRESS WITHIN SEGMENT
NSEGS==:MEMORY/SEGSIZ ;NUMBER OF SEGMENTS IN MEMORY
BTBSIZ==:SEGSIZ/40 ;SIZE OF BIT BLOCKS
;(ENOUGH BITS FOR A SEGMENT, 40 PER WORD)
SGS%PG==:NSEGS/NPAGS ;NUMBER OF SEGMENTS PER PAGE
BTSGGS==1 ;GUESS AT THE NUMBER OF INITIAL BIT SEGMENTS
IFN PAGING,[
ALPDL==4*PAGSIZ ;DEFAULT TOTAL PDL SIZES
ALFXP==4*PAGSIZ
ALFLP==1*PAGSIZ
ALSPDL==2*PAGSIZ
] ;END OF IFN ITS+D20
IFE PAGING,[
ALFXP==SEGSIZ ;DEFAULT TOTAL PDL SIZES
ALFLP==SEGSIZ
ALPDL==3000
ALSPDL==1400
] ;END OF IFN D10
;;; GROSSLY DETERMINE MIN AND MAX PARAMETERS FOR EACH SPACE AND PDL
FUMBLE FFS,,[[1,[0.25,40000]]]
FUMBLE FFX,,[[PAGING,[0.2,14000]],[PAGING-1,[0.25,3000]]]
FUMBLE FFL,,[[PAGING,[0.15,2*SEGSIZ]],[PAGING-1,[0.25,SEGSIZ]]]
FUMBLE FFD,IFN DBFLAG,[[1,[0,SEGSIZ]]]
FUMBLE FFC,IFN CXFLAG,[[1,[0,SEGSIZ]]]
FUMBLE FFZ,IFN DXFLAG,[[1,[0,SEGSIZ]]]
FUMBLE FFB,IFN BIGNUM,[[PAGING,[3*SEGSIZ/4,2*SEGSIZ]],[PAGING-1,[0.2,SEGSIZ]]]
FUMBLE FFY,,[[PAGING,[SEGSIZ/2,6000]],[PAGING-1,[SEGSIZ/2,3*SEGSIZ]]]
FUMBLE FFH,IFN HNKLOG,[[1,[0,2*SEGSIZ]]]
FUMBLE FFA,,[[1,[40,SEGSIZ]]]
GRUMBLE PDL,,[[1,[200,1400]]]
GRUMBLE SPDL,,[[1,[100,1400]]]
GRUMBLE FXP,,[[1,[200,1000]]]
GRUMBLE FLP,,[[1,[20,200]]]
;IB.ALARM IB.TIMER IB.PARITY IB.FLOV IB.PURE IB.PCPURE IB.SYSUUO IB.AT3 IB.AT2 IB.AT1 IB.DEBUG IB.RVIOL IB.CLI IB.PDLOV IB.LTPEN IB.MAR IB.MPV IB.SCLK IB.1PROC IB.BREAK IB.ILAD IB.IOC IB.VALUE IB.DOWN IB.ILOP IB.DMPV IB.AROV IB.42BAD IB.C.Z IB.TTY IB.PDLOV IB.MPV
;;; IF1
;;; ********** INTERRUPT BITS **********
IFN ITS,[
;;; THESE NAMES SHOULD BE PHASED OUT IN FAVOR OF THE ITS-STANDARD %PI SERIES.
;;; LISP SETS ITS INTERRUPT MASK (.MASK USET VARIABLE) ONLY FROM
;;; THE CONTENTS OF LOCATION IMASK, WHICH INITIALLY CONTAINS STDMSK.
;;; DEPOSITING DBGMSK THERE BEFORE STARTUP DISABLES ALL INTERRUPTS
;;; EXCEPT TTY AND PDL OVERFLOW, SO THAT DDT WILL TRAP ILOP, MPV, ETC.
IB.ALARM==200000,, ; REAL TIME CLOCK (ALARM CLOCK)
IB.TIMER==100000,, ; RUN TIME CLOCK
IB.PARITY==1000,, ;+ PARITY ERROR
IB.FLOV==400,, ; FLOATING OVERFLOW
IB.PURE==200,, ;+ PURE PAGE TRAP (WRITE INTO READ-ONLY)
IB.PCPURE==100,, ;+ PURE INSTRUCTION FETCH FROM IMPURE
IB.SYSUUO==40,, ;+ SYS UUO TRAP
IB.AT3==20,, ; ARM TIP BREAK 3
IB.AT2==10,, ; ARM TIP BREAK 2
IB.AT1==4,, ; ARM TIP BREAK 1
IB.DEBUG==2,, ; SYSTEM BEING DEBUGGED
IB.RVIOL==1,, ;+ RESTRICTION VIOLATION (?)
IB.CLI==400000 ; CORE LINK INTERRUPT
IB.PDLOV==200000 ; PDL OVERFLOW
IB.LTPEN==100000 ; LIGHT PEN INTERRUPT
IB.MAR==40000 ;+ MAR INTERRUPT
IB.MPV==20000 ;+ MEMORY PROTECTION VIOLATION
IB.SCLK==10000 ; SLOW CLOCK TICK (.5 SEC)
IB.1PROC==4000 ;* SINGLE INSTRUCTION PROCEED
IB.BREAK==2000 ;* .BREAK EXECUTED
IB.ILAD==1000 ;+ ILLEGAL USER ADDRESS
IB.IOC==400 ;+ I/O CHANNEL ERROR
IB.VALUE==200 ;* .VALUE EXECUTED
IB.DOWN==100 ; SYSTEM GOING DOWN OR BEING REVIVED
IB.ILOP==40 ;+ ILLEGAL INSTRUCTION OPERATION
IB.DMPV==20 ;+ DISPLAY MEMORY PROTECTION VIOLATION
IB.AROV==10 ; ARITHMETIC OVERFLOW
IB.42BAD==4 ;* BAD LOCATION 42
IB.C.Z==2 ;* ^Z TYPED WHEN THIS JOB HAD TTY
IB.TTY==1 ; INTERRUPT CHAR TYPED ON TTY
] ;END OF IFN ITS
IFN D10,[
IB.PDLOV==AP.POV ; PDL OVERFLOW
IB.MPV==AP.ILM ;+ MEMORY PROTECTION VIOLATION
SA% STDMSK==AP.REN+AP.POV+AP.ILM+AP.NXM+AP.PAR
SA$ STDMSK==<404,,230000>
] ;END OF IFN D10
;;; ********** I/O CHANNEL ASSIGNMENTS **********
;;; PAGE 376 IS RESERVED FOR COPYING (SEE IP1), AND 377 FOR DISUSE.
;;; (THE DISUSE AS TO DO WITH AN OLD HARDWARE BUG IN BLT.)
;;; ON AI, PAGE 375 IS FOR MAPPING PAGE 0 OF THE DISPLAY SLAVE.
IT$ P6=MEMORY-3*PAGSIZ ;PAGE 0 OF PDP6 SLAVE IS MAPPED INTO PDP-10 MEMORY
] ;END OF IF1
;TOPN BOTN NPURTR NIOCTR N2DIF NPRO %LOSEG %HISEG FIRSTLOC STDLO STDHI CURSTD STDLO STDHI CURSTD
;IFE <ITS+TENEX>*USELESS, NPGTPS==0
IFE 0, NPGTPS==0
TOPN==0
BOTN==0
.XCREF TOPN BOTN
NPURTR==0
NIOCTR==0
.XCREF PURTR1 NPURTR NIOCTR
N2DIF==0
NPRO==0+1 ;NUMBER OF INTERRUPT PROTECTION REGIONS
;NOTE DEFN OF PRO0 IN MACS FILE
.XCREF NPRO
IFN D10,[
HS$ .DECTWO HSGORG ;DEC TWO-SEGMENT RELOC OUTPUT
HS% .DECREL ;ONE SEGMENT ASSEMBLY
IFN PAGING, LOC 140 ;FOR PAGING ASSEMBLY NEED ABSOLUTE ADDRESSING
%LOSEG==-1 ;INITIALLY START IN LOW SEGMENT
%HISEG==0 ;START AT 0 RELATIVE TO HIGH SEG ORIGIN
] ;END OF IFN D10
IFN ITS, IFDEF .SBLK, .SBLK ;EVENTUALLY FLUSH "IFDEF .SBLK"
20$ .DECREL ;FOR TOPS-20 NEED DEC RELOCATABLE FORMAT
20$ LOC 140 ;BUT FORCE ABSOLUTE ADDRESSING
.YSTGWD ;STORAGE WORDS ARE OKAY NOW
FIRSTLOC:
IFN D10,[
HS$ HILOC==.+HSGORG ;HISEG GENERALLY STARTS AT 400000
HS% HILOC==.
;;; FOR DEC-10, FIRSTLOC AS LOADED WITH RELOCATION MUST BE
;;; STDLO+M*SEGSIZ
;;; AND SIMILARLY HILOC WHEN LOADED MUST BE
;;; STDHI+N*SEGSIZ
;;; FOR INTEGRAL M AND N. INIT WILL ENFORCE THIS IN ORDER
;;; TO PRESERVE SEGMENT BOUNDARIES CORRECTLY.
;;; CURSTD IS THE STDXX FOR WHICHEVER IS THE CURRENT SEGMENT.
STDLO==140 ;SIZE OF JOB DATA AREA
STDHI==10 ;VESTIGIAL JOB DATA AREA
CURSTD==STDLO .SEE $LOSEG
] ;END OF IFN D10
IFN PAGING,[
STDLO==0
STDHI==0
CURSTD==0
] ;END OF IFN PAGING
IFN PAGING, BZERSG==0 ;BEGINNING OF "ZERO" SEGMENT(S)
IFE PAGING, BZERSG==FIRSTLOC-STDLO
;GOINIT GOINI7 SUSCON LISPGO LISPSW SUSFLS KA10P
SUBTTL FIRST LOCATIONS (41, GOINIT, LISPGO); UUO AND INTERRUPT VECTORS
LOC 41
JSR UUOH ;UUO HANDLER
10X WARN [TENEX INTERRUPT VECTOR?]
LOC FIRSTLOC
GOINIT:
IT$ .SUSET [.S40ADDR,,[TWENTY,,FORTY]] ;SET .40ADDR
MOVEI A,READTABLE
MOVEM A,VREADTABLE
IFN USELESS,[
MOVE A,[RCT0,,RCT]
BLT A,RCT+LRCT-1 ;RESTORE READ CHARACTER SYNTAX TABLE
] ;END OF IFN USELESS
MOVEI A,TTYIFA
MOVEM A,V%TYI
MOVEI A,TTYOFA
MOVEM A,V%TYO
MOVEI A,TRUTH
MOVEM A,VINFILE
SETZM VINSTACK
SETZM VOUTFILES
SETZM VECHOFILES
MOVEI A,QTLIST
MOVEM A,VMSGFILES
IFN USELESS&ITS,[
MOVEI T,IB<MAR> ;RESET THE MAR BREAK FEATURE
ANDCAM T,IMASK
.SUSET [.SAMASK,,T]
.SUSET [.SMARA,,R70]
] ;END OF IFN USELESS
MOVEI A,OBARRAY
MOVEM A,VOBARRAY ;GET BACK TOPLEVEL OBARRAY
SETZM V%PR1
SETZM VOREAD
SETZM TLF
SETZM BLF ;??
SETZM UNRC.G ;CLEAR STACKED NOINTERRUPT STUFF
SETZM UNRRUN
SETZM UNRTIM
SETZM UNREAR
SETZM TTYOFF
JSP A,ERINIT
GOINI7: SETZB A,VERRLI ;NULLIFY ERRLIST
PUSHJ P,INTERN
JUMPE A,LISPGO
PUSHJ P,REMOB2 ;GET STANDARD COPY OF NIL ON OBLIST
JRST GOINI7
;;; HERE IF NOT STOPPING AFTER A SUSPEND
SUSCON: MOVEI A,TRUTH ;RETURN T RATHER THAN NIL
MOVEM A,-1(FLP)
;;; FALL INTO LISPGO
LISPGO: SETOM AFILRD ;START HERE ON ≠G'ING
IT$ .SUSET GOL1 ;SET .40ADDR
IT$ .SUSET GOL2 ;GET INITIAL SNAME
20$ RESET ;RESET OURSELVES ON STARTUP
JRST 2,@LISPSW ;ZEROS OUT PC FLAGS, AND TRANSFERS TO LISP
IT$ GOL2: .RSNAM,,IUSN ;KEEP THESE ON SAME PHYSICAL PAGE
IT$ GOL1: .S40ADDR,,.+1
IT$ TWENTY,,FORTY
LISPSW: %ALLOC ;ALLOC CLOBBERS TO BE "LISP"
SUSFLS: TRUTH ;NON-NIL MEANS FLUSH SHARABLE PAGES BEFORE SUSPENDING
KA10P: 0 ;NON-ZERO ==> KA PROCESSOR (AS OPPOSED TO KL OR KI)
;TWENTY THIRTY FORTY UUOGLEEP JPCSAV
IFN ITS,[
TWENTY==:20 ;VARIOUS PLACES OFFSET FROM TWENTY ARE USED BY DDT
THIRTY==:TWENTY+10 ;RECALL THAT THE LEFT HALF OF .40ADDR IS THE ".20ADDR"
;;; ADDRESSES IN THE 20 BLOCK, SWIPED FROM DDT ORDER
;;; 25 HOLDS "." DURING A USER TYPEOUT INSTRUCTION
;;; 26 CONDITIONAL BREAKPOINT INSTRUCTION
;;; 27-30 .BREAK 16,'S FOR RETURNING FROM 26
;;; 31 INSTRUCTION FOR BREAKPOINT WHICH DIDN'T BREAK
;;; 32-33 JRST'S TO PROGRAM FROM 31, OR DATA FOR INSTRUCTION IN 31
;;; 34 INSTRUCTION BEING ≠X'D
.SEE MEMERR
.SEE UUOGL2
;;; 35-36 .BREAK 16,'S FOR RETURNING FROM 34
.SEE $XLOST
.SEE UUOGL2
;;; 37 HOLDS ≠Q DURING A USER TYPEOUT INSTRUCTION
.SEE PSYM1
FORTY: 0 ;.40ADDR USER VARIABLE POINTS HERE
JSR UUOGLEEP ;SYSTEMIC UUO HANDLER
-LINTVEC,,INTVEC ;SYSTEMIC INTERRUPT HANDLER
;;; THAT'S SYSTEMIC, NOT NECESSARILY SYSTEMATIC!!!
;;; ITS PASSES THE BUCK TO THE USER ON UUO'S 0 AND 50-77.
;;; THEY TRAP THROUGH THE .40ADDR, NOT NECESSARILY 40;
;;; SINCE LISP TREATS THESE AS ERRORS, WE CAN AFFORD TO SAVE
;;; THE JPC AND OTHER GOODIES HERE.
UUOGLEEP: 0
.SUSET [.RJPC,,JPCSAV]
JRST UUOGL1
] ;END OF IFN ITS
JPCSAV: 0
;NSFC NSFC NSFC
SUBTTL SFX HACKERY
;;; SFX MACRO TELLS WHERE A LONG PIECE OF SEMI-CRITICAL (MAY BE QUIT
;;; OUT OF, BUT MUST NOT PERMIT USER INTERRUPTS IN) CODE MAY BE MUNGED
;;; IF INTERRUPTED IN THE MIDDLE SO THAT WHEN DONE IT WILL RETURN TO
;;; THE INTERRUPT HANDLER. SUCH CODE INCLUDES ARRAY SUBSCRIPT
;;; COMPUTATIONS (SINCE AN INTERRUPT COULD DISPLACE THE ARRAY)
;;; AND ALL CODE WHICH MODIFIES THE SPECIAL PDL.
NSFC==0 ;COUNTER FOR MACRO SFX
.XCREF NSFC
IFE PAGING,[
DEFINE SFX A/
SFSTO \.-FIRSTLOC,\NSFC,[A]
NSFC==NSFC+1
A
TERMIN
DEFINE SFSTO PT,NM,IN
DEFINE ZZM!NM
FIRSTLOC+PT
TERMIN
DEFINE ZZN!NM
IN
TERMIN
TERMIN
] ;END OF IFN PAGING
IFN PAGING,[
DEFINE SFX A/
SFSTO \.,\NSFC,[A]
NSFC==NSFC+1
A
TERMIN
DEFINE SFSTO PT,NM,IN
DEFINE ZZM!NM
PT
TERMIN
DEFINE ZZN!NM
IN
TERMIN
TERMIN
] ;END OF IFN PAGING
;;; THE ZZM AND ZZN MACROS ARE EXPANDED AT SFXTBL (Q.V.)
;UNBND2 ABIND3 SETXIT SPECX AYNVSFX 1DIMS ARYGET ARYGT4 ARYGT8 1DIMF ANYGET 1DIMD ADYGET 1DIMZ AZYGET SPSV
;;; **** ALL USES OF THE SFX MACRO MUST APPEAR ON THIS PAGE ****
SFXPRO
10$ UNBD2A:
10$ POP FLP,R ;Restore R
UNBND2: MOVE TT,(SP)
MOVEM TT,SPSV ;ABOUT LOADING TT WITH SPSV, SEE UNBIND
MOVE TT,UNBND3
SFX POPJ P,
ABIND3: PUSH SP,SPSV
SFX POPJ P,
SETXIT: SUB SP,R70+1
SFX JRST (T)
SPECX: PUSH SP,SPSV
SFX JRST (T)
AYNVSFX: ;XCT'ED BY AYNVER
SFX %WTA (D)
1DIMS: JSP T,AYNV1 ;1-DIM S-EXP ARRAYS COME HERE
ARYGET: ROT R,-1 ;COMMON S-EXP ARRAY ACCESS ROUTINE
ADDI TT,(R)
ARYGT4: JUMPL R,ARYGT8
HLRZ A,(TT)
SFX POPJ P,
ARYGT8: HRRZ A,(TT)
SFX POPJ P,
1DIMF: JSP T,AYNV1 ;1-DIM FULLWORD ARRAYS COME HERE
ANYGET: ADDI TT,(R) ;COMMON FULLWORD ARRAY ACCESS ROUTINE
MOVE TT,(TT)
SFX POPJ P,
IFN DBFLAG+CXFLAG,[
1DIMD: JSP T,AYNV1 ;1-DIM DOUBLEWORD ARRAYS COME HERE
ADYGET: LSH R,1 ;COMMON DOUBLEWORD ARRAY ACCESS ROUTINE
ADDI TT,(R)
KA MOVE D,1(TT)
KA MOVE TT,(TT)
KIKL DMOVE TT,(TT)
SFX POPJ P,
] ;END OF IFN DBFLAG+CXFLAG
IFN DXFLAG,[
1DIMZ: JSP T,AYNV1 ;1-DIM FOUR-WORD ARRAYS COME HERE
AZYGET: LSH R,2 ;COMMON FOUR-WORD ARRAY ACCESS ROUTINE
ADDI TT,(R)
KA MOVE R,(TT)
KA MOVE F,1(TT)
KA MOVE D,3(TT)
KA MOVE TT,2(TT)
KIKL DMOVE R,(TT)
KIKL DMOVE TT,2(TT)
SFX POPJ P,
] ;END OF IFN DXFLAG
NOPRO
SPSV: 0 ;IMPORTANT TO SPECPDL BINDINGS
.SEE $IWAIT
;;; **** THERE MUST BE NO MORE USES OF THE MACRO SFX BEYOND HERE ****
EXPUNGE SFX SFSTO
;INTFLG NOQUIT UNREAL REALLY ERRSVD IMASK LFAKP LFAKFXP FAKP FAKFXP CMUP MONL6P UPIINT CCOCW1 CCOCW2 TENEXP VTS20P INTPC1 INTPC2 INTPC3 PDLSVT SUPSAV LV2SVT LV2SVF LV2ST2 LV3SVT LV3SVF LV3ST2 DSMSAV CINTAB CINTSZ
SUBTTL INTERRUPT FLAGS AND VARIABLES
;;; INTFLG INDICATES WHETHER IN INTERRUPT IS PENDING:
;;; 0 => NO INTERRUPT
;;; -1 => USER INTERRUPT PENDING (STACKED IN INTAR)
;;; -2 => ^X QUIT PENDING, DON'T RESET TTY
;;; -3 => ^G QUIT PENDING, DON'T RESET TTY
;;; -6 => ^X QUIT PENDING, DO RESET TTY
;;; -7 => ^G QUIT PENDING, DO RESET TTY
INTFLG: 0
;;; MAY NOT ^G/^X QUIT OR ALLOW USER INTERRUPTS IF NOQUIT NON-ZERO
;;; NON-ZERO IN LH MEANS GC IN PROGRESS; IMPLIES
;;; PDL POINTERS AND NIL MAY BE CLOBBERED
;;; NON-ZERO ONLY IN RH MEANS PDL POINTERS AND NIL ARE OK
NOQUIT: 0
¬
;;; MAY NOT ALLOW "REAL TIME" INTERRUPTS (CLOCK AND TTY) WHEN
;;; UNREAL IS NON-ZERO. MUNGED BY THE FUNCTION NOINTERRUPT.
;;; 0 => ALL INTERRUPTS OKAY
;;; -1 => NO INTERRUPTS OKAY
;;; 'TTY => ALARMCLOCK OKAY, TTY NOT OKAY
UNREAL: 0
REALLY: 0 ;IF NON-ZERO, THE ADDRESS OF A PDL SLOT FOR THE
;UNBINDER TO UNBIND A SAVED UNREAL INTO.
;SO THAT UNWPR1 CAN KEEP UNREAL SET WHILE BILDING IT.
.SEE WIMUNB
.SEE UNWPR1
ERRSVD: 0 .SEE ERRBAD
;;; INTERRUPT MASK IS ALUAQS IJITIALIZED FROM THIS WORD.
;;; FOR ITS, THIS IS THE .MASK (AND .MSK2) WORDS.
;;; FOR TOPS10 AND CMU, THIS IS THE APRENB WORD.
;;; FOR D20, THIS IS THE CHANNEL ENABLE WORD
;;; DEPOSITANG DBGMSK INTO IT BEFORE STARTUP CAN AID DEBUGGING.
;;; FOR ITS AND D20, IMPURE LISPS WILL HAVE DABUG MASKS IN THESE
;;; LOCATIONS; THE PUBIFY ROUTINE INSTALLS THE STANDARD MASKS.
.SEE PURIFY
.SEE DBGMSK
IFN <D10+D20>, OIMASK: 0 ;HOLDS OLD INT MASK WHEN INTS ARE DISABLED
SA% INTMSK:
IMASK: STDMSK ;INTERRUPT MASK WORD
IT$ IMASK2: STDMS2 ;ITS HAS TWO INTERRUPT MASKS
LFAKP==5 ;MUST BE LONC ENOUGH FOR USES BY
LFAKFXP==6 ; PDLOV, ERINIT, AND PURIFY
FAKP: BLOCK LFAKP ;FAKE REGPDL, FOR USE BY PDLOV AND ERINIT
FAKFXP: BLOCK LFAKFXP ;FAKE FIXPDL, FOR USE BY PDLOV AND ERINIT
IP$ VALFIX: 0 ;-1 --> VALRET 'S@)I∪≥∞N↓∪&A%∃β→→¹2↓αA
∪a≥+~~)∪(H∩$∩∩]'∃
A-β1')$~(~∃∪
8Aλb16~∃π5+ t@∩∩wπ5*A≠∨9∪)∨|~∃∪
∀A'β∪0Y6~∃5∨≥_m@t∩`ll[→ Y _A≠=≥∪)∨HA∨$A )) I ~~∃t∩w ≥⊂A∨ A%
A'¬∪_~∃t∩w ≥⊂A∨ A%
≤AD`~∀~(vvvA% A≥∨8[5 %<XA)⊃%&Aπ∨9)β∪≥LA)⊃↓β %∃'&A∨_AαA+M $['U!!→∪∃λ~∀lvA∪≥Q %%+A(A!%=π ''=$\@AQ⊃
A→%' A'e') ↓∪≥) I%+!↓⊃β≥ 1 $~lvvA/%→_A∂%-
A∪PAβ≥¹2↓∪≥) I%+!↓→∪'↓ ∨ '8O(A!I∨π 'LA∪)'∃→ \AM
A∪9(`\~(~∃+!%∪≥(t$`~∀~)∪
≤A⊂d`Y64∀vv↓)∨!4d`A∪9) %%U!(A-¬%∪β¬1 &~∀4∀vv↓
→β∂LA' )U A¬¹2↓β→→∨ Aβ≥↓'+'!∃≥λ~∃
π∨πDt∪ππ=∈b∩wQQSf]←eI↓[Cr J@E∃[←I1KHD¬hAC1←GC%←\A%[JX¬]HAP~∃ππ=π.dt%ππ∨H∩vAQCehU`AM=ZAgMaK]%←\XQ^AC
←k]↓M←dDa0^A0AI→MKe9GKf~)) ≥ a t∩`$wβY<AgK↓k`ALACEYJ~∃-Q&dah@`@m≥←\@ASLMsgi4AQC↓iQJAYSei¬XA)I[S]0A'kA←eh~(~∀vlA¬→∨
⊗A∨↓)⊃% ∀A→∨π¬)∪∨≥LA∪≤A]⊃∪π↓)⊃
AA∈A∪↓')∨%∃λA∨↓β≤A∪9) %%U!(\~(vvvA=≥
A→=πβ)∪=≤A
∨HA βπ A∨ AQ∨!&H`O&AQ⊃% ↓→ - 1&~∃∪9)!∈h∩`~∃%≥)!Ht∩`~)∪≥)! ft∩`4∀~∀lvA) 5!∨%βI2A→∨
β)∪∨9&A+'∃λA¬¹2↓∪≥) I%+!↓⊃β≥ 1 %&~)! →'Y(t∩`$w+' ⊂A¬2⊃! →∨XA)≡AMβ-
A¬∈A(A]⊃∪→↓≠+≥∂%≥∞A)!
A∪≥Q! _~)'+!'¬,t@`$∩∩w+M λA¬dA∪≥)M+ ~∃1,e'-Pt∩`∩$∩w→ Y _@↓!β%β5 ) %LtA'βY
A(~)→,e'Y t∩`$∩∩v∩$@@@↓'β-↓ ~∃→Xe'(h∩`∩∩$v∩∩@@A'∃π∨≥↓'β-↓(~∃→Xg'-h∩`∩∩$w→ -∃_@fAAβ%β≠∃) %hA'β-∀A(~∃1,g'-_t∩`∩$∩v∩@@@AMβ-
A_~∃→M'(dt$`∩∩l∩∩@@A'
∨≥λAMβ-
AP~∃ '5'β,t$\∩∩m!∨∪≥Q $A∪9)≡A'5β→_AM)βπ↓+' ↓¬2A M≠∪≥(4∀∪¬→=π⊗@@∩∩w)<A¬
AMβ
↓¬+(PA'⊃∨U→λA¬∀A≠β1%≠+~A⊃ !)⊂4∃∪(↓π≤]5`t∩`∩$∩w/⊃∃%
A)<A 1∪PAβ
)∃$A=44∀~∀lvAβ↓))2A%≥) %I+!(A
⊃β≥≥∃_A≠+M(A¬↓ 3≥β5∪πβ→12Aβ→1∨πβ)∃λXAβ9λA)⊃∃%
AβI
~∀lvA
] $Aπ!β≥≥ 1&A)⊃¬≤A)⊃∀A)∨)¬_A!∨M'∪¬→∀A≥+≠ $A∨_A∪≥)∃%%+!PAπ⊃βIβπ) I&X~lvvA↓)β¬→∀A∪&AU' λAQ≡A')=%
A)!
A∪≥→∨%≠βQ∪∨≤A)⊃↓)β¬→∀A∪&Dp\A/=% &A1∨≥∞\4∀vv↓αA5 I≡A ≥Q%2A∪LA+≥+M λXA9∨≥5 I≡A⊃βLA∪≥)∃%%+!PAπ⊃βIβπ) H\@A∪_A)⊃↓)β¬→∀~∀vlA ≥)I2A∪↓≥ ∂βQ∪-
↓)⊃ ↓)⊃
A
⊃β≥≥∃_A∪↓β''∪≥≥ λA→∨$A'=≠
A∨Q⊃ $AU'
\~(~∀wπ!β≥≥ 0Aβ''%∂≥≠ 9)&A
=$A≥∨8[')β9 β% ~RA∪9) %%U!)&~(~∃π∪9)β⋀t4∃)∪π5β @]Q∪∈Cπ=
~∃I ! βP@bp4x\[π%≥)βxX@`∩$∩w∪≥%)∪β→12A+≥U' λ~)π∪≥)M4zz5π∪≥)¬⋀~∃:$∩w ≥⊂A∪
↓λd`∩4∀~∃∪→≤A'β%_Y6~)'β∪→5β∪_t%¬→∨π,@fd\$w
∨↓≠β∪↓++≡~):∩w 9λA∨↓∪
≤AMβ∪_~(_w')Q3.bAM))3HA'))e_bA'Q)3_↓'))3⋀bA')Q3αdA
π∨∈↓ππ∨HA1βπQ.A1β
)_A'Q )∪↓'βπ)\bA'β
).dAMβπ)LA'βπQ.hA'¬π)_↓'βπ)0dA'β
)_fAMβπ)PA+∪'Qβ⊗A∂
%'$AA →') A! →M)αA!⊃→')↓! →'Q∈~∀~(~∃'+ ))_↓
∪9∪)∪∨9&A∨↓))2AM)β)+LA/∨%⊃&~∀~)∪
≤A%)&Y64∀vv↓∪≥∪)%β_A)Q2A')¬)+&A%&Aβ↓
∨→→=/&t~(vvv∪¬π)∪-¬)∪∨↓π⊃β%Lt~∀lv∩∪=[=_↓=≤[=hXA=¹85=>XAM!βπ0@x@P@R↓vA|AI+¬∨+P@Aπ$4∀vvv$∪→¬%¬π↔ A%¬%¬π↔ (4∀vvv%∪≥) I%+!↓π⊃β%Lt~∀lv∩∪=[=⊂↓=⊗XAy_XA=8[=4↓=8[=|XA'!¬π
~lvv∩∪y⊂Aβ≥⊂A'!β
A ↓≥∨(A%≥) %I+!(~(vvv∪M!βπ↓β≥λA βπ↔'Aβπ
A=+)!+PA∪≤A%≠β∂↓≠∨ 0Aβ→↓∨)⊃ I&A∪↓β'π∪$\~∀lv∪β→0Aπ⊃βI&A π!≡A∪↓!∩A≠=
@Q∃π⊃≡A]⊃ ≤AQ3! $XA 1
!(AI+¬∨+PA ∨ M≤O(A∃π⊃≡\4∀vvv4∀vv↓% πβ1_A)⊃¬(A)⊃∀A)/ 1-
Aπ!β%βπQ $A∂I∨+!↓β%
t4∀vvv%=A=⋀[= Ay⊗[=↓=≤[=HA=([y4A=% %βπ↔∃(A=¹8↓=<A=|~∀vl∪α[¹4Q+!!∃$AπβM
RX⋀[t@Q1∨/ ↓πβ'$~∀vl∩`Zr4∀vvv$B@D @H@L@N0@\@v@~AA8A↓xA|~(vvv(@V@^@zAxA>~lvv∩|@P$AvA↓→¬%β
↔ (AI¬%βπ- (~lvv∪=≤A=&~(vvv∪y∀A=∩4∀vvv%β→)≠=
~lvv∪=4~∀vl∪%+¬=+(~lvv∪'Aβπ
Ay⊂~∀]M
@KQ∞~∀∪M))3DzztLd`d0Xd`@dd∩m')β)U&A/∨I &A
=$A≥∨I≠β_A5∨
~(∪'))e.dzhdfdH`XXH`dfd4∀∪')Q3_bttdf@d`XH`d`@∩∩w'Qβ)+↓/∨% LA
∨↓→∪≥↓≠∨
4∀∪')Q3_dttdb@d`XHd`dH~∀∪'Q)3αtzt`Hddd0dddHd∩∩wM)β)+LA/∨%⊃&A
∨HAβ→→=∈~∀∪M))3HzztH`dd0X`dHdd~∃t∩∩w 9λA∨↓∪
≤A%)&~∀4∃∪
↓λd`Yl~∀vlAπ←Qe←X[
QCe
iKd[=kiaP[π←Qe←X4Aio↓ESi↓M←d∃CGP
←]i=XAG¬eCG∃d~∀lv@@ZAS9←eJ~∀vl@@b4Aae9hA=¹00@@~lvv@H@ZAUiak↓k][⊃SMS⊂X@@~(vvvf@ZMS[k¬iJA=e[C↓CGi=\~∃%¬ ∪0P~∀∪π
∨∈bttbbDbbbLfdbLbbbb4∀@@∪
π∨∈tztbDbbbDbfbDb``@~∃%β⊃∪0@p4∀vA'∃
Aππ=π.bA¬≥λAπ
∨π.b4∀~∀lvA
UdAG¬ggK↓←LA¬WJ[@AG←Qe←X~)1βπ)\zzu)PK/↔-)(K/-≤W)∃/↔ WQ(K/↔⋀~∃1β
)_zi)(K/- ~∃'Q )∪tz`∩m')β≥⊃β%λAQ %≠∪9β_A∪9) %%U!(A/=%λ@↓]←hIKCYdAkg⊂B~∃)%π≠β↓w') Q∪.z{M) )∪\VxcpfjZ]Q∪∈Cπ=
|x~∃:∩$w ≥↓∨ A∪→≤Aλ@~∀~∃%
≤A'¬∪_Y64∃'βπQ.bzhnnn\nnnLn`~∃Mβπ)HzztL```@`j`@~∃'β
).ftt``@``d@```~)'βπ)\hzz@```Td``@`~∀~)'βπ)0bzz\njb\jnn\`~∃'¬π)_tzt`@```@````4∃'βπQ_fzh```@```@``~∃Mβπ)Pzzt@```H```@~∃:∩$w ≥↓∨ A∪→≤A'β%_~∀~(~∀~∀4∀~∀~)'+¬)Q_∪ ≥Q%∪ ↓)≡A-¬%∪∨+LA%∨+Q∪≥ ↓πβ→→∃λA¬¹2↓∃'$~(~∃+∪M)β⊗t$`∩∩wM)βπ↓+ @Q¬π)+β1→2XAE+ +$AαA+M $A∪9)) %I+!(~(∪∃%'PA+∪'Q⊗b~∀4∃∂π%M$t∩`$∩w∂↓% ')=%
\A
→ β≥LA+ A)+'(A
∨%∀Aβ≤~(∪∃%'PA∂π%M$`∩↓β¬≥∨I≠β_A∃1∪(!∂π ≥⊂A∪&A9∨%≠β0A 1∪PR\~∀4∃∪
↓!β∂∪9∞Y6~)! →'Q⊂t∩`$∩vE!⊃_A'↓⊃βπλ\A∂ Q&AαA9 .A!¬∂
A
=$AαADL,
JRST PDLST0 ; AND UPDATES ST AND GCST APPROPRIATELY.
IFN D20,[
PDLSTA: 0 ;TEMPS FOR SAVING ACS
PDLSTB: 0
PDLSTC: 0
] ;END OF IFN D20
] ;END OF IFN PAGING
;CHNTB TMPC DPAGEL DLINEL LJOBTB JOBTB
SUBTTL NEWIO I/O CHANNEL ALLOCATION TABLE
;;; ENTRIES:
;;; 4.9 => CHANNEL IS LOCKED FOR A PARTICULAR PURPOSE
;;; 1.1-2.9 => ADDRESS OF FILE ARRAY SAR
;;; IF AN ENTRY IS NON-ZERO BUT ITS FILE ARRAY SAR'S
;;; TTS.CL BIT IS SET, THE CHANNEL MAY BE DE-ALLOCATED.
;;; THIS ORDINARILY HAPPENS ONLY ON A QUIT OUT OF $OPEN.
;;; CHANNEL 0 (TMPC) IS PERMANENTLY LOCKED FOR USE OF THE ERR
;;; DEVICE, FOR UPROBE, ETC. NOTE THAT ITS PUTS .OPEN
;;; AND .CALL FAILURE CODES ON CHANNEL 0 ARBITRARILY.
IFN ITS+D10, LCHNTB==:20 ;NUMBER FIXED BY OPERATING SYSTEM
IFN D20, MAYBE LCHNTB==:40 ;THIS NUMBER IS BASICALLY ARBITRARY
CHNTB:
OFFSET -.
TMPC:: 400000,,NIL ;FIXED TEMPORARY CHANNEL
IFGE LCHNTB-., BLOCK LCHNTB-.
.ELSE WARN [TOO MANY FIXED I/O CHANNELS]
OFFSET 0
;;; DEC-10 I/O BUFFER HEADERS (MUST REMAIN FIXED IN CORE)
;;; THEY ARE NAMED BFHD0, BFHD1, ..., BFHD17.
IFN D10, REPEAT LCHNTB, CONC BFHD,\.RPCNT,: BLOCK 3
DPAGEL: 60. ;INITIAL DEFAULT PAGEL
DLINEL: 70. ;INITIAL DEFAULT LINEL
IFN JOBQIO,[
LJOBTB==10 ;EIGHT INFERIOR PROCEDURES
JOBTB: BLOCK LJOBTB
] ;END OF IFN JOBQIO
;TTYIF1 TTYIF2 FI.EOF FI.BBC FI.BBF TI.BFN FT.CNS F.MODE F.CHAN F.FLEN F.FPOS F.@ ↓ ]
DA ]
8dA ]I ,A_]↓ ,4∀~∀~)'+¬)Q_∪∪≥%)∪β↓))2A%≥!+↓
∪→↓β%%βd~∀
∀$[ ]∂ XY))e∪ d∩$w∂∈A¬∨¬∃↓!∨∪≥Q $~∃Q)3∪Dt∪∃'@A)(E ∪≠&4∀∩∪)Q3∪
α$∩w!∨%≥) ↓¬βπ↓)≡A'¬$~∀∩$`∩∩w%→→ ∂¬_A
∨HA+' HA)≡A¬ππ 'L@ZA %≠ ≥'%∨≤A∪LA5 %<~∃))e∪ dt4∃∨
M (@8~∀∪
$] ∨ht∪≥∪0∩∩w = A
+9π)∪∨8@P~$~∀∪
$]¬¬ht∩`1≥∪_∩$s¬+
→ % ↓¬βπ↓β⊃β%L~∀∪
$]¬¬ht∪≥∪0∩∩w¬U
%∃λA¬β
⊗A
∨I≠&~∀%)∩]¬→≤tt∪E))3¬U ∩∩wA%
['
β≤A
U≥π)∪=≤~∀∪→(]π≥Ltt∪)Q3∨
α$∩wβ'M∨π∪βQ λA)Q2A∨+Q!+(A→∪→
~(∪% !∃β(@0@`∩∩$∩w+≥U' λAM→∨)&4∀∪ ]5∨
hA'αJ%
¬(]
~XXd$w≠∨ ∀@Qβ'
∪∩A)Q2A∪↓'∪≥∂1
R~∀$∩A'⊂∪
¬9π≠9
(]→0Xd~∀% ]π⊃¬≤tt4b∩∩w
⊃β≥≥∃_@F!∪≥∪)%β→→¹2↓∪→→ ≥β_R~(d`H∪_]∃
ht∩∩]A%∪∪≤$∩w∃
8@Q
∨HAλd↓∨≥→¹2$~∀d∀∩∩∩`4∀∪ ]→→ ≤h∩Zb∩$w/
A∃1! πPA%β≥⊃∨~Aβ
π '↓)≡A¬∀A∪→→∃∂β_~(∪ ]
A∨&tt$`∩∩w→∪⊃
AA∨'∪)%∨≤~∀%% ! ¬(@f`∩∩∩$w+≥+M λA'1∨)&~)∪
≤A%)&WD`Y6~(∪ ] ∃(tt∩%'∪1¬%(A9)Q38∩w⊃ -∪π∀~∃∪⊂∪ ]'9~tt∩$`∩∩wM≥β≠Q
∪→1 λA∪8R~∀@H∪ ]A!≤tt$∩`∩m!!≤!
∪→→∃λA∪$~∀∪9
≤bh~∃∪⊂∩∩∪'%1¬∪↓8]→∪M ]8m
∪→↓≥β≠b~∀@H∩∩∪M∪1¬∪PA9→∪M!8~∀% ]
Htt~∃%(H∩∩%'∪1¬%(A9∪9!+)8$w
∪→∀A≥β≠∀@d~D`H∩∩%'∪1¬%(A9∪98~∀∪_]% Xtt∪¬1∨π⊗P∩∩w)I+
A
%→
A≥¬≠ &~):∩∩w∃≥λA∨_A∪
↓∪)&W⊂b`~∃%
≤AH`Y6~(∪ ] ∃,tt∩%β'π∪$A9))e8~∃:$∩w ≥⊂A∨ A%
≤AH`~∃→=∈A))e∪ dW1∨!∨
⋀~∃∪
8A∪)-λd`WMβ∪_Yl~∀v∪Q∩U'Dtt~∃%(H∩∩%'))3\b∩∩wQ)2A'Qβ)+↓/↔% L~∀d⊂∩∩∪π
∨∈b~)'αH∩$∪'βπQ.b~l∪)∩]M(dtt4∃∪(H$∩∪')Q3.d~(d`H∩$∪ππ∨ d~∃'⋀H∩∩∪Mβπ)H~∀v∪Q∩U'Ltt@~)'αH∩$∪'βπQ.f~H`H∩∩%1βπ)\~∀b⊂∩∩∩`4∀v∪)$Y'(ht@~∃MαH∩∩%'βπ)\h~∀@H∩∩∪M) )∪\~∃∪⊂∩∩∩`4∃:∩m ≥λA= A∪
8A∪)-λd`WMβ∪_~(] →'∀∩∪¬→=π⊗@h4∀v∩∩$`∩∩]M
AβQ≡]→∈4∀v∪βP]π⊃ht∩`∩$wπ⊃βI!∨&~(v∪β9→≥≤h∩`∩m→∪≥ 9+~~l∪β(]A∂≤tt$`∩∩wAβ∂ ≥U~~∀v$∩∪¬→=π⊗@@~∀f∪1∨≥¬
⋀tt∪¬1≠π⊗D`~∃→=∈A))e∪ dW→⋀]¬+_~∀v∪→⋀]¬+_tt∩∩$s∪≥)∃%%+!PA
+≥
)∪∨≥L~∃∪
∀A'β∪0Y6~∀$∪≥∪0Y∪≤-=α∩wy∩∩∪yα@@EM∪∂≥β0@A∨≤4∃∪(J$∪#π9¬⋀XY9∪_∩wy@A=λ[¬% ¬⊗∩∪= @@~∃%(H∩∪Eπ≤]¬λXY∪≤@W=∈m=⋀@Ay⋀[¬%∃β⊗∩∪y∈@A∂ A')βPA∨
4∀∩∪∪8`W=0Y≥∪_$w=λ↓∂∈A'Qβ(A∨8∩∪=
4∀∩∪≥%_XY∪8`W=∞$w= @@@@@@@∪=A⊃β%⊂A#+∪P~∃% A β(LX∪≥∪0XY≥∪0∩w=5=~@Q→≠%≠βPA
∃π!∨%LR~∀∩%→∪_1→∪_m=≤∩∩%=≡~∀$∪≥∪0Y≥∪_$w= ∩$∪="~)∪ J∩%∪∀`Wy$XY≥%_∩w=H@A+/I∪!
A=≤p≤$MrM↓hR&@"A⊃∀LL
wJ ∩3F¬wUb'THλ
tR5λT⊃s@∨BDo!Pλ/+P$S*⊗⊂/∃⊂&`a'FE⋀Bdg_∃*⊗⊗'∩f⋀]o∃⊂⊂*k$j"Pc#∨D*FE⋀Bdg_∃+⊗⊗$S_∃o+B]o+⊂λ**,Pe⋀DoP⊂**⊗P#c#βEDd_∃o, ⊗'$fα]o,⊂λ)cc*λ(jdjαDo$F⋀Ddg ∃o-⊗ '$f⋀o-⊂⊂gP*'H""*⋀BMP⊂⊂∂ f*&b"←∈⋀Dg$S⊗⊗'$S⋀]o.αDDag*)'fλ)$cd∃⊗a) ebj∈⋀Dg$S⊗⊗'$S⋀]o/αDDo/CE)"h⊃`j⊂≡ iadRUY∨⊗O↔⊗c!!*c∨ ⋀g$f ⊗'$fα]`f&λ'j$")P$g∩j `f∪,P*g∃ibb∈.D]b"⊂$c⊃P)`dS∈E∈E∩c'⊂)Pdf⊗-CE)"h⊃`j⊂_L_⊗⋀g∩f∩⊗'∩f⋀]`S($ a⊃j aP
iadRP_⊂*∩)'jcR⊂ iaRdP_[TFE)⊃h"`jλ~_⊗⋀S$f⊗⊗$f⋀]S'kP!e*)'S⊂/≡'∃f&∨⊂∃h⊂*'H/ ⊂∀__⊗Y
[TFEαDg$f ⊗$gλo D]H⊂⊂/ CEDhg↔!! ⊗$gλo!D]!⊂/!CE⋀Dd_∃o" ⊗'$fα]o"∈⋀Dg$S⊗⊗$g ∃o#Do#⊂/FE)"T"`j⊂V⋀g$S⊗⊗'$S∈E⋀D$f⊗⊗$f⋀]'⊂/'CE⋀Dg∩f∩⊗'∩f⋀]o∀⊂/(F⋀Ddg ∃o)⊗ $g_∃+D]o⊂/)F⋀Ddg ∃o*⊗ '$f⋀o*∈EαDdg_o+⊗⊗∩d∈0+^W ;^V ^W
IN0+^X,,NIL ;^X ^Y
↓ IN0+^Z,,NIL ;^Z
REPEAT 3, NIL,,NIL
QCN.BB,,NIL
NIL,,NIL
NIL,,IJ0+^G ;LOWERCASE ^G
REPEAT 11, NIL,,NIL
IN0+^Z,,NIL
REPEAT <NASCII/2>-<.-FB.BUF>, NIL,,NIL
] ;END IFN SAIL
OFFSET 0
;TTYOF1 TTYOF2 FO.EOP FT.CNS F.MODE F.CHAN F.FLEN F.FPOS F.DEV F.FN1 F.FN2 F.RDEV F.DEV FO.LNL FO.PGL FO.RPL
SUBTTL INITIAL TTY OUTPUT FILE ARRAY
-F.GC,,TTYOF2 ;GC AOBJN POINTER
TTYOF1: JSP TT,1DIMS
TTYOFA ;POINTER BACK TO SAR
0 ;USER MAY NOT ACCESS, SO SAY DIMENSION IS ZERO
TTYOF2:
OFFSET -.
FO.EOP:: QTTYMOR ;END OF PAGE FUNCTION
REPEAT 3, 0
FT.CNS:: TTYIFA ;STATUS TTYCONS
REPEAT 3, 0
F.MODE:: FBT.CM,,3 ;MODE (ASCII TTY OUT SINGLE)
F.CHAN:: -1 ;CHANNEL # (INITIALLY ILLEGAL)
20$ F.JFN:: .PRIOU ;JFN
20% 0
F.FLEN:: -1 ;NOT RANDOMLY ACCESSIBLE
F.FPOS:: 0 ;FILE POSITION
REPEAT 3, 0
IFN ITS+D10,[
F.DEV:: SIXBIT \TTY\ ;DEVICE
IT$ F.SNM:: 0 ;SNAME (FILLED IN)
10$ F.PPN:: 0 ;PPN (FILLED IN)
F.FN1::
IT$ SIXBIT \.LISP.\ ;FILE NAME 1
10$ SIXBIT \LISP\
F.FN2::
IT$ SIXBIT \OUTPUT\ ;FILE NAME 2
10$ SIXBIT \OUT\
F.RDEV:: BLOCK 4 ;TRUE FILE NAMES
] ;END OF IFN ITS+D10
IFN D20,[
F.DEV:: ASCII \TTY\
] ;END OF IFN D20
LOC TTYOF2+LOPOFA
BLOCK 4
0 ;ATO.LC LINEFEED/SLASH FLAG
0 ;AT.CHS CHARPOS
0 ;AT.LNN LINENUM
0 ;AT.PGN PAGENUM
FO.LNL:: 71. ;LINEL
FO.PGL:: 200000,, ;PAGEL
FO.RPL:: 24. ;"REAL" PAGEL
OFFSET 0
BLOCK <LOPOFA+LONBFA>-<.-TTYOF2>
;SWS ERRTL CATRTN EOFRTN PA4 INHIBIT ERRSW BFPRDP CATID CATSPC CATLIS CATUWP CATCAB CATALL CATCOM LEP1 KMPLOSES UIRTN RSXTB PNMK1 GCD.A UNBND3 SIXMK2 SAVMAR GCD.B AUNBD EXP.S ATAN.S UNMTMP FPTEM IFLT9 EQLP GCD.C ATAN.X GWDCNT GCD.D ATAN.Y GWDORG GWDRG1
SUBTTL SUPER-WRITABLE STUFF - MEST BE SAVED UPON USER INTERRUPT;; DONT ALLOW USER INTERRUPTS WHILE:
;;; (1) NOQUIT IS NON-ZEBO - THIS PROTECTS GC,
;;; RETSP, SUBLIS, AND OTHERS.
;;; (2) INHIBIT IS NON-ZERO - THIS PBOTECDS
3;; MANY AREAS OF SEMI-CBITICAL CODE,
;;9 ↓ (CF. LOCCI AND UNLOCKI @≠β
%∨&R4∀vvv$∩Pf↓+≥% ¬_A∪↓≥∨≤[i %≡! β! 9 &A∨8A 1β
(A-β1+
R~(rvv∩$∩ZA$B&MαM→α~∩αR"∃⋀r>&$*JJ¬!α~Vt~R&>ph(4≥:MiHhP4)M[YαR"*α~>2dzV&::αNRV41α&M¬~∈Z⊗"αP≤DY`⋀ r⋀(U∃∃8ZB⋀5(→T*∩ ~2⋀≥(X∃$,EaPS74⋀t}D tt∀λU∃∃8ZBb⋀*ZB⋀J9r⋀≤~H4B⋀→hB¬∀X_B⋀tXXB¬tλDz¬I ∃~Q'3KZ →e$-*
$-⊃1λ
SqtdλtQ0*(⊂
¹9tUλ H∩⊂)K04j¹81λ⊃J(31+AQL¬U]H!"c`"PP*∩ ¬ COMPILER DEPEJDS OH A↔9≠'∪≥≤A)↓↓→ ≥∂Q⊂A∂ 4⊂vv↓)⊃
A∃%%' PA
%β5
Aβ↓αAπ∨9' ∩∈u!αB∀
6⊗R-⊃0⊂ ¬∈E⊃i)*'⋀X⋀]T RESTORAT@∪∨8A
∨↓ %%'∃(∩¬π¬)%)≤βP%@]α∩1αα(U≥z(∃$y`λλtH⊂h⊂r c⊂ @∃$)'kCE"gc*'∃⋀L⋀Y`⊂DL RESTORATIK@≤A=_ α∃ly6→α%∩∈B- 4*B !`⊂K↓↔5⋀⋀D
$-≥Iz$
$α3sDqH⊃it⊂πi⊂"j*i∪⋀A$g∩$a$j∞α 9H
∨≤55β%z|A∪9⊃∪¬∪P@Q 1β2RA¬→_A M $A∪9) %%U!)&~(∩∩fZbX@@@z↓∪⊂~"L∩&Aα b1α⊗D~⊗BQ¬"ReαLrR⊗∃*BRLhR⊗J≥9`%¹5λI`≠α XT U4 dj¬λ⋀R)*⊂'gλ"i)'⊂"*i∩d∈G ERRSET
∩lAβπ%*∈"Ja↓
Vu∩⊗∈1⊂⋀⋀M~λ:D`:Q1⊂∩d∈ @)!
A2@⋀⋀`¹8H⊂
$∩iP ↔ORD
; @/! ⊂→α r⊃↓
-∩JN⊗ ¬U¬-9λT"∩λ)D`8p¬P$P( ∃SH@ λ\4⊃¬
¬∩∩AhK%nI∞DλU3PjI3s@⊂∃βH@∪π A/β≥Q&A))dA!%5'πβ≤4⊂∩αl∩Q% ¬λXA∀*∈∩I→d*Hβ"B!⊃,¬Dj⊗dP#'⊂ aj∩h∈ATILπ⊂→α r⊃α-∩N =* u_!⊃⊂K∀⋀⋀9α"`⊗ERNE@'LXA¬+PA≥≡AA%α['
β≤4PH$%1→dLλ⊃Sj$⊃Shλd⋀EFERNE@'LAβ(A¬→_~∀$∩∩g∀Aa↓∃λ⋀⋀L2λ¬r*I⊂⋀g RAAD
λCATID:∪≥%_∩∩wI⊂tAπ¬)π⊂A% ⊗$J~&∞
"&.d
D ¹8Q!⊂HK9IβB⋀iH∀=~ →d$L8~DLQh∀jXU⊗4λT⊂πc⊂) fbCE CATSPC==0λ`β↓A@Z↓↓↓α≥α⊗∞_→B¬¬)x4-≥9→d:⋀βQ1(D⊂Q(λsQ(¬u∩⊃*$⊂R5
4⊂⋀ k⊃FA⋀DB]P⊂⊂λ&b`g∩d∈G)
CATLIS=td``@`∩v@A∈QI⊂RA∪LA!∂∪9) $AQ_
α¬⋀b&NQ⋀z→α∞
"≤Bλ¬⊂(zc"B(`j*kT≤¬0~bβ↓AAAα↓∪@4λλλ
YUr3H4⊂SjH0q⊗λ!T!$
P S FUNCTIH∂8hP&∞$~∈ UβVβ#β⋀⋀ ↓↔hλλ⋀λp5⊂i¬0P4J)10
λ)$⊂(∪dg*"⊂*'P
!cg)H#*g⊂⊂βATCH-PAGS)
CATALL==020000 ; CATCH-AHL: RH IS FUNCTIONMF DWL∈Aβ%≥&~∀∪
β)π∨4zz`@```l@@@A→%∨~A
∨⊂⊗BLb⊗⊃α≤z∩¬1⋀"5α∞ b2→1⋀r>AαMαJ>≡ph(4*d*AEUjq6⊗∃"0⊂5%"R$ D,TzIα⋀|d
4|lT t2⋀Z*%≤-D
¬-⋀↓PT\X Dm≤Z7SjKE` (ZTTueV-C"A⊃+Tq(T⊃0TjJβ"C!24U ≥⋀X⋀Ne'g∈ i'P∂←⊂ ⊂DL DOC OF MOST RECENT USER INT FRAME
↓ .SEE UIJT0
λ
∃%M1)⋀t$QαR∩$p∞B≡LrR⊗I¬"0~¬(X∀"¬9→e$⋀
D HUB⋀hHUD,Dλ%J⋀⊃Q hU iT[!⊗Hj8T*¬λID`2b.j85Q(
β"C!pq H↔B""%)bbPab!!βE*g! →P~ .SEE UNBIND ;SAVE TT
SIXEK28 0 ,¬' ↓'∪1≠¬⊗~∀~)'β-≠¬$t∩∩$Y' ↓'+'Dh∩w≥∃ ≤OPA¬
A%_A'∂LXA¬+PA/⊃↓πβ% L~~∃∂
λ]⋀t$∩∩]'∃
A∂π⊃¬⋀~∃¬+≥¬λh∩∩α]M
AβU≥¬∪≥⊂∩w'βY &A↓
∨$A¬+≥¬∪9λ~*-BA:PH$%≤*∃αE%nJ,j⊗6
-∩MαNL:9α>2α∈J≤hR∈R∈prMh$HI2N⊗*α∈R∈pInN4*MαNL::Mα|1α∈J=→↓rabbex4U*:6Rm↓h$$KZV:∈l)αR⊗m4*~¬"⊗%HHH%nBα;∀j¬x→e%~
I⋀M~
Ir⋀∀T
4 LTλ∃~¬λ9e"
∀⊃PTLiJCKP⊃⊃∩`*q1( S∪p*A.qλ
85Q1⋀ ⊃4Q!QQ03
πB,α!↔t⊃∪⋀
⊃r3J4H∃*sH⊃)∀V(
h⊃4*X3β"A⊃ +Th(⊃4*X3β"AQQpq¬hnB"!Tq1$pq⊂H"P5λKV∈A⊃"+Th(⊂5λB.uλY4∪tH~V(⊗⋀P3∃("QuhHsU∞A⊗β"C!pq HGB""%Jq1(λxq⊂PAQP5⊂)V.B!⊃+Tq(T⊂5⊂)a.u⊃)Z∪tP*+(⊗(
h3∃1!QQuq zQnB&↓.stIr3H H∪⊂*
∩1R(85∩3id (⊃j∀Ql$ 4h⊃j∪tQeV#"C!uq∀Hv.B,↓Q@↓Gq6∀ (⊃phU2λλ u∀T⋀5L⊂DS⊂5∈∀∪13*d∃04 zh⊃phURλ J∪QHλ3PTD∪∃⊂d
R3QDλ4⊃SHv(∃⊂(∃, λ3PQD3S6∈⋀⊃tQ*:lλ⊃j4tl⋀λqP2)D⊂tu(¹8(⊂P(⊗1Hλss∩$∪t⊂*λ∀∪
Zlλ∀ 4lh
∃4mD
∪∃4g⋀∀S ~λ)kg eP)"%aP)⊃')k⊂"")kλ)"$aP)"$!d⊂!i!(⊂∪eg!dβE∈E"V(&~]αX⋀D]U"fh⊂'i⊂"V(&'b⊃FE∈Eab↔*R≥⋀DD)bbPab!!βE!%j(≥⋀DBW)bbH! ej abF"k_!⋀DDWbbP" f∈E& j_N⋀DDWbbP#∪ j)d"FE&Qfk≥⋀L⋀DW)QbP&bSa"a∈∈E*`T'iU⋀BDYVXO←⊂*k$j"Vλ∨≡X⊂∂←⊂"`T("g"λ↔ aaQiiP(iFE#b↔#$⋀DDWbbP#b!!∈&('#∞⋀DD]KXP&bPg)P'j⊂ P∪'g#P∀' fbH∀#$jP g PNBUF)
α .SEE RINTERN
AUNBR8⋀∩`∩$p∞N4*MαI⋀26Iα
*:
&t 4*∩e"¬hH%m
⋀z→αRLj⊗Mα$*2∈R*z∩J⊂¬≤zYD"¬(YT}Q(∩*3#"A⊃ ⋀W)QbP""S(BE∈B)$g#∞α αAPFNG1:
TABLU1: 0 ∀~)β+≥¬_pλ$]~∈J⊗α4⋀2⋀iz"⋀
Yh$LQβ"IQ(⊂IqP
fK-FE&&l⊂≥αDYQ&Rd∈" IL¬')%Uβ!β∨8~∃∂%∃'&`PI@%M∀:J∈$*JA ⋀J0∃≥J*T
⋀→y`hUβ""'bg"∪c⊂$c⊃P!$cS*fFE∩c'⊂!∩cc"fK-FE# iiX∞⋀X⋀]HαMINλAβ≥λ ∂% βQ % D↓∪⊂~NαJ%,≥I→t` PqH→3∞B)*Tu⊂ α 3DRAJSFER @∨≤αα~∈&e*J∀4T~N@,8W LU*:Bα↔:E∀h8d-∩ yb¬≥X84,,AQ%hH↔8T`(α⊂'cλ$c'⊂αIGNUM
∀~)∪ ⊃⊂LJ6NPI0∃≥H~E-~⋀∈αdλβ"R(H∩5
5λ⊂v*8q∞∞AQPP0jK1H
⋀L⋀]`~ERO ON BIRST @→∨= A)⊃I_∞@,yλλ a`∀RACE.
λBOOLI:∪'∃)5⋀A⊂Y)(m
>>d*∈ 2 →e≥∀U0jI3s@⊂'i⊂!∪dπDE
λλ
¬)=!β' π JK⊃⊃∪@91H &∀∃∩⊃)⊂*'h d"c"S⊂ ij⊃i$ieH''j∀)$g*⊃b⊂$cλ+$g#∩d⋀E
∩↓∪&A∪9∪∪
α4∃∪
≤ααVN⊗d*NM⊃¬αJ&:e1h%md~VJJ,rQαB∀J2Qαd*ZGeSλ* E-≠¬!∪↔:EM⋀T¬R¬ i≠⋀uT u∩¬_iDlU3#! R1HT⊂R1i3+⊗aQT∪∃*6nB0(λ⊃⊗∃*∈E(∪*i[≥αc b D,TT ;FLOAT-POINT INSP %+
)∪∨≤αα~>I⋀
J&R@⋀⋀<hZ$
⋀βtC!+ ⋀D]Qd∈D OF AFE BIGNUM¬
λ ∃∪→_A+π∃→β'0A⬬I'&tm↔∪≥λ↓_∞→αα:E,4dλD-~(T"⋀h)tj¬λ⋀R)*_⊂~
λ ↓ ; - -xA∨
→dA⬬I →αα:E,4aQ HHα.`∈⋀∂(∂∪βH
→¹2↓_
>→l
∀∃(Zb¬≥JXd0HαB"!↔h
`⊂∂←⊂!'U$⊂∀"∩ij$gh¬ISHED BY TYOST∈R4Uα2VMβ∞A⊗α".gK ∪Gd∃r⊃*(αP ∀HERE AR@
A≤αα∈J_h ∃TC KQ)∀4rλ¬4hYα"`∪S, P@%A%π(t$p∞BJLrQ=4
⋀
∀Yj2⋀zYe%~¬ D,5EEE∀Ly
BHh*:t`(0rfA⊗α".jZq1⊂'i⊂+S P!d⊃a` ING @∪≤ααNR%*L4(LRJNQ¬~R∈λh ∀Li`¬-≤YHU≥~βλ∃ →tqfD∈α.sIZS03 K(∩Q*h
3∪∀d⊗3h
K4⊃( H⊂rλ~@∈E⋀BDX + =0≤A
⊃β$A%&A
∨HA
∪→∃&A>tbd4λHH%m↓h↓uyα≤B∈IαM→α~⊂⋀¬%∀ t`⊗#"A⊃ ⋀]P ⊂≡P≡ @π⊃β$↓∪&A
=$A¬∨Q⊂A
∪1 &Aβ9λA))d~∃% ↔∈t@∩∩g≤
R,Dλ%∀02`⊂⊂βHARAAP $αaα>→⋀*b&Q⋀2J>5¬∩∩∞α
⊂4*J$rN@¹3!⊗HK8⋀p*Hαb⊂'∃d¬BER (BEFLπ%
A⊃ π&l
16⊂j:>Q⋀JMα∩,~&∩⊗ ¬⊂hU(HE≥NB,↓⊃,p ` ¬D VAH +↓≠ @↓≠ A %∂∪)↓)≡A∀J≡"Q⋀z→α∩,~& ,→D¬⋀|→j@hU(I∀*nB,↓⊃,sU)4R0d 0P4hT⊃∃4I→β#P)⊃`b$gFE$c∪⊂*abS"iiVαi")'Sh≥⋀Xα]i'fPg(⊂⊗H i"P'f`gλ'*fb f)P∪e←FE"$g!R≥⋀X⋀B]igj!bP'⊂!d ab")P#'⊂)"`Q∈@
CORBP* 0 ;BYTE-POIH
) HA
∨↓%ββλαjN>Vα(4*¬yλTb¬9zU∀≤T ∃~⋀)It Z x`hP⊃↔4
≤9→∩⋀}$
4MD)~B¬≥JXd2→`λλ9tQ#!2sPiπB,α'dg)j*ab$Re`∞ FMR MAKNAMTO GET NEXT BYTE
;PNBP PNBUF JCLBF ATMBF REMFL VEDBL0 DVS1 DVS2 DVSL DD1 DD2 DD3 D@D NORMF QHAT @¬≥≠'XA
βπ_A
βπ⊂Aβ∂ (A3β≥ ¬(AQ'β-↓ 'β-∀A%'βY
A
'¬-
A≥Iλba
0A→¬π1¬→α-*6!α-∩J>I⋀*J
∩2αVV>4qαVV%~YαVαZE%≥d
U-∃:d¬-,→JCJ¬X¬4
H⊂
jSa%c@∪*jikλ&)ciCEαE≥N]P"$⊃P(' SbP!*!"a IS USED FOR VARIH∂+~α∈*⊃¬~V*∃IαBVα*⋀m≤Z5`hSαh
MH*$"P∀)$f`,P ⊂URPOSE IS AACUMULATING P@%%_
Qαt
6⊗M⋀z→α$z6MaQ"`*q1(
)3Q⊃*A"Ng]P$jλ$iP S)`∂ USED FMR @-¬→% ⋀⋀ tD
5-≥λYd"¬8¬∀I→β#iVβE↔!bQP+ f j∈E )bbPji`"S ∈E≥Nβ; JCL, NAMESDRIH
∂↓∨ A
%→ &! '!
∪β→→dA
∨↓λd`A≥)∃
≤↓∃'3$X~⋀]M
@4∩R:LhQ`≠4λU∃z ⋀l-:8∀<*λ:E∀hp¬¬x8U≥≤→hr`hαKTh(⊃4J)3rC!πnn`λ→Qλ∀iP ∂N8@A
∨HA'>l)αBVα*⋀m≤X4¬$Dα4hλ1QQ*$⊃uQ*⊂4∀d⊂⊃(λ$cg*SP*"fT)P∞
20% MAYBE LP@≥¬U p∃Uβ&∪ ¬→λ ⋀f`l ¬ LPL¬¬+tztjh (E
IFN BIGNUM,[
REIFL: 0 ;REIAINDER FLAG
VATBL0: 0 ;DIVISION STUFF
DVS1:↓0
DVS2: 0
DVSL: 0
DD10∀@~∃ λHp∩`~) fT$`~¬ ⊃_t∩`4∃≥∨%5 t∩`4⊃#⊃βPpλ%@hRα:¹6≥1i↓↓h*~∈≤1`%@hR~∈∞#P%@4T
≡∩#P%@4UJ∈≡∩∃!`⊂K↓Q%%≤~hS@K↓Q$%≤~hS@K↓Q%∃≤~hSPK↓Q$5≤~hS@K↓Q$e∀F⊗⋀4!⊗KizB¬∀X_DLTt ∀b⋀(~4*β⊗¬b⋀¹4H_phUQ⊃∪LhD⋀`¹8H∩1ID⊂R1i3#"IQh∩H9α!#∃~⊗W⊗αa&'aP
CL@@ VdPZT∩w5+'(A!β%
A¬(A ¬' @dβ!α^_h*2*≤bα¹3Tπ&E2Psλ ∈¬
λ
¬+U∨⊂t∩$∩∩g↔∃ A !∪&A+U~A'%*~ α≤z2R&<J6@-4
4z¬Iλ∃"⋀x4⋀ d
4
∀T ∃"Q(U∃z' KQ!∀U∃:@¬-yαhTX($$3αB"!⊃.p gSbP! 'f@ TEMP FOR UUK HANDDER
UUOFN: 0 ;POINTER TO FUNCTIH∂9⋀"VJ&t9αR"*αVV>@∈∩⋀dyzhUZZE≥∪!⊗hUZZE%≥d∈B&↓α@
UURSV 4$`⊂∀*ZT ∃∞.A⊃+Tq(T∃0
`S*⋀]b∪bigβU⊂!gg&$ajλ+dj$λ*j`⊂SVλ
-*BNYβ!∪ ¬*jSβBKG~ 0 8π∪ A%_ ↓∃~⊗@" Yt$+λ∀
Zλ⊂u
QH∪i⊂("&βE&*jh∈5 :h\[+ =⊂∩αm' ∩V41αRα
!α:⊗,"MαN
2& 4tλd`:H⊂
$⊃P*`∃O HANDLAR
LSWS==:.-SUS ;TOTAL LENGTH OF SU@!∃$[/%%)β¬→∀A')+→ ∩(LRJNQ¬*V
.8∈⊂hPβ"Ng]P∃∃∃∃∃∃⊂)`∀UFB @'¬)⊗⊃¬*B>→¬*N⊗I⋀J0∃$X*%-¬DλTd∀h∩λZQ(
E%JJJE%@∈Eβ≥c#)H ∈F@0αα~~1⋀2~eα42¬αhhb⋀∀h∈,DT⊃QJ4⊂π ⊂FFX NPFBL NP@
K⊃α∈B42Mα⊗αλd5BλZ⋀4DλU⋀QP Yλ ¬F@-
&A:52∈Aα42P∀~λZE (qS∀j↓ ¬∈Eh¬BTTL F@%∃
A'$zJ∈≡*α2&NαJ2b⋀→hB⋀ph⊂) ⋀ ALLOC PARAMET@ %&4⊂λ (αN`≥Nβ ∀(TTT(TTA
I
A≥"0≥∀_xR⋀dα4u
4λ¬∃∃∃∃∃∃∃
λ⋀vvX⋀¬$DX⋀q$λ4Q(
Zq1⊂⊂αY @)!
A-βI∪⊂≡Vα4⋀9β`∞@'∃%&A$yα∈2dz≤
HT⋀¹83∪∀dqC"G]]P*∩ ¬ @-¬%∪∨+LA~J,)αNR}∩∈≡∃¬~B∈∞-→0∩α hU (αi⊂(∃h⋀ ONE @∨↓)⊃ ≤)α&8hQ`≠4λ∩⋀l~)4 HT⋀ ~¬λUD≤X⋀∃⋀p5∩ →β⊂ @ PROPERLY PROTECT@ λA
_∞ 58Z"Jλβ"C!≥]U@ @πβ+$J0≤H(∪*Zuλ∀
(αibi∃α@
A∀*2∈RM2∃αz(D-→hr⋀|aQ#@7nb"(hβ)V#,⊂ FFL,FFD,@
1
¬ )d2~ 242e $hiαdQP ⊗ ∈Q2
λ.SEE @∂∈∩$∩w∂βI
∈≡*α≤p∈&"PβP ∂$4⊂λ (αB1HjnB,↓⊃ .s ~uλ⊃J(αbP)U'i cQP ISTλ
(L2~ahK$$¬\2&bh¬3*4λ⋀ g⊃⊂(' SbP g⊃⊂!$cS*fP+SβRDS)
∪
→_tα`$∩∩`.4b0≤U3 ⊂∃βH∂% LA→β'P~∃ ⋀α &~~ π M≤X¬⊗A⊃ ⋀]b∪h¬BLE-PRECIS@∪∨8A¬→∨9+⊂⊗LhR≥BA_d4!~4-⊗B"!↔pss*⊃0 L¬+≠¬∃%&~∃⊃0@⊂&42`∪Pα4q*K@⋀DDNβDGUBL@
[↓I π≤J0≤H⊂siZ⊂∈"lλ∀"*h∪ ¬P⊂R4⊂
≥ J~4'!∪Hα".h$cg*SP λEAD@ %&4⊂λ&~5I`⊂K↓⊃⊂K]8∈3('` (PNAME-P 3!∀Aβ)∨4RA",
∩-*1P@)⊂π∩⋀ ∈H ¹4↓%⊗B,
Qα i4d|u0 %D∀q5 ⋀X HUL¬↔&~(∪
αβP%@$HI`≥≤~*2αD~*$
Jλ⋀∪i→β*"iT@
NF@ `5βP∞E⊗c#)BD@ ;L¬+≠¬∃$A>2α~2λj$`8Tc"AQP Y∞α S@¹2Iβ⊂∩ HH%nNβ→Tp∈⊂!∪'aeiH∀"`_PLICIT RE@)U%≤A-~⊗⊃⊃Q#@7nh∀ipπ⊂!∩h⋀ IN @
Zαα6⊗∈u→α-α⊃3*λ⊃TId¬ (β↓6@<βtQ⋀23R)ZαfP)⊃a` AIMED.
λ⋀∩]≤*∃α≡≥~P≤C⊃Q JTq1$λ1pl* ¬⋀WbbP#PβE0C5
∩]M
A∂
a∈Hh ⊂h⋀q(T⊂⋀ ∃NK
∀~(p
mm¬αVJ∃⋀2J,T
5$}(_t*⋀9zT`⊃0 )H∀ ∞ON-P@∨'%)∪-0A% →¬)∪-↓)≡A A
→5⋀∩⊗ zp
!QL¬P≠; MU@'PA!% M %-↓%⊗2
"&@4T u∀⊃0 $Sα@∞A$BJ>V<Aα:B42eHQ!∀`*⊃QTg⋀X⋀DB]` ISTλ
(LrB4h∈≥αX⋀DDNβFIXNUH
4PJ0∃⋀hiC@!,α"!↔qS∪i*fFE⊃!∩⋀g∀ ∈FDh∩`∩∩$p∞∩,∩2(β"Pk⋀α⋀g( ∈C 4$`∩$KZ≤p∈`⊂LEX
DX λ∪≥A
~PI@$⊃↔4%- HU@HαPQdA3Pλ#!_
0 ∩w ∪∂:,h4(⊃⊗HH↔9d`4∀⊂
i⊃P)`→M@¬∨ &4⊂
"dA∀`*⊃QRπ⊂)"h⊃`j⊂$∪αK@→∨≤VbX@∩w"αYd]Q!⊂K⊃⊃∪@9β'P(∃i"P)Pi)FE∩c'⊂↔ d∈PFFS( ≥
_XA/βI_ αnuα~ 5¬"∈
2*αP≥yhr⋀dYhu$QQ LT⊃QK⊗L¬⋀XαD@]iVd¬BOL BLOCKS
λ⋀vvVαα∈∩∀*NMα|1α^z(B⋀ )zd*⋀8¬4J(αg ∀↓!+%↓' ∂≠∃_
Qα4zIα⊗ ~!αNαλ∀¹8 ∈E≥Nβ; MUSPλA¬∩⊗N⊗α*d*¬(YD
⊂⋀k"H'i""$g#@ THROUGH EPF@
2d4⊂λ&⊗αλd5!⊗HHα.s ~uβ"A4⊃QKπ@,α!⊃,¬c$V'*fFBα E@!→
_t@∩∩αw→→∨,h4*∩⊂⋀@L-λhd#P⊗↓⊂HKαq∪jXS⊃#!!l∩⋀Qh##!N⋀X⋀DB]agfT&"d∈Bα@X$ EPFFZ8 0 ;DUPLEP⊂~)↓≥⊂L*B4h# K⊃⊃∪@8R1sJ!"B!⊗α""'g'P(∃i"P)Vda'fFE$' ⋀b`#$≥⊂)⊃h"`jλ$#%f∪βG+!0@`∩w!+∃↔&4⊂∩∩`$∩∩`.tyαBVα(R¬≤~*0h_ibαXZ⋀4∃5Yd4D
t
d 4-⋀heR¬$_)D*¬z)t`(βP&" πTH]
∪ A
~⊃P%@$HI`≥→X$lλ⊂S a` @&4⊂⊂∀!_T5487 L∃h:4:\hh5≤*8T=≤≠!∪@¹83Q⊂∪βF CURRENT VC REG@∪∨8@Q
Y∞M∞t2P∀≥4π3λ~uλ∃*¹81λ∃HT@
L¬~Z≥↓`⊂h∈∃HicWiiR`#BDX NUMBE@$αα0≤2λ[¬%∀∀
d4∀⊂1hZc"B(hβ+!]αa# ⊗CS ∩m(
∈¹2,)α∞⊗daα5(XTdM8@λ¬λαhλ@!1∪π αJ∈-∩0∩¬X⋀q(E ∈E⋀Qh⋀VCFLSP ¹4`∩]π∃
A∂π5β%⊗m ~⊗α *pπe@-T¬β→+∀[π →0[
%∨4[⊂∩≥!6NB ~∃ -↓Q c\x9T\λ⊂λ)∪βH ~α6~~α4⋀l4h∈⊂∪c#&⊂∪c# → MFFA↓_
4h⋀h ∈F@0αα0∀QSλ ∈F@¹2↓_
4h⊂λλxur∪dλβa`↔HL∈bA∂
(∞"v λλxur∪f4⊃pp(i`k⊂a`∞AST⋀A∂π@A≡∞4bAα≡≤2bAα<~NAααλ∀`)0pλ⊂a`
@%-( α≡≥"& *λx5$k∀λt:αj`∪V IRMVF GCRMP AβI!≡∞αAP@!αE≥@;8∈A∂π5↔⊂⊃αM→α∈∀
0∀q1⊂∪$ebP⊂P( ∩OP@ %)dA→≥!`∩¬IλRα∃λ⋀Sjλαi*,H' fbQ
;8∈vAβI
A'βI&P⊃αLqα$X:$,
9→d:⋀βtQλZH∪qD
⊂πidU$gg IH AβI%β %¬~B∈∞*`4)4∈`≥H g" THE "PROPERTY VAH + L@ α∀)α¹4≠ e,4h⊃λYβ'j$Sα@∞A$B∃αHYd=⊂⊂ FBα;; 6αα0≤2λ¬∩λT⊂4TH≠4k@⊂∃ibb @¬2A∂ XA% Q' @1⋀:JH~"bααP4J(4⋀V⊂⊂d∈D OTHE@%L~∀`-β0∞d⊂πP%Qbh⊂* ae@ Lπ AβI%β ~qα:$)`∩¬IλR⋀i~DLD t(4TP+∀⊂3Q↓QL¬P≠lA% β⊃)β¬→∀Aβ%↓_
>Q⋀J0∩⋀x9T\λ⊂ dSαCE TH@ %⋀
J* iu"⋀α3@⊂⊂αPS.
λ¬≡∞lZ1h→_t9αef∈Bαλ
YY`~¬λ⋀SiI4h∩*4⊂3@⊂⊂d⋀@∪'PA+' ⊂A)=¬αJ>R,~Qαiybl
IyTL~λ⋀Q(λ∈f`PβRO
8∈vvA→+⊂~∞αI∀`9β)P#'bP!⊃dg#@ GC'ED,⋀A β
⊂Aβ)∃~A>p⋀¬$DQQ#@7nh⊂)I4p
IS OF T@⊃↓
∨%~α↓↓"~αYb¬∀J@λ¬⊂ ∞@+4R@A<B⊗J∃β!P@'nh
D*g⊂$P*$"H ∈UNCTION↓)≡A¬∀A!%∨Q π) ⊂~∀`-β0∞a~Q∃⊂∩iP ∀HE SAR OF TH@
A∀*∈∩R ∩2*λ9t`(q0 '⊃b∈E≥Nβ; NUM @∪↓αA2M~Aαh¬3( ¬R (GP β%¬_
R⊗,!α:2M~Aα→jTjHβ"Ng]DD^⊂iaddH!`λAR VALUE> FOR READ-MACRO FUL¬π)∪=_λ (αN`≥Nβ P@%=→∪&A%&A+⋀"∈@$X@λλ,P ∪SGCP@%<Aβ≥λααNN≡≥∩⊗ "βC"J
Ss∩*7@⋀g$S⋀¬∀~(p
mm¬2∈J&}*MαJ r∩>T
⋀
∀→XU$4ThλtH⊃h~PP1hT⊂ss Hαa`∀OR.¬
;8∈vA≠U' ⊃αα
$-≤X⋀UHT∀Q3λ~α VE ORDER WITHIN GROU@!LXλ (αC"G]]P#PβH ∪≤ααB∈J j⊗@$X⋀TdλSt@λX0r⊂h abH∀#&'SαUM IF@ A→ A≥∨≤αj`∀
)u⊂hh8T*⋀x8S⋀≠↓Q L1QTg↓323HhTb"!↔p∈$iU⋀A⋀f ∈X 4%≠∪≥
→0∩αm
∪ "u*44λLj~
¹1PJ6&:420$⋀KZ~2>u*44(H" Xhd#Pα32) ∈FD 0↔ =+¬→
4⊂
∞a J6~~≠P&&&t2~ $HI`≤≤βs4 4⋀∈E⊃,∩⋀f ∈Z: MINFFX ↓ ;DUPLEX ∃¬≤H∪≠
→t&lJ0∀QPB!⊃,¬a$d∈UM
λ⋀∪≠
→2t&lJ0∀QP DBDX @'e≠¬∨_4⊂
"dA∀l4i∞D
Q0λ"Ph⋀ HNKH >8¬3
λ∪2) ∈FH 8π⊃+≥-&~∀∪5
~¬PJ6&:42⋀$⊃↔5≤
*1P@)1S@⊂ α-MFFS)NFF, WARL⋀A7≠→ ZA$
α2∃¬:J>~8⋀⋀dhzDE ∈E∈Bα;;+↓→β≥∂Q⊂A>2α~J⊗,b&N~↓r
⊗4zJEH∀5$X ∂AQKP bQP#ah
!
L¬~~α7 K⊃⊃∪@9α ST
∪≥→
0t@∩∩∩w→∪1:αYPhPα3QH∞B,↓⊃".qIqU3!QQ⊂@∩αd∈FFD8 0 ;DOUBLE
@π0H∪9
¬∈PI@$$KZ∞.6⋀b⊗`4T"a⊂&t2~iHK$$\"VB∩-@4*
8 &*~4⊃h%@HH%n
L::V4hP&*~5Ih%@HH%nNβ→T∀AQ$DrA→d4¹4π$¬∀-λX∃" i4d|u2∩bβ↓↔4Ei:0hP→hd4!⊗H↔:4
∃1Q$L¹4d¬blthj2lTheB¬<~)b¬hhbj¬H_$d*λ¬tIyβ#P&⊃e#j$↔FE∈E∩c'⊂*bf"iU$j)K-FE#i`']αX⋀D] f*bH'c⊂∀j j*P#akR'TFEαDD]XKα1 =≡ DASPLAQ MESSAGE DURIH
∞A≥∈~∀∩$∩vb\β⊃↓uy⋀~2>
∀*I↓<B=Iα<JR!α<→αNR
"&NRL~L4*<~P≤v↔ K⊃↔5≤
hXB¬4→JT-~ xb¬ uTdhT¬4
)_∀∀dZ4⋀%-)→d:⋀x1PT<:y⋀{!⊗hTx:tD{7!∪H+Q⊂K\_ib¬-8YD-≥5)∃%Q!PT<8_5≤
g!∀∪prdP0te6"".iX4Rq(D⊂0td
p5Q(D∩⊃4H"QpiH4uNA_S∪pi4 L 'P0te6/B"'~3S0*)q1λ_th∀h~Q1λ λ4Q#!(pt∂'λβa`a`k∃hβE#ac∪(≡]#P`aa`U∃c&(βE#ac⊗(≡U#`a`∪AV+FHP ;TEST GCF ;ZFFS ZFFX ZFFL ZFFY ZFFA SFSSIP∀AM
1'∪hA'
→M∪4A≥~fN≠$¬≥≤~9∃@$⊂πc)dh
OFXSIZ OFLSIZ OSYSAZ Lπ'β'%0 α≡5~N&$λt5E9≠"⋀qS∀i≠H⊃tk~p⋀m⊂i`idVα
∀~(p
mm¬α∈J∈l*R-*4¬∀HZd Uλ∃ P
EMLπ% %⋀
22x8∃$y` AQL¬P≠lA≠+≥!αBJ-~⊗JZ*αJ∈2
"&@4T u∀⊃0 $Sα@∞A∨_A≠∨'PA∨ AQ⊃∪&AM)+
8~∀4SZVN⊗ ⋀⋀+(⊃pd⊂πP$∪d⋀D EXACD↓∞∈2≥*2∈R,!α&:αHT=∀→D⋀<≤β23J¹1"B6Hhβ)P~ 0 ∩m→∪' h ⊂MαQQKπ@,α!⊃,¬c$V'*fFBα P∃
→_tα`$∩∩`.4b0≤U3#!λα!∩⋀V ∈FDh∩`∩∩$p∞∩,∩2⋀Q(5B≠(d4!⊗HH↔84`9αh&"V⋀@
DX$ P∃
→0 h¬H$%8JU⋀dY↓P@(Qiα+λβ#!
αX⋀DDNβBIGNUM~∀%0
4h∈.A⊗α""'ilfa∪d∈E$∪⊂⋀ ZFFH: REPEAT H@≥↔1_∞≥-λ¬Bβ↔9¬,1Q MThh∪@K↓⊃⊂K]8~%_)_dbαβK6HhTk3HhKλ∃h~SH⊗kλβ#⊗@ TABLE WRONG @→ 9∂ ∩"βQP@ ¬↔)QbP ∪SPCSIZE 0↔≤Jb* xb⋀00r⋀
uq1*λ0S⊃$
t⊂0hUβ⊂⊂*bb⊂*∪β CAL@π ⊗2
"∃αB-∩≤h¬⊂((⊂ "PβH β∪5 λ@8hP&N~≥~&i!→dL58⋀qe*q1ti≠@⋀D]S$i`∀
λ SFXSIZ: L¬∪
E~≥*N,:N&HHI`≤¹4≠ e,hβ"B*¹8S∀r+≥ NIFLSG)' ∂'%0λ$\22>jYPhTH ↓~q⊂Ti≠L¬⋀XαDD]bh¬BLE
C@0α &N∞β
4MSαB,↓⊃".pid¬PLEX
∃ `H∪' a'∪4t$`∩αm +!→∃0~*∀9⊂&N∀rN&PJ0∀j8rU≤Xz4MPα".h$cg*SFA⋀ilidm∞⋀g)lSicU)QcidmαD]`∪YMBOL
λ¬⊃9 JN"~≤Jaiαα(U⋀05λ Rs∪hul+λ∈↓,r∃)%iFEαii`iRm_
NSARSG*SEGSIZ∩m'β%&4⊂
&~p↓0∩m8j5≤M%Yd4¹2D
t
d 5~X9∃@$∃⊂0IH(⊂ i∪d∈G LEH
∂)!:~⋀~(s'β5∃&A>2αNB∈≤*Mα
,20≥∀T
5$
*@λ c⊂#aKα COPIED↓
%∨~ααN~N≤J`∩⋀Z@λλ→λπ⊂ U⊂)`∀ART OF CC.
λ OFSSIZ: 0 ↓ ;LISD
λ OFXSIZ: 0 ↓ ;FIP⊃≥U~~⋀∪=
→'∪hp∩`∩$∩w
→=→+~~) ⋀H∪= ¬'∪hp∩`∩$∩w ∨U¬→
~)∞a⊂Lz≥E9≠#@K↓⊃⊂K\9yU⋀dY↓P@(⊗ α)⊗∀r+≥X⋀BDX DUPLEH
BG$ Lπ¬≥'%0 hH$%8)∀<UYQPPz;∃≤'!∪⊃↔5≥X)t`h) b y e≤'$¬∀-λX∃"⋀ i4d|u0 %D α.i3RtaQ@⋀giPidm≥αX⋀DDNβSARS
IFN .-OFSSIZ-NBF, Tπβ%≤↓0∞-∃m~&iααH∀∀dT
u∀hp⋀dhzDEhβ"C!πtr6HT⊃StDλ00r⋀
t⊂0hT⊂Q3 ZβP#d∩a`λ TL∈A∂%¬⋀A
\A' ∂5 ⊂~~α~∈N$bd4 u~⊗∃αα8t
≠(PKZ¬ ∩`(αW⊂+Rh⋀@⊃∨U(A ∨%_
:λ⊂¬ 9⊂πf"H#`i!⊂cbP!Sd⋀LECTION↓
∪%'PR~⋀∪≥
''∪hp∪≠βa
¬&∩$∩w2M~P$!_t5E9≠#@X≠⋀4↓⊃⊂K\i≠⋀eQQ L<iJ4MSαB3(≠⊃QS↓⊃ ⋀]c∪'c*fCE"!$ GDBSIZ0∀∪5β1
⊂∩∩αw⊃∨ ⊗
d(4*∞β ↓pr∀i≠L¬⋀fPl##!BD@]aSd¬PLEX
∃ `H∪∂ a'∪4t%≠β "42`$⋀KZ∩VBd*`4((r Lx)e≤'!∀l
λhd⊃↔4)1sU)"B1j;4r6G↓306λV""!↔tp f'f∈E∩'∩⋀cR')dm∞⊂)"h⊃`j⊂$∪%` OG+1, MAXFFH ;@@+9↔&~∀%∂'β'%4tβ≠¬1~~λH$%Nα8∃∃Q)∀4r¬aT<589∃@3QQED∃p4I⊂-cFKi`m⊂∃ a&"H+i'gP ENGPH@:4⊂_w
πM∂⊃∈A→1'∂→,A¬→'≥→⊗A≥JN≡2X⋀¬≤
8yDZ¬4⋀Thy⊂h⊂JJqs∩d 30 cS%P )cb%@ @¬)¬β= αX→∀`(R5⊂Iλ⊃pg↔λ⊃pg↔(⊂λ#i`m⊂∀ ∈P⊃≤J`∩¬λiE≤MαH∀
6Tr6AQ@∈E≥Nβ; @%=_∞@%4 t2¬IλR⋀≤λ→∀`*h∪∩)%` NG LAKE PAGES @∪≤ααR"∃⋀:∈J
:∃α∞|b2∈∞αIu∩Q'3@7h⊂q(y13U⋀⊂0SλTλ⋀#aj∀W FILLED IN AT IL¬∪(AQ∪⊂⊗∃ph &~α:4<4∈B&↓ ".iI4qβ!↓1P )f%U⋀L⋀@D]$hλNUM
α FLSGLK8 0 ;FLOLUM
DB$ D@SGLK8 0 ;DOUBLE
@π0H∪
1'∂→,p∩`∩$∩wπ∨5!→ ⊂4⊂
αa J∩bN<b-h¬H$%8JU⋀dY↓PD∀tA∀⋀u8yD[P⊗↓⊂HKαpR(yβ*fFB⋀idid%P~ 0 ↓ ;SYMBOL ∃⊃8H∪⊃≥M∂⊃⊗RαJ∈B,
Qα i4d|u0 %D α.i3RtaQ@⋀i`cf%@: 0 8π'β%L~∃∪
8@\[
M'∂→⊗αj24eD¬ 84S@⊂⊗β(
['≥→⊗A$
α2∃¬:J>:8⋀⋀dhzDE ∈E⋀Y)cf] 0 8π ∩ ~2⋀mX⋀u⋀Ss∪ hπ @)!≠'
A¬¬∨-⋀@Q'Ljα>⊃⋀∩2>∞]→$4λhR
RN<b-h⊗↓∪@9⊂3Rhλ∪∩*:λ∪qDλR5λλ&#aeFE$fcf%@: 0 ;LIJKED LAST OF UNALLOAATED IMPURA @'∃∂≠ ≥Q&@A∪9∪(Aπ∃)&A+@R~∃!I'∂→⊗βP%@\b&:.,!α2≥!α>→¬*:∈2dz∈∈R,!αBVα(R¬≤XyT,U∀c!∈, λ
T∀S 7B,α'i`k"Q⊂(!)f%P+R ¬N HISEGGETS PURIFIED
P@∞HA1⊃'∂→,t∩`m→∪≥↔∃λA2M~Qα≡2α
2>≤ZMα~}⊃α2!⋀B∈∞ hP4(∀T∩R
∈|⊃h$⋀9⊂%¹5drα&≤9*N⊗=~&i>∃"αN≠'b\t)~DαH(d⊂Twg+4q(∪q`∨βE(#BBVZ'!∩h)c@*SEGSIX/BTBSIZ>+NBITB,, .SEE IL10S5
MAIL¬¬∪) →(t∪
¬)¬LZb∩w∃→⊃α "∩J⊗α:2⋀¹4z$⋀⋀eD t2X→∀`$⊂R5⋀λS∪pi4⊂4Q("Qpg↔∞B,↓↔tP3Hs(∃λYαh⊂#i⊂#aCE#a\N]⋀X⋀NβRANDOIER↓) ≠↓
∨$A≥∈~∀~(~∀]'∃
A'¬*JNT(%nNMR∃αxd¬¬-(T⋀5∀XT¬≥z(∀<*λ~$,
4¬R¬-8XB⋀l→→deJλ+∩¬≥H~E-AQ"u≤XT⋀d
~∪⊂4λ%-"λ→E≤z
(∀tyYEJ¬X⋀q(D⊂V(λH0k,&⋀⊃P4ip1λ →U∪h 4q1aQ@4⊃J:r6NAT⊃Tj¹8jTq(zr6B!↔s∩4j"B4λk∀r6G!3T⊃K
qjThtr6A⊃.qR+U3#!!4⊃S
96NB)J⊃S∀huTq1j96B"'¹8S∪sJ#"Qλα4⊃λ*p⋀m≥αX⋀DDN`dg∪U⊂''P∩e$j$Pf⊂(*"P"'Ua&"iK⊂)gg,PFEl∩⋀hl)dm⋀X⋀DB]`dgj⊂''H$g$j∩`f⊂(∃i"P!d¬PLICES, MAMA!
DX$ PDXSIZ2 0 ;AIN'T LO INIT@∪β0A!+∀)α∩Vα DL≤Z5B⋀$_HEJλQ($:~λ$u≤α6NA⊗α""'`dg∪U⊂''P∩e$j$Pf⊂(*"P!$g*fiK⊂! a⊗PFE⋀L⋀DDDN`dg∪U⊂'"k⊃i⊂''H(*`∩E SYMBOLS!
H@≤H%!⊃≥≤Jai∀*B∈"α":.dz≥-Eb↓@%nE*2.MαBf.U⋀:>RRλα
∃α\J∩∩∈t9¬$4PI@$$HI`≤→`u"hZd-∩ ir¬¬X⋀Q$
p4TdQ25 λαi⊂F$c'⊂ ⊗h#)dm⊗g#⊗⊂+Pi'⊂-T⊗VidVα TABLE @/I∨∃∞A1 ∃∂)!:~∀∪A&e'∪ht∪≥'de'∞UM ∂'∪h∩∩w≥J6
>bαα2>≤ZL4(1n¬~!α¬~1ααLrb5αDJb5αl
b:Bhα"
B}∩≥αλ*⋀,Qλ∪J⊂∈&⊂∪αPDLH PDLFL1 @!⊃→
_↓1¬
↓1¬
@⋀¬D∀iD¬D∀i∀¬D∀h⊂λ
⊃∪λ S∀λ T∀λ
t⊃∪⋀ T⊃∪⋀ QS∀⋀ QR∀⋀ Tt⊃ D⊂l@⊂&!Y,!YaY⊂-aY⊂'PY⊂'c∪!Y⊂',!Y∪iaY∈⋀A≥]Nβ ∀(TTT(TTA⊃¬∪%"AAβ%β≠∃) %↓⊃βπ↔∃λA¬¹2↓β→ ∨ @TT(TTT(T~∀~)↓!'h∩∩α∩$p∞
&t
Je¬∩>≥≥α∈∞∃⋀B&≡hRB
∀K$$\2&2HXB⋀dλ%J⋀→ID`8c"Tλα/∂λYQ∪∩*:
p⊂(zr6K&IPλ dieO XBE∈!(!f∞⋀a!(icDDBD]a$SαARY PROG↓'!βπ∀A→∨.4⊂~¬∪→_A!β≥∪⊂~≥eX4*"Lrb5HK$%N "∩J⊗α:2⋀|d D
≥D
tm∀D t2i R⋀Dβs⊃!QT∈DDNβEND↓_∞→αL20∩¬λ_tLQc"IQ(∀λp⋀g#K-FE$∩l
4$`∩∩w¬ ∩J-~Mαxd⋀d
8@λ
dπRD↓_∞→αdzP~¬8XtljAPDl≠ eDk!⊗HKαr∩(y⊃0u⋀4p0IH(⊂ g ⋀ OF NPM↓β¬∨-∀A→∂.ααN⊗≡l*0∃Q)⋀*⊂πi#N⋀bg"∩$@ ;FIRST AVAILABLE WGRD OF HISEG↓
∨$A1_∞∈∩Lr≥α
Lr∈J∀
¬∀|z(∀mQ)⋀*⊃3Qπ↓21L%Kl∪ ⊂∩c→⊗-R$f'a^≡"g⊃$ -HIH >~jNB∩DI.B∈=~&i5α∪b5⋀_yU≤eP + W"!↔q3Q⋀qH∩(hαP ⊂AGING
λ⋀⊂∀'33@4∃∩⊃*¹8(⊂
+Sβ VALUES AR@
A-~⊗⊃α4zIᬬ
V&∞X¬T Q 1 ~U⊗(
λα NUH ¬ HAπ",~- 0β"KJ¹81(∀λ⊂π&eCE↔ ∪EE S@!∃∞
&t %n∈t!α>RD*JL4TrB$β∪∞A⊗α".iuh⊃) ⋀ OF NUMBER @!⊃_Aβ%∃α~*uα∩2⋀∈B&↓ ⋀]d∩c`λ EL¬⊃α|1α:Vl∩⊗IααλDb⋀~(TλhαC"AQR1SD
⊂1r) π →64⊂
B∩d21E!⊗HKαqSj$⊃S∃*9⊂⋀g#H("&⊂∀ cbiH⊗P ∪EE E@%%_
&PhRB$β⊃S∈'@,α!↔qStD4⊃⊂*I3Q`⊂h⊂⊗@ SEE ERINIT
P~∩$p∞⊗: ⋀⋀`¹8H∩1I⊂( cRd∈G
0⊗YYαRα*α0∀4⋀" FAW THINGS MUCT BE IL⋀A)⊃%&A∂%⊃ $
∀4∀]' ∀A''∂
≠β KZ6∈ →U,(⊂ dVα@ &A→_∞Iαα:D`:P1q$
t⊂0hZc"B+λQP ]αX⋀D]S$ib∈B⋀h##⊗≥⋀X⋀B]c$l∪*fFEαl##&∞α 0 8π
→∨9+~4T"↓≠λd4!⊗HKαq∪jXS⊃#!λv α+λβ#!]αX⋀D]PdπE@!1 0~∃⊃0@∪1→
4`(K$%8JU⋀dX∈β!λQiα+λβ#!: 0 ;@¬∪∂≥U~~(MB~5↔!∪H↔:5L0Ss↓QR∪@∩αl##$∞α REPEAT HL¬↔2|9-E1⋀j∈b~4@%nλ¬3I:c"B+λβ# @: 0 ;SARS
λ¬∪
≤α↓0∩λhe~hhbb¬x~$`$⊗v⊃H(⊂
&"P+'g#@ LENGTHX
4Ph"&~p⋀¬⋀ y→d:1Q#@7nh∃ λαP'"V*⊂#'Ui⊂ ∀HIH
∂↓≠#'(ααα* →b¬$ ~2⋀}(HU⊂+
⋀$!→T
EλI@HK9X∃≥⋀Z λ
λα PMSITILπ⊂~M¬"0~⋀y~d(+λde!→T
DiJHK4
⋀$bYIu≥≤_xR⋀h¬⊃**U0λ*P j∈B,# _P8⋀∪≠βa
1 ~)1'! 0pλ&6
BNB∩`h!mXαR"∃⋀r⊗bQ⋀26@-$
DDhz2⋀mX⋀u⋀λQ(∩)⊂*$$P ∂RDER~∃i!∩G!∀l
λ⋀⊃ A .p(~α*`fλ("&⊂∀'idj∩dπ@≥↓
∨$A1_∞N→hphUαQS
π@⋀f`V!&(⋀B]` NITIALIX¬⊗⊃⋀
Qα⊗α)∀`)5λ⊃Js(⊗
λα ET AL.
P∃
DATE A GNE-SDOT OVERPOP IN SOME PLACES.
.SEE ERRPOP
ZSC2: SPDLORG ;SC2 WITH ZEBO LEFT HALF
~lp
mα$B∃αh[¬"⋀izU∩¬I ∀dth∪*Zuλ⊂HT⊂⋀g THAS MRDER
OC28⋀∩`mβ¬&A1∪⊂⊗%→α~∩αB$β∀c!qS⊂f'B,β!qR⊂f'B,β!tplG⋀X∈Eβ≥jai∩'%P)Qg"$P∩a`f&∩P NTAR ENRC.GUNRRUN UNRTIM ULREAR LIPSAP A∪A''λ↓∪!'<!Iα¬~∩ E⋀JBN∩3⊃α&B≥α¬α~
4"~
5∩~
42Y ∃⋀⋀βλ∪ →β*("∪⊂ NTP@@_A¬β¬β'∀A∪≥$j∈%αLrRB⊂⋀⋀LU⊂s 4⊂⋀g*∃* P$*('kλ$g"$S&P$g∃'(λM↓%⊗⊗LrQαJ,*2>A⋀
BJNαjB¬∀XZ55" →e$IDα-⋀~λ∃∩αX ∃ :Sh * 30∃D⋀4∩2)c"C!
u0U
α4P)Hα#f@ T¬β%∪¬¬→ ↓∪⊂→αdzP~⋀9z$(hαC"G]P# !qt HCT#d
KYY↓IP∨I¬*V>I→dZπ=l↔π≥lphPβ"U*:R∪Rg↓,α"'btr4→y⊂⊂⊂ or CALL iNstre
iSO\hASfAβ##'M⋀ βOC,≠'π⊃⋀¬π.v5qP@*q3Q ↔@⋀X⋀B]bt`4her 0 h∂dA
β⊃1⋀¬⊗w∨L.V∨≥ycBπ<X LD≠<yd≠h⊂~\py∪yH4:w5CE$a`S&$]⋀L⋀D]bZz42iλ_⊂7`2 CALL instp¬`↔&K?9i⋀ CC3JβWO⊂;Eβ.s,4(hQ`≠4 ∩⋀u14j4∃∩∩*4∀p
* ∈ NEED NOT BE @π⊂≡h⋀r(Hαi"bλ)`ai⊃b∈E∈Bα;;;↓'!βπ∀A~⊂⋀⋀ Dβλ⊂iλ3SQ)Jh⊂3HD⊂⋀g#⊃i$giP g"λ*ibf⊃iiP$S*)P S ⋀ GC OVERFLOWS
MAY@@
A→%_
R⊂πSk∪¬0 &¬RSpJ→3j`~*ibf⊃iiUg ∈
λ¬∪≥$
Ih¬H$%9→d$
αλ∩)*#P$SαTEBRUPT ARRAY (@
∪
<A#+ U
R4PJ∀dx92⋀dα3Uλ~@".hYβ*)$QiP'cλ!'i&H≡ g*λ⊃R⊗ !P#'⊂ NT BN>
λ ↓ 8∈A%∪≥⊃(A⊃¬→- ↓β%
AA%∨)
)βλA 2A∂∈4⊂⊂∀λhQ`≠4λTt}Xyα⋀¹4z ⋀ dβλ⊂iλ3SQ)Jh⊂3HD⊂3QHZR3tJ4⊂3Q⋀4q3λZth∩)∀h⊂)hλ⊃pduQ4H∪utaQS06(((∪∃)jQ04G,L
f⊗λRSh(dgUMU*ibS iiU!#∈EβE*g)⊂β(
∞t$`∩∩4d^Z↓
∨$A⊃ ⊃β3∃λA=¹0==∞A∪9) %%U!(~∃%
≤A-~⊗"⊗≥→1αVu∩∈ $↔!∪K8Ye%∃∀λd`:H⊃⊃)H411⋀λq∩( →β*"i*h ∀
λ¬∪
≤ααVN⊗d*NMD
T`*S04G⋀X⋀]Qd∈TRY BORD@ →βe λA≠¬$A&u"⊗J-αP (*Ye∃∃Y`∞A⊗α".hYβ*),H!'i D@ →βe λA∃*0∃$→XR⋀H~$l≤β∪pi¹1"U3J⊂3 ≥αX⋀D]Qd∈TRY BOR↓ ⊗2
J⊗⊃αα(T λ⊂
$SbP f⊂i&af∪βC@⊗~)+∃% ¬$tα`$∩w&t"⊗aαLrR=↓∃∩⊗∈1¬"& ,T λ →β*"i*h" QP ,(4(_)D`8p¬P&∃d∈REAR 0↔ 9)%∪ LA∨ A→_∞J5βb∈J≥⋀20≥∩ →e"⋀i` ¬I3P
∈|
∀$∩∩`.
∩≡MαLqαV∀*∈Iαt*⊗⊃αtyα<4
¬∀}HX5$yaP@H⊃∃e≤,T d|hHU∃∃X
@hPβ"Ng]P$g∃ i)*T*⊂ "∪⋀@
LIPCAT90~D`∩∩w1 ⊂~$Aα>→⋀~JV⊃¬αVNα,!α
E⋀J2R⊗∃∩VBPhR&BNαxC kβ.K&Q ⋀]kSβRD OL@
@9!∪%# RA&u"⊗J-αRMααH∀\aQ$M¬8¬q∈-(
⊗M⋀D]kSβRD TUH∞@9∪
!∪HRAβ≥Q %%+A)&A$
.⊗8hR&BN$1EuW%S(↔:4
∀X@α`(α#⊂FB$h!b→~P≥~-4 ;SAVED .DF2
IPSPC= :hZf∩m'β- ⊂A!∈~)∪!'λβiui5⊂H%nN
2⊗⊃α ~≥313λ~α ∂R↓λ⊂∀)~¬≥∪UP∞EV ⋀D]`k"bλ aajSjf j∪βR @$4⊂
&Bα8ckk&↓⊂K]8~d,"λ_4:αfbf⊂h ∂R↓ ∩⋀~(~∃≠DJB$β∂ ≡M⋀@]fPl⊂!dShf* Sα@ ∨+LA∪≥$*JJV¬"L4(HH%m↓D~∈"∞αYD
⊃1⊂)'f@ THE DEFE@$ααP≤tQ∀aQ@⋀DDNβ @∪≤ααR"∃⋀J0∃$X⋀TJZ∃λ∃HXu∪tE↔@∈E⋀BDX 1 MISCEH 2 r⊗ =X⋀c!⋀@ ; 2 @!⊃_A∂-∃%¬→∨\~∀$HI`_K∀ T,3tV$λαi)'↔`f&⊃c`f⊂∪βP
LIH
)!⊃_p∃YI∃¬≤~e$mDα4⊃ El"+J¹81(∀λ⊃uC!$g ∀PDL: -LIN@)A _@1dJ2RB$`% 58XR⋀h¬∃HXc"Nh[∃∀P$
Sss$λβ'i∪βH
A%→)! 0A∨- I
→∨.αα∈ 4D
$-≥YJDLQh⊃+∀P ⊂∩d∈TERRUP@(4⊂λ&
dz≤Z I∀e%λIB[)I∃¬≤~a∩`*q1(
λα OV
IT⋀ IOCIL¬&t@∩w+≤*Iα→x2⋀4TSj$⊂1⊃
(αi`∪
λ¬∪(H$∩∩]≤*∃α→x4-∪αβ"ISH⊃∈⊗ ⊗c!$c' SAIL,X∈~⋀wMβ∪_A=_
2e⋀"⊗~&tJR&>u_4*∈≤∩∈N∃βP∂'→_⋀DB]kd" ¬ @'¬∪⊂⊃αlz0∀MIz"¬≤~hU~¬X⋀q*$⊂0td4∪sD 3P
∈BαIN@)5β∩`5βP∞F∈
∈¬λ∈__ __⊂⊂ ;@≠β%_A&u"⊗J-αP$)→e%⋀~ ∂'WLλ ∈F ∈∈ λλ_ ⋀@ ;PARITY @ %%=$⊂∀)→e$≤β∩`≡O]_⊂⊂0200,,000 @`∩\~2>∞X⋀⋀LU⊃4J4⊂
∈BαIN@)Q)∩`5βP∞F∈ λλ_
⊗⊂ 00000 $∩vy M∞∈B+r%α→jD-∃*Z¬ ¬$g∃( ∂V==:0 @```0d``β↓@$↔:⋀$b z`h→jDL⊂∈P≥tp AAα∈ββαβ ∈& λλ_αDX ILL @≠ 5_∞J∀
$,0β"R)* ∞@14zz`β↓AAAα¬Bcβ⊗∈ββ⊃↔4`pπ⊂"V$i`∀AL¬(A≠∃≠⊂≡Hh ∃ ⋀]bSα@λA∪→_ αN J0 (αC"J(αbdg∃≥ BLLππ-βλ4*J,*0∀}⋀∈B(& ∂CK 1~∃¬!%'5!`⊂L)It9hλλFBαREEST¬(t∪ →∨π⊗α↓D4!Q%hKαq3HD⊂⋀c'λ ⋀10
λ⋀⊂∀)_d`$⊃ _b→_⊗⊗β
∃∪9)β→h∪¬→∨
⊗@b~(~∀`.5*∩<Tλ$Mλ⊃⊃(i3R5 →β`∞@↓
∨$AYβ%∪∨U&A%→αB∀λ$M∀c"Gd⋀EFT HALF BITS
SA⊂@@⊗BLj∈%Tπ ≥
__⊂⊂,, ∀KA∪!β$βiuiβ↓A1AQ"-⋀~z$`¹7-(
→ _⊂ ,
λ⋀w%⊂αα∀MJ1P@$αh$fT+_
:βQIAAα∈hRX⋀∩)→α ∂=tp Q@hRt$↔8T`(α⊂$c∪α D1⊂+D20
λ⋀_w6αYd=αλZ%∃⋀_@λλZTT∀jD⊂QU Z∀h∀j⊗β!$jλ)hihSβZ LD@¬3)↓→↓>5~QαHH∀ pH∪λ⊃34⋀⊃
PI~α⊂&"⊂h*) L@ ¬!Q$A2$1J%⋀ D$
8~"⋀dH*4
∩ HEDJ@λ Hα,!dVα @→ a'⊂∃E⋀b∩b∩L1α2∩Db0≤~ HD,qRH Hβ*&hP DHSH2 LDHSHHA→ ⊃M⊂dA→⊃0@⊗~αT⋀d⊗⊂∀j⋀⊂∈",∪βFS LDXPNT LDXLPC LDXLPL L@ 1⊃LbA2%B"MI⋀b∩bB484(Q'3@7h∪∩⋀qH∪*Yβ#h⊂∂←⊂#aH$iP$Sα P@%=∞⊗Nα4⋀`¹8H⊂
iRd∈G MARK BIP &~(p
mlHH&&9¬~∈JM⋀zIαNβ→Tq∀c!≥]P≠↓%⊂A∨_A≠+≥≥ @zp⋀⋀ ⊂⋀ijλ$iP$Sα P@%=∞⊗Nα4⋀`¹8H⊂
iRd∈G LH ∂&A= ⊂∀'0∞gD@ VAH +↓∞⊗2e→α¹4z λ
:⊃0tλλ∩⊂(eb`∩Y
0⊗Xπ2⋀4R3I~α⊂!d⊃a` @↓≠ ⊗:=↓α∈: ⋀⋀
∃⊃3*∀h∃ P)"iU'i"P∃$ NGS @∪ 4⊂ mmβ0λ ¬CESSARY. T@⊃∪LA'"}*2" λ∃¬⋀Y`λ d∈LY IH A$B∃α∞
~∃αxd¬≤p∈bFBα;; 6β∂%∨'LA¬+∞αα2&.*α¬αXYT`:T⋀P+∩dπ@→βQ∪⊂≡eaP@53Qjπ@⋀X∈Bαλ
∀vβY`~¬h~$L )HU~⋀βQ1(Hαb⊂#∪βR ERRP@∨ 4⊂
-**⋀ !⊗HKαp `Uα@
A∀*RVJp∈∈∩∀*NL4T*JJBα:C@!,α"'i`k"H*⊂'k⊃i⊂ ∃NTπ!%≡4⊂ mmβ0λ
Hαf`⊂ORARIES FOR @
β'1_∞∈⊂hP4*
5"6BMβ' hU8⋀ ≠⊂αIT: 0 0↔$*6Bz(∃∀LX⋀hλtH∀j~αbbm⊃F@
SQSQOZ: 0
LDBP∪)Lpλ%@KZP≤tQ⊂∪βF @%∃→∨πβQ∪⊂≡dλ%M⊃0 FB&"'ch⋀: 0(TT) 8π⊂∩x_B⋀|hj4-λ
∀HYα ∂CATION↓
βπ$zI↓u¬2∈ %XT⋀l2λ*⋀m∀tλ$,¹4z(R⋀dβp1¬ ¬&"⊂`ga: 0 ;ALπ¬∃≤αα& 4H[α⋀z λλ~⊂πfj⊂a&"P⊂i) lCE&"*⊃d¬P 4$∩w%β9 ∨5¬"⊗ - z$
∃α#"IHα≠!$U≥X⋀NβP@→β
A)↓βππ,jV"$)αND∩&@"λ¬r →α"P!SβH
- I)∪≥∞αα~J>h⋀¬≥
Y{$(hαB"'P⊂
FIRSDh α
M"Mαxd⋀`(αhλD↓(∞ =(@λ Zαib @¬∃αβ(U∀Q)D$
λ¬∀G⋀X∀*∃∀@]kRd BE AN↓∪⊂~∩M∩⊗∞Q¬α6&:αHU∩⋀iz"⋀ 88U≥≤α3Qd⊂⋀"P⊂h⋀@∨≠Qβ¬→
4∃→ ¬A)$`(K↓"¹2⊃↔5 93∪λλ ¬ AN INDIR@ π ⋀¬⋀|α3UλZH⊃Sj$⊂0phZtr3Ht∃∩⊃$ +shλ*c#"⋀¬αLDF2DP: 0 ;.FNAMH[ &42⊗J⊗u!6@4PH%m↓Dr6 ¹2Y(U∀z¬QSr⋀h~4d
⋀z2⋀dHidk∩λI∀4Q0 )H!)'fH!j`∩REH
(A→β'2|
⊃=5⊃PDdH~4
∪αB,↓↔p1⊃
(αiiP∪βF @'¬$A
∨HA~≤b0≤ Dz2⋀
IyU$ )HR⋀
*(∃HhαS⊃λ)`i
αX⋀]`Q ⋀RESS @∨↓'β$A→_∞Iα4
N $x_B=~ ∃t`4⊂U1Hh4H⊂**P6#!⋀¬αIFE PAGIH
∞Yl~∃→ a
2PI@%8)E"¬ y∀`⊃0@⊂'i⊂-⊂h($gP!`f∪)P#'⊂,!jP N↓
BLhR2α≤J`∪Pα,α'X≡d!U⊂ λACKERY L@ - HA∩yhRbαβ(λ@=DO@≥↓β⊂~⊃¬αVJ&4J⊗⊃AQ HKαh∪Gf∂3⊃) πTHQ∪≤A]_∞J~Iα>→⋀
J,∀λd`:H⊂ !U ¬D CAH ¹2_h"2E~5E!⊗K\9ye$→j2β
HU≥~λ¬∩λ→β⊂&"⊗)` Z, AND↓%⊗R J0∃~λ¬P)1(⊂(⊃0 ∈Bα ∩vαα2λ9∃@$⊂Q0id¬E@Zb4Tb∩b∩L1`⊂K¬λBHh⋀q(T⊂∈"(![∈EαDX @% A/&daα∞yjD dλDL4hZ$,Pq(λ ¬TWEEH A∀Aα∈: ⋀⋀dB xb⋀dKλ$eQ+PK\YhB⋀LhT¬⋀ y→d8!Q$d⋀α∪∪h] 0 8π⊃&<B⊗NQ⋀b0≤~λ~5≤X)D," →e$z¬0βλhαS⊃λYqRNA⊗α.rJ4λ⊂(H∀Q4j4⊃StD3Q H⊃P*¹9∪p1⋀ 3T∃*D⊃R3λ L$⋀D⊃⊃⊃)T
B&↓.q4hλ⊃Sj$⊃3qD ⊂3Q I3Q` →β⊂# f'`bλ#'i⊂⊃_X∈E∪#*&h^^]↔ a# ∀MPS ;NUMBER GF FASLOAD DEMPORARIE@&4⊂∩¬∪→_ αB :&*≥eX4)9ZTe~ D*¬λ:B¬≤XyT,U∀hλ~tq3(⊗(∃ →αbP(⊂i fbU"i)F≥b"iPi$h*∩dπ@≤A= A' ≥≠ ≥(↓
∨%≠¬(t
m→↓1!9(A!∨%→)&AQ_
α~M∩NAαLjBVJ*αN⊗≡l*0∃" →b¬$α⊃(λd dg ⊂⊂ ∀HE RH↓≠ A→⊃1!'h!mααyu∀α →b⋀ _9α¬≤XyT, @GNE,⋀@A$B&Mα4b∈≥αM_4)4
U≤,D
4l⊃3⊗$λSt@⊂
)j j∃iP"jSd NKS). AH A 5!)2AM→∨(A%&A5 I_
α→`λλ'j$ THE PURE
9 AND IM@URA @'∃∂∪ ≥PX ↓ααI⋀*⋀i~%≥αλyu∀"λI⋀
α ~2¬-8XB⋀¹4z$⋀$
H⊂⋀LH⊃0(9λ⊂q(y13U↓QL¬P$P DXLπ
&\A)⊃∪LA∪&A
∨⊂⊗-"⊗⊃α≥*∞!α$B∈Aα$B∃αH~5"¬yz$"⋀xd⋀$
H⊂⋀M~λ_5%,→IEJ¬IλPhSαh∪λ~uλ∃iZQλ∪hd∃∩⊃$
q1s(Yβ*↔∈⋀¬α;HAS@ING VALUES
IFE SEG@→∨≤ZpLYm→↓"≤AEuW&#+aQ Jα⋀⋀ααα HDE≤αλ ∞O]→~1,¬24TJ~*λ⋀q(y⊃q`⊗NW⊗-f⊃$)d1==2509*~∀$@@@@A !'⊂dztpj`9:~*L2∃αN,:2>≥h∈∪αK9D$E9α∪kk&⊗β aQ HHI¬≤C'SS@&,λ@_KαX
4Tb∩a⊗5)uuK↓0%Nαy⋀
αλ⋀⊃*(q3Uλq(⊃J⊂∈⊂ S,P ⊂AGE IS ALLOTπ λAQ_
α≡- 4)8¬∩ ~h∪5*:α⊂!"H& ∂CATION↓0
-)t⊂hHK¬¬≥¬P∂'_⋀]g⊃l*⊂)Qcbbg∃⊂ g @π⊃β∪8XY! I
A' ≥≠ ≥(↓!∨&u"⊗HQ)D%Dxj3kk*8T=≠%Td$λ⋀r∈∃,(∞iQPq*D⊂πc⊂$i)jλ+gi"λ'c⊂*Ugb$giFE&⊃,('*∞α 0 ;POANTER @)<A1π(↓!β∂ L~∃→ a→!∈T$`∩wπ=+∃(A= A/∨I &A¬∃≠β∪≥%_
: yb⋀d~:B¬⋀_xR¬-8X@hHK⋀e⋀G!∪8⋀uλ~U∩3Ht⊂∈'aPj ON OF LAST PAGE USED
LDXHS1:∩`$p∞~∃~Qα"
~!αZ bV∀Q)D%Dλ⋀lG⋀X⋀]bagg⊃⊂ iR⊂+ f∃b@
LDXPFG8 0 ;-1 GHEH A¬*J&~L*⊂ (αW"'3Q SH∀λp3QaQ@↓Gu4sD5T∃)λ∃5jZsH⊃∈⊗∀⊃∀D ,⊂*λ⊃ &P3 λF,∀Q)D 5⊗
tλ *K∀qS⋀5⊗∀hλ 5 5⊂(⋀⊗⊂u D 5⊗λ~ph∀HpRN⋀λ3⊃phd⊂1R)JQλ⊃i3(∀Iuth
(P0rd
PS∪h9c"C!)5 λ ~4sNA⊗α.r)I5∩0)D∃4q*$∀sP)( (
¹85λ⊂K∀∪∩4jqc"JZsJB(∪prd∈B".jZq4@
;4u⊃)T∪P3("Q5J3U∈A∀U5 ↓".q yIuλλP3λλ3Pu pπ⊂ U'fFE∩c'⊂" X⊗-F*kji≥⋀X⋀B]jci∩h⋀E SNAME (I.E. PPN)
D10PTR: 0 ;AOBJN POINTER FOR DEC BUFFERS..
D10ARD: -200,,. ;I+O WMRD FOR ARRAQ DUMP AND FASL
0
∃λDa≥β~βP%@$KZR"~α^.J ↓f^∈daα
∃α→¬∞≥↓α^"-∩∃↓
~→v*>∩α:H∀T!EBJ,qh&
dz∈-⊂H%n~Lb∃α: j∃αRxh*d\*:" xb⋀Li`⋀# ↓Q h~DR¬→YD`7@,α!↔q∪udλSu3HH4V(λtH⊃λ th
;30SiD∃⊂0I!"C! 1S@
823 "NqλR3Q$
qs1$λ4⊂
)⊂P**,H)"f U b⊂!∩h)FE h⋀XTOP8
`5S!AA@KYαRα⊃α.Jp4)⊗%BN~¹1ii`∪∪∈∈KZ*9⋀L5EYD`8p¬Q KEQ.
λ )1M
(zzhb``I`~∃9 ∀5"$ 4-aQ"-⊗∪5λ,∈]~ _⋀]Q∪bj @" KEY.
%@)a∞@$GSS@&Lλα'Q!gg∃)'f⊃λ%blWβE∩`∀XASC-≥8⋀bnn$s ∩α*α∈N∞LIαB∃!α>→¬""*λ9⋀
∀_:D-aQ%hKαq3HD⊂1SD
p23↓QR5 ⋀⋀5⊗∀h∂/.F⋀λ
`⊃d FT-L@∨π,@Aπ dA ∂ M≤@≡Q⋀*b& ⋀⋀`9β⊂$jFE∈E #a%∞≥⋀i"∞']g⊂)"8T∈A
∨HA/"M"∃≡MαYα"∈_h"∈2<~→hI`≤¹4H_r¬$βh∀jtλ∃ λαP#aH+`λILE @∪≤αα∈"Ix0hT_i∀e∀G!∩kλ↔5S
Tπ@ 'P$g∩h⋀ FILA, >0 = <↓∞∩I⋀z→α∈db0≤~λ9tl13U↓Q@∈E#S*fP~ ASCII XG0000\ ;IH
∪)%β⊂⊃α<*0∃→QP@!α@
8∈vvAIβ⊂~∩|iαN,2→α~}⊃αJ∈t"6 * jTl∀X⋀@_3Q4H~α ∂R
λ⋀vvVααJ:=→1αJ∀
≤Zβλ⊂)Hα⊂ ∩BLOCK↓≠ ⊗N ⋀⋀(αP$gλ* λAT ORDER.~∀4⊂
&~p⋀¬-≤YHU≥~K1P@060HT⊂∈)!∪'ae@==:718∩∩`-β9E↓↓≠(4*6
J∀(⊂ ')b`∀tztf8∩∩`.βλ⋀¬vλλ¬6(∩4d 4TQ(0r0IHαP&gQ⊂→⊂∀⊂i` MACS@35αBR~):∩\*0∀λ∪qD 1S@⊂∃ibf"iFE$ ¬ @+M ⊂∩⊗α:2eQ)T
L(T⋀e∀)It9o(∞@:4∈∩X⋀ααα⋀⋀ααα⋀⋀αβ:⋀∈0hX≠∀(αP ∩OFSE@(βiuiLHI`≥≤βh⊂)JpπP$P,⊂∃V⊂⊂ "αα&JJ,"V∞_)D*⋀β3q⋀∈@∈E.BDX END @∨↓∪
AU' → M&~(hRJ:=→`⊂K↓∃e≤,T ∀`)4SQ↓↔p⋀g$U$`f$Vα@ λA¬(A&tJQαRLj∀4*($ ≤αh
⋀L⋀W ∪EE S@'Iβ⊂~∩|h%n∞ qα
∃¬∩⊗NR}∩⊗⊃α∃I↓"Nα:D
∃0 P g"'SP⊂∞.8R~∀∩2>∞Xπ"⋀Ix4Z⋀β∀PIprb%)bbP g"'SDX .β 0∩¬yz$%~ xbα∃(→d$|β(SHZtc"AQ@∈Eβ≥i'*∪α2 BPPNR GAMNT↓∂'¬!8Aβ Mβ$A =)'!↓→→∪DA∪≥π@A%)'@bA%)M fA→=' AI+∞A
1≠ →Fλ⋀⋀4zg∀α⋀8 %≥~λ
5L1H∀ QH∀
94h∀
95∀h
q0 )H()W)H)j(f∃m⊂''T ∈LS SAWSP PU@%⊃ $A¬*J~¹9λ⋀¬¬-(ic∩¬λZ%≤T
5M≤HZb¬~8dc
λ⋀v*¹8SLH
;4psIT∀rPiHU1C!!αE)'∃'→≥⋀Kα(T) 8ππ+∃∩⊗ 5D
⋀t∃Xd¬<tQ⊂'i⊂!Sd¬PARE @∨≤αα& 5HZ$`"C"G↔nh∃H~R00I4h⊃IZH⊂4J(4(⊂)⊃pp*tC"H
∀∪TG⋀X⋀]O)`m"H'c⊂ ) lP∩ ¬ADER>,,-<S@∪5∀A∨ A¬%%β¹2↓ β)x~∃∂β5≥(t@∩w≥,j
∈I⋀z→α^}∩∩Mα∀*F@~(T"b yb⋀
λ8∀dbλIr⋀<XJ5hαQth*⊃NB&↓.q4hλ⊂4d⊃34 zP4V$λT⊃3HD∃r∩)(⊂S
p3Qd∪usDλ4TP+~c"P(H∀p4G↓,α.h⊃∀Q*:h∪qD
t⊃0i_3λ⊂**P6(λ¹83∪λ
Y⊃3H X2r3Dλ4TP+"U∪jJt⊂nA⊗α.o⋀4⊃qHλ~TP6$⊂34g ∂∃ z⊂3λ
:⊂0q$Q11λλ⊃Sj$⊂4TH≠/C"I∩4 '!,α.g⊂4QhZuλ∪λp3λ →Q⊃6⋀qH⊂**P6/E6#"R)Jt
B&↓.p∀h1∪k*⊂∈⊂(dg*"⊂#'iλ i) VVdg#CE
RTSP1:↓0
RTSP3: 0
LOSEF: 77 ;LAP OBJECP STORAGE - EFFICIENCY FACTOR. FOR (STATUS LOSEF) = N,
;THERE WILL BE <1←N>-1 STORED HERE. SIZE OF GC PROTECTION ARRAY
RWG: 0 ;IF = 0, THEN CREATE ERROR ON DIVIDE BY ZERO,
;OR FLOATING OVFLO ON CONVERSION OF BIGNUM
FLOV9A: 0 ;RANDOM TEMPS FOR FLOATING POINT
FLOV9B: 0 ; OVERFLOW INTERRUPT HANDLER
CPJSW: 0 ;IF NOT ZERO, THEL *RSET WAS ON AND @AKTRACE WILD FIJD MUCH
;ILBORMATAON FROM THE [FUN,,CPOPJU TYPE STUFF ON THA @!⊃_~∃!M3≠ PI@%ntz16j-∩=α-∩&*≥⋀*b⊗∞-"&>→⋀z→α≥J584Uα>~PI@%nαh∃∀zZ2¬zZDLtX4⋀LUiyE4htα%Bz4⋀5yT⋀$¬DλDz⋀*:"=~ λU∀Q!∀U∃:@¬¬→R⊂hU
9U≠_)Dl≤4∈#8I⋀M~
9⋀}H@⋀∀
λYd},y⋀4}$ E¬X¬⊂AQ@0S Xp¬P→CE()fU)]⋀XβE()f)]⋀XβE$j∩αihjg ¬ ,,⋀∩w
=$AαX
J,
-↓⊂beA⊃eαM*Mk
t4¬→2MhK$%≤*∃αBα;∀kλQ!PE≥J→E-S!⊗K\iz"¬≤ZJ∀LQh∪I→λ∪tDλ
313((αi⊂+R$ad Lπ⊂~∃⋀zR-$ ∀`∃p2*A ¬∈E∪'h#&]X⋀NβH
∨≤αjj∈Jz↓uyαα
U∀Lh∈)λt∀r∪jY⊃∪@∪U⊂#&*d⊂ "∪)FE∈BαSAWSP:∩Zβλ%nN≥∩⊗@:β04Ih¬ND
UITH5'⊃β%%_
:Xπ"ααT⊂λ
84⋀iP∃bP&jP)"`Q⊂∈E⋀B]P'j⊂!gi⊃P MAGE IN BROM A "PURQIO ⋀A
∪1
~⋀@HA!≥JNAhJiE]αVJ&5I6N≥"⊗ Zλ∀<-4⋀αk
λ⋀p+~h∩1*¹1"R1I⊂$j)K-FE(∃i""k∞⋀X⋀]T ⋀UMP FILE @E@-%∞∃αt
6∀Q*¬-∀i` '⋀X⋀]T ⋀UMP BILE BN1
λPU@%→_ I!⊗K]λJTmαλi∀d(⊃SF!αE(*)`∞Mh∩`∩wA +≠↓
∪→↓'⊂~∈l(4(Q*5M≤HZc@!4r6λ$j⊂.li`≤
λ¬'3'→_ E!~4MD)~B¬∀⊂
i∀dgn∈BαSYSFL⋀d`(LbP∃iqP@*v4ti&Y⋀iRl!$jλ,⋀S@3M8⊂∀+Q⊂K\α1SD 5∀c!⋀¬∃'⋀HA
β- ∩PJ"∈¹2 H%n~}⊃α4→9∀`(βP'jU⊂*$"H+`∂RLDλ
(hR6∈_(R⋀e9(4d∃XgSk ↓⊃∪@¹83Su(yλ⊃Sj$
Dλp⋀ iFA)e⊂βH ¬+_pλ%@HI`≤¹4~*5"¬yz$"⋀α∪sλD⊃P
fPα@ $A= Aπ⊃¬%&A¬U
~⊗α(T ¬⋀a∪'ae@ LS@∃π1
V_hP$%@HI`≤j:U∀4h∃ λ5λ∩)Hα!)P∃βILL FINALLY @'∃
AαAi %≡~(_w%'a)⋀bAI∞@" →t(4L ⊂∩dπBAR2λ
(hRN@,*JD`→i∃$L→D¬∀ _JD HUB⋀|(~%∀
α(
→β⊂&'Uβ CORE)~∀4⊂ mmβ0⋀LR5∩(→λ⊂ "Pb⊂ ∪YLTAX↓)β¬→∀A∪≤A→_∞J5⋀z→α∈p⋀⋀
∃(≠⊂hPβ"B%V+ ↓⊃,r3DQ0 dSβ(λA<J21αα tLUλ∃ P
ACRO CHAR LISP
RSXTBDpλ&BαZ4B¬¬H44MαλλFBα JSP TT,1DIMF
λ RAADTABLE
λ 0λ
¬%
(tβ¬1_∞∞4 E∀≥EP A↔ur∩(d⊂$iH!&*∪Q⊂ N↓
%∨~ααJ∞h ⊂MJ*U$Bβ ↓↔j⊂ j⊂h*`∪ TTYREAD ∩0Q')βQ+&Aβ ↓% 4J∈B∃Hh &:La12∃*R ZBNR%*MαR-∩BJ%Ja1"NαH∃%-4 rJα⋀↓PP C"AQL¬P≠; INITIAL O@LIST IN FMRM OF ARRAY¬
-<GBTSIR+D|^d1∪⊂≡
⊃H4*Lzα∈ P&*ααRQ¹1 "&&LhP%↓↓⋀zα∈∀
d4λJ↓↓α≡∃"N&%0 %6Lλβ! 3pP*&L¬⋀a∪'ae@∂'a*)Rm∃P← β2¬
@¬→∨π,@d`<d∩g'Y
α @¬→∂π,A≥!β≥&P≥h ∀Li`⋀`*⊂1tdf-kλλ&#aeH_@
] ;END IF "4⊂
&→⊂¬EH++%+Ua∪L$~)b¬<YIB⋀∀X¬∃λZH⊂Q$
p1Q$uQ4D⊂⊃(λq∪∪jdg#@ MESC!
.BYTA $4⊃5%¹4tz`~⊂zzfm
∨$A!β∪%¹2↓!%∪≥Q_∞@-D
D`4∃stI¹1"T∀I→β*,⊂↔⋀@
INIP@∪β0A!+∃"α1αl*6.Jα2∈F}*P$Y↓v 5α∪ ⊗λ_ZdfT*i"Vλ→_
@!U%αX⊂{¬!=!↓1}~∈J$~"`(β"W↓Q@∈E'∪!*)cO^X∈E∪αHBTSG== 4⊃∪
≤αα2>
M"N≥0Lr2
≤9uv:∀JRN≤hQ2J8R`H→i⋀∃%8sSlPR5
¹8c"C!≥]]@∩d∈ @)!
A∃↓α
⊗dzU "λ9tlL~4⋀ TDλ5∩th∪(~Rh⊃jX4P3JH11⊂∀ cbP⊂'jg"⊂i$biCE
IRP CPAS _Ym5⊗I\bαQ¹2≥!2N~bN∈I]2¬ λh2dM4
j;3*v λ+⊗⊗ ⊗)dYh# _ PBS+PFL+HXP ∃∪→&W&5A.&~bZα9.EB∩λ*Bd∃
5D`+⊃+⊃K
⊗⊃K
λ∈#&∀⊗,#&∀⊗(⊗,∀⋀¬∃'@Y1'1'π%; ∪ ∩Mbb`≠F⊂ ∈ + ¬F+ ∈ + %Dα⊂ 0,$,0,$,0 _HαaA1⊃c↓1αthR`∃Uα ≡L⋀¬∃∪I!&AπAαP⊃]~B∞NβQPEU+βSmUαV
i⊂i`⊂C!SG
TARMIL⋀⊂∀∀*B,~@λ -(λ/SGS%@!≤Y6~∀%
&_h"jSivj+%3λhαR1HT⊗VVDf-k⊗aQ@⋀X∈Bα 0
]
αPRIH
)0ααr
%~p (αR1HT∂⊗VK⊃XX∨_[V⊂∀)$g*⊗⊂.⊂.βE$c"H≤⋀ZZZ ∈d`\α1MMD
¬∀h¬⊗⋀ α⊂⊂⊂↔⋀¬∃∪→
A55hLfnYl~∃!∀J0∃⋀ @hUββ"K ¬.DB]bg"λ'c⊂)⊃h"`jβE*"i∪dg∈E αBQTE
IFN ZRZ-L¬!β∂LY6~∀%(∞∈Jp⋀¬eU+%E@¹75tSi π LEL@∂)⊂αα~>I¬αVJR∀a↓"NDzV $Dλ$*¬Xπ∪Jλ1tk ∃4∈FEαf ∂C X¬5.~(@∩β¬1_∞∞4 e⋀ z5s∪Q!∀L¹4d e⋀ z4c h∈⊂!∪'ae@ FA∈E↔DX END GF IFN ZXZ-NPAGS
@!I∪⊂~@αp$+APUHα".hYβ"⊂$⊂→∈E↔D@]bSα@λA∨_A∪
≤↓!β∂∪9∞~∀_w
!U% nA→!+%DA¬! Hc"A
A+$cα↓
!+∀1Qαβ↓α&8⋀⋀Mβt ∃βλβ"C!! ¬↔)QbP ⊂URIF@2$∩∩w¬*J&~β∀⋀,U⊃4J4⊂⋀"i⊃F@
FPURF7h∪≠∨-M∩A H```∩$p∞@$ ~2⋀~D⋀9qQQ*∀h⊂h→⊂∈⊂*∪β CALLF, JAALL TO JCAL@→ 4∀∪≠∨Y ∩AλαbRBVα(4`hαB4
Zrλ∀¬β"QJ4QL'↓2⊂ )⊗⊂*⊗∀∃∀@D]b)⊂"ic⊂*∩ ¬ @!U%→∪'P~∃
¬*IFPJ*V¹6⋀)αQ¹2⋀zAF(hR~BV⊃
¬h∈DbJiα
⊃J¬1E!$4λMαVN"RαA22%~6N HInBJαR=≤j∈N hP%α∃~Qα¬*J→PHIf^&ph(&&}∩5α→bB∈IJ
H$%ndzN∃↓jα6∈.*α&Aα
α∈∈2d1>*∞ b2_4T2BVJ3!h&∃∩aαQd↓"A$HIn^&paαN=⋀~VQαM!α> α>→α¬*J∞∩|∩J04PJ"JRαQ1 H4(∈E∩J5 b↓"AHh(&∃~Qα¬*IFDhP4*&4qαVN,b⊗NMeX4(4TJAAhHH$%nα
U∀Li∃t$
Z$L¹5∀
4|LT
⋀ <X1PTLid⋀# ¬D⋀U∃:@αE⊃⊃∪@8h∩⊂*4⊃S⊂(uλ∪Si3U3 D∪10)jh∀∃*)1P F$c'⊂⊃→_∃dU)V-F⋀f)dλ"∩⊗h⊂cb'cBDYa`S&"b⊂αY JSP R,IP0
LS@⊂AQ(XK!¬∂→∨∞$∩w+≤*Mα d→2Q¹2%!2⊃∩0h &∞ J≡∃α%!1D∀PIα2⊗∃⊃αnNMBα&Q¬aFNQ¬α∈≡∃⋀r>Q¬*J¬eh4(∈lzP∀∀λ"bEJ@
!⊃,qR(4Q( z5λ∀
ZU⊂S⋀λV5⊃$
⊃r3J4C"ISH∩*Ji⊗c!!4Su⋀λK %↓Q@⋀`b⊃$P!⊗
!∀FEαi'j⊂⊂α,-1
TLC B,77000
ADD B,[450200,,PERTBL]
SUBI D,-1(TT 3CALCULATE NUMBEB↓_∞→ααλ∀<-1Q LZYDJ¬JAC β⋀⊃PPMJ)r¬%EFCββ⋀⋀ ↓⊃.p bU⊂*h⊂⊂i#P#∪i⊂↔!P&%Qλ ⋀fgkdP_@,,¬¬⊃'1 ∩∀∪M↔∪!≤↓ 4(JαR2x⊂λ
⋀∈↓ ¬⋀Pλ)` IPA C,R50#" ;@∪≤ααBV$∩11 j& -λZ$*λλG*4Q#!↓(λλ YuQ2$λk #! 4 `≥αT∈CBLK TT0∩∩`.D
∈-α⋀
≡∀4PIα*αα→2βλ$%9~β
⋀α⊂3H⊃0h tp bFE⋀`Q TT,1001
] ;END OF IFN ITS
IFL D2@Y6~∀%%∨(AQ(X@5 h &∈$"%α ¬BE%E⊃P@M)zB¬%EESλh!~Dd~λ¬∃¬ml ∈∈β"B(⊃λ∃
⊗m~L→__⊗ (*`∩T@¬→:~(∪'+¬$A@1h∈∩D⊃⊃∪@8p3⊂jY⊂5⊃$U30HZH∪qD
⊂1q*¹1"B2
*R( %E∃∃∀CE HRLI "αa0∀R⊂sλa ¬⋀fSh∈SI 2, @!⋀K%λWAαK ⊂αH4(~94M⋀dλ0hPα(∃ p( eE∀⊂ ∩PβPY)
λ⋀∩@AM↔∪!ααα→28∈α[⊂β"B$⋀λ∪3j ¬I F,1~∃% nt∪M!βπ_h ⊂L_HDJβ∃F⊂hPα01λI(λ ,1
∃:$∩w ≥⊂A∨ A%
≤Aλβ⊃@ (αB5 SH⊂Elhλ_ _⋀D]'i⊂!∩a'h⊗λ ⋀E@!='∪(A 3 ∩∃⋀J0∩¬λ¬4JHSβ"A∀∃∪⊗DλK
ef∈ λλ∈BαIT$ IDPB↓
$!Q#∪αA→∀%⋀$λbe%AQ M≤βrSDλα⊂ IP5
α JRST (R)~∀4⊂
&~p⋀⋀M∀k⊗aQR4 '⋀fgk⊃P*⊗-M~_⊂⊂,,8λnnX```VβbN~¬S AAAβ`∂KWp4tjYαbP#⊂df*i⊃P+`iH ⋀UE TO CHARING
∩]
2-¬!0$]*N⊗M⋀z22e¬!2RPhP%↓iIu≤*⋀⊂ ∈∈λ¬RbSαAC@$$s⊂~=⋀~0≥∀Tλ∃$→H∀∀dQQ LDH λ
⊗l$&⊗ ¬∃↔#!↓3∀r⋀ ∀⊂(y⊃q`∃→
HRRI T,<374⋀W'
⋀|U!β≥'∪ )βZN=α≤zBeααλ∀<* →e$zλ9tl*λh∀\*λ⋀⊂(!"B(&*⊂* ≤→P↔XW'
αxU!β∂M∪4V 9P≠hλ
f∩ebP(⊂cbP'∃d¬BER 376
λ MOVE T,TT ∀∪¬_
$9Y∩¬"β mfFA⋀dSβRI T,376+SFA
(
π¬1⊗A(X$∩w6}2∃αB :∃αX~α⋀z λ∈6β[⊂$SαTG LLπ'&t9αB∈<)αBz9∃$yaP@!( S ibFEαdgk"RP*⊗→MX∈0 0+<SFA*10 @|⊂∀!∃d8S∩`⊂∃⊗⋀D]&*`∪H ANTRY FOR PAGE 376
λ .LLπ'
~(∪∃%'P@Q R4⊃0∀⊃↔4,Qλ∪hd⊂⋀c'λ$j)FBαX
$KZ⊗ 4D t2⋀α1SD 5∀jhFLβ"KQ .q) ⋀ OF IFN↓+' →∃'&~∀4⊂λ1n~4bNMα4bN@$)D¬@+Tλ⊗K λ⊃3JQ0hλ∀pλ LP#&)T YP#∪)b$bH!&)iU i**T⊂ ∞OSHARE SHAREP SHARP1 SHRLOD BLSLSP FLSPA4↓
→'⋀ Uα~e~R∈1⋀22NZλ∈∩⋀J8∀$RλiE≤4r`⊂&)` M⊂( ∃R@π⊃∈AM3'
∪0A'3'
⊃≤A↓⊃+∪!↓!+%π-&A!-∩6B→¬αVJβ αBVα)uβ∩λ⋀∃**Ush
λα*fhλ(*`∩CHN @!U%')↓!+%∪M A! I!)$~(~∀4U~V
$`&NR
∩Q6Vαα∈ <HUB⋀ hHU∩⋀∀λde-9 ∀`(h∀u*:⊃3Q↓QA"Niu∩∩) π ON T@IS PAGE IS FLUSHED WHEL/IF LISP'S P@+I
A!β≥ &AβI
Aπ→∃β% λ↓
%∨~4⊂vAπ=%αA U%∪≥∞αα¬αNαZ5⋀hAP@HαR1ID∀⊂1i→β#V-CE
NFLSC:8 ∀~)
→'$∩1hQ)∀3Dλ$d|90λπGα≠[@74∈`≥zjN⊗≡dz≥y- q0≠≠eaPDLd⋀@⊗⊗β
α.BYPE 1
IRP SPCS,,[ZER+@→¬PY'(YM3&Y'¬$W-11-∈Y%&dWπe~W1D 2bbRbNeI]α~a∞αλe~]λiB]λ⋀β!$c ∪+IFP+IFL+BN+XXB HBT,BPS →≥a~Q
E↓2b~β
αdJ¬EDJ¬Eαλ↓PE≥¬K¬≥αJ85∃0R5
5α∩-HK_V→∈ T⋀0,1,0 _d0bP⊃Eb!1AD@ ∈¬ ¬D ⋀ VVKπ-(λ∈BαIRPS SPC,,[S@!
':~∃i10z[i10G≤¬'!∈CM∞~∃)∃%≠∪≤4⊃% ⋀*∈AαURa>N=→⊗B≥eX4*&4)α
%→5I1βλ$$\:⊗ 4X⋀P*HαP @ FLU@' Aβ≥)I2A&2αBVJ(h!:⊗e~∃ ⊗↓⊂HKαh⊃)Jq(∀λq(∀iu3⊃⋀Su⊂⊂α@
A
1+'", 4*QQ%$4S2)⋀¬∀] 3!
~)
2≡≤Y↓a8∈s 6β[[oKibcf∪βG>+D|^f2q5qeXde≥H)Cp W"!↔q3Q⋀qH∩(f@∈E.BDX END @∨↓∪
≤AAβ∂&t84(Q!P@)1S@⊂⊃→_⊗-CE"g*∃α@ ∈Rα*JN ⋀⋀dM8λt`1 ⋀]j∪βPS-H`A ≥Q%2A4*≥⊂πi∈Bα JRST C@)I→∞~∀$`@∩∩$p∞@$βh⊂HT⊃R3 Hαb⊂$Sα WITH VERSION↓_
V6∀*Iα→`λ↓Q@⋀DDB]P⊂⊂⊂αITS 4.6 - 3& .4⊃0∀↔8T`(α⊂'cλ$c' D20
~∃%
≤A∪Q&Wλdβ↓2l4Ph"¹4J:⋀ !_∃≤≤α6H GFrP↔⊂)z`3pe`≥∃H6~∃p~∃
→M!αfPJ∈N∞MQα`!9DM≥⋀λ ∞^Y(⊂__pπes d¬P∪≤¬∈.λ∈⊂ !nd j=DA'kMaK@;&+⊂l4U`4*~e~∩&∃β!∀
≤9≠"¬∞Fs ibP@! Cannh∂hAα3';⊃⋀⋀fNfTλ
m~λ⊂_≥y2P 0a`∂K↓H ?$λ
(∪∩*:β"P≠Z4qt thi`↓P >$λ
l≡h→≥-^→9⊂→αr`∨Zαλl4`h ⊂ ¬#&ij i∃*h⊂~
λ JSP TT,SHARP1 0↔¬∃
∨%↓')β%Q∪⊂~≥⋀jVNQ⋀B∈@4Tλ∩¬∀X→B⋀≤z(R⋀X_t(h!∀α`P3∃(T⊃S∀hI1""'P"$bK⊂"$bK⊂"$bCE SETZM SAP∂'H%n^*α"∈Z*α∈ %(X∀%J X∃¬⋀X@⋀`:αi)bS+"`∪ IH 4PJ*JN ⋀¬≥
:∈0hPβ"C!Strλ~Q/ ≡))b (T! 8π ↓='∪(A%_
R=¬~"∈J-↓αRt ∀dDα0R*D∀r⊂*(23QaQTr⊂*(4
B*9p4∪D
p5tj↓ ¬⋀P))b (T ∩~(∪' %R5αN
:N@4TJ~9αM"M"lhP% 48→Db¬λ¬4Hd
≥4
2V∀hP&*Vmα1α ¬BE"α""'d∈EGATIVE IF FIRST SYSTEM PAGE IS WRITEA@LE
] ∩w∃_
" xb⋀Li`λ ~TZI 0 ;LLπβλA=→→2AA+%
AAβ∂ _h"d⊃↔4,Qλ∪hd⊂⋀c'λ$j)FB⋀A#&d)`⊂: α2⊂$ JRSP FLSNOT
λIFNIP &Yl~∀%t~∈2D
5M≤i→@HKαr3DtQ⊃*$∃∪hλ∃0 dλ( cbT⊂#bH&jajλ!"P!Qi* dSαλ
∀↓∃%'(↓
→'≥=(∩∩↓)⊃β(↓+
Aπ¬≤A∂ PA∨+¬M ⊂∩Z-→α
∈≤Y⋀4λJr∞2≤)αR¹6⋀→04λJr∈∈2bαBVJ≤B,$\z0∀∀λde-9⋀⋀L2 I∃≥α ~2¬¬X⋀Q!Q@( Jh3∃1!QB2U)Z∪⊃(
⊃S
¹9Suβ!!4q5 yαP!`ih⋀DNc& cH*$ jλ+bP&Uij⊂)⊃`b⊂'Ui)bf ¬S FROM TH@
A
%→
∀%≠∨-↓(Y6P`b`0Y
→'Q¬→:m!∨∪≥Q $A∪9)≡A ¬¬→
A= A/⊃%∞!⋀
≡⊗M¬"5α~e*N 4PJN⊗TIαRQ`H%n8XUα¬λ_t*⋀h¬3((4H∩)D∃∃β!(S∀tλ∞B2)⊂H∀Eα".h5λ∩)hβ'P'Sα THIS PAGE
α JUIPE R,FLSPA5 8π'.M↓α&→⋀r>@"λiE-≤λ_$d(β"B(`dbP∃*∩'#∪)iWh⊂cidmα]c"k⊃i⊂#&∃i`⊂*∩ ¬ @!¬∂ &A]
Aβ%∀A∨8hP%α∞ J0∩¬J@ ∈LSE,π!β∂M∪44PI↓α∃~Qα~e~B¬ThP%*∞ b1α~e~B¬XHI`≤J8R⋀JZ4B¬IλR¬⋀_xR⋀TSs$u0@⊂∀ cbP∪`h∈EαP⊂∞LOSE !P``~∃→→'!αβ)`⊂L8→∀<*λJBc;vrs 6βP∂PAGSIZ 8π⊂∩≡}↓αV$J1ααL:"∈"αB∈≡*α0∃X(U⊂!∀⋀ |αP ⊂∃*∩#&h Z∈B⋀W)jbj⊂#∪)b`∪K 3MAKE @'U%∃αtyα&:$*JJV¬"Mα∃IαR≥⋀B∈BB,p4(~
U≤DαH∀¬J⊃∃3*α".j4Q(λ34λ I4tλ H⊂ gH""ad ¬D
SCIPE ⊃
1 R$KZ0∀D $9α∨FEαP
RST SES@π↔8HI`≤St⊃%D∀Q5
ZSH∃⋀λ3Q⊂∀)'abQb∈E⋀e`h"H**⊗∀,(∀DB]ad"PβK IF VALREPλA≥"J&:8h ⊂J *%≥λ⊃S
:β f⋀B]lbiK⊂
@+M(A-β1%⊗Q⋀JQαRD*0⊂ B3)Zβ"P* !(λ@ 4⊂∪' λA(@24bN∈∩Ph &6}2⊗ *λ¬⊗
∈P⊃$~∀%u2∈ %XT⋀4e8⋀⊂&1 .t
)3U⊂h¬S@EL¬'&|qα6⊗α:4 <QQ LU*:B¬≥X⋀pid∈↓ ;AH∂
$J0∃→hr⋀ hHU∩⋀∀
5-≥λYd HαC"H∀p S≥⋀ieRh#⊂+⊂d⋀FIX 0↔∪LA-β→I ⊃αα:E∀hpλ
(03∪ ∀⊂(⊃I≠⊂π ∃M?
α JRSD↓
→'4 D$↔9d`5α⊂ ∃SE @≥∨I≠β_AYβ⊂∩J- 4(→
%∃Rλ@ ∈∃∃∃∀BDX @!%∞.Vα⋀¬$DT
d ∃1#!↓+PTHX2h &λ⊃∀BDX DO T@⊃X
J,
,4(LRJNQ¬~VN∞|p$%N≤z2R∈u*∃α^D*0∩⋀α5⊂ ¬TURL¬&@1⋀∩V@"λ⋀Q*4S@⊂∃⋀@
FLS@-⋀bt%u2∈ %XTβ
EJ@
!Q@⋀e)h⋀ @'U'π>pH%ny`λ
Spq(λ∈⊂)⊃h⋀U@%8A(~∀4⊂
¹4J8∀$SαB,% #"H∀s4i7@⋀W)S`ie@,,.+1
λ⋀∩`0`⊂∀!Q$4e8⋀⊂&≥ibU-
SIP⊃¬%(A9π=%¬→↔p~∀&lzP∀2( ↓⊃ ⋀]c∪*id THE PAGE
IOVEI %JSEHF 9FROM OU@%M ⊂∩Z-_4(~8U%Rλ¬∃↓⊃ .tλq(∪JYαa"iλ$g⊂*∃⋀@
PURCHK:↓SETZ¬
SIP⊃¬%(A9π=%)3!p∩∩g∂∃(A)3A
A
∨HAπ∨%∀A¬→∨
⊗~∀@b`@XY¬'e''∞←Aβ∂'∪h∩w)⊃¬(A
∪I' A'e'! ~↓!β∂↓∪&A∨8~∀#↓IAAα¬Be%A⊃∪@¹7Lλ∀HX1 3i⊗+λπD λ∃j)5⊂0I+λ∂$∈λ∪Si⊗bd$h"g*βE
SYSFIL8 SETZ ↓ ;FOR OP@ ≥∪9∞A+αα~&2*αR=α≤B∈J∀hP&ND∩&AαdzBkAP@J⋀⋀αα¬8∈4h→⊂π∈EαP⊂⊂⊂λ)lib⊃k
SYSFN1
α SYSFNH~∀≤*Riαα;∃≥≤iQP@ ¬)la`λNh∩U+∪$XY)≠A 4(hRt%8Yd"⋀βqH SH∩*Jc"C!↓α@
;RLπ ⊗RLr∃αRzαB%YZα⋀
λi∀d
λ¬r*Iλ∩3HI4Q0jD∀p fPαOD TABLE PO@∪≥Q $A∪9β⊂∩V$*⊂ (αC"I~α∩P(⊃*f`&∞α POPJ P,
λ¬∪
≤αα&@%5K0hUλJTmG!∃≤\~ b¬¬X⋀QλZβ ;DID TH@
A∂U2A/β9(A!-∩∃α,jB&:9x4(∀
⋀m⋀αH∀¬A".sIZ⊃+λ
(5∃4I⊂)$cR*⊂ kPl@
,¬πβ→0A!+∀zB8⋀KZ0≥⋀Y`λ
I⊃(⊃I→α"P#∪i⊂ ⊂DUIP'IL¬∈~∀$@]→∨M
@bhβ↓@$]""*λzUJ⋀β∪tjλ∪r⋀q3∪¬D∃q(λ~Q(∀
pP0IK(∩3AQ@⋀DDB]P @hi`"S ⋀ ANYSAY
λ SETX T, 3@!⊃+∪ AI #+∪I &Aβ8A∪≥∪Qβ⊃¹2Jαb-)t¬≥⋀~HR¬<z(@hPα+Ph→⊂∈⊂(⊃*fh⋀B]b'P∃$"P h⋀UAL PDUMP ∀]→∨'∀@bh@~∀%tJ0≥λ⊃∪*λk∀∃**u∩"'→βj`∀PUP CTART IL¬')%Uβ ∩∈|p4(∃i∀`:α⊂ ∀MPC$PURIS@ $p∞&:$JJ,8¬⊂lfa'S⊂* a∪ ¬ @!=∪⊂~R-⊃α&:$J≤
Iz hPα33j ¬ @)PY!+∃αRH⊃↔5⋀|α3UλZH⊂
'H#$f"SαAMES
∪≠=(
*λ¬⊗∀*i(*⋀@]iU i* @π⊃ π-'#~~)!+%π-&tβ%=(A(D~∀& "⊃αQbBRQ⋀HI`≤h@λλd"aehfP#∪βR DDT ∀9∪↔(AQ≠!∈!)(R∩$p∞∈¹2≤yα>VαJ¬-αλ¬∩λT∃stHD∃∪h
I⊃(⊃I→α"FEα`ga%∪α TT PURCKS
.IH∂(AQ≠!∈YP∩∩`.}*RBVα@λ
I⊃(⊂iλαaeiUd@
,¬∪∨(↓)≠!1!+%'Q∩∩`.αI⋀,H⊂1h→3H∃ λαP ∪TART ADR~∀$X
∞∈daαBVα*% 9βDD]"g fQP*'P⊂βH∂%%∃∞@"λi∀dh→T(hαB(¬⊃tq$∈- ↓Q@⋀W!S'ibP∃&h!VαDX FIL¬∪'⊂ααVAααy∃$Bλ¬∩λT⊃R3λ ¬⋀h∪βP@∀A@X∩(hRBVJ}α0∪P~8U%Pβ"B*94⋀!$U⊂.'h⊃d∈P_~(∩@@A!+∀~"8Q!∩αα⋀⋀¬¬-(HU !αA⋀Pλ⊂⊂⊂(∃i'h_CE @!U%∨ ⊂h ⊂M8ZE@$∀⊂
ie&FEαFA(*'h⊂@: SAXBIPλAbr2&Nαrp (αT∃*tλ@≥αi`l!∩h⋀ @9=+!!-"p (αC"J4TUi] SETZ~∀%'∪ "∀JQα∀*0∀my{@hPα33j ¬I TMPC
PU@%→_ DQ!∃≤-K$¬¬-(ic⊂ C"Jλα*fh∞α SETXλ
⋀∪M∪1¬∪PA0∩B%*6BphP&&4*%↓⊗U~⊗"_hP&&4*%αRmα⋀4(M~⊗Ri¬ 4(Q*¬-∀9 c@!+Q2)T⋀$TMPC
PURS@)$pλ&∃~QαI~5⋀pπFE∀*i$iT≥ -PXXd~)!+%!Q$t%h∈Bbe8∈4hHαk∈EβE(
8π ≥λαα0≤2 _d`$⊂⋀j)CE(
;EH
λA= A&4qα&~Z⊃I@hP4*B8!α:~e~∃hQ!P@ ↓Gpr3 λβZ⊂%Rd λGHA↔&dB≥Mα\J2"≡@⋀⋀\Iλs
⋀αr3 λβXP%Rd⋀@⊃∞β⊃αj:D
∃Dλt-⊂⋀#dλ πE@)!∞bA∂∃)⊃∞dαα≡⊗RD9EαJ-""<αλ⊃iJq∃6$λβb)f∃`P!dd#d GH '→hhA∂→M→4`A≥→' 5⋀A≡J9E@&(⊃s
9α"P⊃↓∂⊂∩NeQIα≡e~25I⋀:2NK&2⋀p∈)f∪YP ∪GAH
β~ααN≡∈$*P∩¬8x∃¬⋀βH∀hx10 *λ&")$R)P&"$)P⊃↓→∩N≥∩T4!Q hU8¬0J⊂∈⊂%Rd λGH AND↓∂ )⊃≥⊂∩(hR&~9⋀!EA) ∃≤,yXT` ⊗c!$c"P`df⊗⊗β
αKILHG4h∪⊂≡VαJ5%∩λ∈p*8p6H Aα@
;Not fLushi9H
β#L⋀vBπ<Xvn∞β]¬T_x;Dλ→P∀2⊂↔)R)⊂3 )le~∃q:~¬↔%→⊃∞dβP&64*%α¬dZ&2λv0H8¬∩ ~h∀r Z3⊃λ ¬ @'Qβ%(A¬ $A∪_A≥∨(↓↔∪→→%→≥αE_4(→
%∀jλ∃B`)PTp!Q@⋀fgUα@
@1'∂β≥¬~∩∩w%≠!∨%Qβ∃(A%→~=⋀J2R=⋀
∈MαLqα∞≤)α>→⋀~> 5I→e,(Q!∀l]hTβ J8t $XaP@Yzd*βuJ4<
λ `hPα16 ~α⊂_FαDD]iUih"g⊃⊂#'iλ P ↔HIH
~)↔∪→⊃≤ftβ≠=(
T∈αe≤x→d hβ"B)YuQ3$∈,+∀hx1⊃5AQ@⋀fgUα@ ~\Y'∂βA!≤4PJ*J ⋀¬∀
Iλt@ ¬.DB]bg"λ$c"P`df∈B⋀@
KILHGHh∪≠∨-∃∩AαY≥ )"<@$%N\J21αDJ≡!α≤*≡&⊗u 4(→
%∀jλ⊃B`)PTp$↓".thZα⊂!j⊂i*⊂ Q ⋀RESS
IFE SAIL,[
SCIPN S@+M
→&~(∩A¬%M(Aπ∪1⊃≥HhP&N.Mα∃αN<
:∈4HI`≤≤→` jD⊃S∃*9λ∩∩(yλ⊂q(y13U⋀ 1H∃h ¬⋀Pedh'λ)c`b⊃i ; @@∨≤α:Qα.tzP~¬yλU∀1P 'SP*'P j)$Qh∈E IT ∀A∃%'PA↔&dB≥@4PJ6.Zα9∩⋀F⊃P@L9z$*⋀∃A⊂HKαqS
Zpλ∩ p⋀⊂)Qc`
ENT ∀↓∃¬π_4⊃↔&dB≥EHhRt$¬\*0∀λ∪qD 1Q(
823β!$c' SAIL,X∈~∀∪M↔∪!↓'#'
1&~∀∪M↔∪!≤ααN≡∈t
44!∀⋀U∃8@λ 93∩⊃f B3)Zβ"dP⊂T⋀FAKD@ (∩$p∞~>zaα"zp⋀li∀¬ 84⋀iP⊂βAN SAIL LLπ'
xh ⊂M99∃⋀r¬i$(α"*⋀B]P%'P ⋀DT↓≠ ⊗N ⋀⋀(αP''Sα-ZERL∈A)↓'β-⋀~∀%¬~⊗@$HJB⋀A⊃∪@4⊂πj$⊃i+diQP
AY @
β∪0A)=¬~∈@4TλTe~(R⋀dz8T8h!~4-¬$λ∩`HαB0iZQ(@⊂⊂T⋀D]&*`∪H H@∪∂ A' ∂5 ⊂~PhP%αλ→E Hα".iuh⊂h→β⊂ ↔E P@∨'M∪¬→¹2↓→∨'|@Q"λ⋀⋀D⊃Q LU*:B⋀\α3∩λv@∈E∈BαK@∪→!∞bd∪M↔∪!X
*
E∩0$!∀⋀U∃8@λ 93∩⊃f!αE⋀fSh∈EI A(1
SE@)U(∞Aαλ¬@hPα(∩λ→α*∈Edf$#≥
] 0↔ 9λA>2α&~9¬~∈&0hP&⊗BM!↓E0HH%m
≤z2R&u*∃ ααy∀dbλh∀db →e$zλxU$Dy↓P@**5"⋀xZDDp⋀∈E∩c'⊂)Pdf⊗-BD@]bH)j i∃*h∈E⊃T∈S@)¬%(t~(∪' $z5α∃uα"∈:αIthhαB3)h∈EMh 2Ytj∈&2LrP%Nα8∃ (αP%'PαNUMBER~∀%∃%'λαα≡⊗RD: $¬\RV -⋀λ∃∀}YhB¬≥H~% ¬⋀e)j⊂"KαSTART ↓;PHAN@)=~A'$
JQα "∩J⊗α:0hUβ""'bg" Lπ A∪→_ αN J0$(xU$Dy∞AQR1Q$
p23¬Kc"B)Yβk"dH V @+1 ∩wM ⊃ααZα¬$βh⊃hZα⊂$$d⊂ ∪EG BACK
α MLπ ~∃⋀ -E¹2≤:∈∩⊗αaP@!33uHT⊂*`→ )c`g⊂d¬~∀%≠⊂≡Z*α¬-Me~≡∈⊗β
@hPα33j ¬I A+0λH`4⊂λ&6}2∃α¬X∈Re≤x~¬⋀pβ"B*9p⋀h"H)c`g⊂d¬~∀$A'.Mα0∩¬8x∀$5C"A∀λ∩TJ:α⊂#bU$#XFBα GETSEG A, ∩w≥ ⊃αDJ≡!αα8T<13U↓Q@⋀P%)j⊂#S)` UA
GETH@∞bt4⊂
`(α".hYβ"⊂'⊂ FE SAIL
IFN SAIL,[
R@ ' P~∀≤Z&B∃αr*
"α)@hPα(∩J*uλ⊃hZα λGD~∀&lzP∀(⊂
,SGANAM
∀∪¬))' ≤A(@0hP%αN\JB¬ααJBe≤x_D-@∈E⋀H⊂
SP @
% ∃β∈@2≤B."≡@h ⊂Yzd,Jλ¬⊗ αIODMP ∩w=_ α~ J2VJ*aα2x92¬$α⊃(
9∀H⊃I→α"V⊂∃$"g TRP∩A¬∂β∪≤α`4(~8U%Rλ@ ↓⊃ ⋀]@ AH
λA=_ α~ J2&:8⋀⋀l8T¬$DT ⋀M≤Xpλ h¬RSELVE@&4⊂λ&⋀*0∩¬IZ⋀5α*⋀DNβH∂! 8A+ 9'⊃$A→∪⊂∩∃⋀"⊗@¹4_8R⋀dλE,4λ∪)9 @⊃βA! ≤A% A'∨5
A∨)! $A∃=⋀A∂ Q&A)⊃I∨ ⊗≡@⋀¬$D~1PPJ⋀ %≥αλj$,,_5D D9λt@4λ4l$Tλ$-%xXTbzZ"⋀¹4~*5"⋀~JE≤,tλ∀tαλ¬∩λT⊃3UλZC"B)YuSTdα""'h⋀ GETS LEN@∂)⊂αα>→↓u~"Iα4J2∀Q!∀ $D
Bb(*$,β"B)
TH∀ERPTHYα⋀D]Shijea!&⊃P)gfQP!gh∩biP'⊂∪%! f∈Eαd))-λ**⊗↔!)"fαDX BEFORE T@E AH∂%↓+#≡A
⊃β≥∂∃&Aβ(4⊂λ&∞}∩∃αQ`H$%N-BR⊗: α2>N,9α
∀
DDM4λ∀lu3U↓Q@⋀P%)j⊂#S)b-_CEibU-⊂#⊗βE IN TEPC,R∩m%ββλαα& 2 ∃≤,qQ J¬99∃⋀
@
¹8p3P) B(⋀ TTu⋀⊃∀pj#"B*⊃h∃
⊂∀qizQb"'~tR5λT∀⊂ 'U ab∩$ibcCE#bj∩ π2: REMAP TT, ;LET'S SPLIT
JRST GLSLZ3
GETHG1:~∀%≠↔-↓(Y'∂¬≥β~~(@@@@@∪'∃)≥~d↓(X~∀$A⊃β→P~∀∪%∃→ β'∀A)≠! X∩∩w→→+'↓) ≠↓β⊃β≥9 ⊂@U¬
) (Aπ% ¬)∪≥∞↓)⊃
A!∪' ∞4∃:αm ⊂~⊃⋀z→α∈4qαN∈L`4)↓α↓↓↓↓J*NA⋀12*∞e~⊗P$KZ≡>
∀b∃α∩}:1α∈uIα*∞`h*J⊗αI⋀<!→%∃≥D¬`H↔:$-∃0 'λ b")λ!b'a⊂ i"bλ$g⊂$⊃i"FEβE#f)S*h]⋀dh!$U⊂.!`S''jbj⊂$∩c`λ SEGEENT!P_~)∂⊂∩Ne*¬h∈lzP∀2(⊂eHp∈)f∃l@
IFN @'¬∪⊂@¹2Xh(&J,b⊗∈N*αR6B~`4($b`∩¬J@ ¬V!"B(`dbP∃*∩"i!&RDB]agf∪$idgS⊂"*bH*#P&∪a` OUT?
JRST CDSLX0 ;LO, GENUGIN@
A→=''β∂∀~∀β!)≠⋀A%!0$]""&M⋀JMα∈daαBJ-"Reα∀
:α≡h⋀αj¬xTu∀Q!∀L$~i∩¬%EFpHKαh∃
+23Qd U4u⋀λ(∪∩*⊃⊃(λ$j⊂*∪β SOLT@
~∀%'⊃ @A@0HI`~¬IλR⋀D→~%J¬(_4*⋀9yd$MI→t`*h
⊂)p⊂ % B2J*uλ⊃hZ⊂⋀#dβE
CHK@⊃∂ p∪≠∨Y
AλYM∂β!⋀p4)↓α&∞∈l)α"β∀∀hz∀∪C!↓(∩TJ:λ⊃s
9⊗Mβ!⋀λλα)Yβk"P⊃⊗)c`Q ¬V
CAME @ →!M∂ 0h ⊂J *%≥αλyE≤⊗Mβ!⋀fgk⊃P"⊗)`b`_T
∪π¬≠
AλαbBN≡-BP$!∀⋀U∃8@λλyα)f-
⋀@
MMP
A⊂Y'∂β9β∩$KZ≤DX92⋀D~8T:¬h→DL$~I∀`9β⊂ ↔OR@ &~(∪πβ≠∀A⊃J
4<P3#!⋀α(∩J*uλ⊃iJp∈-~βE JRSPλA∂∃)⊃∞b4⊂λ$Q(te≤K&C@!4q5 ⊂*⊗⋀BDY`↔RLπ⊂~≥⋀B&N⊗8¬B¬≤βh⊗HZSh∩*D∪u5⋀λ3Q⊂h i*λ c`dSαλ
⋀∪
_∞J∃⊂⋀¬"Q!∩⋀U*:B⋀≤β∀s ∈ ∈E⋀Sek"P∃*⊗)cPb"c∈B⋀fgk⊃P*⊗#βE JRST (FRAEAC)
α
GH '→h`t
∃t∩∩`.,r⊃α≡2α&~9¬~∈&0hP&"JdIα
#!AYAα↓⊂K]y→Db¬(X∀"⋀∀
4MD)~B¬≥J)∀`c"QiJs⊗P'↓23⊃λ⋀∃ ⊂a⊃,p "Pb⊂!j$g#@⊂e"⊂*⊗h"P$U∈@
ADD@∩APXD@D$∩wπ∨9)⊗ ⋀¬$zλ~4≤⊃Q L]X¬⊂i
H⊂
∈B⋀a`dQP*⊗⊃λQD]h#h⊂⊂c*"iλ"hλCLAMATILπ∀[!=∪⊂~PhP%α∃~Qα≡e~2j⋀hP&⊗BM $$¬\20≤c"C! 1S@
823 "C"Hy∀s⊗F↔@⋀gjU)j)d)f&LFA⋀bV$j∈Ed⋀SLM1:∪βMβ∪ )¬a~∞∀)αVVzα2>NαAPEQ!PT≤J9EC∪αB3jZ∀p
)λ!b)f∪Y∈E⋀Ql j∈!b)f∪Y≥⋀`adm⊂↔≥`g∃jgP&∪ij∈E↔⋀A∈Ed)f-]gjU)j)d)f&FE⋀e)j⊂#Qj λG2
GLSLM3* ASCIZ \?REMAP lost -- no jkb MYWi↓CmCS1CEY0AeKIsSMN4⊃0~∃t∩∩`.,r⊃α≡2α&~9¬~∈&0hP4(Q*4<h→SP Tp$Q,α"!↔u∩⊃*¹8(⊂4HT∃∩⊃$
p5Q(D⊂π fQiP#'⊂#bj∃$g#FB)`R⋀dhλBIT \MAAH '¬`4*N<
∩-e!PE≤∀Q∪⊃↔2¬$λT⋀DLyλ
¹81s1)λ⊂P(9h⊂1JH4H∀jZt⊃3J93sC!*p)α*94⊂R*D↔∀v*β"Thx4⊂∪G!,α"!Tq1$
u0 h⊃e"∈Ec`bl∃≥⋀idV!$j⊂↔)`λB\ ;@'=≠
A→=' $A5∪∂↓(ααV∈ αR=α≤B∈:≡*αR"_h( !Q#K4λ4|$Tλd}∩λh∃≤x_B¬$t
$, D ∀b⋀∀ d-h∩∩(yλ⊂q(yαbg* ⋀A≥]Nβ THIS CODE @≠-~Qα
*α&)α$B∃αIzr¬≤XyT,UD⊃PS74¬"λ~2⋀dYhu$B xb¬$λTαe≤λ$⋀4HW2⋀¬
"J⋀λ~2⋀tXx∃$MhT⋀|2λI⋀MaQ hHJ$LE7!PTLhT¬≤→EEX!→T}∃9∀¬%F⊃P@L9z$*¬JA@H8iE-⋀ td" ∀<B
8T<LYj@hP∀ %∃≥D D%≤8*PhPα2∀J+H⊃∃¬RPTHYα".h:αi)"SαT HIGHEST ADDRESS IL DOSEG
HRRZ D,.JBREL
HRRR,.JBREL
ADDTT,T
CORE TT0∩∩`.-BB∈: α2>N,9αN≥⋀~∈9αDz2↓α≤zBeα|1α"≤*≤4(Jα*J α2αN≥∩T$¬Z↓"J⊗l*6
⊗⊂¬B⋀≤→`u"⋀It⋀J\βh∩)∪h∩ ~q1h%"B4h⊗H⊃E ¬⋀dSα TMPC( $∩$p∞J⊗ !α&9αrN"I⋀2& $QQ J⋀8→∀λh!∀α⋀U*:B⋀dJ85∃Q!∃∀X~α⋀"βα"'d∈OW MAKE A @⊃∪M ∞A
I∨⊂∃ααI⋀*¬(X∀"→`λλ→βb"FB⋀P%)h⊂&"ai*FB⋀ibj∃hπP F, ;TLπ!&ZD`A!∀zR∈∞αJ2¬-4λe∀T u-∃8YE$4kβ!↓(∩TJ:λ∪⊃
8tU"!↔h⊂ gH+bP&Uij⊂&PebP$∩ibc@ Tπ%∪)¬↓→
! A∪↓1⊗JzH4(~8U%T
4<h→PHK8¬q$Sh∪ d∈GER K@≥∨\A)"*α"&≡E~⊗≥αt
6∃⋀hP$$⊃↔4L2λ¬∩ ~h∩4dSs@⊗Vα@ %0A⊃&<A6N⊗8⋀⋀<-J4⋀4eX⋀rλβ"B!⊃ ⋀]@⊃*i$gP⊂λ@'U'! ≥⊂RAβ≥⊂Aβ→↓)⊃
AM)+
↓(∞∃4(4(⊃⊃⊂KZλIt`(αP ∀O IT GMES BYEBYE! ⊃βI∞BR~(∪!∂!(A @0hRt$↔8T`(α⊂'cλ$c"P`df∈B$c'`df⊗⊗β
SEPZ TT,
AH∂%HA)(X$∩w
→U'⊂A∨1λA↓∪≥⊂A' ≥≠ ≥(4⊂∩A∃I' A→⊃'π%*4∃→ %!&bd∪
≠%
DααQ0$KZ6∈.*α¬αhZrαEz)∃$ )HRJ⋀α∩4hh⊃∩λλ⊂R("B( *Tq⊂∪ )ai∃FA⋀fh∈E T,@10NAI↓ ;USE D10FAM AS HISEGL¬β≠↓)≡A≠¬↔
A⊃%' ∞AU≥∪#+∀~∀&e~!αQbiX$\
MαIyd:⋀~4¬,*z(R⋀∀Y→d:¬(→d$|UebpHαB4hZ⊂π&Iλ*∩⋀DNβP %¹2↓)≡Aπ∃(A≥β5
A
∨HA⊃&<AαN⊗<j⊗ 5AQ J⋀αQPi ¬⋀d∪)"P* ) ;GET WMRD CMP ≥(↓'∪≥∞↓ 1) 9 ⊗⊂hP&64jMαPHH%n∈t!α6V≥!α∞⊗ ⋀⋀
⋀α∩+*¹81h∃ λ5λ⊂Ic"B)
TR(
⊂⊂qizQk _CEibU-⊂#⊗βE IN TEPC,R∩m%ββλαα& 2 ∃≤,qQ J¬ z⋀R¬¬A⊂K](ZE-d
D`4⊂sqλT⊂⋀g HISEG
P~∩$p∞⊗: α0≤2 _d`$∀p2) ¬&"ai*]αej`∀STR @7¬'πβ¹4↓9∩⊗¬*J&~β→∀dh∩∩*¹81h∪ ij⊂⊗H,gjP⊂i"P)U) g"⊃b⊂FE↔,BE)PR@bl∩h∈E)PR⋀e)h⊂&"$)P⊃
λ
¬:$∩w ≥⊂A∨ A%
≤AλD`U⊃∪M ∂≠ 9(~⋀~(_w5¹4↓→∨¬∪Q'∞A = ]!∞↓
R
dZMα∩|∩&BN8h($*:T∃%IA∀d|)~E≤:λHU≥Q!PD≤yj5$h¬∀aQ@∈E≥Nβ; NO MORE CGNSTAN@)LA! ¬5∪ ∩R,!α∈~αHU∩¬I ∃~⋀α3@⊂∃$"P&∪βSEGQ/%∪Q β¬→∀A¬∪%M(A!β≥
R4Ph (αR1F∃α-FEλ⊂⊂⊂-⊗≤¬0~\4⊂@@↓→∨¬∪Q'∞zi$%9it`6Q4IP≡V@> BITSGS ARE @→∨\~∀@A!β∂∃+ ~@@A$zA:B8πSj@∈E⊂λ⊂⊂$cbP ∀OP.PG
XZ-CEGSAZ,X∈∩`.α8T*⋀α1H
I⊃0 "H$iP 'j$"⊂)bcSbg*∪ ¬F@(αα0≤H⊂
$∩iP bFE⋀bcjhλ-)∈Eαih!j∪βP JER,S@3LY6E5∃%≡D!→∨.A%≠!+∀)&t∀PJNB∞∀zQα
M 4(_*D∩pnA_S∪pi4⊂U∀htjThtr6EV!"B*¹81u4⋀¬A"B*:⊂q∪j⋀⊂R5¬Ju ⊗h$j⊂!∪'aenCE IFE TOP.PG-8XA ∨ ∪!'tzb
∀$Y⊗¹2≤)2l4PH&N∀qαn∩|∩&BN8⋀¬≥¬Xhb⋀$α1∪Dzλ∃sj)w#"A⊃10 (∃e#bP∪-"`∩SG @≥¬%)'∞A ↓∪)'≤~∀$L*bBVt:∃α$∩2.LhP$&2|∩&@%8sSkQ!∃hJ⋀⋀αβ\YhB⋀|d¬d,E8QPBα⋀⋀¬hKαq3HD⊃qB)Qq(
t Tλuαm-⊗bcidVαλ
¬:$s ≥λαα0≤2 _cλhαR1F⊗c"ISH∀λp⋀g#K⊂( cQhh∈E∩c"P(⊂c`g#K⊂)bcUh⊂↔∈B,¬∩w∃_
" xb⋀Ld⋀C!↓ ¬$c⊃P OBIP '∞α`&NB≥"0≥α (U∩e8∈4eKhVQ*hH
uh∩)Z∃0 "Jn@
PG% EXPUNGE BRERSG
EXP@+9∂
A$zA:B8h ( c]8@λ
:α"$iT⊂#aa∪i%P#Pa!b)λ!aa!Pi⊂#aPα ZZZ CCBFLπ⊂≥αURaα≡≥~Qα$⊃1α¹2EB∃≤t d`*∃0 dλ'_ *d⊂'λ α0P@+M⊂A¬!U%!∞⊂HA:Laα∈Bα)e#
λZ¬∀uF ⋀-¬)jC~⋀X⋀TIi_P"'i_mλ i'i `P&ic!e@ @π⊂⊗N<2≤Q!P@*u0U
λ⊂ bd¬ENT TABLES
λ⋀vvVαα~>Jl
Qαxd¬≤,yXT`λ⊂
&"P∀∂')bc←⊂ ↔OR@ &↓≠⊂~∃⋀20≥∩λX∀9λ⊂ bd¬ENT)
∀vβY`_KE`∞!→α)DXOd⋀@∪'PA')%U∞@%X⋀Q%D λ∞`U'bdaH⋀¬∀vβY`_KE`∞↓⊃P D)"bPh⋀GRAGE (BIPλ@ qeαNDzV"⊃⋀∩∃αy`λλ→α)gTCE_ 6βX%@"βH D,⋀c$V'*f@ SPORAGE¬
;8∈v∩h8h∪
_%
→∨≥U~A'$zJ∈≡(h!mmXIQ9TL∩0&
L:2V5⋀B⊗∈∩-⊃αNR}∩∈≡∀hQ`≠1⊗Bc~;⊂M→X$lB λT $X ¬≥$z(∀<Q'3@7b- F14p"*84H∀jtP1hTλ⋀!$U⊂→W λ)`λOUL@ BE OF ALSG)
;;; 4.2 VA VALUE CELL STMRAGEE @↔∪9λA∨↓β∃∨)! $@Q ∪ ⊃↓ ¬cJ⋀βs@⊂⊂d)gTCE_ 6l∩fL J∩λ_Iu,HUU¬∀X9∃≤y`λλ∪sU)Zb".jI⊃0q$λ4Q#!πnnb&5β→DaV⋀agfT&"l L¬+≠¬∃%&∩∩$∩vA≥=(A3 P~∀`-β0∞a⊗iHB(Kα1∪jXS⊃+*
Q0r*93s@⊂⊂βH∂ ⋀b⊗aαu*6
⊗α*0KZ →U⋀dYXT`⊃1β!≥]]DU_DDUe*abQ⋀¬∀vβY`_K%`∞%V+H"(⊃∀Q*:h∪qDλ(⊃⊂*H(⊂
,T V⊂ U'b]∈B≥]]DBP⊂⊂⊂∀d⋀AST, QFIXNUM0A#
→=→+~↓#¬∪∂9+∩X~(p
mlHH%α≥J6
>baαFJ r∩>UD¬
*(∃JBλ⋀2
YRk∪GaαE≥MNβ ∪≥=)αA$B∈AααI⋀-≤Tλ∃$|β4h aa`∃PY CONSECETIP
A5 ∪∨%d~∀`-β0∞a⊃3∪ph~⊂⋀ggP g"λ* λES NUMERICALLY ENAH∂ ↓)⊃
AAβ∂
AQ3!
\4⊂∩YY`~¬I ∃~⋀9yTlj@¬≤zYD"⋀(T⋀\-
@⋀ sP dh⋀ENT WATH T@E D@
∪9∪!&|rM↓ →b¬$λQPC50α⋀⋀Xie~⋀i→D*Jλiu∩¬IλR⋀ )zd*¬8∈3(s∀k⋀λ3Q⊂∃βITH↓→∨πβQ∪↔9¬αNf6%!0 (%j4,* J0hh8T*¬λ⋀v)Zα*∈EβE)h!P'j⊂)U⋀A∈Ej≥⋀DBDY`∪EGIENT TABLE
∀@Aβ
∀A!β∂%_
:βα0Ipr`⊂∪αSEGS ;FOR PAGIL¬≥α≥JNB⊗h¬B⋀≤βq⊃$ 3H∩)$j⊂)Qh⋀S UPλ
(HH$%4
DD4q(
H0S⊃*4⊂5⊂*g⊂*∩d¬E.
λ⋀@@↓∪
≤AAβ∂&t92l4PJ&→Eb&
2|~-αh⋀q(zc"B)LK⊗a ¬⋀iU ⋀@∪'@pλ&⊗β
¬,Qq(
:⊃∩4j↓ .qIi⊂↔)Qb@
$SD↓0
-%DEDhα".d-"`∩O ⋀@@"dzP~⋀α34
ZQ*(
¹81s1)*)FEαdc' LOBITSG$ $SPλA¬%(XI14∩w¬∪PA¬→∨
↔&~∀$∩I' ⋀¬≥λ∈∩,∪D@ ;SEG@≠ 9(A)β →⊗LhP$%≥!αN~a∩bU:¬-⊂α".j;4p
"SP!gb⊃F@
$ST SAR,SA 0↔≤
JM↓D
JJJαB>→jD-∃5⊃P@! ⋀R)U⊂+!V∪)P @- ∩∩`.αh∀e,Tλ4,⊂∈)FBα ∩IM(A14→1$βP &BDX @%∃' %-∃λA
∨HA⊗λ¬∀H∀∃P3
(⊂q)∀c"A⊃)∀u⋀ 4h ,$X@~∩$p∞&6α
U∀(⊂ lSa'f⊂⊂αL@∨π-&~⋀∩$I'(AM3⊂∃¹2≥H$%8⋀v)XSsλ λα`b")FE⋀BR)`∀↓11α⊃1~$KZN $_92¬≤XyT,U∀h¬ 30λ* ¬!)
λ⋀∩%%~Qαbβ "b⊂π _M 0↔≤b∈∞4
4,<β13JJh
∩)$j$`S&,P'⊗&TFEαDR)jλ)lY,$X@~WA+$$KZBVJ*αNf6∀z1α
dz≤]1Q HJJ:B¬⋀h∈⊗,⊂ @!U$∩αwA+%
A→∪1:αYU_h!⊃∩%≥D
⋀5~β∪∀e¹4⊃Pjj4B.j4Q(λjQ1(
:α ∂RAGE (LIST)
λ⋀∩%%~QαB4a2
1]αVH⊃↔5¬-(T⋀4dyjTmQ!⊂J%8¬⊂⊗,(⊗∩⊗&U`*⋀@]iS ae@ PURE SEGMEL¬(@Q→_∞ <Y∀∩HhαB"$Juλ∩(jh∈&)R# ∪ ;@∪≠A+%
A→%⊗∃¬~R>J :∃↓ I∃≥λ#"A⊃)∀u⋀ 1P ,FX ;IH ! I
A
∪a_
V6α1P@! ⋀R)U⊂ FL,FL 8π∪≠↓U%∃α4b6 5YZ0hPα21I⊂!$cS*fV⊂ )j⊂!∪⊗!'⋀B]a$c*f`∪
λ⋀∩%%~Qαbβλ"b¬ Q⊂K]9H∀ Zλ⋀q(yαbg*P⊂λIMPURE!)
∀∪%
∃αdz∀MJ8rbαJ:B⋀~AB%Dβ".h$j⊂!∪'aeiCE $SPλA¬A&P⊃Dh$%8)∀`(4V(
SqtH→αP ∪PACE
$ST NP⊃~αa∩: Q⊂KZα∩3I~⊂⋀`f∪,TP'∪βH [ a∪') 9(A6,j0≥∃α#"A⊃)∀u⋀λβ(λ@1
0@-%α∩2iQ∪@¹8R6∪JYαP ⊂DLλ
(HI∩NQ¬B~bAb"0∃Dβ""'c'i FXP EXPANSIH∂8hP$%≥!α¹4J¬D4bαi∀λ⊂π&DNβFLONUH
A⋀"0 (αB"$Juλ⊗λ∀ ,
8π
∨$αα~2A⋀*bB∈u~& <βC"A⊃)∀u⋀
λ∈∩,∪D@ ;REGULAR PDL
∩⊃' ⊃αβ
αb⊂π _M 0↔
=$A A∃1!β≥M∪⊂≡aQ HJJ:B¬≥¬DEDhα".j:⊃0r(→α⊂ ⊂DLλ
(HI∩NQ¬BNADIeDhα".htH∀j⋀⊃0 (⊂d∈SIOL⋀⊂∀!⊃∩%≥D
4:K ∪K ⋀D]ai j⊂βH @'∃∂⊂⊗⊗u"L4λJr".→IB¬≥Ek$-⊂β"B)SH∀jEpπ ∪EGS ~\αaα^∀qα`"βK4j⊗h∞k'`∞G↓' ∂≠∃_
QααH∀⊃(∪λYβ#j$λ∀)d'Ud⋀D BE ]@99' ∂10
&QQ Mhα.q) ⋀ IF2λ
)α↓↓αtHI`≤h@λ SH∀λp⋀g#CE
λ⋀⊂∀!Q hPβ"Ng]P ∀HE FORMAT OF THE @∂β% β∂
A
_∞ $β⊃0jtH∀hp∈bg∃⊂* a∪ ¬ IS RATHER HAIRP∩↓'∪≥π∀~∀`-β0∞d⊂⋀"Pdh
ES AND↓!∨'∪Q∪⊂≡h⋀h c⊂ f∪⊂#$bS ⋀S IL⋀A β
⊂A/∨IλAβ%∀A∩⊗⋀*0∀⊃3U⋀pπ⊂*∩ ¬~lp
mαα8T<13U⋀
p6Q%⊂*$"H&#k@∪βRDER 822-<SEGLLπ∞Zx|A¬∪Q&A>2α⊗∈∞@α⊗ 5J+∩⋀≤βsUλ→3C"G]]P*∩ ¬ HIGH BITS OF T@⊃↓β %∃'&A∨_A)↓↓
2x92⋀|dλ$M¬4
D`4⊂Q(
Zq1 →β⊂&`%` NG
0⊗YYαRα
!αN⊗<j⊗ 5E`λ¬Su⊃$⊂⊂5⋀⊂⊃( Yαdj*⊃b⊂&'UT¬ORDER BITS OF T@⊃∪LAβ I '&A¬%∀4SY`≠Zλ∈Q*h⊂3K~β`lW
P*$"bP b⊂!$jP i"H$g⊂*∩$iP)U) g#QP)$cR*⊂
ADJUS@)∃λA!∨M∪!&|p4)4∈`≥H!'i THE CLπ⊂~Z,r&⊗:≤)α>→¬""*λx4l
)0λ
u0
$Sα@
@QDX
Y9Jqα: ⋀⋀ Dβλ∀hp∈bg∃)P$ Uα@
4SY`≠Zλ)∃"⋀)It9tj`⊂∃$ ∂SE W@⊃∪
⊂A ↓_
>Q⋀B∈@4Tλ∩⋀~@λλ& ∂CK HAVE ZE@%<A∪≤AQ⊃∪&A→∪ →λαp4)4∈`≥H* ∂ TH@
A→∃
(A∨_A)"M→α
⋀⋀⊂πaeH b")⊃iiP#∩bf" IS A↓
∪ →⊂A∨ pdd[≤*≡ $βq`∨λ!$j)NFA≥@;8∈A)⊃%&Aπ∨9)β∪≥LA)"*α0∃X(U∩⋀βqH
I⊃(∪H[∃λ∀hp∈bg∃⊂ N↓)⊃
AQβ¬→↓_∞→ααI⋀*¬8→T*¬K~⋀*@∈E≥Nβ; (NLπ ⊃α b1αN,:6⊗:%→α∈J*α2&:\*⊃α→`λ
I⊂⋀iP∃βAP∩vααR"z8R¬≤XyT,U∀h
d CH ARE L¬∨(~(p
mm⋀b& ¹48XB¬$βh⊂)u∩⊃*$⊂πg"H$ k"H* λIS BIELD ZERL∈P→%¬""* ∀<Bβ3tHHαi⊂!∩h⋀ (BIPλ@ ¬cJHβ"Ng]P$iH'`∞E IFF G@π⊂⊗∀YαN zTdλ∪0*)h
∀λZR⊂4
4⊂π'jλ+` TH A BIT BLO@π⊗@%¬""*λ9t`⊃3U
¹1 ¬≥@;8∈A>2αR"∃¬~⊗≡XYe"rλ¬∩λT⊂R5⋀∈LH⊂I~α⊂ ⊂OSITIOL¬&A$yαRλT⋀d1P
Lπ A$B∃α _tBz(D-⊂β"Ng]P!$U⊂ ∂F THE BIPλA¬1_∞∞4λ∀$∀Q4j4⊃R1)Hα⊂$iH'`∞E IFF G@π⊂⊗∀YαN zTdλ∪0*)h⊃TId¬ @)!
~Xπ3@4⊂q∀DqH⊂)⊂ ∂BJECT IL⋀A)⊃∀A' ∂5 ⊂~X⋀¬$Dα4hλ$j⊂$P
EAL¬∪≥∂→+⊂⊃α|r2eαL1α
↓Q9⊃Q#@7nh∩*4⊂πg"Kα THE BIT↓)≡A$B∃αJL:"Qα|1αRλT⋀¹8∀H⊂I~α⊂$iH'`∞E IFF GAH β%,A'"}*2"λ→E≤c"Ng]P&`%P#)∪d¬ @)!
AπβHA∨ A¬_ αx)$,≥D ∀`$∃∩⊃$
q1s(Yβ*≥@ THAS @¬∪(A%&A6,
0∀hxe,λ∪sIK ∈E≥Nβ; IF T@⊃↓β $A ∪ ⊃αM→α>hUbα¬IλU≤*λ¬∩
(1(⊂I~α)P&Uij⊂!⊃P N↓)⊃ π∀Aβ " ~QαB}~&B→ye~Q'3@7h⊂1h→3H⊃IZH⊂
$⊃P!gg∃α@ ≥∪∃_
∞∃⋀z→α≡≤j∈J-αBE 5ea∩`$∃∩⊃$u∩⊃*$⊂R5
4⊂⋀g EACHTπ↔%λ4∀vvv↓β%
A¬%%β≥≥ λAβLA)=¬*N∃α-↓α
J,)α
%→α~J|iαR"*α2∈~ α⊗*⊃⋀z→αRD)α^∀!1αB ~.⊗⊂hQemm⋀J1α∀zV*⊃¬""*λ¬∩
(1(⊂I~∀h⊂)JQ01 ∀⊃⊃4h:R0Q(H⊃∩λZq(⊂I∀h∩)h∩0p*(⊂ d⊃j λER
;+≠ OR NOP DHE SEGMENT CH∂≥$
&:M¬2∈"V*α∞⊗2e→1αNLj
>¹2~aα>I¬~∈JMph($λhR≡∞
m∩-u ∈βββ⋀↓⊂K]IλU≤*λ~$*⋀→IB⋀dXjB⋀D→Hb⋀¹4H_u_(x4(q∀G'V7o F/∀q(∪q`⊗M←⊗XOβE#aa⊂`i≡Naa!b/VP⊃
αGC@⋀p∃Uλa1U+⊃UH$HI`≤¹4z ⋀)5λ∃ ~⊃3u*D∪3qλ"VVK'-)⋀∈∈ λλ∈!aa#∪βH∞z@~∃∪%A&A
β4Y0Y7Y∈W'∪4W'β$-⊃≥⊗At~∃55hz{55i>Rb~)∪
≤Ai54M∂
∞⊂aαjSivjUy5H4T:∞ ∈t
5uURh4
L2N∃@¬BZbλx4⋀¹4ywSl<8(d|K+%P*HU∀→aPP)_d:⋀x8$D5Xt≤∀8~"b¬x~$b¬8x4l
)4¬,ID⋀d}8T⋀|r
Tt];QPP!Q hQ!PT<::CP⊃⊃∪\<4
4,XYe"¬H_$dQ$ααα _d*¬λ_tLtuD⋀∀x92⋀u8Xu_8iu∩¬λ_tLtt
5M≥HYR`!⊃⊂H4
DD
λx5≥"
H∀∀dT ∃~¬8ZB¬-⋀λ∃"¬*Yb¬→XR⋀∀ ∀tMEaPRα⋀⋀⋀L¹4d
⋀ →hreQ!∀L3∃D⋀∀x92⋀u8Xu_!→∀3K1PPL*H"sX*D∀8⋀b!↔q∪ph∩3sDλsu3J4H⊃IzH⊂4j91sR)hh⊂R*D⊂S∪h→tc"A⊃)⊃pjλ⊗Q* ↓Q@21Id∪∪pI∀qk⋀⊃ptjD⊂R5¬ β!!")⊃h:uλ∀j ↓Q@")λxtuλ
;4k ¬Fβ"B!⊃ptjD∀p4E ⊃h8S4Re¹8ppTh~C"B!⊃ptjD∃Pk¬⊃ppIZRjqh8UPc!!")⊃h:uλ⊗
hk ∈"B"$ptu⋀ 4lK β!!")⊃h:uλ∀k+∪ ¬ppS*)jqph*v3#!!")⊃h:uλ⊗ λ+∪ ¬Fβ"B!⊃ptjD⊗⊗⊗E β!!")⊃h:uλ∀k⊗K ∈"B"$ptu⋀
⊃V ¬ β"A⊃)⊃pjλ∀⊃J¹5 ↓QB")λxtuλ
S ¬Fβ"B!⊃ptjD⊗⊗∀¬ β!!")⊃h:uλ∩(jk∪ λ⊃ppIZRjqh8Pq∀E¹8ppPh~C"B!⊃ptjD∩1V¬ ⊂KλxpS4I¹1"B"$ptu⋀ 1S ⊂K⊃h8S4RaQ@21Id⊂R1i3+λ⋀Hβaijλ!'⊗& !⊗#a&i%Uaa!b∈E⋀f⊗,!)cO^f,,⊂icFEαDR#aj_P'⊗,!)cK,,!⊗∪⊗⊗_∈⋀dc"H&#a$U)cV⊂ πCST BIT,,,0
$GCST BPS,,,0
∩⊃∂π'λ↓→1~0X`~∀$∩I∂πM(A
1@XXX`4∀∩∩I≥π'(Aa
1 0X`~∀$∩I∂πM(A
→@XXX`4∀∩∩I≥π'(Aa
→ 0X`~∀$∩I∂πM(A 0X`~∀$∩I∂πM(A10XX`~(∩∩I∂
'(A'@XXX`4∀∩∩I≥π'(Aa' H0`∩(HI∩∞∞≥!αN⊂¬Bbc↓Q J 9∀dbλz2uTX⋀C!!21SDppu¬9Tq1j5+Kλ
X4S@⊂↔↔⊗cah⋀,[=Tπ%∨≥≤Aπ∈AM ∂ 9(A)β →αA→∃≥≡R@⋀αE≤α∪u)Hλ⊂Q$4∈')QciV-JnBE⋀WDX END AF2
Y∩w∃_
" xb⋀Li`¬⋀ y→d8!Q%⋀ xZUHαC"J:⊂q∪j⋀∀u⊗ -ibcSbg*∃ a&"WF@
~∀4⊂∩(hR&~9¬α∈≡→hrb¬8⋀⊂huλ∀k~c"L&⋀α)∩ ~q1c!_X∩⋀R$f'aO^W⋀DNdπRIGIH A∨_A⊃&<AαN⊗<j⊗ 5AQ hU8⊂B¬¬8yd KαH ↓⊃".u λαibP∪'a`j∩dπ@≥↓
∨$AMβ∪_A!∪' ∞↓(
∈2L"∈R→y`hU8⊂B¬¬8xD-∪αH ↓QTp!⋀
∀qq+∞H ↓QTp ∩λ()ch∀'_
0
~∃M+¬))0∪¬ ∂%_
:&t9α>→¬αVJ∃⋀b&NA¬~fNR,iα∞≡$(4(Q!∃⋀pSu⋀λ4TC!! ¬≥]Nβ THESE COL¬')β9)&AβI
A¬+%→(A∪9)≡A$B∃α∞|jB&2-⊃0⊂ NfgP*$"VP"`∃ST BE D@
∪9 λA⊃∃%∃α4zIαRD)α
⊗t*~&Q⋀z→αRD)αBVα9⋀b⋀EAD-OL¬→2A→∪⊂∩∃λ⋀αDID¬ :R5⊃*4∀Q4hZUQ1¬∀λ¬∃∃∃∃∃∈B≥]]@λ⊂⊃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∃∈B⋀¬αSUBTTL ERROR UUO HANDLERS
.CEE E@RIH
(~) !%≥Pbt4PJBVNDQαA¹2≤
ZaTHI`≤-*)u∩¬λ)∀`& ∈E⋀T*id∀⊗ iλBU)bbH i)'→FE⋀T*id%λ(⊂ MSGFCK
λ SKIPN V%PR1
BRST EPRLT2
MOVEI B,(AR1)
λ CALLB $1↓,K↓Hb~⋀∪)%'(A∃!%≥L~∀4T*BJ:#⊃`⊂MIIr⋀
&⊂ ∈& λλ_ ⋀@
PUS@⊃↓ XI!I∪⊂→DhR⊗BJu!Mh≥"JQλ∈re]9≠⋀)5λ↔⋀⋀7↔#!↓4∪t⋀
λ∈ i FA⋀e)j⊂)h,⊂∃
λλ
(hR⊗JJ}⊃Eh→Yu (αfP*∃⊗*`∃TTSV
IOVEM R,UURS@,4⊃⊗J}⊃Fi!→%≥αλ¬∃¬Hαi)'≤@ ;PROCESS A↓→∪'↓ %%∨H~∀%⋀RJNQ⋀*J> λ$%4¬⋀d4T@⊂⊂d∈D LER3)
λ P@+M⊃∀A1≠'∂
⊗~∀∪5_∞@4Y∀⋀"bβ(@∀∀∀@ ;D POILTS TL∈A ∃∩~J∈l(4(~
U≤DαH∀¬Hαi)'→FE"'i_`N⋀fgk⊃dP @,L¬∪_~(∪∃%'P@dY↓m %%%Q_
`(β"C!πnj` ZqqR)H4h⊂iλαae@. GET VALUE @∨↓≠'∂
%→⊗M⋀J1α⊂∈∩⋀ h¬⊃*$⊂r⊃(e` NG BOR
λ;;+T¬β→∪⊃∪!2\α↓α&→⋀ α2≤*I1α≤J≡ 4→D⋀ H⊃4JtH⊂(⊃0@⊂ ¬SDORING↓∪ ⊃ααIrαEE∃`hSαh
@; SAVES A.
λλ
¬≠M∂
π⊗h∪⊃%%hAβ$bαbP∀m8xdL⊃0 FBαSFA⊂∪∃'↓ Y≠≤:~
DHI`≤02q$
u0 "H g⊂) P'"Uα@ $A≥ ∩M⋀J0∃¹4y8T"⋀h⋀Si TqHα,α!⊃,¬P&T!&'eK⊂!*jλ)j$f∪⊂"'P∃αALIDIP 2A
⊃⊗∞Xh ∃≤h⊂ ⋀4qqHXX
PU@'!∀A Y5!~2|X$%8⋀ri~∀h∩(d⊂∈$iU⊂ ∂F FILES *NOT* VALID
CMSGFCK: @!=!∀Aαb6N≡4~,4λMαVN⋀
αdλβ"B)Yβk"dH V∀ _TFEαh*`∪HJ P,N@π⊂≡h⋀c!⋀fgk⊃dP!,QH '∂→∪⊂∩⊗α1P@!4⊃4i H⊂λ⊗⊗!`∂NS
∪≠=(
∀λ∃∪J~DdM8AP@Yzd,(⊂4F∃α+&ic$f"FE⋀h∃i`%⊂∀⊗-dgS⊂-a Q⊂+ f∃bP#'⊂
@'≥
∪→ LC; 4hP&BααA2⋀hP&*≥!α6N<2≤Q c\X⋀TIi_ LERF@%¬≠
A I_∞I_⊂λλZTTU ⊂"`∩R2 @→'A%(`A
→'!∀*P (αC"J:αa**∪⋀b`∩RFRAME @
∨%5β ∩LhP4)4∈`≥H ∈ORMAPλA∨_A⊗∀2J∈6+P4)4∈`≥CE_ 6βYαmh⋀⋀`tS0)D∃⊗4λT⊃0 )∪βR (ERIN@(αaα2⊗α*"b⋀X¬⊂e∀@
;8∈v∩q' |0y% %*J9α5∩0≤(⊃4JtH∩(d⊃0 $SαT>
8∈vv∩$I⊗∀2J∈6(h ∪4∈b!∃0
g⋀@ ;AD@ % M&A>2α6N≥⋀J0∩¬)_tE" λ∀d@∈E≥Nβ; <S( E↓x$↔8d`:H⊃4I→β*⊗⊂∪ ¬R3
λ⋀vvXh ∪4∈`⊂⊗β2P~A∃%%¬β⊂A)3!∀Aβ%%=$@@"Lb1αXYR¬∀XeB⋀5⊂kE ¬≥@;8∈∩e~Ai1cb∈∩∀*NMααy⋀-∀TλU∃z λ aa`∃RR@ λ|4⊂ mmXH%∩⊗α*$5∀→XPhSαh
@; 0,,<ADDRESS OF E@'≤|⊂∀ u~⊗∃α-∩J
∈ h $
-∩J>KP&BV≤AαA-*6 4PJ"J2h⋀¬≥αβ
∀¬ B4
Zpλ∀¬Ki⊃4J(TP3(".tH→β"'f*fa"⊗⊗"h∪h!∈Eαh*`∪H P,40 0↔π¬→≥∨↓⊃β-↓→⊂@Z`vAπ∃
A ¬I!%∪≥P~∀¬*N!αb⋀4
d*J
J j∃uS $$¬\b⊗ 4zIα⋀|dλU∃∀h⋀P)( (
`j!dλ* $iH$g⊂!PibP'⊂!d !bFEβE$c'λ$j)V⊗FE⋀Wjibjλ-W ∪PIC@→0Y1∈E:~∀9'+' PA6]≤"→E1e⊃UBthP%:N-~⊗@" 1e≤$f!Be∪v PhUβ""'bg"∪βF IFL ITS
IFN @10+D20, PUSHJ P,REAIND 8π%
[∃_
∈
d)α&:$*JJ¬"L4*-∩6Ifλπ M9~⋀r¬λ⋀v)A"B$
pr4λT⊃0TJc"B$⋀∩TTjD *∃
E!"B)*Tu⊂
**∀F⋀A≥]Nβ ERRLπ$A¬∃)+%8@Aπ∨5
A"-∩∃αRzαB∈J4zJ5α qα⊗∀zIα∀*∈.-!↓"J-"VJ8hQemm¬"=α∃∩N⊗Q⋀zIαR}↓α24*1%9ααZ∈¹2,)αR=¬∩⊗BV∀qα~J|iα⊗∃~⊗AαLqα¬8hP4*∃∩JR¹9PJN⊗Tiα:
*&P4TJ~9αM"M2lhP%:N-~⊗QXrNB&≤bI1¹2D→5FthP%:-~⊗QXrN∩
a2I¬h4(¬u~VN"αm 58Hc∩J&s¬hQ+PHK8Yd"xd⋀L¹4d ∃%Q)∀4rλF∪α\F"αb¬λZ4DR
¬E∀,→→e 8(Rlh_$d
→e$-**U¬%1Q M¬X⋀r⋀
⊂#!↓4rr*λ⊂#
TQ0) B(
4r∩D
⊂rλXpp
DB]ad"PβK FOR ANY @ELAYED "RAAL TIME" INDS
↓POP P,A
E@%Hdt∪'-∪!
A∃%%)≤$∩w)↓)∨!→∃-⊗1bα6Iα∃∩⊗∈-⋀zVQα|1α∈9⋀*JJN- 4(¬⋀RJNQ⋀*JI@HIf≡=⋀∩J∈∈X⋀¬-αλ→b⋀-**4-Q)E≥¬*FβPM
Z4B⋀i
αd≤~J%$⊃↔5∀-JZ$b¬It¬$}⋀ D-Q3λλjSs I4tλλZTStAQ@2Tj⋀⊂+⊃*)3R,↓Q@⋀h'T⊂#$( !`j)∃'⋀D]e)P'⊃bb)P∃'P"$'kP#'fP H∃))bU⊗j) T∈@
CLSPRET8λ
⋀∪M )4A⋀Y→'¬∩⊗@Q!∃≤~λR⋀Jee%∀~↓⊂K\→jdl\T¬%∃≤Z@ *JP4β!↓(⊂p)⊃H %E⊂J#!!33uHT⊂+∃HZTS∩*:β"B)Yβk"fH V+$Th¬OTIEH
(~(∪∃+≠A
AαY1'!% P~∀&E∩Jiα ¬D6@∈E⋀R))-⊂∃⊗_T*
F@
CAIE T,HACEL¬(∩m≠ β≥LA¬+∞αα0≤H⊃4J∩4u↓Q@⋀P%)j⊂&h)"jβE MOT¬∃αλ¬E (αi)&∩ij∈Eαh*`∪HJ P,NAH∂:α1P@Yzd,Jλ!E -*)DM≥AQ M¬X9⋀R¬¬K⋀ sP F⋀h"iR⊂(⊗!S)h ∩ET ∀∪→β∈A↔A≠''∪ →2A
∃→∨
∪=+&A I%→∪'P@ZA↓1 β'↓∪⊂~N⋀*∈@"λ(T4}(T¬¬x8T,$α3Qd ∈E∈Bβ≥b`∩RLπ$fA∃%∨$g Aβ%∨Hg
A I_∞IN0h( (*:T∃%IA∀-→jBb¬8Z$LU λ H4TC⋀⊃0DaQ@∈E≥Qi)'i]X⋀NβPRINT OUT ARROR @≠ M'β∂↓
∨$A=%↓β≥¬%24PH$%4 DM≥⋀λU∃z*2αDβ⊃4Jλ∪⊃*&h∈⊂"$g", SE@%%_
Q$hR⊗JJ}⊃Mh⊃⊃⊂K\8→Dd1λ∃I_(λ∀
Zp⋀%⊂∀⊗"`∩RLπ$f~(∩∩$KZB>→jD-∩λ¬∪d⋀α"`∩RFRAME IN D
∪∃U≠!
A¬$bYπA_∞B!Q LzhTJ⋀∃JE∃-I↓⊂K]λ⋀Q* ¬ND↓β ⊗RzjR-*
$J⋀α3@⊂∃$"FEαe)`⊂∃⊗)`⊂E@π¬∪≥⊂∩∩`-⋀j&∩∩d)α>→⋀
0∩⋀X⋀TIi⊂&bi`cbCE 0 A1( ∈R-∩BJ$HI`≥≥λX4)3Q⊂`k"iH ∈E⋀R)&$P⊂i_V→ __⊂⊂0 0↔∨U)!+ ⋀⋀4HZ2⋀dα4u⋀λSt@⊂∪icP$Sα ARD~∀&d"∩¬J@ YYP⊃D``@1c ""α7"'h⊂$ P!"bSα S@)¬∞.⊗ ⋀¬-αλ+∩⋀4TSj' ∈E⋀*f`⊂E TT,EROR3C 0↔ I%¬λdααBVNE→α6N8⋀¬ 95∩⊂∪αO LERR OPERATILπ⊂_Q!∀E∃+$⋀
J⊃¬⊃ ⋀]fUij⊂#⊃h⋀CH↓)⊃
AL[ "¬∩⊗NNLz0∩¬It¬¬→j@hPα4u
λ⊂4F∃α-adV!$j \X
~X⋀∃e ⋀]h ¬CEDE @≠≤9α^~Iα⋀
⋀ ∞d⋀¬∀∪
β∪
AQ(Y2-∩J`:β( YB]` ERR DOESH O(ααBJ&u!α∈9¬→6⊗λ↓P@!(⊂λ*d
P,@ !∀J0∃Q!∀823@⊂∃*⊂ SERIN@)|Zffm' %∪9(A"
→α∈9¬→6⊗λ⋀⋀m≤qQ J⋀αTTjD⊃0 '→c∈Eαd⋀DB↓αP∩mα
f λλ⊗ _T")] 0↔∪_A∪(A%&A2-∩Iαz λ Hαi→Vλ* λEN
∪π¬∪
A%!2-)→e%h∈YYB]P @ L¬∨9mR⊗J=⋀
~⋀i_Tdλ∪1(→β)FEαP
UMPN A1 %∨$M ∩XαR"∃⋀jN≥αM→α∈9¬→6⊗λ↓PD4StF8nC"A~u∀U⋀λ4L ⊗⊂_T") 0↔≥=)α`)¬""&M⋀~2>
∀*JMααZT`9λ∪⊃* ¬L VARS
EROR3E:∪'Q%(AβHbP∩NαJ%$≥!Q LU*:B¬h)∀`(α∈E∈B ¬ROR3F:
HRRZ A,1λD)~∀%!+'⊃(A @1%αJ&:_h ⊂**5"⋀X⋀Sj&q#"AQ@↓Gq0 )∪βR5 EROR5F AROR5A ERLπ$mααα⊗J0h ('33@4∀⊂ 'PβESS ERINT-SE@%%→(Aπ=%% πQβ¬→↓∪⊂~R-∩JVBαJ0hPβ"Q**StM'↓33uHY(⊂
* *j`∀TSR¬
MH∂- 4A$Y+U%',~(∪'π∪A≤A ¬I)≤αmβ→2}9αVN-⊃α&:$*JJV¬!αRt
%,AQ J⋀**5"⋀X)u∪,a⊃∪@4⊃1Q)⊂ c⊂∩d∈SIDE AN↓ %%'∃(X~∀%'↔∪!8A- ∃∩N⊗PHI`~⋀α1H
I⊃(⊃**Tq5⋀λTQ0)4⊂4h
¹85β"A∀⊂TTjD⊃0TIi_DDNβH∂)⊃∃%/∪'∀XA∃+M(A ↓_
>Jl
1α⊗∃∩0≥⊂β"Q*tM1G⋀f"!λ**⊗-≠X∩00,$40]
α CAIGE TT$NERINT ;TTHAS AA FIELD FROH
A-*<4(JαN.⋀qαZV$1"RQHh(%↓⋀RJNQ⋀*JJ∪λ$%n≤z:Z⊗∃!αR≥⋀b⊗IM⋀J→α:}!α⊗: ∩2⊗⊂hP&64*%αQd*JJXHIf*∀j∈1DJQα~∀z5α∞|"∃α
,b6@: ~2¬z∈$RQ!∀821(
∂ )→βb/V≠←∪_DX IO-H@∨'Mβ∂
~(∩Aπβ%_ α aq,h_5zK&sb3 q↔44→ET ≥AQ Jα Yu (2(∃¬5P3¬ BE"'i~`⋀h*iR⊂#$( *∈E⋀Sgk"dH*⊗∀*∃∀D]iPk"P PP ∞UMBER FMR BELOW
JSP TT$ERROR9 8π!+≤Aα∈9⋀*JJ∩α~J∈l(4(∀ $4≤AQ LzhTJ⋀∃E⋀
HQ!∃¬-9λλk∀ ∃↓Q@⋀e)T⊂*⊗(⊃&'&eCE EX@π⊂Aλ0Q¬ "αH4(_8∀L:λ@ πDαjcjTY≠@>&17
P@+M⊃∀A1βπ>u_4(~
U≤Bλ¬DλH↔8d`:H⊃pd
∀SuλXu∩3iD⊂πg&⊗F@
TRO D 200 $∩w ¬%_
Qα≤*J&⊗α4¬-≤X λ →β*"i*h"∈B⋀d!&∩P"⊗∀⊂TBE⋀Sek"P∃*⊗*jU*)c∈⋀fgk⊃P*⊗*Uh)`⊗
λ SKIPN INHIBIT
∩AM↔∪!↓≥∨#+%(~(J↓↓:Z bV∀⋀KZNBVα ∀"¬It¬≤Lyh∀b⋀X*$`:H⊂ d⊃d∈ INTARRUPTS LLππ., 4(~
U≤DαH∀¬23U↓Q@⋀h'T⊂# _P,D
SQB P ;ERRIKB ERIOJ1 ERIOJ2 ERIK@∀↓ %∪∨(hA %%≠∀jA∃%∪∨`Aβ%∪=∀nA I∪⊂≥Z∩α⊗J&|QQα∀J=J¬⋀*J&>SIα⊗$∩1α∀2:2TλU∀M
⋀R⋀-*
%"*λZ$4TT⋀-∀_Xb*⋀Z)∃≥*TλU∃%)` $4SThd(⊃4IhαaRP⊃i"' IP"a'b∩P"$f*RH"i')∪RP"i∃d⋀C% ERNET% EBPMA% ERBNF% ERCSD! ERDNE% ERSNF% EBSLA% ERLVL% ARNCE% ERSJS% ERFCU% EBLLπ⊂JA∃%≥→∀A→ ¬Q↓_~∀4∀∩⋀lp
α→y%∃≥D
U,zλHT9q⊃4ED∃0p(.C"G↔nb"%Hp3∪⋀Ssb'→βi⊂↔h"g⊗λ'i⊂+R j"k⊃i∈E≥]DDP∩ee))U⊂'⊗#eFE≥]P$g))j⊂`jibP P* g)c⊃i⊂*'H#'gP⊂c*"iλ(*b*∩e#P$⊂!P*∩"FE≥]P b⊃)"aiH'c⊂ H)dl!∩j⊂∀)U)*⊂#i&`j
P)j)∩g#P$"$a`U$g#P∃$"FE]]P")'i⊂∪bii`bW⊂⊂∃$$iP∪bii`bP&`VP!"Pdk"gλ*'P ⊂"i$*∈E≥]P*jP∀*,T$a`f∪,P∩dd∀Wλ'⊂$iH*$"P*fa"⊂'c⊂∃$$g#P'g∃$"FE]]P)⊃ch"&λ a'k⊃P*$"H)"`∀URN ADDRECS - THIS IS A CROC@⊗AM≡A)⊃¬(~⋀lp
α→y%∃≥Dλ4 rλ⋀u _ph∃ λαP b⊃)"`∪S OF A RE@'Q≠%β)%≠∀A∀zVR→hPhSαjndqH∃ λαP ⊂DL. (THAS ISF'T D@∨≥∀A∪≤AQ⊃∃α! AαZ-∩N&>p¬B⋀zxU (αi↔)
3 6lA
∨↓∪ ∩MbαR"∃⋀j6NQ¬∩⊗∞⊗u!α∈∀zIα~α∩-HZ$lhXB⋀∃∀¬d⋀≤ `⋀MQ'3@7h∪pJH23Q(D∃R0$⊂⊃(λZTH⊃λZR0q$λ3Q
⊂0rhλ⊃4⋀qH⊃IJ C"G]]P#∪i⊂"λL⊗⊂"*λ$iP ijfbQ⊂*'P⊂βH∂
¬∪⊂→ααI⋀*⋀β∪si:4 q)⊃4@↔"g fQFE≥]Nβ EBRLπ$Aπ= ∃α|1α&:αHU∀
:@ ⋀λ3Q ~h⊃4hλ⊃∪d 3Q⊃+⋀⊂(∃λ_S⊃+AQL¬P≠≠ BORD20, THE MMST RECENT ARROR AS Lπ¬)β%_
,Dλe∀T
DD(⊃4J:α)∈E∞β;; JSYS AL@λA≥"∈∞8XB¬-⋀ tb⋀iJα`!α@
;≠8∈Aπ→=
⊗α*2¬$α⊃( (p∈⊂!∃c#"iλF@
;≠8∈A+≤*Iα→jD-∃*Z¬%~λ9⋀`:αf" @¬∃αLr"&
M"⊗⊃aQ hTX⋀TI→β`
:
λ⋀b`J%!+'⊂ααA2⋀HI`≥≤~hR⋀ 8⋀c!_X∩DT*id P,B
IFN D10$[
λ⋀∪⊃¬I
A∈YQ(∩αw%'↔ βQ
A ∃∩0≥∩λ9t$ ∈E⋀edh&λ!DDDNβIF TT CONTAINS S@∨≠∀A/ ∪Iλ⊂∀!∀⋀823⊃$∃ ∪λZU⊂S↓↔h⊃P)1+λ 4q⊂⊂βALL IPλA$B∀4λJ↓αN9~⋀
⋀5HU∃$)ESλKαhλJRsSjd∈ ERROR"
λ⋀∩@↓≠⊂≡Z*α~⊃0 *⊂αL C) ;@∨)! %/∪M
A+≤)α¬αα:D Q⊂4HD⊂∈bi`cbP)'f@ THE TABLE
λ¬0∀⊃↔4,Qλ∪hd⊂⋀c'λ ⋀10
λ¬∪
≤αα&@%58C∪αβ⊗c!⋀h"iR'⊂ ⊂,2 ↓;PUS@⊂HA'!βI
A! 0A'2}"L4λLb∩ αλb`≠∪v∈Cβαβ
∈ α@ ;GEPλA≤4⊂λ&∈$"%α¬c⊂$%8_D"β$λd`:H⊂λ*d"b ACS
IOVEI C,(P)~∃∃%∪∨Dpλ&6}2∃α biI"
HH%nNE*~¹4HT¬⋀⊂∈⊂*T⊂*+gH)` OTS
α MLπ ~⊗h⋀⋀λ⋀!TCE SU@¬∩A0b~(M~0≤Ttλ∩d4R3i& ∈E⋀SdπVEM BLP,-1(C) 0↔≤
R*λ:U∃∀YjB⋀S∀λ
p⋀g*⊃i
MH∂- $AαY I∪⊂≡'⊃⊂K] Iuα⋀α3@⊂⊂b")"iP'cλ)"`∪TLπ%β)%_∞ 2λ⋀SjZ⊂⋀g"CE MOT¬⊗5⋀ 1"
Hh ⊂Yzd,Jλ5C
DiJαHhαB4
Zp⋀⊂#⊗(⊂ C
λ¬∪
≤αα&@%5K0hPα+TjZq1⊂⊗β(
%¬
⊃≤XY¬:~(Jr≤ID⋀-→vd ¬⋀P αLGSE 1400
∩]
β⊃1⋀*J&>S0$%8xU"⋀β3tjD∀Q0hYβ*⊂")'i FOR THIS JLπ⋀4PI↓:2}~∃↓ ∈β ¬⋀fSh∈E A,[44@j``1∃π2∀2t4!→TmQ2(λ⊗"%!S!#∃!⊗h⋀S@/⊂Zb4PI0∀≤→IB⋀4R3f @ ;R@ βλαα&@" →b¬-9→d:⋀∀
4Luβ"A∀λπ&'bP⊂⊃P``~∀$X
∞Iz4*¬IZ⋀5α∈E.BDX END @∨↓∪
≤A%)&~∃%
≤Aλβ⊃A2lhP&"∀z%↓EdR≤⊂QC!⋀d ∩LLπ∩@⊂¬B`(β$ ∪LF ↓;GEPλA≠=' ⊃αα(T¹83Q⊂⊃i)'iλ!'i TH@∪↓
∨%⊗4⊂λ&"α)E@)(λ V ^ JCLBF*BYP '<!5EaQ L-*:E⊂ ¬⋀P∩ f*⋀BDX GRLπ'&A∃%%∨$4⊂λ%αT2∈ ⊃⊃∪@8U1QHZH∪SjD⊂R1d3Su(yβ"W!⊃,¬bg⊃⊂ ∂F IFN D20
IDPB↓_
&1dλ4(→Yu (αdP K⊂π# 8∈FA∪LA)"*αNB ⋀¬
3u⊃$λp⋀ i⊂aj"iβE PUSH FXP,[4∀070 ,,JCLBFX
~∃∃%∪∨Hpλ&6}2N%α⊂¬BC#F∈cβαβ
λ∀
*!Q@⋀h*d⊂#&∀⊗)≠HβE"`∩ILπ∀fPJ& $H λλT⋀ ⊃
a R$KZ≡⊗Q⋀ α∞α
∩∈∞R-⊃α>→¬""*λZ%∀}$ T-≥8_t(hαB0h→1q(λT⋀40
λ⋀∩A∃I' ⊃α-∩& <αNα!↔p3V$λpπg*'` CHARACT@ $AQ %≠∪9β ∩⊗~α&@Q!∀821q$λi %∈↓ .pid∈VERT CHARAC@)∃$A)↓'∪ "∀JQ04PIαNV∀Iα
#$%4λ∀ddβur) π LOTπ $A
β'
AQ_
α^}∩,4λL
0∀⊂⋀P!K≠[FEαa`dbH!P ' ∩∩`.α9tl*λ9⋀
∀_:D-∃4
$-
Y~$*¬~Yu$hqP@!(⊂p)→β⊂!Vo
BRST E@%%_∞)ThP&∞∈Lqα
Dpλ!Q@⋀P%)j⊂"$ge~CE"`∩ILπ∀ht%∪ !⋀αα~⊂B"'b"`⊂OSIT SIXBIT O@≤A→→ ~∀%)→:*α∩cvp ∈∈ β"A∀⊂¬))U⊂"`∩ILπ∀f~(∪∃%'PAβ%∪=∀d$KZ2=αlzJ*λ⋀Sid¬ -↓≠ ⊗N ⋀¬¬-9λλ→β'j$⊃i⊂ ↔OR@
λ@ %∪=∀jd∪% !⋀A⋀Y⋀$KZ∩- z4Mλ⊂λjSβP &t9α∞λ~$ ≥HZ hPα5∪ ¬ B0h
@;⋀⋀ ∈↓α@
JRS@(αα⊗J&|QP$↔8t`4⊃⊃4 i` T↓%⊗∈bα≤D~(∀:α"`∩
λ⋀∪≠∨Y'∩A⋀αa!Qβ1AAEE⋀4e¬∃⊂hPα4∃*9λ⊃S
¬∀Md↓⊃,¬g"Qb⊂ g∪βP ↓ HA/∀!α
∃~P (αB2J*uλ⊃*)3rM↓Q@∈E"$ge≤∞α POPI F@1@Xbαm
→+≤AαRα*α∃MHT¬⋀|α3UλZH∪sDλT⋀ ⊂
λ POP BP⊃1 4*-∩& <αMfA3uQ)∀⊂+ d⊃ .s*Zuλ∃j)5⊃(
H4S2) g"$Sd∈ INTO CTRING
λ IDP@ A,B
∪!= A Yλ∩∩∩wI ')∨I
AαA¬→⊃α⊂h &B}↓αAH⊃PE ⋀D]Qd∈D OF @∪
8A∪)-λd`~(∪≠∨-∀A(I+U)',~(∪∃%'PAh`$∩w)⊃¬(@≡Mβ!A1αtzQαV,z!¬↓⋀jVNQ⋀*~4X:B⋀
λJ$ U8hU⊂!Q$L¹4d ∃%~β⊗c!(αi$gM!→⋀iQj-∈Eαidl!∩h⊂∂STAPU@<~∀&λH$%8(∀"⋀9λ∀ttYAPPKF∈#ββ¬EDλH↔:5$
JZ2¬∀X¬∃*Q1β!↓α@
ERIH∂3P&N⊗αK hPα4r+λR5 t⊃3KA".sjλαg⊂#∩d⋀E
1000,,TMPC ;CHANNEL L¬+≠¬∃$⊂∀λJ↓↓↓↓α↓12≤Jb
"αr-*+EhKαq⊃*$abP∪αAME
λ 1000,$3 3 ↓≠ β≥LAβ%%=$A'$
RVM⋀J1α~p∈ hPα- ∈∈ λ ¬H!"C!λ4R3f Y⋀iQh-∈Eαidl!∩h⋀ LSIH∂)8$∩w'%∩& 4t ∩lh⊃∀H→TqQ*! ¬⋀Pλ_X⊂_ ⊗*&h⊂D@ ;CHANNEL F@+5↓β$~(∩@@@@@1dλ$%N∃JR*λ⋀∪i→β*"iβE 40000 ,,B↓ ;@¬3)↓∞ =Yj@hUβ""'bg" Lπ A∪→_ α%_4(Q)∀4r ~E~\F&αeQ'3@7h⊂ "h#i U$gg ROU@)%_
(Q!PD4R3i',B4 h⊂ ⊗&(⋀DNβRE@'Q_∞J∃⋀22@4PJB>BRαA0$HI`≤Su`
(α`f&⊗P)"j'⊂#)∪βH
A∨I∪∂&t
1α~,r∈B→y`hUβ""'bg"∪βF IFL ITS+D20
λ ∃∪→_ α ↓2l4SY`≠ZλH∀∀dT t2¬8¬⊂)H⊂4Q⋀⊃srjZ q3JH4KtHYβ fbH i)')FE∈B⋀iadV!$j⊂↔*g%g∪hπF ERROR!\Y~∃∃%)¬h~∃∨
→' (4\~¬ I
≥ ht∪7π%1¬∪↓9
∪→∀A≥∨↓
∨+≥⊂C9:~) %∪!@Jt`(MZN&b∀JQαrtz16⊗DJNB⊗u!αBBp
rt∀T*JB")`∪≠:4MD)~B¬eλ⋀Sj0p
$Sd∈ @-%≠⊂∩$J6)eh4*⊗∀2
5SP&nNMB
&Q¬b~&2*ααVJαα→hr⋀xI∀4LXD∃ehβ"Q*(11I'πB6ti≠⊂R5⋀ ⊃R3λT⊂3∀HX1⊗(λ[⊂4u
45↔#!(4R4j,NB+idl!∩h⋀ @9%→→ ∂¬_A' E+ ≥π∀A∨ AU+⊂≡M
bt4(Z%%dW#@HαB4h"6ti≠⊂R5⋀ ∃∀P)Jp∈didgg⊃i)'iλn.FEαi`R⋀VβSIXBIP LDIFFEREH
(A→∪⊂∩⊗t
6∃αα:⋀,≤α1R(λ7↔!QQ0 'c∩]≥βE SA% P↔π%1¬∪↓9≥∨↓αA'βY
A
∪1
C9:4⊂∪'α⊂∪7'∪a↓∪(Aq)⊃∪↓ %%∨HAπβ≤≥(A⊃βA! ≤Cq:~¬ I≥⊗
+Qh4λM~¬∀]~&b
M!αr~}!α⊗:}*≡!α≤zJ¬eh4(≤ ⊂&nα9∃D~D¬d∀_@¬∀-J)∀-∀→Dα
≠⊗⋀∃ehβ"Q*∪P)'≥αE⋀`RDmdl!$U⊂.""U$abP'j⊂ df &"Pn↔FE⋀iPR⋀miRl!$jλ.! bλ)"`∀RIEVAL ##1⊃!\]
ERNCD%:0∀~(∪'αJ%3'∪1 ∪ A99≡A',~!α∩-2&∞∃
bt4λM~¬⊂]~&b
M!αr∩M~-α~α~V2b
rtQ)∀4
λ⋀p)→λ∈-F i$f∃RX
: Xπ'∪1 ∪ A→%→→ ∂¬_A+ <C9:~) %≥¬4Jt`(MZN&B∀JQαrtyαJ>|iα>9⋀2& $T
5%∃X:E-∀T≠Ehh(Z%<Dαi.G!6tr+λR5λ H⊃1R(¹8(⊃tI~α"Vf∪βC@↔ ⊂C9:~) %≥ PJt`(MZN&b∀JQαrtzQα⊗tzV≡↓⋀j>*$zIαR ∩2¬αα:⋀ ≤T≠EhhαQ4Jp).G↓6pr+λR5λ J⊂4U _3λ⊂)⊂πa`U$gg Lπ⊂~¹2J
rtQ(U∀hdSC≠:4MD)~B¬D)It9h∪SjD⊃PQ(T4∈.F i!iQ⊂X
: Xπ'∪1 ∪ ⊃αd~∈) αNVB-∩N⊗∩*α∩&J,~R>J
rtQ(U∀⋀hTSC≠:4MD)~B¬d8→b="λHTd
HT⋀deXTm¬K∀⋀$M(X5$}+∀∃eHβ"Q**pπ#∩Nα: [SIXBIT X '
⊂A≥∨(↓
∨+≥⊂C9:~) %'→∀Jt`(MZN&λ)∃"¬J8T
∀9⋀dM:@λλYαh ∀Y!\]
ERLVL%:0∀∪m'∪!¬%(A9'→λA:-~R,D
D`9βP""Qh⊂n.CE"`∩NAE% ¹4h∪7'∪a
&Q¬b2=6≥∩⊗∈R*α~>I⋀
21αα8T
∀9λ I4p
)Hn.FE⊃i)g)I]_
[SIP⊃¬%(A9≥=_ 6Nαx∃¬⋀X@λ
¹81s1)*⊂n.CE"`∩F@π ∃∃β' M]9≠⋀)5λ↔λ`g∪jλ*h" U ¬ FIL@
C9t~∃ ∀b0≤BU' M]9≠⋀)5λ↔
¹81s1)*)P'U ¬RLAP!\]
λ@ %≥1∩Jdt%0∞ND∩&@"λπ∪Izα⊂&'cbb∩d∈!\]
P~∩$p∞⊗: ⋀⋀`¹8 ODD↓∪⊂~R-∩JVB α6∈NXh"&~pα⊃EAeX4*&4)αN∈La2l4PJRJI¬⊃2∈At~2,$KZ2∈4)α>→⋀
21α-B∞⊗ α≤Dx92⋀h¬∀aQ@⋀fgUαAM R,IMASK ;REH ≠ $XA¬→→∂.↓!∩D u $⊂3@⊂∀ OT @ANDLEB
λ APREH
⋀AHX∩hIf⊗: α&~∃¬~∈&0hR&~9¬~∈&1eX4($b`∩¬%F@HH↔:E-d t4Hλ∞"a←$P∩d∈TERRUPDS
∪≠=(
T
"dX~4X!→∀e$X⋀rd
@".iH05Q$qH⊂)λ⊂U*D⊃0pgI,π⊂ S ⋀ CLLππ-⋀J2RLhRt%8Yd"⋀α1SD
p23↓QT∈D]Qd∈D IFN DD`⊂∀!→⋀e∃αH∀ESt5)~α∈E⋀*f`⊂N R,GCP@ 2}0$%8⋀⊃ D⊂πk⊂∩d∈ GC - LOSE, LLπ'
↓→∨'⋀BB4PJ6 =hY∩¬J↓⊂K\βSueD⊂4hλyα)P)PliV⊂λα20 QUES@)%_∞ 54!P@*YU⋀q(∀¬J⊃∪∩∈↓ ¬⋀fSh∈EI R,S@ 4⊂λ&,jB<T
5αeλIDCQ!∀luQ2$
K⊃S
↓α@
JUH !∂∀A¬→1!∩I ↓Q@⋀fgUα@ ∩AHY¬ "α↓P@*YU⋀q(⊃K
λ∈("∪$_∈Eαd&)-λ)⊗''Th¬IT
λ⋀∪'↔%!≤A⊂h %αd*JIαβ:4MD)~B¬∀P3Hp∈P(⊃&⊂'k⊃i#&'Uβ!P→:4⊂λ&∃~Qα→jEE#!Q hUλIDC!→¬∃∃αH⊃¬ph@⊗T∀)∀DB]cbjλ'i$cRdπ@≤A= A∂-∃%¬→∨\Aβ% ⋀~∀&≤
&≡∃⋀!2↓λ⋀@∀BDX IF OVER T@⊃ 8A→∂'∀~∀%⋀RJNQ¬α∩2Iz0hPα0p)h⊃⊗⊂∀)∀DB]` F EQUAL T@⊃ 8A/
A!β ~∃¬∩⊗∈2eIα>Z-∩~2<*⊂ (αB( *Tp
P@ 2}1D4'9∀2¬xT⋀
∃)~d*⋀α⊃4HT∃∩⊃)⊂+d U⊂ iH$ h(⊃d∈ED↓∪&A$B∈@"λ⊂λ
u0
$Sα@
A∪LA~∀~& 4tλ⊂hSαp "PβALCULATIOL⋀A>2αR"∃⋀b⊗ 4zIα⋀|d
DD(⊂λ"∪⊂ g"λ* λERE DOES @≥∨PAβπ%*∈ $K⊃P@'q0 $h⋀ A↓!∩D u Hλ∃ λαi"c∪βRE, AH@_A]
A"
2∃αRzα∩=αM→αRtλ4 D8¬3λ~α"P*∩ ¬~m_
V6∀*Iαxd¬,tQ∀d
Q30)→β$g#H$g⊂*∩ ¬ @!⊃_Aβ≥⊂A% %*J9ααIr⋀l→→ddhU`hPα2∀J+H⊃⊗
)∀DDNβGED↓!∩D
⋀`93P
"⋀¬∀∪!%% )⋀12
Im↓"I$HI`≤<X@λ
λα ORIGIOL⋀⊂∀!~5,∀λBbDe⊃⊂K\9yU¬-HT⋀`30Q*$⊂πc⊂∃βH∂% LA+' ⊂~∀&DbJiα2b≠X⋀
% ⋀D]bj⊂#∃d⋀@_AM∪5
A= A! 0~∀& "∩%α2a""α""'a`∂MPUP ⊂⋀⋀:αi)"SαT @'%0
(β"B)
S∪ _λ⋀ ∩$∩∩`.α:D`:Q(∪λYβ#j$λ$g⊂(⊃&⊂ ⊂OIH
) H~∀&E∩Jiα2b& 5JλD`Hα.u λαg⊂%∃ij⊂)⊃h⋀U@%8A≥∨%5β⊂∩K⊃P@!2TTjD⊂⋀g*⊗*→∈EβE_ HER@
A∪_A/
A!β ~∃⋀ αJ⊗ aαB∩bα0≥H⊂U*D∀p
$S&⊂$ Uα@
A≤z6∃α,j⊗J≡,r≥Jλ⋀tλ_q(∃ P*`∪E
PDLLπ →PJ6 =hT⋀2dβplEZλ⋀ ∩) 0↔∂∃(A4*J¹4Izr¬⋀βr3JHαi∈Eαd¬OVEM F,(R)∩m' ∩z(R⋀dλ∃¬¬)z¬∀L~HR¬⋀IAP@!33uJ9(⊃⊗∀i"ch⊃&⊂
@!$R4PJ"JJJα⊃1β↓T$↔:⋀$bβ3uHZQS∪jFA⋀d)(
R,IN@)A _~∀%⊃%%¹4↓$Yβ!M!∈@"α%⊂hPα0p)→α⊂ ∩1+∪≥ ∈HKαp5Idb⊂"⊃bh⊂$SαTE@%I+!(AI π+∃~& <βH
∈Bα CAIH
AHY⊗VLrQ@$KYα&→¬α∩1α}2⊗J~dzP≤,D
tM⊂⋀$gλ*dg* ⊗∈E⋀H⊂
RST PDLH4 ; T@⊃ 8A∃+≥!αNR ~-αVα⋀¬$DT ∀`⊃0 )∃h*⊗∈Bα JSR UISTAK ; AND↓'⊂≡XYt`(αP ↔ILL EVEH
)+¬→→2AQ%2Aπ! π.Hh ∃⋀IJ$-∞B2
*T¬⊂# $g ∀PDL
JRS@(αα& 5K
C⊂ ¬∈E∀ ⋀@→⊂β!`⊂Yzd*¬%HeE⊃↔4,∀q(
JT⋀P*∪β GIVE A PDL OVERFLOT∈~(M~.&B*α≡∞~β
HKαh∃*¹84H∩)*"`∩RUPT IMH %β ∩⊗eH4(∀ TmQ(⊃K
λ∈#a,(⋀DNβREMEMBE@$αaαB∩bα0≥Q0 #∪'kP$P ∞OT
∪!U'⊂A
a Y$∩$p
α∩M~∈
2,!α&:α9∀$(⊂
$⊃P("&βE PUSH@∀A→1 @1$JP≤~A∪@4⊂πk"!&'kH$ g"∪ ¬R!⋀B~(Jα*JN ⋀¬E→j@hPα2TJ:λ∩3JK⊂⋀j∈B⋀¬∃!⊃→→≠P&&4)αAH6 hPα33j ¬ FXP,F@1 d⊂∀!~4-)Pλ
⊗3qHaαA⋀iU)*⊂*SαRECOT⋀⊂∀!~5%∃Dλ¬⋀⊂∈&iT¬P(R)
∀∪)%'(A⊃∪
4Ph ∃⋀IIU≤!~⋀`:β("&αDX @%∃∞~∀∪A≠ ~~e$%8iDlU3#!⋀h'k,(⋀DNβFIXNUM~∀%!∨-≥α∩0$KZNB⊗_h"`⊃↔4,Qλ∪hd⊂⋀c'λ ⋀10*<PAGIL¬≥ p4(1nB$b6@3T
⋀$zf`hPβ"TjXU∃∪↓3TQ(→βk"i⊂a&"P∀ ⋀@_A=-⊗J4b6Mα ~R&>ph($*λDd}dW h_ib⋀MJ5EH!∃e≥
8ZB¬Zh⋀t _p∈)⊗ ,!VHWFA⋀Whibjλ-S ∪DF1,,R4∈a:~(∩U' M ⊃αXrN∩⊂a2I¬h4*Q⊃∪Lh@⋀`¹8H∩1ID∩5∀aQR1SDλ ,
hFL λ
4r∩D
∀Q(→3Qα'i"VbSαABLE INDERRUPTS
STRT ULRECOTλ
∀∪M)%(!R4PJN.⋀qα∈∃"0⊂K8(∀≤ZλIr¬z D-Q3λ H∪SjD⊃0TJ¹85β"A∀∩TTjD∪∀t
(5β"A→Ttλ
⊃spJ)b.pJ02`⊂∃h⊂"$⊃P"i)bj⊗⊂⊂e"⊂)QbP$cβEfgUαAI A,NIL
HRRX⋀A)(1≠
1H∩w ≥=+∂AA _A'Aβπ
A]β&A¬∃→ββ'∃λ∩(LBJJI⋀!2>N≠⊂%nRD*J,+∃bα⋀_d⋀t}ED¬$DY`⋀$z X∀T}!Q L≤→→D*⋀EE¬≥⊃↔5∀-8H∃∃Q!∩⋀≤→_r¬%EE⋀5E¬⊃PPJ⋀ %∃≥D
⋀$dzf`hPα2∀J+H⊃β aY∈Eαd))-λ**⊗'&!Y∈B⋀a`dS P",(P ∩~(∩Aπβ%∞A)(0Q~¹2αH4(∀⋀⋀U∃:@λ
λ⊂∈'k
⋀A⋀e)j⊂∀∃∀D]d⊃i"P$P"`∩RSET'S ARROR E@1%(∩(hRB$β∪uFg@4q*KS(∃
K3qQAQ@⋀fgUα@
Aαb¬HQ!∃¬-9 "¬αβ⊃4J*⊂π ∃ ;UNDM S@!∃∞&∈bα∀hI∀`(βiV⊂∪'P"g∃dg"∈T)'j"PβP &AI+≤4PJN@%*@λ 4s0) B2J*uλ∪ ~t⊃sa⊃,¬a$P)"iU i*∈Bβ≥ba)⊂αAD UUH∂∂DA++∨≥_dA-*6≡¹18αVV><a`4!Q%≥0U∃ A23∪λp3λ h"`∩ATION↓β∃λA5 ∪∨%dA-∪∨1β)&|qα"∈t"2∈HhP4(Q(U∃∀(_C@Yzd*¬EJU-¬8¬C!↓33uHY(⊃βλZTTuHA ¬⋀iQh-&@ JPCCAT ;TLπ⊂≥αd
R¬ααIr⋀≤X@⋀U⋀1Q LzhR⋀αβ∃5)Yβ"R(H∩5
5⊗c"A→TTu⋀53qiF@∈E*Uecf_Nα MOVEH
Aλ1 %%'Yλ∩(Lj>@4TλBe-Yxtd X⋀β! ,¬bg⊃⊂ c'λ$j)F*jgcS→→∈E∩h⋀$ SUBI D,THIRTY+% ;SEE IF LOSANG INCTRUCTIMJ GAS AN≠X
IT$ TRLN D -1
IT$ JRST $XLOST
IT$ ADDI D,THIRTY+5-1 ;EH '↓≠∨-↓!∈A¬¬π⊗A)<A→∨'%≥∈A∪9'(~∀%'↔∪!8A-≠ I$∩∩wM↔∪ A% A+'∃$A⊃β9 → $4∀∩A∃I'(A+U∨∂_n4∀∪!+M⊂A
1@Y %%M-λ∩m3 &↓' (AU A+'∃$A∪≥Q %%+A(~∀∪A+'⊂A→1 Iλ4∀∪⊃%1∩Aλ!λR
∀%⊃%%↓λY+∪5∪→=Y AAAβ%n&db⊗≡∈bα6B⊗∀
R&>ph(&-~")αbV&: h(&B}↓α~bα¬D-∃*:d hαB4 zλ⊃V
¬⊃β"A→TTu⋀∈K⊂⊃**TuQ↓⊃.p "h'i"H&`ad∩e"P#∪ ciF⋀A*jcf≠]αbl!dλ"⊂ ERRSVD ;@≥↓+' $↓⊃β≥ 1 $
∃%(H∩]
β→1¬*V>≡c@$%N≥∩∈Aα}*QαRzα∩%AQ# αA→u-%8¬∀D p4pi≠U∂r)⊃1p)D∩3TjJU0u →β`∞ - BAD↓ %%∨I92$hP%↓:αh∀e,QQ h_ib⋀MJ5EX*ZT|Gπ M≤ZK hP~9∃D~D¬dz8U`↔:D,Dβλ⊃λλ∃q$zQ(∪ zr3QaQ@(λ∈⊗ ¬F*kS ⊂∩h$Rd#D]Rf EGAL OPERATILπ≤~∀$h``β↓A12-∩JNZ H%n~-9αB hP4*Q⊃∪@¹83Q H∩1Id∩5∀aQ@↓Gu0
g+"P'∃$ bgλ'*$"⊂" iU"i⊂*Ugbbiλ*jgc⊃i⊂!"S`di⊂∃e'k"⊂'k#∪ i⊂*S!&"iλ i~⊂b"`bλ cXP∩d∈TNCM BADMB~∀4⊃'+¬Q)_∪≠%'π →1β∃ ∨U&A ¬I_∞Iαα)u-$α3Q*¹1"C"J3sUHW@⋀h*d!⊂( '!ggFE⋀fh∈EI B,QNUMBE@%@~∀¬*N" ¬↓2b∞|rL4(L2∈
α\rV&
-⊃α
Vt~R&>p⋀¬∀
JZ$t1λ∪IyK3U)4R0dP3∃(T4∈FEαe))jλ*jgg∃&∈E∈B⋀A'*∩$bg
αhπTA↓0∞&2d*≡∈1⋀*2⊗6,rQα~αYT⋀4H $U∩↔SαTHCDR!P~~(∪∃%'PA≥)⊃
λj4TrR"⊗⊂π M≥H⊂λ d∈OTA P@%=!⊗I⋀b&NQαi↓α~$A6 5Iλ4%∩≠QP@**5"⋀h¬∩λ¹8 C"IH4p
"≥⊂ ↔TA [ATLπ⊂⊗&ET@∪↓≠ ~⊗α(dd}t≠Ehh*Yd4dZ# LdX*"¬]9≠⋀)5λ↔λ~R5∩ 5∩0d3Q⊃*S∪ud↔#"AQQ0@~∞⋀f"i⊂-adV!$j⊂↔#`∂ OUT OF CATCH-BREAK DAMJ#!!\Y¬
ADEAD: JFAHλ∩m!+'⊃(A∨$A)%'(AQ⊃%∨+≥⊂A ¬λAβ%Iβ2A¬"H4(Lj>J⊗Jα¬2∃
2L\~0≥H@⋀ e9t⋀<-D ⋀-∀T
dL
λ_4 dβ p)(p3∪↓Q@⋀c PP-`i hP"⊃c$g$U$gg LOST↓]
EG18⋀∪+∂PA7≥∨PA' 8Aβ&AA%∨∞AQβ∞C:4∀∪∃%M(A∂H~∀
∃%≥)≥π<p∪!+M⊂A Y⋀∩∩g∪9) %≤↓β%β5∨+(~(∪≠∨-∃∩AαY=↓β%%¬2~∀∪∃1π⊂A⋀Y-∨¬¬%%β24∀∪+≥1≠π.Hh(&-~")ααbα∈∩|⊂4(~ uᬬH⊂hPα2TJλ∩3JJSMβ!(P1∪h≥c PP-a Q⊂+ f∃bP#'⊂#a ) lPWFE∈Eβ≥b#(⊃i⊂""'"a RAVER P@≥∂∀A!
∂∀bA:
~⊗Iα≤∩∈∩αα≤hHU∩⋀8⊃d$,(⊂h∃Q⊃,Dλp+QλVc"C!(⊃P⊃*'B4∪j (⊂ ∈ B4 Zλ∀ λ B5jH(⊂
k'g#@ FORMAT % DEFP@%= C 4hP&*≥!αα⊗5αJ>@hP4*∩,20∀4NB*t∩(
¬ #"A~⊃tλ
¬⊂#"A~βj @ YP∂%∨9∞A
∨I≠β(4A↓
U_C*~(∪∃%'PA↓
U_⊂∀!Q%∀
hZ#@!5u⊂$ qSu⋀λ(⊂λ)∪βPEBLISDZA% Y %'=_
J⊗αhU∃≤Uye∀0ssH∃β`h(⊃g"↔g⊂e`∞C!]
α JRST REP h~(~∃!≥≥
t4Uα2∞∃λπ J-zH∩⋀t~8U⊂HαB2J*uλ &%∃
#!↓αA' bi≥⋀dh!$U⊂. j∪βH ∪↓'3≠¬=_A% E+∪% ⊂C8~∃M↓β '@p∪'∪a↓∪(ApA¬βλααNB∈≤)αR⋀)↓5α≥"∈BVα4∃`HαC"AQL¬P≠≠ INCRED@∪¬1
Aπ¬=∞-α$yα∞≡u~RJV≥!α∈9⋀*JJ⊂α6⊗N≤
≡∀∀SY`≠Zλ9te$→→dLQh∃ λαP' SbP'cλ* "P⊂h( ∩OPRIATE CAR,ππ $↓
+≥πQ∪⊂≡eaP@! ¬!`K ⋀EBh∪!+π A¬ "α¬E@:r6⊂I~α⊂&$S&"c`W,¬~∀%!+'⊂↓
1 Ym'∪ "∀JQαrbα∩∈-bt4!~¬-≤αλ⊃K
⊗ti≠⊂R5⋀ ⊂∈P⊗H!l&.CE PUSH FXP,[SIXBIT \R!!⋀BA9:4⊂
∞¬t"∃EHM"J:9¬!1]0h ⊂**5"⋀8⊂ HHαY∈Eαi'j∃⊗⊂
"4⊂λ&∃~Qα∞λ¬d$,#"H`W""≥ MOT¬⊗%⋀!15ED2bA⊃Q LE)I∩⋀λ∈_≠ ≠_⊂⊂
λ¬πα]⊃
ft∪I_∞@"λ@ ∈ ¬⋀fSβP
↓)(@1<λ4(~J$`(αP ∀0b~(Lj0≥Q2(
λ∈∪bβE IDPB @)PY~∀%)%≥≤ααQ1β↓AA@hP&*≥!α∞¬t"∃L4PJ6 =hY∩¬%EDu⊂H!→∀%⋀$
E"dAQ J-zH∩αk5λeEαα#"A~u0@⊂,(⊗)
β0 ⊗ h ⊂**5"⋀8 ( ¬∈Eβ≥`∞ILSETQ↓)' % αbN-"EαNαIu∀-(∀jtQ1$λtp
'≠P ∩PLCA0 RP@→π⊂`A%!1∞¬E¬∩B2∞ ∈∩α04TFλ( 0**Lλ (~TL⊂D⊃⊃q*J(∪⊃ λαi) L@ β→I β ¹2↓→∩$)eαHH∃$4C"AQ@∈E'∩d⋀SETQ:∪!U'⊂Aαb⋀%8⋀si(∪Q*(α⊂ ∀RIED TL∈A' Q"A:La1αX≠∀(αX∂
PU@' A @2≥α0≥⋀→!P@!0p2(T∃ ∃I$f∈Eαe))jλ*)bj∀D@ ;NL∈P⊃↓="P≤
4
$,IK∩⋀
λ¬∀hZα(V⊂∪`h BE?
∀∪5_∞@4Y∀⋀
∀3R)Jq0
(CE %FAC NIHIL
TSETQ0∀∪
β∪
APY-(~(∪∃%'PA1' Q"∩\r0~λ∩(λpπ∪jλ%`∞OW W@⊃βPA∪(A]β&B~(∪⊂⊗4*%α¬e
RN⊗αJ⊂hPα)1H_h⊂ "$j iCE
XSETQh∪⊃%→4A(@¹2
BN⊗λH%nλ→d"¬h→E,*λ8Tdb¬∂e∀∃∪h tq4AQ@⋀fgUα@ ∩A⋀Y# "α8U%λβ"B$P0h
4R5λ~c"C!)j'i⊃X¬0∀∪A+'!¬↓2∞NαIu∪¹8Q*5$}(XS@!2⊂ )⊗α A,-2(P)
λ⋀∩K="¬αnα9∃D~@¬d⊂⋀b'h⋀ EVAHλA$yα∞yxB⋀
*(∃J¬(Xd-∀Yh4*αβ(∀jtQ(+K ∈E⋀SdπVEM A,-HQ @$hR≥≥Iz# 7@⋀h'T%⊂ ⊂,SP ∂%∀h 4(hRJBH8∪βP~zD
¬8(∀"⋀~(rαjλ⋀T H0p ⊂WF@
JRST RPLACA
RPL@πλ`PJP≥⊂(⊗h b⊂ π -↓%!2 ~⊃∈QQ LU*:B¬∃ H∀¹8β"TJ⊂p _Nα WTA [P@+I
Aβ%≤@ZA∃α2∈∞λ⋀∃hhαB2J*uλ∀J⊂0p!QTT∪λb_]⋀UβP αAm!+%↓β%∞4A%!→¬∞⊃hh ⊂**5"¬* D ≤AQ hRX~%∪⋀↔!∃ :α P-UβRONG TYPE ARRAY ~A¬%%β3
β⊂∩D≠PhPα2TJ:α⊂∩`)_!∈Bα β%H`t="¬αntzQα∃∩∈eαα tLU⊃4D ∈E∩Pi)_!∞α MOVEH
AααaE"⊃Hh ⊂**5"αX~%∪¹8Q!P@⊃⊃q*J,¬⋀c⊂aP ≠CAH O(αα≡⊗Q⋀"∩Qαα;∀lyDαj⋀h~4d|_@λ+ ¬&"⊗ ¬RRh∪⊂∩⊗α*"¬]9≠⋀)5λ↔λ b⊂+⊂d⋀UE FOR "PURE" - FASH ∂β⊂C9:~(b`HA1 3 ∃⊃`⊂HZ%∩¬8⋀r+λR5 HP1⊂∃αALUE BORU!+∀)↓5α4
N"≡ !∈rthR2$→J$, K↔ hPα1P(P-dg⊂βH∂%%∃∞@$β⊗( ¬S@)∃λA
βM→∨βλα
t4!Q$L4Tλ$L<βP
f ⋀BFLAG ∃πa
→β∞αb`_hαS⊃λ~α"T]αha$cS*fFEαhb'jP&"FEαhagfT&"`_
λ⋀∪# U!→ @h ⊂ ¬&"⊂h⋀E@$βP4*"p⋀PM≤αr4λ∀⊂+∪λH5⊃.%Vh⋀ ∀$~∃⊃≤α &&4)α¬2d"∈@$T∈+&5∃
#!,¬∩m ⊂~⊃⋀z→α_hR⋀_ye,(H$4d_p
Hl#& FA$' P# iR'"P~ MH∂- $AαY#!+⊂~,hR&~∃⋀B0∀\β∪qe(R1sJYαU"!& c@*@π1
→¬∞P⊃αd*IMαβ:4MD)~B¬Dα3@⊂ if⊂$f"Vλ!*`∀↓_
>Q⋀J6BHYT,U⊃1⋀ 3H∃ 4h∪ ~tλ7 ¬∈E αSEE DBCONS
α.SEE CX@π⊂≡~α1PRu8XR⋀¬λ9t`*c"R(hαP"!& c@*@π1
→¬∞P⊃αu*5F6α7"¬≤≠λ$Mλ⊂∞!SβH
&A%_ α∞|jB&2,!α∞xHRb⋀*ZB⋀z@λ →αh&"Sbg""Q⊂ g TH@∪↓→∪'¬8⊂∀ c\α0ThZTH⊂H~q0@⊂ d⋀VERR %LNERR
IBSERR: MH∂- $AαY∪8b`~∀% 1π⊂↓αP∩ZL∩∈N∀hP&BV≤B)αAdr∈.~α1P@Yzd,Jλ!E L(~4(!~¬- $¬αλ9tuQ!∃¬-9¬α:(C⋀∪≠QP@Lh_2¬\(_B¬4→JT*⋀iz"⋀L(~4*
QQ hT(~4-!→T}∀Y∀⋀
→b∪H!_UD⋀λ∩e4(~4(!~¬- $¬αh9teQ!∀l}hY∩⋀J_$
≤QQ M¬Z9⋀R¬¬K⋀≤sPc!!4∃4i⋀∀ ⊗j
R3R+"B1H_h∩pHλ∃P)1(⊃IZH⊂P*¹8(7#! ¬$c∪⊂*abS"iiVFE∩f∃ ¬RR~ SEDZ A,
EPCH A,V%LEVEL
↓PUSH@∀A@Y≥π∨9&~∀∪5∨ ~⊗Jα↓2E,b⊗@4YAP@M
Z4DRλ¬ED≤yj0hPα4∃*9λ⊂ Rf+!R%nFEαc aP⊗βBAD↓(
∈¹2,)α~⊂αBJ&tb⊗@4YD∃h!Q",DβQ4J'B4q*KH⊂#↓Q@⋀bl⊂d⊂ F∃α%LENGPH
PUCHJ P,NCKFC
MOVEI B,Q%LENGTH
PUCHJ P,XCH∂≥_h(&-~!αAeY⊗"h9⋀]Q!∀4 4 4⋀ D
d eXT⋀4}$
¬∀iHTtu∩+"C"KQ ".hYβ"⊂'⊂ c'λ*ibf⊃iiFEβEβ≥g$d∩f⊂+"$j iH(*`∩ITAS PORPDL POVFLP POTFPP POVCPDL MESIAJ UJRECOP A
1≥≠ $α↓∩∈J-∩Iα∈
∩⊗JI⋀2b:6-⊃α:¹63→α∞∈lj⊗Mαl*M@* XU≠∩ XU≠ D T-≠↔λ 4l&$14lF⋀⊃14f&(⊃3*6,H⊃)Zl,hλYαiXJH"fiXMα EMS18 EMS21 EMS22EH &dTA ≠HhA ≠LdrA 5&fbA∃≠&fhααN@%*H5∩¬(J$k
λ(E∀k$
$%V4¬∀%)P
⋀
Q∀S&T∀Q∀IVH⊂ "&[P)⊃)&T⊂")&@9 RDRM11¬
λSUBTTL A PANDORA'S @OX OF ERRMR MESSAGES
NIHIL: SIXBIT \@≥∪!∪_A `A≥∪⊃%_@ZA⊃∨∀O↓' )↓_
&1
`4(4*J&R
→iαNMB
&Q¬bZ⊗JM"∈Mα *R⊗Jt ↓5α$z9∞Q¬~⊗RE¬!∈p4PJBVJM"∈Mi¬~&b
M!αrB-∩&@$~4⋀t0q4j¹8(⊃4jD (⊃ yIuλλh∀P)⊃s ⊂⊂$g"$S!iPnβEh'("&≥αidl!∩j⊂&)⊃cP "∪⊂'k"#&'kHn∈E⋀T'k#&∀≥⋀idV!$j⊂↔#&'g∃dP ⊂DL OVERFLOW!\
POVFXP: SIXBIT \BIXNUI @!⊃_A∨-∃%
→∨\C8~∀%!∨-≥α∩1i¬~&b
M!αrNαλT
¬λIB⋀}hZ$4zt∃`hαB3(Zs02G⋀idl⊂$j⊂.&]f`'i⊂)⊃ij i∃⊂*g"⊃i* eQg(∞M!\
α UNRECOV: SIXBIT \^M;UNRECOV@ %β →
@Cp~∀β
1≥≠ $h~∀αI¬% %h∪'∪1 ∪(A99∨≤[
1∨⊂~VjαP∀JXR
Q!∀L
(Z%∪Q!∀5iXU∪~9∃D~D¬dyeT4 jTj¬h→E,*≠APT$$A∀$iXU∪~9∃D~D¬dyeT$}X)D*¬h→E,*≠APT⋀A∀≥DiXU∪~9∃D~D¬dyeT≤Z D-B
h∀e,T≠@hTK⋀@L iT-!~4MD)~B¬diybl%Z D-B
h∀e,T≠@hP→iU3!~4MD)~B¬diybluYXU∀L4
d eXT∃`hαR1ID⊂R1i3*pkS⊂1eA3S5FWB4r+λR5λ 3P0h4⊃⊂(⊃(∪JY10 $Pβ VALUE!\
CAMMES* SIPBIT \FIXNUM@πβ≥↓β⊂≡6αλ∃∀
λ¬∪dS∪sJBIT \HOW TH@
A⊃∃→_Aπ¬≤A)⊃%&A¬|C8∩]M
A⊃!π ∩λhP&⊗¹6≠ Ih≤Jb
"αrR≡zα6∈Jα& 5HZ%∃-λJ2αjλyr⋀
x≠∩
Q!∀,4h$g↓4r6λ 5λ↔ tu⊂∃ibi∩d∈TERRUPD↓\ ∀∪∃≠&bh∪'∪1 ∪ Ae*2$Xi∀t1λ⊃JYPp
$SβH A∪8A++↓∞∈2b
p4!_Tm≠⊗g M≠λ$Mαλπ∪)ZQ(∃ λ3H
$λ4Qtdβ"B(YαiP@88⋀∪'∪a↓∪(Aq
+≥πQ∪⊂≡d
Td⊃1R)hαb⊂ *"a⊂hj'f∪βAD!\
∪ 5&dbt%'∪!¬%(A9∪5!%∨!∃$A+π∀A∨ A5βπ%ZA -¬_C(~(∪ ≠Hdt∪'%1¬∪↓9∪→∂0A∂∞A=$A% Q+%≤4A≥∨↓∪∃'∪⊃
AαAA%∨∞Cp~∀β 5&djt%'∪1¬%(A9+9 -β→Uβ¬→↓ β)+4@ZA Yβ_C84∀∪ ≠Ldlt∪M∪1¬∪PA9
∪1
A
∨PA
∨+9λC8~(∪ ≠Hrt∪'%1¬∪↓9≥≡A
β)π↓
∨$AQ⊃∪&AQβ∞@↓)⊃%∨\C8~∀% ∪&Dp∪'∪a¬∪(Aq∪≥-β1∪λAβI∞A)↓∂ ≥'e~C8~(∪ ≠Lht∪'%1¬∪↓9≥∨↓'#¬↓!∨∪≥Q $C84∀∪')I)π$t%'∪1¬%(A9=4C8~∀4∀w% ¬ $A∃%%∨↓≠'∂&4∀∩⋀∪I %~h∪'∪1 ∪ A9∃1)%ααα≤D~*2⋀d DM≥D¬R¬∀X_DdM:@∃`hαB4HJS,NA~r6⊂Iλ↔∩)⊃1p)D∪pRHXuλ∀iy11rλZQ(∪j$∪u∩λZH (
01λ+ B4HJS,nA~r6⊂Iλ↔∪Izλ⊃3I1rλd i)H$g⊂&∩ij⊂⊗H)"`b∪$ij⊂W∈A⋀i⊃)&Z≥αidl!∩j⊂."j⊂!g*"l*λ"i)'⊂n∈Eαi")&M]⋀idV!$j⊂↔)"`b f`aiP!gg∃"l*⊂⊃i)'iλn∈E⋀")&[⋀idl$j⊂.& ij ⊂&didg#Pλα)"!\
RDRM7: SIXBIT \BLAST? - READ!\
RDRM8: SIXBIT \NUMERIC OV@ %
1∨ ≥↓jαJ⊗∈
p4!~$%W↔ M≠λ$M" IU,eI~⋀d*λ⋀t I0r3Ht∪00jth∀HZ∃0SHλ∪Si3R3⋀λ1U⊃*$λKHD¬+(∀HX1λ7↓QB4Q
,,.A~r6⊂Iλ↔∩)⊃1p)D∀Q5
ZSH∃H∃1(λjSs(
:∪∩0i→Qh∪(_tSh¬(⊂Q(λ7β!"C"@↓Gq0THZPh⊃**Q0 'H i"i⊃i⊂"k⊂d⊂∞AEP
β8b@M,"Q↓:αXE#
¬jT%#!Q hU8X%%$A≠∀-α Yu∀(∪2*8q3∪λ→β"gjP"a)∪βR @%=+!&t*L4(hP4*⊗α*$-∀4∈B*tλ∀¬H ⋀D]S$ebP
¬RROR ECG ARGS)
α LER3 1,@ ⊃$~∀4T*JJ⊗α)s@!33uHY(⊂ ⊗
!∀FEαhπTA↓0∞&:4
2&⊃⋀*JJ⊂⋀⋀9⊂3SHYα⊂ ∪PEC@∪
%∞∈RLz0∩
β#"A→TTu⋀λ4TQ*(@∈E∈B ¬RERER0∀∪5≠ ~⊗Jα⊃2E$*JJ⊂h ⊂M9y$
¬EJ3∃h→@hPβ"C!λαk f αA0∀∪M+⋀Aαb`≤⊃0 # fbV &"`∩FRAME] ;CLEAR OUT ALL OF ERRF@%¬≠
4PJBVNDQαA≤
RaTHH%nN
2∃α⊗4*JfRLr≥α∈t!α∈Z aα⋀∀PJBVNDQα
λ¬E≤
dYSλHα.sj(α g ,P# Rd⊂
ACT EBRLπ$\~(∪!+≤B)αAd*P∀AQ$-P3 F↔@⋀h*d
FXP →%M(k~b4⊂λ&∃~Qα≥"aTQ!P@ ¬∈E *b*
αi` OTTN A1
0G¬8∩∩αw
_∞ ,T ⋀-∀T
tD3H⊂iYαh$f⊃b⊂!gQ ¬ CALT
JRST .UDT2 ↓ ; FIND A TAG FOR A CLπ⊂⊗B-"⊗⊃↓∀:0~⊂β"B*9p4∪Dλ4TTjFA⋀P))b ,¬+ (βλ4(~
U≤Bλ¬DλhαB4jJUλ &T⋀[SIXBIT\X
~W%_ ↓eh%nVα8R⋀m8xdL⊃0 Vλ)` NCE UGT BELOT∈A/∪1_∩(LBJJ$λ"bk∃
αHHα".h5λ∀HZα*`∩N ADDRESS
HRRZ AR11(
6N<2& $X⋀c!⋀j&'H i_@,200 @`⊂∀!~¬-≤α∩H
¬⊃0 )⊂b_DDB]`g"λ()$g∃⊂#jjλ!*g THE@%∃
∨$~(∪!∂↓ Yα~(X
V ∈∪@!51u⋀ h⊂
g⊃ ¬FINED COMPU@)∃λA∂↓)β∞Ct~∀⋀zB)αα¬@hPβ"KJ∃ FA~q0
-∪P('!∃c
SETZM P@≥¬U Vb~(∪' %R5αBt∩V→⊂h &6}2⊗%α~aEAaQ LzhTJ¬%Ee,%FAP@Yzd*⋀~ %Km
_
X_⊗⊗∀'!*c↔FA⋀e∃dh#bH**⊗↔YFE⋀SdπVNS TT
%NEG%
∀∪A+'"RαA2Bα)∀`),⋀FEαibb'SP PNF α MMP
↓
"α⊂4F∃ ∈E⋀))b RINDERN
λ; ENDC@∨ ∀A6M,"Rd∀P1n⊗≤⊃Qα^t
⊗JI¬:0∀ X $
1H `H(c⊂∩A QF #⋀A++∨ g∈A U≠⊂gα↓+#∨+∃$A+ =+
bAU+↔+HA !¬%→(~∀4∃β'Xt∪≠∨Y ∩Aλ0`∩<r∈⊗∪P&∞∈l9αRQe 4(¬¬~.&BλαRQ¹2\j⊗MMh%nR|yα~⊗8α∈J_h(%↓⋀j>J⊗JαRQ2l*ME@KZR>=⋀j∈:E⋀
J∞LhP&64*5α e
→FN⊂h(&-~!α~E↓2RPhP&*Vmα9α⊃e:2∈⊗⊂∈⊂HKαh⊃⋀ M( ⋀-H∪ ~u∩3Ht⊂3∀HX1⊗(λqQ#!↓4∃4i⋀⊃R∀¬JA"B*4r∩DλT⊂ I4q⊗↓Q@⋀h'T⊂#$( )αE+SαAEBDpλ&"e∩aα bBA$Q!∃¬-9 "¬αKλ4`9β)FEαdgk"SP V∀∀∀@
PUSHJ P →βI∂'π(h ⊂M zα⋀∃α⊂
β"B)*Tq⊂∀c_`FB⋀¬∀~)# gαβP&N9~⋀
¬J@ d¬E@Ds:αw¬(A)⊃%&A!∨%_
Q1¬:∃α∞α(∃α⋀zZ@hU_f$ Pα(∪)Zβ"dP∃*∩&bXXλ
IOVE T$R
λ PESHJ FXP,@→∪M)0~∀%⊃→%¹4↓XQ$~∀&U*6B→⋀⊃19⊂h(&6}2⊗%α⊂bF (α".j~αb`∪TIK@≤A5β%⊗B4⊂∪! M⊃∀A11π∨≥L~∀&-B≤Bλ⊃BEαα#"A→Ttλ
0p(J@∈E(_`]⋀T*id%λ(∩'!d∈S
POP P,B
PUCHJ P,XAH∂≥_h(%⊗αyd
λ¬∃¬ B2J*uλ⊃*H3β"AQA"U*pλpg↓4p5HT⊂(⊂AQ@⋀fgUαAI T,EMS18
∀∪)%'(AU+↔+D~∀4U*V.↓α8∪@M8~d*⋀∀λ hUXYu,-'!∀l]hY∩¬"β⊃3*6-#"JZ3u1&↔@⋀fgUαNI A,LU@+M(∩∩wU→∩⊗4J2,D
U,Zλ8∀dQ!∃¬-9λλk∀ ∃*Yp⋀∃f∃hik∀⊂TBE⋀Pe`
L A( ≤ZD~∀¬*N!α5BA1h &∃∩`∩⋀∃FC B)*⊃H
E".u)hα"c⊂*g⊂$S⊂*`∃O CALL (GR AFTER AUTOLOAD
∪!= A
⊃@Xh`~(∪≠∨-∃∩A(Y1++' 4⊂∪!∨@A
11++∨⊂4bQ(R4∀∪'∨)∞A(8Zb~∀%⊃%%¹4↓(Yα~(∪∃+≠A≤AαYU+∨+H~∀β⊃I%4Aα0h`~∀%!+'⊃(A I A%∪≥(4∀∪→ I$A7'%1¬∪↓9+≥ ∃
∪≥ ⊂A
+≥
)∪∨≤↓ββ→→∃λC9:4∃++∨U
dt∪A∨ A1⋀∩∀∪A∨ A1α~∀∪
β∪
APY#+≥ ∨#≥λ4∀∩A∃I'(A+U∨⊂aα4∀∪∃%M(A+ =⊂gα~(~∃ ¬∩& 5G!∃≤~ b⋀-**58H↔8U∃z$¬¬→jD}5β"A∀∀∪t $∀ β!↓2TTjD⊃4∀I #"@↓Gq5Lh⋀⊃5Lh∀⊃5Li$⊂04∈((∩0*∈RH∃i f_⊂∃d∈ALOSE @/9β⊂bAM)β%$↓+⊂~∈4zN∃α4
N %X⋀@⊂ if*R⊂# iS',⊂#⊂ib'!H&"#")
@ ,gλp∪'↔%!αA1 →B⊂h*-d8∪PJ E∃Rλ⊃D
∪⊃Q J-XHb⋀lX6PH8¬3HH1R3Hλ⊃U)Hu∩3iD⊃pRHXuβ"A→TTu⋀5H
!βE
ET⋀g⋀t%⊃→%¹4↓αYβ$D~∀%-*∩2λYU≠ ↓⊃∪@¹8SH∃)H⊃1HλU⊃4Dλ51∪ip1β!↓2TTjD⊃5Mλ⋀¬α
IAP"A8 TDZA TT1)(∩m+∃ →∪⊂~⊗ ⋀⋀4r x$T 8¬β! 04 I'@(∪)zβ"dP∃*∩"fXX⊗fQiZD]'⊂ ∃ND@ A¬
) ⋀αα∈FR|b0≤ AQ LJ+"⋀Eλ2Hh!~4\M `λλ ¬⋀P∩))-⊂⊂T⊂λC)
∩KU →αl*ME"αJBHhαB2
*S(⊂%E⊂j#!↓2TTjD⊂⋀f( FA∈E∃d∈AL08 MOVE D,(TT!
T@→≥∀AHb$∩w'↔% A&2α2NV∃⊂4(∀ %∃≥D
t`(1Sth UsH→α'ibNαλ
⋀∪A+'↓↓
1 Y1∪')0$∩w2M~R&~JαVAαe~V
I⋀
J=1Q LzhTJ¬J@ 4lD↓⊃.p
iQP SU@R MESSAGE
WNAL12 MOP
↓XQλ$~∀¬*N"$
αeD9ye_↔84`9β)P#∃e!`∀IMH A≥¬≠
A∨9)≡AβI∞A2M~P$!~¬-≤⋀
αdλQ!∀luQ2$λ+∀3!⊃,p
iQP∨P#∪βR ARGS @'A ∈~∀%∃%'λααF→Fλh (αTuλZTNB)Yβk"dH ⊂ (F)
αWNAFOSE8⋀∪≠∨Y ∩A%!26⊗≠⊃D%8¬4hT⊃Pu()⊂&bi`cbCE JRSP @/9β⊂⊃DhP4(Q)∀4rλB∪α1Q$4
9JU∪P~(Td04q$⊂∈h!K⋀@
FASH +⊂h∪#≥→=∞.⊃Q L⊃0 )λ-idl⊂αIT \@πβ≤OPA↓ ¬*J&~β∀⋀DLyλ
¹81s1)*⊂n.CE(
8π ≥λαα0≤2 _d`$⊃ _βE
FAS@→≥`pλ (αT⊃dQ4q5 (∪⊃
p6C!(#R⋀bj-&H&",&∀!FE#⊂i` NC8⋀⊂∀!→¬∃∃αH⊂%⊃⊂Th~@∈E⋀T*id%λ(⊂ $CLOSE
λ⋀∪→ I$A7π%1¬∪↓93∨↓⊃β-↓%+≤A=+ A∨_Aπ∂%∀@ZA
¬'⊂∩≡ !∈rtKZR>R aα2z:0hPβ"SλHβ"`∩R8⋀⊂∀λLBJJ$λ∩ddH*4
⊂β"B*4r∩D
λ∈∩!S'ibFBα UNLLππ.Hh &6}2∃α¬db∩¹4h→PhPα33j dP! (c iS'`b∈Bα PESHJ @,XC@∨≥L~∀¬*N"$
αeh)∀`(α∈E⋀h¬B P,R70-L@ !∀bM-DhP&~∈~α`≤¹4→HR⋀z@λ →β⊂# d#`bλ!'i&Ph⋀!]
λ⋀⊂∀!Q c\β∪0HZTH∪
∀S⊗Dλ⊂πbi ¬ GETLE GEP 2+ αN⊗αJt`((⊂ dd∈PE PROPER RMPER0 LFYE@$αα≡⊗:α;∪B⋀~(t9αXλ AR@∂π~β↓α∈J<~5Eα
∩≡∞T⋀C!⋀¬∀~)→≠¬ I$t&-B≤Bλ⊂ λF@
MLπ ~∃¬⊃2P4PJP≥⊂(⊗h b⊂&⊂d¬BDA L@∪'PC:4PJ6 =hT¬%"β⊂c!⋀e))U⊂ PLMB1
LXPRLZ: L@ %$αα`≥≤α6⊂I~α⊂ ≤TLπ⊂≥αl
0∃Jλ~$=~λ¬∪d⊃0 (⊂h ]
λ⋀⊂∀(It-∃(W L3uQ)∀⊂+
λ∀@
Tπ ∩¬¬Yα
∈ ⋀⋀,Qλ∃λZuλ⊃Ii&P⊗H ∂!]
∪≠=(
∀λ"bD∃⊃P@!2TTjD⊃∪mλFA∈Ebj&"Nα E@1
⊂AαYλ~∃∂ Q→∃PJP≥⊂(⊗h b⊂&∩ij⊂⊗H πE@)0C:4PJ⊗b∞@⋀⋀
D!Q LU*:B⋀≤X¬∪↓Q@∈E∈BαSE@)]_
¬!~⋀mα
¬DλhαB3)Zβ"dP⊂α,QSE
~∃≥ ∃'¹2`pλ%⊗αzD
⋀YZ3≠λQ!∃¬-9⋀¬αd⊃Q LU*:B⋀<Yj5K¹8Q!PT
(x4k!~u$
8∃∀:
Itj⋀β⊂4H(∪tDπ ( $λ4Qkj¹85⊂4Ht5#"A→TTu⋀λ4QpiY#"P*ps,π!33uHY(⊂@⊗ XT)∀B]`∞OTE: FLUSHES FLAGS @∪≤αα2∈~α@λ λ3⊃H!Q@⋀a`Re⊂!,ARGXX
∪∃I' AβI∂π
λh &∞ b2 ↓α!E ⊂⋀ijβE MOT¬⊗%⋀⊃2FN-"∈J≤hP&*≥!α∈J<~5HQ(∃∀≤9P '⋀h"iR%⊂ ⊗∪αC@∨≥L~∀&lzP∀∀λ"e ~(phT~(t ,NB*4r∩D
⊂0iYβ)D]S$ij$,P cPdg⊗⊂dj$'Uj⊂&'dg#P⊂α
α PUSHJ P,XCONS
%FAC MES14
~∀_w! Iβ↔
9')∨→hA)3∨¬∂
A∂Q%∩Jα⊗ <hZ"¬∀IId-∩λYt4* →∀|-*$⋀`93q4J$∪04
yP(∪(414D∪∃⊃*$⊃∩4jN(∀jZt⊃#!!"T∃
(rq.A~∃0r⋀
⊂#!!33uHY(⊂+¬∃
#!!)1uλ∀⊃34f¹6β"B)YuQ2$∃
λ∃!"B*tλ∀¬H!"B)*Tq⊂∀*)!dFE∈E αSTOLX: PUSH @,@⋀⊂∀!~¬-≤ $¬αdβPsi)FE⋀Sek"dH!⊗(fCE PUSH@∀A@Y1π∨9&~∀∪5∨ ~⊗Jα↓2≥"0≥∀QQ M¬X⋀r $∀ ⊗λdπF@&4⊂λ&B}↓αAH!P@MλZ4B¬¬J@hPα1P(P-a`⊂πT STORE IH
)↓_
>→l
JJJ
t4λhP4*Lz∈≡∃β!∃ :α P-S'j⊂ a` I T¬β→+∀C:
∀%∃%'λααRf>
∩≤4(hR≡@%(JCKPα1P(P-a Q⊂+ f∃bP#'⊂)"`Q* a&⊃Ph
EOFER2 MMREI @,QRDEKF
IOVEI T,[SIPBIT \END GF FILE Tπ∪)⊃%_ αJ,
⊃∈hh &B-~")ααb⊗ <hQPP**5"⋀Yxc(Hβ"C!
Q∪∪HZNB4
Zp∩H
¬⊂⋀g#bj⋀DNβGEDS VINFIH
A%_Aβ$D~∀β'-∪!
AQβ!% ⊂~∀%⋀~∈&9⋀
IE¹2%∩VR↓Q Jα
%∃Rλ~#
∃I5 →!"B)YuQ2$λK∀)*(01∪ →β"FEαfgk"RP*⊗-dh!$U⊂."g⊃⊂ ∂F FILE Tπ∪)⊃%_ α¬⋀b& 4T≠EhhαQ3hh,B3)ZQ2(λ∃λ⋀ i TBE⋀T*id%λ(⊂ NCMH
&~(∪!+≤B)αAeB∈ h⋀c!↓4⊃4i H⊂ ¹41P0d¬∃
7!Q@⋀e*Sh"P K!h'h⋀¬
SKIPE T,EOFRTF 8ππ2|∩α∈I⋀J0∩⋀Yxb¬4→JT*⋀α1H sK3I→α∈E⋀H$))&H V⊗f⊃i)`∀P-1(D) ; AND AF EH∂ A→%β≠↓ 1β'Q&~∀∪A≠!)¬↓0$!Q hPβ"C!$c"P∩h⋀S,[
IIOERR: LARRXπ'∪1 ∪ ⊃αdI6 :λZ%∀}$λE-→hr⋀h
U"KQPD→xU∃∪αB3λZTH⊗j94⋀!$U⊂.$WSβ EBRMR DURINGLπ#)!U(C9:4∃0∀¬\*0∀λ∪qD 1Q( ~α)FEβE&`hd∈A: MKVEI D →#5β!2M~Q66
α2& ¬S
EJ@
!QB4si((⊃⊗∃d∈ALOSE
λλ
¬≠∃≠# ⋀βP&⊗λ9α⋀E
αHhαB5jH(⊂
g∪h⋀ A↓!%∨!∃$A2M~Q↓∃⋀j⊗ ,(Z"l$YHU$x~5≤ph7!Q@⋀fgUα@
A⋀αb⋀4!_UD≤⋀λ∩bE¬⊃P@!2TTjDλ⊂
)
~∃⊃→) ⋀βP&∞∈L)α 2l*6
⊗α!P@!4rr*λ(⊃β hb"f∀n@
MKVEI @ →#⊃ ⊂∩⊗αHPhPα2TJ:λ⊂ g⊂d⋀OSE
~∃1∪'(\βI`&6}2⊗%α ¬E ⊂⋀ij α ;ZERO AR@∂&t|A ∃∩0≥⊂β"B*9pP ⊂⊃⊗+g S'ibF⋀¬αSUSPE* PUSHJ P →≥
∨⊂~LhP&64*%α e
N@-:λT`(β"B*4r∩D
⊗⊂iYTc"A3uQ$∃ ⊃K
α".jh⊂3 uh∀HZα*`∩NS FBOM THE BAC, FP@ 4⊂∪'+λA)(YHj`Vb$∩vA≠U'(A¬∀A% ≥"6J⊗ h(&N\JB¬↓D2bA⋀hP%α⊗}2∃α a"
¬⊂HKαr1D∪tλ H⊃V
⋀⊃SsE[Q0 'H* "gλ$iP(∪dg*"∈A⋀fi"P#⊗(∩**αDYP*∪P ∂LD BP⊃lA% ≥"6J∃⋀~0≥∃(X5"⋀i
hPα1P(P-dWSβ @∪≤ααBJ>=∩⊗NMαiα∞∈p⋀u"¬8¬4jλ3Q+ C"@↓Gqu∀λ (∀HQ∞(
6UsP)D∃⊗4 ¹84H∀fpπ fλ#i!j∩bP#)⊃i)⊂!)i(→λ f)j ⊂"#,L⊂ f!X⊂()bi_P⊃'ba)λ #Zb∈E∈EβE#j(⊃&_]⋀UβPA [ NOTP@@_AA∨∪≥)∃$C*~(∪∃%'PA≡⋀"2@4Ph"J∈t!eh→Yu (αdP" (i g⊃'`
S2WNAL: SOJA D1&c/≥¬_~(hRRfB\*Ih→Yu (αdP" (j,dT ¬EK
λS1WNAL: SMJA T,W@≥β1_∞N∀hP4*∀~R&∃β!∀-D9⋀
D!Q Mu⊂ ⊂⊗βH
∨↓(
∈2L!αJ⊗ "R∈
d)α&:$*a∈QQ Lλ9α⋀H!P@**5"⋀z(5$HQ!PTTQ4J'B5uλ∀⊗sSjD⊂(⊃J(31(
p3UλZH λjQ0
*'⊂nFB⋀e))U⊂#!"U*i'∈B⋀@
IFL UCELASS,X∈~¬πI'% dh∪')ααα`≤∀_@λλ~αi)g⊂!gb⊃P⊂
CURSORPOS!]
∪∃I' AπI'% F4⊃0∀⊃↔4,Qλ∪hd⊂⋀c'λ*ibf⊃iiFEβE f)U_≥⋀fh∈E A,-1(P)
α WTA @7 βλAβ1∪'(4Aβ-β0X∞∈Bα EJ
β#"A→3uQ)T⊂+ &∃∀
#!⋀e))U⊂ f$h∈E∈B&#$X∞α WTA [ARG T@∨↓→β%∂∀@ZA→%'!&5I∈tQ!∀U∃8¬⊂∪$i`∀IFY~∀4⊃∪
≤αα&@%5:4 EK0hT→H4[!_UD≤⋀λ∩d⊂β"B*h⋀A [@¬βλA¬%≥↓h⋀⋀ ⊂4S(d⋀@∨π,C:4PJ*JN ⋀⋀ ⊂4S(d⋀@∨π,~∃ 4HI`≤h@λ c⊂$c∪α @∪)LW'β∪0~∀4UαJ<X⋀@_Nα E@1
⊂AαY¬$eα~(∪ ≡Rλ⋀¬@8P1⊂∃αAR LIST - PROG!]~∀% 1π⊂αα¬ $~ H ¬⋀e)j⊂( π1
DOERR0∀∪A_∞Aαb⋀4!~u$
λ∈pHλ⊂ ⊂ IST ~A⊃_
∈QQ LzhTj⋀∃ES∩E¬⊃P@!2TTjD⊃∪m!Q@∈E"∪X¬E@$βP& zhTJ⋀∃E⋀% ∈E⋀UβP αAm 1)%¬_
zZ2¬≥HZ¬⋀4H $λα ∂!]
∪∃I' ⊃α$yVDQ!P@ ↓Gp5⊂)↔≠P"V(⊂∞ER @ "αλU∪
λ⋀r)↔"`∩↓∞ =5hU∩¬8⋀4DHαi⊂&∪βG&ER NUMER ARTH@ $E #≥c∂!≥_@e r→↓J=α22λ→DD8QP@ P5λ→KI`≥αd"`∩R [SIX@¬∪(Aq≠ ~⊗α(dd}uzT`(α"`∩FLOW IL⋀Aβ)¬_ ∈hh ∀4⋀ ⊂.ER2 MMP
A⊂Y7 Eα⊗IEbb`≥≤α6⊂I~α⊂ ≤AR@∞A$z0~⋀)_rαjλ[¬α
K[PhPα2TJ:α⊂'*Sbi∈E⊃l("i ] EX@π⊂Aααb⊂HαB2J*uλ⊃+
λπ∈Edg↔"≥ SKIPA D,[SIN,⋀XI7M∪1¬∪PA0∩∀9αRyt⋀)1h⊃Ii⊂ aPβP %β
2@@5¬~& 2≠KUhhαPsj5β"`∩h∪⊂⊗4)α"β⊗piiP∞,,Xπ'D∩&@"λπ⊂*(βP ∀OL∈A¬∪≤A~⊂⋀⋀ ≤8¬4H_v( $λpπiPW,¬P~~(∪∃%'PA≥+≠∃$⊂∀*:∃∩⊃0 : S@↔∪AαAλYm'#%(αq12nα9∃D~@λ Q1`⊂⊂i#P⊗H)hi*λn.`≥
λ¬→>8¬d-∪αB3)h∈E D,[@→∨≤X 1]~&b
M!α`$βSsEZ⊂πiP⊂i#P⊗H& ∂G¬90⊗QQ$`314G⋀e)hλ*⊂ PDLNMK ;@∪↓β%∞A]β&AαααB$βλ∪JYαV⊂#Qh⋀ A↓%⊗∈bα0≤Q#"A5u⊂$¬⊃
"!↔pss*⊂23D⊂πP&∪βSE@$4⊂λ&"e∩`∃~λAP@!2TTjD K⊂λAα@
IARERR~∀$Iβ% I$⊂∀
∩R"⊗α ∞A5u⊂$λλπ⊗@1(T ∩~(∪∃%'PAβ%∪Q⊂⊂∀!Q# -→hc@!5⊃⊗H∀∃ ∃↓QL1t ∈0∀∪5≠ ~⊗JαQ1∩=∩⊗∈Qh⋀D-
X→@hPα16λd⊂ @,@⋀⊂∀!∀U :α P!PdfbiCE JRSPλ@I∃# ⊗∈bBQ$Q&$-hg M⊃⊗P$λ∈*∈Bα2GPNF:∪≠=(
∀
Bb⋀z(T
λ∈R"Th¬AL
λ⋀∩K="¬α∞ j6⊗LhP&⊗λ9α⋀H!P@!2TTjD ⊃4*X3
∃¬ ¬∈E⊂d⋀@⊃≥-
t¬*N!ααb⋀4!~¬-≤αλ⊃K
λ∈**βE MOT¬⊗%⋀ 1"~β
αHh!~u$
λ∈ph→β∪j @π% βQ
AαA!+≥⊗A= A)⊃%&A'∪i
C 4hP&B⋀Iα~λ¬Cλh!→T}Q(∃
λ⊂"!Q@⋀h'T⊂(⊗ CE JRST ALHUNK
α ;GCMLOSE GC@≠→LbA∂π5→&dA≥π⊂⊗⊗~α≡∞≤jMα≡≤bViA⋀:∞"Rα≡∞¹2-QEα≡≤bViI⋀:∞"VS→α≡∞e*iUα<~2V"α≡∞¹2-QYα≡≤bVi]⋀:∞B∩dzYα∩L(4(∀T:∞62}~∃h⋀hP&*Vmα9α¬d:∞6¹2≠λ4(&E∩Jiα
b≡∞6-→.:~2B→$4PJB>A⋀2bA20h(&∃~Qα≡≤j2MHhR≡∞⊗e→Eh∈E∩Jiα~b≡∞⊗-→.:~2B→$4PJ*NI⋀:∞J⊂h*≡∞lbMIhM~⊗RyP¬⋀i_5H!∀T<≤Dλt≤e9Z0h~8U%T
⋀ _:h~ uᬬH⊂h~8U$T ∃∀mha∪Ldλt,tX(∀b¬
)∀d~ D-Dλt≥%x⊂⋀lT8QPP**5"⋀_x0hPQ(t≤LX7 MI~5 hαB4(i4∪U)"B4(∪sU) Q⊂DA41∪jXS⊃#!(v α*_qs4 4β"HK α4(4∪⊃+ ¬!#I⋀ha$e*fF⋀hilSa'f∈B$c'⊂∩'%f'V-FEαi b$V⊂_X↔βEi"T ¬AT HNKLOG+1, AKFC QHUNK,\.RPCNT
RADIX 8
] 0↔ 9λA∨↓∪
≤A!≥↔2|84(
JJHh(&≥J6
>`H%n~}⊃αNfl∩>16∀b6∞~aαN∈mα2e≤
e↓≥J6
>b⊂4*&4q↓96<~6⊗MlrRfB-→5E
aα^∀qαn∀z:
αd*:∞R@αR∈
d*t4(hR≡∞¹2≤jMh≤Jb
"αrNR}∩∈≡∃⋀~∈B∈≤JReα-B∞⊗⊗$*⊃∈phP4(4SYemα≤z6∃αD*J∃ααy⋀,RλI⋀LTz4⋀dy0¬∀,→IEJ⋀HZ5⋀-(~D*⋀→`⋀<~aQ$<≤J[#β~HET
λ∃Dλ(x4e'!∩⋀zhTJ⋀∃JE∃-I↓PPM99∃⋀rλ⋀⊂)i0pα!↔p⋀'h⊃P#'iλ*$"P ij∈λ%(#PCE SKIPE IH
⊃∪ ∪(∩m∂∈K→=''β∂∀Aπβ≤≥(A/∪8A∪ A%≥⊃β¬%)βλ~(∩@Aπ¬∪α4PI↓↓αU∩NQα<~62≤(4(∈U*6B9⋀ 2≡∞e*iDQ!∃≤~λR⋀Ha⊂K\_d⋀
⋀λ_Bα∃D¬$DYd⋀<≥*:"⋀J(T ∀λD|tQQ Jλ*%B⋀∃Ht≤lZ54t4eλbH!~⋀}αλk¬αdaQ LUE TOTAH ¹2Jα2>NαAP@(βaf*V~≥⋀iU)*⊂_Mβ( 6-~6∈(HI`≤u∩⊃*r4q$q(∩λ~β"P$⊂d#⊂ H!` g⊂bBE⋀T*id%λ(⊂ ERRP@≥(H%mα|1α
J,*& 4t
Uα¬9yT*¬8¬∪j(1q(¬Sh∃)r3Q¬Z∀Sij5 ∈E⋀))b LIS@GM ∩v↓
eααYd⋀hI∀`(βP!h⊃a` AL VARIABLES
~∃≥β⊂∩VS1`&N%∩Q↓8¬E@:r6⊂I~α⊂&)Vda'fλ!&'aPj.FB⋀e))U⊂#af∃m→FEβE#af∃m≠]⋀bj'fH$i&k⋀¬
JRST GAH +P~∀4Ph"<8λDd}d∈B*¹85⊗S$∃⊗3hhβαE⋀SdπVE P,C"
λ MOVE F@1@Y~λ6 hP~:E∃"∈⊂
eKtr6λ$j⊂.&Y`⊂DL GVERBLOW W@⊃∪1
A&p⋀⋀<~4⊂λ+Kα@
JRS@(αα≡∞J[#(hαC"AQL¬P≠lAπ>l)α"⊗α(R¬<α⊃3Dλαk"i⊗P λOPE FOR RECOT¬⊗Jα"∈M⋀∩⊗⊗9⋀*b"-~R,EaP@(α E: STRT 17,[SIP⊃¬%(A9=4p∞f*α"∈Z*α2>Nα@λλ b&,Hβ!P≥~α
rdQ!∩`P3∃( ¬⋀e)j⊂"∩b@
;EBRADR ERRADDAβ%%⊃πλAπA%∪≤bαα⊗JJ{∩∃α⊗α*$`6T(⊃**SlP$λαi)'!P"i'Y$ ERRO2G E@%I_
J ⋀*JJ∃⊂4(Q*5,∃JI@L-*)u∩⋀_HE∀4phλHαagb⊃i
λ¬⊗∀
∩I!~4\MλT⋀
∪∃JD
¬z*@hPα2∀J+H⊂4F∃α+'jU!$f"FE"i b_Mαh*`∪H P →βHb~(MαVNαRαA2⊗α*$$≤AQ M⋀z⋀¬αd~"⊂hPα2TJ:λ ∀
)3H#! ¬RRDAD: MMP
↓αP∩FhH%n∩,~6∩∃⋀
∩αJ-~Mα~αN@,* λ i⊂ i h
10$ CAIL B,ANDFUH $KYαBJ}α⊗JJα6→α≤z6∃α
"0≤ ∈E_L⊂¬∪π¬∪∂
AλY¬ ∂→+∀$KZ∈∩∀*NMαα∈ %x≠∃~⋀y~d-~ zU"¬→Pλ¬T∀q1$λRhλ`La
CPRINDpλ%α⋀zB)αα¬E¬→` !⊃,¬bi !b`k"iH*⊂∀)QbP ↔NAHGSE)
α10$ CAIL B,BEGFEN
10% CAIGE B,EL@
+8~∀%⋀RJNQ⋀*JJ∀(4(_8∀LBλ!D(T∀th"B(λ`ff"H!⊗!(d∈E⋀H⊂('h⊂(⊗∈B i)' ]⋀FB_X∩αfgk"RP i ⊂V!!(icFE X∩Dfh∈EI AR2A @AGFUN α LMC@↔∩$∩∩`.<~≡⊗9⋀JMαizB⋀hHU∃∃Z
B¬≤_hPhPα2Tj⋀∀K⊃h¹8q3C!! 14JlT#!↓53S :∪t∩AQA"Q**SlT'⋀iedT ¬ INTFLG 9H (αα& 5HZ%∃-λJ2⋀D~
⋀,R¬P¬$~4⋀M~λ⊂¬ (4V#!!2TTjD⊃0TIY)⋀]H&'g#H()'aQiiP#∪i⊂& #bP' i) ViPFE⊃i)'Y⊂]d&-⊂ ∀T,(D)
@ %%<e∈t∪!%%4AQ(XQ)PR~∀∪)+≠!↓)(I I%≡e⋀4∀∪⊃→I4Aβ$DXQ)($~∀&E∩Jiα%!1" H4(∈≤
&)α
⊃E"Fe~V
HhP%α∃~Qα⊗∃∩0≠↓Q L≤→_R⋀
&⊃E
≥X* hPα(⊂h→3H⊂*&+∀1J:0TC!↓(λ∩J*uλ⊃**SlR↓Q@⋀a`RbP i T⋀QARRAQ
BRST EBRL∈e∈~(∪⊃→%hAβ$bαa"RQHh &"∃∩`∩¬JABD
&⊂
!Q@⋀a`Sd⋀ B1↓-¬!∃_
⊃↔4L2λ~$:⋀α4hπD⊂T⊃) ⋀ _AQ⊃⊗9⋀~∈*Q⋀∩∃α∈p⋀⋀
∃(≠⊂hPα(⊂h→1q(
λ∈⊗@3(B)
JRSPλA I%≡e⋀4⊂λ&∃~Qα⊗α*$`6Qc"AQQ0 )∪β2H 4%⊃→%¹4↓)(@1E"Q$Q&∪αα0p)→α⊂!,HILOC ;@∪↓β%∞A%&A&p⋀⋀DLyλ
¹81s1)*∩∈E X∩⋀P))`∀↓ %%I∞∩`-⋀jVNQ⋀∩∃αNαX%⊂ B0h→3λ⊂EH∃PT i#FEαP
RST E@%I_
JλKZ&→α
∩≥↓y⋀∩B>J8¬B¬$λYb⋀≤→jB⋀∀Tλ∩¬≥X*"¬\β0
iU⊂!"P⊂i) lWF@
ERRO2Gh∪πβ≠1
A)(αb∈IJλh %α≤
6"∃¬"Q2λhP%↓αU∩NAα-∩J=J⊂h &6}2∃α⊂∈$
∃∃β!⋀d&)⊗α A,(D)~∃∃%%≡eλp∪⊃¬I0 α⊃bB⊃$Q!∀UX b⋀"β⊃4JlP#!↓2TTjD⊃ptπλ ∈E∈Bα@ %%<e$`(LBJJ$λ∃∪Jit(4TP+ ¬⋀fSh∈EI TT _Q_R~(M~V ααJBe%J8∃∩D~"∩HhαB5)⊃pri⊃ ⋀D]dk"P⊂P('g⊂ NTERRUPTλ
(Lb0≤≤αr"!⊃,¬P H!`λANAE IN L@∪
∀~∀& "⊃α ¬E%%8~"D
&⊂
!Q@⋀d)$P#⊗
**∀FB⋀e))U⊂"`∩RL∈eα~(_w¬ ≥
+≤⊃ %%∨HAβ%%∃%⋀A I%⊗Jp⋀⋀-∃(Z$"¬8¬0J!"C"J:αa**∪⋀b`∩RLπ$XA∃%%
∀
6∃1⋀*JJBα)∀`β"C!!"cc∃e_
-8~∀4R"⊗JJ}⊃`⊂*YU⋀(⊂
,EROR⊃A ∩! %%∨HRA'∪5!→2A¬β ∩M⋀b&.∃αB⊗JIHh ⊂L→y$*¬EK4d4T@⊂ T⋀@(P)]∩vαB⊗JJ}⊃α6N8¬⊂hPα03i(αP ∀1 %% I 4(L
0≤d
Bd
(Z$-⊂β"B*tλ∀¬H ∈E")"`∩B8 MOVEI B (A)
CAIL A,QUDB~∀$Aπβ∪0AαY#U →.t*J& h %↓⋀RJNQ⋀*JJ⊗α)`hS⊗⋀@LzhTJ⋀EE⋀
HQ&∪αα4u( (⊃β
~αb#∈B↔"f)QP⋀d)"dP" ⊗hjb∀ TFB⋀e))U⊂"a)⊃i"∈EβE"`∩RERN* PUSHJ P$FIXP
JUM@E A,ERRARO
λ MOVEI D -1(TT)
α JUIPL D,E@%I %≡~) %% Iλt&≤
&!α b0∀
)→e H↔02¬-8Z"⋀h¬⊃**U0∃⋀λ4TSj*h ⊂ g#bH ∈ROM 0 DO NE@%%_
Q∃α⊃P@!(∩TJ:λ⊃4J(αi'FB⋀fgk⊃dP F∀'h⊂⊃J 0⊗Q∃%%∨$↓≠'∞A¬%≡M⋀~":=Hh ⊂LX∈⊂i⋀⊂+
¬ ∈E⋀RdπRI D,<(SERINT)>P≡Zβ(4(_J⋀$⊃ ⊗fl-7f6λ $%
λ⋀nFB⋀hλCT -1(P) ∩wQ⊃∪&A]∪⊂~M⋀20≥∩λh∀LBβ00jλ⊃Sj$⊂5λ
df&∈B⋀h'h⊂(⊗⋀BDYP(∪h
BY ISELB @/%)⊃∨+PAπ∂≠%_
: λU∀1Q HH⊃↔2⋀$α5∃ P#'iλ$gVf∪βSSAGE.~∀4∀⊂∀≥*
I!→¬∃∃$λ"bD∃⊃⊂K]8¬0J$ #"A→TTu⋀4TQλ¹8β"@↓Gq4THjP31$4∀MD4∀Ed4∀M$4∀L$4∀M⋀4∀LaQA"Ng↔h⊃4JTP3(T∃⊂2hZh∀⊃ D∀∪r)⊃4C⋀λ3Q
5∃4IJh⊂3D4TSj$⊃PP)+C"G]]P#∪i&P'⊂)"j∃i'"bλ+ f*Q]
;8∈v∩Q∃%$@e∩⊗≡B$aαB⊂πbβdX*$`:H∪4hH ∀jλ0pλ"∪⊂(")∀@
;8∈vA<B⊗J∃βb⊗JJ}⊃α6N8πb¬$→8U~⋀βsQ$qH∃
Q1(λtS4g↓αA≥MNβ (,MESSAGE>)
8∈vv y≠ ≥~∈≡∃β`βddβtr) π C-EXP <αH4)4∈`≥BT≡&bi`cb⊂≡&'dg#@ S( E↓y↓%JB+βJ#!πnj` ∃β"W IPλA∪LAαA→%' A∨_Aβ%∂LA'+∪Qβ¬→↓
∨$AQ⊃∃α-∩J>I⋀2V 48¬∩)d∈.
E@%I
%β≠∀pλ&≥↓αI2="B$β∀α'ija)λ_@
$ERRBRAME ∩w5+'(A¬!! βHA)/∪
~⋀∩$@@@@A ∃∩~J∈l(4(∀ %∃≥Dλd ∀q#!↓4∪t ∀⊃ !Q@⋀h*d⊂#,∀⊗"∈Eαh*`∪HJ F@1@Y'βU~b4PJ6 =hT⋀"c%λBHKαq⊂d#jf⊃⊂('dS*⊂ ∀O JU@'PA¬ →=(
αRD)α
J j∃αX~$\-!Q M¬X⋀r⋀
λ∈) L⋀¬∀∪1'⊃∈A⊂XZf_h ⊂J9α¬EP
∈↓α@
CAIGE D,E@%%_
R}h∈3_h!∀⋀U∃8¬⊂⊃h)≠∈Bα MOVEI A1# ⊗∩2BI$Q!∃¬-9 "¬αβ⊂0id∈S
H ∨-∃~Aα! R4T*BIYβ!∀E∃+$⋀
λ⋀#,∀∀@
HRRZ A(λfQ⋀R~(LBJJ$λ"bE¬⊃P@!4⊂
iR%⊂ ⊂,@π⊂≡h⋀c!⋀fgk⊃d¬ A0Q @$hP&"∃Qα¬1D2bA⊃Q LE*+"⋀F%⋀
Hβ"B(`dg D,E@%%_
R}h∈3_h!∀⋀U∃8@λλZ∀Mc!⋀a`dQP"⊗)Qi$g*T¬3 &4⊂∩A≤Z&B∃¬⊂4(∀⋀⋀U∃8@λλZ∀M#! ¬PB\pλ&"α)DJ⋀∃FC#βd⋀ ↓⊃,¬dcλ&ic@ IS @'%1¬∪(0A≠+πPAπ% ¬)α4PJ6 =hYR⋀H9u∀∃↓⊃∪@4⊂3@⊂⊂h ∂MI@∈A'Ljα>⊃¬:">N*αBJ&u!α:∈l(4(→Yu (αdP* ¬P@$βλ$%4 ∃~¬IλR⋀lX⋀thq#"A~∃0 d⊂# _P,MKNR4¬∈~∀%!+'⊃(A @¹2∀J0∃$X⋀SAQQ0λ)
] POP P,B
∪!U'⊃)¬↓2∞yj0hPα4∃*9λ⊂λ⊗⊂βR5ME!∀4PJBVN@⋀¬αd⊃Q M⋀βtλλk∀ ⊃↓Q@⋀e)h⋀ FRM0λ~∀4⊂
-λ⋀@_Nα ILD@⋀A¬3Q β∈Y
_∞Jh ⊂L8→∀`$⊂V5λX0k d⊃,¬P@ IS END @∨↓≠ '≤
≡∀Q!∩¬⋀βt∩D
λ∈∈Eαa`dgλ!( TEAC _Ox∩w<A
_∞ 5J)tdLi_U~⋀βQ6
D⊂r⊂*(0p
"⋀¬∀↓∃%' ∈⊗B_h ⊂L8→∀`$⊂V5λX0k dDX # QP ∨)∃&A:-BQα∞D
H (αB( →α"! @¬3) ¬
$9z$*β"Q*
M∞B(⊃∩(λ,j"`PT⋀40
λ⋀∪∃%M(A!∨A∀b4Ph"-λ g⋀df"⊂α BYTEAC,CLπ%¬ $p∞@$α∩4d⋀PssJJSs∩(i0p5 →β`∞"AHGORIP "hh ⊂L_HDJ⋀+~D, 5FCKαh⊂id∈VERTS @=4A)=⋀~RJ1|i1α-!α∈¹2≤yαiQ¬"0_h!~E∀~λ+∃$00k∈⊗ α.d⊃uq*$⊂p4hT∃ λλZα!W; HENCE CAN RE@!I ' ≥P~∀⋀zB)αα¬@HKαh⊂)λ∪qDλ4pr)∀∃0 dSα@∞A≤αα∈Mα qα-88∃⋀λβ"@HAN ILH@∪¬%(Aβ+Q~P⊗~}∩≥λ⊂
'H**,FBα P@+M⊃∀Aαb6~∞ p4(→*5α¬%Hu%⋀IJK]λ⋀R)*⊂'jU⊂"`∩RLπ$A≠∃''β∂∀A')β
↔ λA=_ ↓hP%↓↓α"⊗JJ5∩∈ ,Q↔2¬⋀ID⋀U-8¬⊂∀)$giλ* ∂ PMIND↓'! π%
∪ λαα∃Jλ~$8h!∀αααHZ%∀TP3(Q,¬bl∃) P!SβPY OF $ERR@
%β5
~(Jα*JN ⋀⋀4J8PhPα4∃*9⊂¬⊂( ¬RROR3
JRST↓)%+
4⊂⊂∀!Q#@9βj`∀PUP FIL@
Aπ¬≥∨≥∪
β⊂∩≠(U∩r⋀ T \X4⋀9βc ∀EL¬)&A= Aβ$βλ4)4 ∀e$tλ∀`$∪tQ →β i,H& ijλ)jdj⊂a&"P'i⊂#⊃bb$gP*'Ph⋀RT8~∀4Tz~∞∈pπ M¬X⋀r⋀
λ∈ DB]i`k⊃iP ∀
λ⋀∪≠∨Y ∩Aααa"∈λ¬⊂hPα4ri~⊃q(λ~L#"A∀∀⊂
iR%⊂ ⊂,AC@∨≥L~∀&E∩Jiα⊂¬E $αj,gCE TLL¬≤AβHbP⊃β↓AA@hP%αBαZ4DRλ⋀ λpπg)CE MOT¬⊗%⋀
IE1D $4!→%∃≥D
⋀`:⊂2C!⋀¬∀vβZ↓α⊗t!α>→⋀*JJ⊂⋀β C"AQL¬P≠; @ %%=$A
∪1
A"
→α$Xi∀`)5∩3i⊂#'iλ!"cc∃d∈~∀4⊂λ&B="0≥αλZ%∩8Z%∀}$ ⋀ Q∪⊃**h⊂3HD⊂∈bi`cbiWF@
PGBOT TOP
0⊗Xπ2⋀dα4tλyβP$ P!"bSα @≠∨Y λA≤yα&Q¬:& $βλ∀jH4⋀P$Sα CORE WHEL⋀A!-∩∃αB :⊗Mα
∩∃α~e*N"⊗ h ∪50λ⋀λ5λ∀jZt⊃3HD∃∩3(T⊂4hλ→βc ∀RLπ⊂∩HXB⋀∃α(∃ λαP ∪USFLS FLAG8~∀_w 'A%⊗Q⋀bNB! α"∈≤*2QαdJNAE⋀b&NA⊂⋀⋀dM:∈$
⋀β∩4j∈PC"AQTq0J⊃α0H~p⋀aP∃'h⊂&⊃h∈EL LOOP
λ ∀vlp %"$*~V9¬~R∈:$
J↓6αIuαHZd,B¬↓⊂hSαjna∀λ
∀
qh
j(⊂∂+H/)⊂"UαALHOMK BASE IBASE ...)
9;; EBROR↓ ;ERRORS( UNAAUGHT THRMP∂&↓ ∩
pα≤\XT⋀D4Q#!'nnb$⋀λ∪Qa⊃.p∂#H(jdjP!gfQP λERE
α;≠8∈∩@@@@Q% ≤*Q6
}*2↓⊗αh∃∀L_)D-~X→d"m(Z5$}(UU⋀⋀β∀j!QL¬P≠; (SETQ @=DA≥∪$~∀`-β30H
8U%
λπUdR3
!QL¬P≠; (CETQ EVAL@OOK @≥∪0R~⋀vlp $∃ d|jHU∃∃Z
B⋀→E⊂h570HλIrl$YH∃L,EZE%X→d"l→H∃∀l9It≤Y→e$-**U¬%5⊃PS71⊂J:(T≤ID¬$D~D⋀-∃)z%~⋀ItαE≤ZJ∩αtλU∃I~5"Q'3[⊃∃⋀l
λ4αD∃Yh5$yd⋀-4→E∩αu⊃PS71⊂Jz$αEz¬Td-hYBl→iT|$U∀αE$Z*¬∀∃⊃PS71⊂JDItαBE
*Bα$¬"JQ'3[⊃∀ααα¬ dL⊃⊃∪\tλd}∀ZhU∩
Ye$DλU∃z$⋀}∩ hr¬
Y~BH'73X∀⋀αE≤ZJ∩αR¬λ4|tD¬αE≥H~E-~
Iu⋀dZhTbQ'3[⊃⊃⊂JλZd b¬
5$
JZ2¬z D-4YE∩JQ'3[⊃⊃∩αα⋀⋀ααᬬ¬¬xtαBJ↓Q#K4↓⊂H∀⋀ααλ(T XZd bU%U¬→jB¬¬*A⊂H>∞&NwAQ#[1⊃⊂HJ⋀⋀ααE(X∀"lXh∀bm
)∀uU%⊂H↔>F/↔∞-⊂h532⊃⊃∩α⋀∀¬¬≤-J∀¬$T¬αRm(X∀"lXh∀bm
)∀u∃⊃∪@>Y89↓QNjnd↓"""$⋀λλ
λQλ
λZ(⊃⊃)T∂∩3J4SP)13qE04RhZOJ#!'nnh↓⊃"(α!∀
⊂λ)cY⊂∀∃"i()∩TP∀#P TTJP∈E≥N]DDDBP⊂⊂⊂
)"b*'⊂∀)⊃`b⊗E bk f h)$g∃⊂*"fJTTTTJP≥r{_v∈E≥]P⋀DJTTFEβE∈E&h)"j⋀h*iR%⊂#,∀⊗"i)∀'h∈Eαfgk"H(∩!YαD]i"U*i'⊂∃'P*'T⊂&"k⊃f⊂!,H"i)⊗λ*$)'T⊂ g⊃⊂"i)∪i)FE∪)h!* ] JSP T,TLVRSS ;@%∃)+%↓)≡A)= A¬¹2↓=∞~∀%∃' A⋀Y %∪9∪(~∀%' )¹4↓αX∩∩$s⊂~⊗,!α¬αtJ1α∈p⋀⋀
⋀iz"⋀λX4]Q!∃¬-9 "¬αH9⋀,≤8¬"!↔pr⊃(eP#'⊂""f⊂lbbλαREAL TAME ⋀A&u"L4(Lj>J⊗Jα¬2F|*P∀AQ M≤9~⋀*⋀%JdM
YzDLjA∪Mλ_D-~ xb⋀-*)DM≥D⊂λ$"B0h⊂∈#⊂⊗(f`T!FE$⊂abg*∞α PUSH P,FLP .SEE PDLCHK
∪!U'⊂A1
1 ~(∪!+≤AαA¹2≥4(~
U≤B
¬DdM:∈⊂HK8Ye%∀λe∀T DLD_1PP
*%@$⊃K∃IQR3λQ".si&,P($g*⊂$i)jλ ij"$ieP∩c⊂''H$g$jλ#$f"CE`gg⊂"'T ij⋀B]`iP∃$ iP∃$"P#∩i)j∃$fb←CE CAIE F,INIIFA¬
SKIPA 8π∃∨Q∪≥∪P[
∪→∀Aβ≥λ↓
∪%'P[!&l)$4!∀αα**5"⋀β∩4j∈PC"A~∃0 dλ(⊗-hKαX
4PJ*NA⋀122→iT%Q!∩¬¬X⋀r $∀ ∩*Hαi()∩F@
JRST LISP $$∩w.e*∩<T
4`4⊂4h uλ∃ P
@+9∞@@(hP4*2M~AE!~¬-≤αλ∀¬⊂⋀ih D@ ;
****** BASIC @)= A2-2⊗ " It`:λ
JE%JJJAQ@⋀d)-&P K+↔⋀DNβP ↓↓'3≠¬=_@@)⋀:⊗@%4λ∃~⋀α5∀dP3∃(T∃∩⊃!Q@⋀h*d⊂ ⊗⊂F@
LISP2: JSP T,TDVRSS ; RE@'U→(A∨_A)↓↓→β'λααR>Alb⊗@4YD⋀-P3β!↓4∪t⋀
λ∈!∈B⋀iedT'⊂ @,TLF
BRST @→∪M eα~(∪⊃%%hA)(4fQ R4⊂λ&"∃∩`∩⋀EES∩E¬⊃P@
*%@$∀K &∃∀
#!↓4⊃4i H⊂
λ⊂∈!dDD]aR ¬CKP@ 1⋀b⊗@4YJ2⋀¹4z ⋀-∃)z%_!→%∃≥DλU$AQ hI~5β∀↔!∀l]hY∩⋀Eλ"Hh!~¬-≤ $¬αeIJ¬∀jA⊂K]λ⋀R)*⊂ ∀HE @→βM(A∨+Q!+(A→_∞J4hP&"∃QαRQbiM"AHh &"∃∩`∩⋀EES∩E¬⊃P@!2⊂ )⊗α R,-1(P)
λ P@+M⊃∀AαbB$β⊂r 1 .piλαae@ P@ 1⋀b⊗@4YJ2⋀z λλZTStJ¹1"B4
Zp∩H
¬∃∪∃λZT⊂ $B]`∂UTPUT A TE@%A%∩4Tb&NAα(#@!4⊂
iR%⊂ ⊂,TLREAD ↓;READ AL⋀A&uαV@"λiu∀hQ!∩⋀U*:B¬$β⊃5H→α".hZβ f*Ph⋀E IT, @%∃)+%≥%_
:λ¬∪d⊂⋀ih P F L¬≡A = ⊂∀λM~⊗Bi⋀
IE0hP&BVα9⋀R¬¬JD-∃⋀⋀#!⋀e))U⊂ ISP2B 8∈A2|zAα
~-α∈5"⊗Iα,z→6Bα)t¹84pq(D⊃0 $U⋀@
;S@)⊃∪
_AQ→) ∃αJ%ααIE$4V⊂∃&*"i F@
0⊗Xπ0JDHXe,H⊂ j⊂d∈DARD-IFIL@
@PαH4)4∈`≥BP⊂⊂⊂λ⊂⊂∀!SβH
λ Q∨$!_
V2bαzE%αB⊗EαLr~&2*↓≡@"α*(
K2*#!≥]P≠ ('T↓∪⊂~~Lb∃%%Hh ⊂ ¬)j⊃$c&≥αd))-λ V+$Sα@
∪→∀~∀≤Z&B∃¬"∈BJ, 4(∀λ4 dλ∩e%*ZD@ ¬⋀Pλ$))-λ V+∩U,dFEαh#h%λ(⊂
~lp
mJB∩,h¬3D
Q01¬5P3¬Z∀R3J*H
¬⊃ ⋀]j∪βP ≠→∃(
EZD-∃λ⋀R!QL¬P≠l@∩@Qβ≥λααJ,_@ (Zβ f⊗T)$g* U⊂∈E∞β;; (F@+9∞∈2bαJ,_@ (Zβ f⊗T)$g* U∀TFBα;;+ (!→β≠¬⊃α@@"L2& $U⊃P@'njb!∀λλλ¬λ3Q⊂
**,hλ$c$f⊃T@
;8∈v∩∩$@Q)∨@[⊃ 4*16R-∩BJ%mA↓"NαH∃%-4 DLS3qλT⊂⋀c$S TFE∞β;; ∩@@@QM)β)+LA))3
_∞ 54 ∀4HU∩J⊃Q#@7nhα!∃∀p
Sα@ β%⊂[∪
∪1
RRR4⊂ mmXh ∪51∩D⊃1U)⊂*'h d"`⊗EL-TERPRI-X (@→~αα0≤¹4→HRHh'33@1(λλ⋀⋀λλ
λ→β"⊂'$f"FB≥]UDBP⊂⊂⊂
!`∂ND ( ⊃ DA∨
∪1
A)3<R~YY`_Hα"(⋀⋀λ⊂
"()$P
!`∂NS T (AL@λA≥HA∨+$2& $Z5∩J⊃Q#@7nb"!∀λ
∃⋀¬⊂πi⊂∪&P ≡W (TERPRI OFILE))))))
~∀4∃)→)∃%!%h~∀≤Z&B∃⋀⊃2ZRe"⊗JBα)⊂K\9λT9h⊃Sj$∃0 b⊂πS ILTE@%
!(A→+∃π$J0≤A"B$λp3∪λd
λ¬ ⋀FEαh*ad⊂(⊗)U FL 0↔∂∃(A'$
2$~(B⋀h
U"⋀i→D(hαB3)Zβ"P# **)`∀ TFBα TLNL F,TTS ≥%H4(∀
⋀`:⊂¬⊂( ⋀¬∀∪5≠ ~⊗JαRQHjB`(pπ ∪
λ⋀∪≠∨Y
Aβ$β 2α%~∈I"λ¬⊂hPα33j ¬I TT,F.MLπ
~(∪⊂⊗4)α 2¬"RN⊂¬⋀
Hβ"Njt 3λZβ"f⊗U ¬RPRI( !β0λ
⊗0si)P$gλ i_@, @ ]≠= ∃αLqα0β"U ⊃0 ,∞α JUMP@
AβHbP∩∞α u⋀Pα".h[⊂⋀j IF NO TTYCLπ⊂~M⋀2& $QQ L≤→XR⋀
&⊂
⊂¬TYO
∩A)%'(AQ→) ⊂∈⊂hPα4ri~⊃(⊂*&+∃⊂*tUα'dc⊂)Pd¬E AS TYO, TERPRI TL∈~(Jα"JRα∈IEe20≥5⊃R)HαiD]H)j g⊃ i" Lπ+)!U(A
∪1 &~∀%∃%' ⋀¬$4T !Q@∈E*∪*"`∩Dpλ&Rdr1α→d2∃"iI`HKαr1D 3Pλ*U⊂#$f⊃P ∞OT IN LIH
≠∨⊃
P⊂4PIαN9~⋀*¬JK∀l4a⊃∪@4⊂3Q⋀ β+P$P ∞OT SE@(α`4(∀⋀¬⋀} $¬α⊃↔2¬$X⋀T
)(⊂
'H%*`∪T T@⊃↓))3π=_
Mα4J2(β"B*⊂πP _V⊗@1
∪∃I' ⊃ααHU∃β⊃Q hPcZJIE∀01~∀Q0(D∃∪∀H (∃ JQ1→λ* RED@ A$b⊗@4→D⋀¹85P3⋀R3⊂Hλ⊂thZα-⊂(⊃&!d%H("&!(∈E∈Bαλ
YY`~∃λD,5Y`λ¬4Q0(10 S⊗h ∩IL¬(@PαH$%8¬∪j¬3⊃5HYα⊂
@%∃βλ~lp
l%α↓↓↓↓α↓"∈: ⋀αRm(X∀"lX¬P)4⊂ $S*⊂∈E∞β;; (@
+≥
β⊃1αQ6J⊗ !6⊗Z a6BJLrQ%$hQ`≠1∀ααα⋀⋀ααDItαBDYxbαDβ∩4jD u∪
(1 "%∀λ⋀$c∩d⋀E) (@
∨%4RR
lp
l$J↓↓↓αtJ1$⋀HH%↓↓α↓↓n∩zαV*RLaαJ⊗αJU∀pQ'3@7b"(⋀⋀
⊂ bU(P$c∩d⋀E (SPANDARD-IFILE IFILE))¬
;8∈v∩USHJ P,TERP1
JRST $TLREAD
TLREAD: SKIPE B,V$TLREAD ;CHECK FOR USER'S INTERCEPT FUNCTION,
CALLF 0,(B) ; AND RUN IT.
PUSHJ P,STDIFL ;GET STANDARD INPUT FILE AS OF
PUSH P,A ; *BEFORE* THE READ, AND SAVE IT
MOVEI T,TLRED1
PUSH P,T ;RETURN ADDR FOR READ
PUSH P,T ;argument FOR RANDOM EOF VALUE
MOVNI T,1
JRST IREAD1 ;READ THE FORM (POSSIBLY USING USER'S READ)
; AND POSSIBLY POPPING INSTACK INTO INFILE
TLRED1: POP P,B
CAIE A,TLRED1
JRST TLREDF
MOVE TT,TTSAR(B)
TLNN TT,TTS.TY
JRST POPJ1 ;SKIP-EXIT, IF NON-TTY EOF
TLRED2: HRRI TT,FT.CNS
MOVE AR1,@TTSAR(B)
SETZ F, ;EOF ON TTY MEANS OVER-RUBOUT, SO
PUSHJ P,TLTERX ; TERPRI ON ASSOCIATED OUTPUT TTY
JRST TLREAD ; AND TRY AGAIN
TLREDF: SKOTT A,LS ;SPCFLS - FLUSH A <SPACE> TERMINATING AN ATOM
SKIPE VOREAD
POPJ P, ;NORMAL EXIT - NO EOF, NO SKIP
PUSH P,A
MOVEI T,0 ;PEEL OFF A SPACE, IF THAT
PUSHJ P,TYIPEEK+1 ;WAS WHAT TERMINATED THE ATOM
MOVE T,VREADTABLE
MOVE TT,@TTSAR(T)
MOVEI T,0
TLNE TT,100000 ;WORTHLESS CHAR, OR SPACE ETC.
PUSHJ P,%TYI
JRST POPAJ
;;; (DEFUN READ-*-EVAL-PRINT (FORM ;DOP-LEVEL%EVAL
;;; (AND READ-*-EVAL-PRINT
;;; (FUNCALL READ-*-EVAL-PRINT FORM))
;;; (SETQ - FORM)
;;; ((LAMBDA (+)
;;; (PROG2 NIL
;;; (EVAL +)
;;; (AND (OR (CAR NIL) (CDR NIL))
;;; (ERROR '|NIL CLOBBERED|
;;; (PROG2 NIL
;;; (CONS (CAR NIL! (CDR NIL))
;;; (RPLACA LIL NIL!
;;; (RPLACD NIL NIL))
;;; 'FAIL-ACT))))
;;; (PROG2 NIL + (SETQ + (CON@λ@! "@NVR,R@@OP@ZR$RRR~(~∃)→∃)β_t%'↔∪!∀A⋀Y-Q→ -β0∩∩wπ! π-⋀2>I-~⊗I~α&:R-∩∞⊗"α~V:≥"&>8hP%α∞ b2→
a" $hP&64*5α¬e2&∩&42⊗J⊗t~∀%$B∃αLj
>1αiα≡%→αR"*αRfB,!6&8hP&∞∈Lqα¬¹2 JB2_h(%≤Z&B¬⋀⊃2Z⋀bVL4PI↓α6}2⊗%α∩a"¬$HImαEαJ⊗≤J>9α
→α&~αZ∈¹2,)α∈:"α.⊗¬→α&PhP&⊗b≤Aα ¹24JB2_H%nRD)αNfl∩>1↓Zα≡⊗~αR"∃¬""¬α%JB⊗⊃lJ84(LRNA"bNB⊗≤∩&:⊂HImαEαJ⊗≤J>)α
→α&~αZ∈¹2,)1α-!α: h(%A⋀⊃2Z⋀bVL$KYαV$J1α∈5"⊗IαM!α"~α
,Yd⋀-∀→JT
$XE`hT8Zd !~¬- $¬αdZh∀`↔:5⋀,8)∀d→hr⋀MDλTu≥X(U~¬Iλ∃"~D¬,IAPP*YU⋀*
Yd∀hA⊂KZλxU"¬I ∃~¬h→E,* →b¬≥ ~D*⋀xd⋀-∃)z%~Q!∃¬-9¬αd:Yd∀hAPT→H$ !~¬-⋀
αd⊃↔44t⊂α¬<YIBb⋀Z*$}∩ λ∀tI→d:¬8~d-Q!∃¬-9⋀¬αd: u⋀!⊃∪LID⋀ ≥4 ∀r⋀8~4*¬→zR¬<→jB¬tλ4|uI→e,Q!∀l}j4⋀
i→@hT:8U%!~4-$ dLbA⊃∪\→GSα
⋀λ4 rλZ4*¬I ∃~⋀~4⋀
⋀9ye≥$→jB¬z(@h~
U≤$
αd 9ye_!∀T4 4 5≤λ)∃"¬Ii∀b⋀9It∀∀Z(T"KQPP!Q#[4
¬- $⋀D-(T¬<MI⋀¬¬zλU∩¬h→E,-4λd}∩
I⋀*¬)_tE" λ∀e4Z1PS74⋀|2πHdeDλeED
5βr →bβeJEB⋀D
#rr⋀
tLDλU∃z$⋀}-AQ#[4 ∀2¬IλUJ⋀Iyb=" X∃$⋀
Uαr⋀
U≤,Dλd}∩
J$
¬ →d:⋀z)u≥Q'3[ZλZ%∀}*4⋀Lr
I⋀*¬;~5$UaPP*λDd 7 M≤ZK"¬AQ L≤→_R¬%EE⋀4e¬⊃PPJ Yu4∀
Be iJ⋀$Q!∀≤_T⋀"λk¬αQ!∩⋀zhTJ¬EJ∀5EλI@h_8∀L*
%BE≥¬⊃PPJ Yu4∀
Be
:λT≥⋀IAPP*YU⋀*
ED≥z H8Zd-_)t%J λ∃¬¬↔qPU⋀IH5∃!→T}4Y∀⋀
E⊂H9irb¬λIB⋀≥(~αl}ZAPPHZ#~¬:9∃D~D¬d}ZD⋀|2
⋀
≤T¬¬≥M:HTj⋀Z*$}∀≠Eh cI→dl%⋀
De¬)→e"¬IJ¬∪
~¬∀f∀¬$ej*5~¬IJe∃≠∀
4M()`hQ!PS71∩D⋀XjTr¬IzαldZhTbI→dl|HTαBQ'3[∀⋀αα H∀l∀H∀αD¹4E⊃PS74HJ⋀⋀ααD9yd"¬λ∀t"¬
E%M⋀λdbJ¬
5$
JZ2⋀→iT|$Tλdb⊃Q#[4↓⊂HJ⋀⋀⋀4∃∃⊂h772J⋀⋀ααα¬
5$hH∃∀Y_dLdT ∀t¹4→HRJ⊃Q h772¬9~α⋀Ld ∀u¬ZD⋀4HTαE⋀~:4," →b⋀ 84⋀∩J ~2⋀d DLtT T|$UaPS74⋀ e9t⋀d,~hR⋀}ZHdLdZ4⋀Lrλ~#
⋀→hB¬∀X_E$ )HR⋀dλ∃∪∀∃aPS74⋀5-*I⋀-Yz$*HX∃4* →e¬-DλdLDT ∀r⋀4¬¬≤,T
De¬)→e"aQ#[4λ∀et D,
hT¬%%8~"⋀|d ∀u¬ZD⋀4HT⋀LR
E`hQ)DLXJβP*:α¬HzE∀%H!PP
*%R⋀5JdLti→D(!~4\MλT¬$
(T !∀⋀≤→d⋀~eJ*U$Q!∩α
*%B⋀5Jb-→⊃PPM99∃⋀*λ~#
eH~¬=∃AQ J
*%R⋀~&∩e¹4zZD4HZ0hU8h∩
)ETJ
JBd
5j44⊃↔5≤4~4⋀
∀T d-4Z$⋀LR I∀t
Yt$(Q*44
A~D$tT
E"d~8∃∩D5⊃PU≤h∀@J**5"λe⊂H:(U%-)d⋀teYDLtYYt$(Q+⋀≥¬
)ph→Yu4*
EE%%8~"D⊃Q LzhR¬%EHbtxHRE⊃Q$t}
)ph~IDt*
AE%%5jEH!∀¬$id¬%Hh%"Ia⊂KyiEJ⋀∀
E%Jλ8∀rλ~d*I→dl|HT¬≤-AQ Jα *%≥"¬λbH↔:EM_8∀d∀
$-%Z)b¬tλ∀r~HU∃¬)⊃PPJ *%≥"∈∃⋀2⊃↔2⋀}$
4\M⋀ u4
$ ∃ h!Q#[4↓∩D⋀XjTr¬(X∀"lXh∀b%Z¬∀jDαD|)%⊂H8IuαHZd,bZ
$LUAQ#[4↓∩αα¬λ∀tα
(T XZd U%U¬→jBh'73J⊃∃⋀5h8∀db
(T XZd U%U¬→jBαx)"JQ'3[Z↓∀αα¬ D l(H∩αDiE⊂h770HJ⋀⋀ααD9yd"¬ u∩ jTdbλiBJ iu"λZ∩αE:H∃%-4
E%L9ye~⋀iE∩¬→u∩JQ'3[⊃⊃∩αα¬
D-∃
)∩⋀Li→D*∃⊃PS71⊂Jα⋀⋀αDyhBαE
)∀s
¬λe,t8→Db¬
)∀s
x$R∀¬α="¬
¬∀f∀⋀|%∃∩H'73X∀⋀αα
K∀zβ6%bJ⊃↔3e≥λ_4+Q'3[Z↓⊃∩Ez¬Td-hYBl→iT|$U∃∩H!Q hUIJ¬∀jG h~94M⋀Tλ2e5IJ¬∀jA∪\λX4Z⋀iz"¬-8Z"=~ →e$-(8U¬"λjTt≥I→tp!∀⋀≤IHbβEλ2H!~¬-⋀
αd⊃↔5$}¬YD-∀YD¬¬→j@hP→*5α⋀eIDLXJH9HT
4Z4⋀LU
ZB⋀¹4→HR⋀dλ0h∀ %∃≥D
De¬&⊃PPYzd*¬EJE%≤~%⋀~⊃↔5⋀L94¬-α
I⋀*¬JJ4
Q!∀l}hY∩¬%EHe"t9j0h→
%∃Rλ5D¬⊃↔5⋀L94¬-αλjBtj1PPMIId*¬EJE%jK⊂h∀λ4 lTλ2e2ZK∀x*IE¬∪↔!∩α¬
Z4DR
¬DM$Z*¬∀Q!∀l}hT⋀
¬⊂h~
U≤$
αdM
)∀sQ!∀l}hY∩⋀FFh~
U≤$
αe→qPP**5"¬ z⋀ Q!PTM
)∀s!~4\M d¬2-
&⊂h∀ %∃≥D
¬∀f⊃PP(8∀ddd∈∩d¬dZ¬∪Q!PP!Q hQ'3[Z
IuαHZd,b
h∃∀L_)D*¬8ZE$hz0hQ*De5*:3PYzd*⋀∃K5⋀t*Xbbe h%,¹26≠Ph~8U%T
⋀t∃XaPPL)JB⋀J d∃,e9E⋀t*XbkQ*De5*6∪PM
Z4B¬¬HT|5*I`h→Yu4
λ∃E\-**DrHZ%∃e6∃h!~4-)T⋀-∃*I`h_)E"⋀∃HU∃∃Ie4d-∈∃Sλ!~4-$yP⋀-∃*:ph~ uᬬHT|5*I`h~8U%T$ dLbJλ∀tL:↓PPM8ZET∩λ∃E¬→X`h~8U%T$λ"d
C(!~4-($⋀~eλ⊗0h~8U%T$λ∃∪J(Dd
(qPPM8ZET∩λ~#∀J_c
≤!Q M≤ZK$j⋀~(td|1Q M≤ZK$j⋀~(tuQQ LU*:BαEE⊃PP!Q$L¹4dλC K1PU≠ $∀!~⋀T|$
E"Q!∀L~i∩¬%EF∪βaQ LLI~dJ⋀EF∪αQ!∀e⋀
E"c⊗APPJ9α⋀FaPPL_HDJ¬JEBD"⊃Q L HI∩¬%EF#β∪∈&αE⊃Q LE)I∩¬%EE¬≤λ)∃"yJ5α⊃Q Lzj4j¬JED# h∀h↔:4
4T⋀2~J:α⋀
4
D,M⋀λdLdT d lQQ Mz "¬AQ%h↔8Tt" xb⋀Lid⋀# ↓Q c\Z)∀tMDλU∀i≠α⋀-)→dKBλZ$Lλt⋀-→i∪h!Q%≥,*JD`→i∃$L→I∃T
I→tby`¬t:
~TM"λ→d"⋀Z*$m∃1Q#K1_U∀i~B¬∀X8U%~
λDb¬ y∀u$Z*2b¬IλT`$⊃P3 Jh∩3Jh⊃4I→R, AQLjfa4R3I⊗λ∀Q*¹85∀h
h4R3jZh∃P*)00SλZh⊂3HD∀⊃4HtS4dλs⊃0)4 C!"Q4I→R5∞AQL¬b$`a&"H$g*")*h*λ)lij⊃dBE_L⊂⊂)`IDfgk⊃P(⊗!∈E_X ⊂)`RBfgk"H#((⊗,!Y∈⋀h$h⊂jibDBD]b$`a&"H f&⊂∩e*"i*h*)CE"i$S$l≥⋀BDD]bS*"i⊂∩ i"P∩c⊂$g∃"i)*T*)P S)"`b⊗P"$iPa&"bβE$c"H( cdS!U≡_Ki`df⊗-FEαfgk"H(⊗!YαD]abU⊂*h⊂∀ "⊂(dg*")FE⋀Sgk"P,(⊗#⊗!Y∈Eαfgk"H#&(⊗&!Y∈⋀fgk⊃P)h⊗aY∈E↔DD]bS ⊂'cλ$c"P∀ cdgU≡_V`df∨βE$c'λ( cd π,[
IT$ MOVE T,PDLFL1 9C@∨≥Qβ∪≥xZ@↓≠ A⋀"1αB :⊗M1b→α>→β
NQ⋀"1αB :∃x∀TJQ⊂%t~∈2D
⋀$diJ0HK8iE-⋀λ∀db
λDb¬λ_t-Q)∃"∀¬e$JXPhS&⋀@M<~)b¬]9 u,dD
E ¹83Q6⋀S∃4i⋀∀⊃∪⋀
⊂1q*¹7ow#!)1Q(
823 "B3)zQ(∃¬Ki∪V U ∀4HQ∪s+"B3)zQ(∃
∀⊃∪λ B"'_pπg*⊂dg)P∂⊗P⊃Pc⊂("∪⊂)bcV⊗⊃Pc⊂_iU
∪≠=)β~APY'(QQ(Rαm+! βQ
A' ≥≠ ≥↓)β¬→∀A)∞AI
→
(~⋀∪¬∨¬∃↓)(X\4b∩Zα2>~α>→α⋀"1αB :⊗L4PJ"JRαQ2B$b~1DhP&J"αQ1¹5 h(&∈$"%αQbBQ$4PJJ>Q¬!15DhP&RH4¬"cvvβββ↓Q L H@¬"6FSβ∪∈¬Be¬X⋀Uλ↔#"A~q1⊗D β"A→∪∀Q$∃ ∀λ⊃S !QQ0 $SαI0⊂T%)→
≤↓(Xn@```~(∩A)→hA(Hnβ9AAAα↓P@_J⋀α⋀EJ@hPα03iλ⊃∃¬H4R3I↔β"W!↔q3Q⋀qH∩(hαP ∪AIH
IRP Z,,[P,FLP →
a Y'¬h4(→Yu (αdP# -
MH∂-↓0Y∈⊂¬Uα!⊃∪@8p54hT⊂πg"H("&⊂∀ cbFB⋀fgk⊃dP",1(Z) ; FOR Z TL∈A DJN@4PJ∈ 4I∀⋀"eλ_tm≤αb"'a*b FOR SAIL, MAKE AH@_A∃1∪'λ4⊂
N¬ J6 =hT¬%"HAPP*:"¬⋀IJ5$⊃∃e≤,T
⋀$e8@ ↓QTp!↓3uQ)∀⊃ ∀λtr6E∃
#!
p)α(`fcbH"∩,(⊃&∩h∃⋀@
SA$ JRSP .-4
TERMIN
@ %∪8q∞t∪5∨%
APY71↓⊃_XY5A →:~(∪¬→↓(Y5'A _~∃t∩∩`.,r⊃α>2α&~9¬α∈≡∈t84*⊗∀J0∀K¬!∃≤-K("⋀→EE$
λ(T 9→dM⋀α03 ≠P5∩)YH⊂1JH4H∀λλ∀q*4β"A~q1⊗IT⊃St*Y5β"A~q0
-∪P)"`S&,FEαibb-∪P# iS(∈E$'⊂ ∃SEHECS, SETZM @)e≠'.~(∪' i~Aβ≥Q
→∞~(∪' i~Aβ≥Qβ$
∀%' )54A-
¬→⊃∂∨,~∀β'∃)5~A≥π
1H%niybmTX⋀Sdqu3λD⊃10)D⊂⋀g)Rb"P#PFE⋀iQj-&@⊂α@
!∀"@$!→T}Q(∃¬Ki3∩)∀⊃∪¬⊂3U
λα ]
λ MOVEI D1∪⊂~⋀"04λLj>J⊗JαQ1∩$*R&∞(H%nJ-~R>J*αJ⊗∈$*I∞M⋀b&@%IHR⋀lYaPPYzd,j
AE%→X∀ph!→T}∀Y∀¬"eYjELHQ!∀l]hYR¬JYe%→X∀p!Q#\4→IE~¬I
$}1rβ! ↓Gq4R)$Y⊂"$g$ZH i$g
aP"i∩d∈5DERIN∃A EBIL5B ERINI6 ARIN4A ERIH
∩↓'β%)= αN
"0≤∪∀
4
$x
d∀⊂Sh{H⊂λ"∪#&)F⋀¬
;FAL@→↓∪⊂_∀Ph*∈JLr%IhM~.&Bbα6V:=$%Nl
f
∃⋀r⊗⊗⊃¬"0~¬YiU,tt
5LL)yE~⋀→hB¬≤~*0hP∀ %∃≥DλU∀i⊗`hPα33jH(⊃
;4qs ¹1"Q4I→β$Z]αe*fh⊃P"⊗"$g~`CE MOT¬β∩A_XQλR4∀∪→' A Y'∃∂→∂∞4∀∪⊃%1∩A 5' ∂'%4⊂∀(Lb∩ α"b`≥≤Xx%M"β ⊃h:u
⊃¬!"Q*)3M0g⋀fgkdP),1
AN@CAB R,(F) ;UNMUNGS THE SYMBOH HEADER, IF NECESSARY
HLRZS R
HRRZ R,(R) ;GEP ADDR OF VALUE CELL
α CAIL R,BVCSG
CAIL R,BVCSG+<NXVCSG+1>*SEGSIZ
JRST .+2
↓JRST ERIH kλ4∀∪πβ%_A$Y !+%
L~∀βπ¬∪_A1!~Nd
NP4PJ*J ↓9-HhP&*≥!α⊗JLqV⊂4PJ"JU→↓"IHH%nVtjV:~αR"∃¬2∈2V*α∞⊗2baα&→¬~R>J,!α&9⋀b&NQ¬~B∈∞(h*⊗JLqV⊃hL
>
*rα→2∀J9V hP&*≥!α⊗JLr%TQ!PT-)→c,!→T}4Tλbe]8~%$|%ED∃Q!∀∀eDλbde
)t=Q!∀l}hT⋀"e8~4<1Q$-→fT∪→*Tm⋀TλBd-)→dK0β"B)uQ2$K
⊃¬"B3
9λ⊃K
¹81s∪h"B2
∩(⊃E4q1j96KlAQB3⊃λ$⊃ ⊗j¹81pV* ⊃pj
⊃
+"B2J*uλ∀h∪pL!QQ4R)i-NB)
TVTd53Qj ¬⋀idh'⊂∪jg#hαD]`∃NMUNG TALUE CELLS (SEE ALIST)
JRST ERIN6A
MOVEI F,BVCSG
SUB F,EFTCS
HRLI F,(F)
HRRI F,BVCSG
HRRZS (B)
AOBJL⋀A 8Zb~∀%' )54A≠+≥≥ ~¬ I∪⊂→Z P&64)α ¹2\*JJRpa2⊗∃"0∩[≠QPPM8ZETjλZ%∃aQ LJD⋀αeY~%$pQ!∃≤-IyR⋀-**58!→T}∃9∀⋀∩Yj44Q(U∀i⊗3PYzd*⋀5J45EH)∩D⊃↔5∀-:Iu∀*λ9D|∀(Z$," It≤
I→tuQ!∀l}hYR⋀H
45EH)BD⊃Q Lx)$b⋀%HU∀i⊗0h~IEB⋀∃ESλ'8Tt )HR¬λT⋀LuHZ%∃-
D¬≥M:HTh)_dr~J2eQ!∩u≥Z8U"¬5j4l
95BdX~4]↔:$-≥Iz$*→jD-∃*Z¬"⋀Yh∀∀dT T
:1PPj:U≤-D 2uZ93∩I→T
6+Ph∃j5-≤ZD¬Zu8Hc
bJ&s¬↔:$-≤ZD⋀$ hZ"¬z(E_!∃e≥-8ZB¬j8D3EJ#;¬QQ%h↔8Ttα xb⋀Lid⋀M¬1Q M→yd <→→`hPα2TJλ
⊂%⊃".tH∃0 'λ*#P!Pf""iβEαE∈)`i*∪a_
;@)U%≤A∨→ A≠βI⊗A¬∪Q&A&p⋀¬≤
*1PT|hj4-"λ%Rp*8∃$|&↔ LhH4 jλ⋀p*pMc
∀p4EλJ#"A_3pRJ⋀⊃K⊃*)3M0AQ@⋀`g P#⊗`j'a FE)`U'a≠]βEj*^#a← ⊗∈E&∀)'cm∂^W⊗XCE'c#bj⊂_βE↔$%Rd SATGB⊃ SATO@⋀n~∀4⊃! →→→&t∪M )4~(∪'∪1 ∪ A9
≠%¬→-8~(K AAAba@$\"⊗"$)αB∈<*M99ph(%β↓A1⊃iλ%mα5∩> * [∃≤HebrQ!∃≤-K$¬ ↔4α⋀hD⋀D-(Tu~ zr⋀l→k∩⋀hD¬ 9⊃4Q$"@↓Gtt⊃(8R3Q⋀
t⊃0f∀∀p⊃(⊗H∀tλXmH∀j0m(
:⊃0m⋀
t⊃0fH(⊂tλXlc"AQTu0J∪α4jλ0r0)D∃P4I_0S⊃$λR3Q Qh⊂)λ∃3H)3Q∩)Hh∀Sj⊂3Q*¹1"C"A→QPs↓⊃".r ~u∪tI_p3λ tth¬(⊃5HU∃0)⊗(⊃I4rβ!*t⊃0h)3Q∞A3uQ)T∀t
:∀uB'⊗λ λshλ⋀103J4⊃Ssd 4h⊂(∀H∪hd∀uPd∪h⊂HT⊂Su)hλ∃∪dR3 ⋀
p5Q*4⊃β"J:⊃0l'!3⊃⊂D
K⊗lFV-, ¬
∃
+Q,lλ ⊃Ssd⋀λ∪1(Th∀jhh⊃Sit∃∪hλ((⊂SjQλ∃ t⊂ssJ3U∀dqH⊂(8h∪C!!2U3*(∀C
:⊃0m↓QB0p)⊃(∀EF-b"'⊗wm $+⊃Sitλλ∪(X3Thλ 3Qλsh∃ t 3*
¬!"B$ TTu⋀
t⊃0f1".sjI⊃4Ui~q+λ ~h∀⊃
∈,λ∩)ju∀U(∩3sED∀shλ[∩5β!*t⊃0f'@2∀J+H∀C¬
J""'→Su⊃$q3∪⋀∀⊃PsiZ∪∀HλH4⊃3HJh∪sD∩⊃(λh0uβ!!0p3)D∀K∪J⊂∈&⋀B]P*$⊂j⊂)∂P**∃⊂≡P'∃fk f⊂aUQ∈⋀P!`Sf"P) '("&∩∈A⋀Pλ%))jλ)h"aM∈A⋀h∃id⊂#⊗(⊗*∈⋀fgk⊃dP*,(R)
LSHT,-SEGLOG
SKIPL T,ST(T) ;NMK1 WILL WANT TYPE BITS IN T
TLNN T,$PDLNM ;SKIP IF PDD NUMBER
↓ JRSTSPEC5
↓HRR T,(FXP)
LDB R,[251500,,(T ] ;BECKM@UTE ADDRECS OF FROB
CAIG R,17
↓ JRST SPEC&
TRC R,16000#-1
ADD@∩AHXbQ$~∃'!∃∈dt∪A+'⊃↓ Yβ¬%≥fm) ≠!=%β%∪12Aπ→='
A)!
A¬∪9λA¬→=β⊗~∀%!+'↓ Yα~(∪⊃%%hAαXQHR~∀∪A+'⊃↓ Y≥≠,b~∀∪5∨% ~↓αXQ$∩wπ→=¬¬ $αα2>
⋀z→α∀z↓α^M"!α:-9α:Vl∩⊗H4PJ∈∈&pαI2⋀KZ≡JVl∩2∀∀PIα64*5α¬bBA$∀PJNV ¬~A2;↓-D]~=αJ*j>B⊗rαR"∃⋀∩&:⊃l∩2>∞Xh(&6}2⊗%⊂¬BD⊃↔5$DZ(T¬J →dDL)~DLTt ∀u$Z*%-¬J1PPM zα¬H⊃PU≥λX3+~ uα⋀k
αeQ)∀4rλF∪α1Q%≥⋀X6CPM
Z4B⋀k
αeQ!∀l}hY∩¬H¬¬"Q!∀≤→`¬"e
y∀ljAPPJ *%≥" 0¬⋀}⋀λeEJAPP→*%≥"
y∀m≥λ;PhP_[⋀ B
%BE⊃Q Mz⋀⋀5E¬J@hUQ↔4,TD ∀4rλF∪&⊗α(L)hE%∀~⋀¬≥⋀X6Be→z5⋀JEB⋀λ9α¬H¬¬"HQ*5⋀ 4H∪P
)B¬E
BH!~¬-⋀
5αe!Q Ly(∩¬J:⋀,≠⊃Q hU:λT≠!_4 LxT¬∩c⊗fββQ!∀U∃:D¬≥⋀X;h~J$
¬%F∪3β∈⋀2k⊃↔5∀B xb¬∩ iu*⋀λ~2⋀Q!∀ $I∀¬∩c∃
αH↔:5⋀,8)∀t→hr⋀|hd¬⋀AQ LU*:B¬≥λX3⊂!Q hPc\Z*%⋀}⋀λU∃∃ jR¬,(Bα¬,(D¬,∀F∀¬,∀J⋀¬,∀Jy∀j¬X(C"¬Yh$LtD
TthFα¬h)d#
Yd∀tF∀¬,t)hEα¬Yh%<qQ hTZ*%⋀}π!∃⋀}⋀λeEHZ%∃⋀_A⊂K] zα¬∀ZJU∀rλ_E∩xhb⋀¹5
↓PPYzd*¬JED≠⊃↔5∃dλ∀db xb¬λT¬,uy→d"λ→d$dZ*0h→Yu4T
Bd-**¬≥⊃↔5≤
hT¬ !~¬- $⋀5E¬JTu=
)ph→Yu4*
ED-∃*
5 ↔:$-≥Iz$*¬8~d,"
APPM
Z4B¬¬HU∃∃λ_@H88∃4*λZ%∩¬(ZE-dλ∀%⊂Q'4,uJ+∩¬y→e"_d⋀tz
Ye<hEU¬zHT≥αλjTt≥I→tu~
9⋀}HD⋀∀
λ*Tp(Z%∃jW M9~⋀
¬JEE@*plB!↔u∪uλ⊂∈,P∀'h⊂'#⊂ ∪PECPDL FOR ERRORS
UBD0: TLZATT$-D∩∩w⋀zAαN⋀*∈B∩bαR=⋀b∈∞∃¬~B∈∞L2&⊗⊃⋀J1α h(%↓¬~⊗RyPλ¬∃
"!↔q4TJtλ∪*Zuλ∀h⊂πf@ - SEE UBDP~∃+¬⊂t∪πβ%_A)0Q' R$∩w% M)∨%↓)⊃
AM! 1⋀∩eαJ-~R>JLr≥αZ bV⊗LhP%α∃~QαVt∩:↓HHIeαVu"&!↓E~A%αl
R∞"-→↓""H4(⋀zAααbH4(LB2Ji⋀!2H4PJR2i¬⊃15DhP&∞∈l:∃αIeRN
HhP%α∃~QαV∀!L4(L~∈&≥¬⊃1"αH4(%⋀RJNQ¬*
⊃PhP&N.Mα9α⊂hP%↓:dzN∀$HI↓↓]≠?7↔⊗{∪e≤≠C↔←.!βS#*αNB⊗≥α∩1↓jα"∈¹2α ¬⋀4PJ
:%∩∈A,∩⊃M,∩∩AH@ ⋀ ∀TVIT∀K
λE ∈E* _]⋀))j∃a"∈EβE*a"∀≥⋀h*d⊂#,∀⊗*⋀DH⊂⊂∃c~szy2H7zz⊂~s⊂ ↔ITHOUT-INDERRU@TS
HRRP∃↓(XAλ$~∀&≤
&)α bB^∈|J2P$J↓↓↓n<JR"-!6&:αHU∃∃X
E~B
⊗vLTπ∂∈\8
,≠≡#!!(∩TJλ⊃0Hp3c!↓4∪t⋀T⊂
A (λ⋀πtY<nMβy2Pz0z2CEd)-&P) ∀"∀DBP⊂⊂≥2qpzrP2i5y⊗⊂tv6⊂≥90x⊂≥44yP≥4vrF⋀e))U⊂*a"αDP⊂⊂aww:~w:rP~s⊂1g:4w:Yr∈E∈*a"+Rg]⋀h∃id⊂( -kdgUg!.DBP⊂⊂≥SpurPzy2Ptz47]z⊗tg≥2y9:\:∪riλ3rz9H1pv6→r∈E⋀T'h⊂#⊗(∩*∈⋀h*iR⊂#$( )⋀DPλ⊂≥kt]4⊂7v→⊂;0v≥p¬ to store
MORSS (BP⊃$∩∩@w'β∨U≥⋀AKβCC↔'→β'Q⋀¬⊗rLXg" ≥F H!→%∃≥D
T∀Q!PPH*X$#!→⋀e∃$λBbE T,(R)
PUSHJ P,AUNBN0 ;FOUND A FUNARG BINDING BLOCK
POP FXP,T ; - USE SPECIAL ROQTINE TO UNBIND IT
JRST UBD
UNBIND: POP SP,T
MOVEM TT,UNBND3 ;HORRIBLE HACK TO SAVE AC TT. THINK ABOUT THIS SOME DAY
UNBND0: TLZ T,-1 ;AUNBIND ENTERS HERE
IFE D10,[
UNBND1:↓CAIN T,(SP)
JRST UNBND2
POP SP,TT
MOVSS TT
BNDTRAP ,UNBNDP,TT, HLRZM TT,(TT)
JRST UNBND1¬
]; END IFE D10,
IFN D10,[
PUSH FLP,R ;Sav∀A$AM=`AG←αkCπKO≠?9↓D≠π9 βWO∃⋀2bA↓jiβGO,!βS=⋀∈∈∂∨1Q HH⊃∀αα4λ⊗r∈≡,w.n]nBπt
tLu3PE B3)zβ"dP⊗(#dSβINT ;For
←[aISg←\0AMCGQ←eKH↓←khAα{⊂∩πM R∈}~hUYh$t .B(`dg∃⊗∀)h
D@ ;End of looop?
∩↓∃%'(↓+≥¬λIα~∀∪A∨ A'@Y)(~(∪≠∨-M&A)(4∀∪πβ%_ αIbBRQ$HI↓↓\KEβSFKMβSF)βOC,≠'π1⋀⋀6∂≡T
¬<y→e#Q!∩α**5"¬Yh$t∀α"$⋀λ∞`⋀ 9<k⋀
_8zd
=β"A→∪∀VIT∃∃β¬∃
#!!2TTjD∃3PIh #"KWh⊃3HD∩1SDλ , ↓QA"U)hSQ∀π!4∃4i⋀⊃R∀¬α"(⋀⋀∞qR(4Q( Zαj⊂$⊂+dj∩'jb-IJTERRUPDS
∪⊃I%5∩APXQ)($~∀&≤
&)α ¬E¬<→y∀e⊃∀αα8y∃$DzZBlh¬⊃**U0λ*T⊂$ S ⋀@→↓'! π%β⊃¹2Hh %αU∩N@"λYd¬<→qP@!4∪t⋀λT⋀ ⊂,T ↓ ;RESTORE SP β)∀~∀&DbJj5¬"Q1α%!$$∀⋀αβ](X4
8T⋀-∃)z"b¬y→Db¬J(∃α¬I ∃~¬I→T(h!→%∃≥D
TthB⊂HJ⋀⋀βL≤βsU →β*bP∩c⊂!gS*$g*Qb∈E∈*g!+Re]⋀h∃id⊂( -kdgUg!.DBP⊂⊂≥S`ebPji"P∃dj$'Uj⊂
INTERRUPT'ER GEDS CALLED
POP FXP,T
PUSH FHP,TT +WIT@ OLD FALUE
JRST UNBND1¬
;BIND BIND4 BIL@λjA
↓∪≥λPA¬∪≥⊂bA!∨A¬∀AπA∨!¬↓≠β↔- A≠β↔Y∈`A≠¬↔%∈Bαα6∈4~aα6 ZZ
LhP4)Mβ72⋀→hBb⋀→hB⋀l→8Rm∀→JT*L8YDb¬)zU$hZ2rα↓Q#@7nh∀
Zr∩H
¬⊂R3HDλλ∃i~⊂λ∀k0Ss⋀ 3H⊂%D∃P3
(∩3Dλ4L#D⋀β"Ng↔hλλ⋀⋀∃4q*4⊃sS ∀⊂+λ
∞hλ 4uλ
85Q(
"Nng∀∩Tt⋀∃ ∪(→uPh⋀r5∩⋀λ3H⊂*s20d
v30Iλ∪sD∩⊃(
λ⊃λ
y∩0r⋀ 4h∀ z∀⊃1¬"Nng∀λλλ⋀λ3Qλ
I⊃(∃H→∃1( →β⊂!↔λ)"`∀URNS ADDRESS OF NAW VALUE CELL IJ A∞
3+; (LATTER CRMCC FOR BIL@1 ONLY). USES GNLY A,B,TT.
BIL@λt∪M↔∪!≤↓)(Yα4∀∩A∃I'(A¬%_
⊃ThP&"¹2∃Qα¬1D $4)α↓αb%αJ<4PJ"JRα¬1α
H4)↓αα:>B∀x4(∈≤
&)α
bNV:∀zV*⊂hP%α∃~Qα
Lr⊃DQ($LTFG M¬Z9α¬≥¬E⋀
Q!∀EIP⋀
b
:αH!_$t¬J(∃α¬8J∃¬-%JtLpSQ¬H+λ∩
*TS ⊂⊂i_V∀⊂TFE⋀T'h%⊂∀⊗∈E∈!$g"
]⋀fgU dP K+'$fαDX ALLOW PURPGI TRAP TG WMRK JUST
CBIND4: JRST BIND4 ;@→∪-
A
∨HA' )E∪⊂~≥¬ 4(∀T∩&: P&B≤AαA2≤∩&: H%nN-!αVA⋀2>Iα≤
21$yα6∈]2 4(MαVN!¬↓2λ4PJBVNBαA2 h(&6}2⊗%α∩bFF:∀zV*⊂hP&*ααRQ2l
.Z hRB>B∀Q`⊂M zα¬H!PT≥ z⋀∀SαB4 z⊂H∀¬J∪t⊂I!"C"IX2uPg⋀h*iR⊂#$( **⋀DNβSAVE RE@)U%≤Aβ⊃ $4R↓↓αN⋀*≥¬)t⋀LU⊗P+ S0):Phλ≥αiedh∪⊂ V#+!FEαe))jλ&`ek⊂YFE⋀Ql!d⊂α,@FFTC
XCTPRO
HRRZM B,FFVC
NOPRO
MAKVC1:∪⊃1%4A⋀1Q R$∩w!∨%≥) $↓)≡A'e≠¬∨↓⊃⊗∈$*Iα~α> 2λ⋀uλ_pc"J4U∀H~λ∪0):β!P→,@⋀X∪⊃I%~A0Q⋀R~)≠β↔
0t∪'UA YHj`VB$∩w!∨@A!∂∪9)β$↓%β)+I_ α∈$"J∈~α6→ααh∀e,Tλ4,⊃β"A~∪t∩DT⋀(⊗αDX IL⋀Aα↓β ↓_∞→αα;∪∩⋀)It9h∩3DλA"C! 1Q(
λ1r3Hu⊗c"IX2qPf7@⋀h*d
P,CGNS1
α SET@∨~αα⊗@%h8de≥↓Q LU*:B⋀l→:d λβ"W!⊃,q3HD⊃qH Q(∀λp⋀g#CE
;C #
_∞ 54⋀T`(pπg)H'!ggP agSαS BGL¬≠β⊗αα∀t9ye_h!Q%≥0U∃ A5P4I→βj`∪ L𠬬→_Aπ=_
N⊗α*0hPβ"R(H⊂R(yβ*f@,X∈~*≠
≤pπ ∪: EP⊃π A(@¹2L
≡∩ h ⊂*:α¬"β⊃UhdπF@&4⊂λ&⊗βλ4B¬EK∀ <H*@hPα2TJ:α⊂ aSβH
&~):∩\*0∀λ∪qD 1S@⊂⊂αIGNUM
∀~(K⊂~∞|rMh¬*N!ααbP4)h4`9β)U⋀U&-⊂ K⊗XDFB⊂⊂⊂!⊂eh ∩O
ACOL¬&t∪M↔∪!≤αα~
LHI`≥⊂⋀$iH$iP H!`∂NS L@∪↔∀A1π∨9&~⋀∪A+'↓↓ Yβ∂ ∩∩`.∃*QαVα8U~⋀βsS ∀⊂0pjYαjf U'i⊂ CE MOT¬'&A⋀∩∩]~P≤
⋀ ⋀ ∃Q4dqH⊂%D∃∩⊃)⋀¬∀A'!
!%≡A%_
R∈≥@4(_[⋀9λ⊂ ⊗⊂ ∈F@&$∩wπ∨9&A/⊃=→∃ααyu∀λ⊃TId¬ A
λ⋀@@Aa∞@%λ⋀SaQ@⋀bl⊂βH A1
~LhQ↓↓αtzBJ<hP&Bz "¬αββ"AQR1SDλR1sJYαV-FBαλ
)α↓α
∈]αJ<4T∩≡ ¹4X→3@! ⋀D]S`ebP⊂P('iRh⋀IVE BIGNUH
@QMβ⊂⊗∃⋀
Mα
t~0≤Tj#!!'!gSαS: SKIPN↓
~λKZ∀LyjTj⋀9ye≤-!Q M¬X⋀r $∀ ⊂(xc"B([⊂r⊂⊂T⋀@FF@⋀⊂∀$⋀α¬D8¬∀
c"B([⊂r⊂⊂T⋀FFB
L¬∨!∀x4(~ u⋀Rλ⋀ ↓QT∈DDNβEND↓_∞→αL20∩⋀)_teQQ c]9≠⋀l4
4MDβ2d$¬U1∃∈D∀r6λ⊂∈P)Rl j1 PFBFAP PNBBA1 PNBFMK PNBFM6 PPNATM PPNAT2 @!A→β(h↓!!:
!P∩¬λ⋀∪H~α→P(∀' j
CE
;8∈vA a!→>$*~⋀~(u,13U⋀ 3H⊂$¬∃r5 ⋀⊂P4h,, EDλSSjp⋀g*∂h⊂ ,
λ;;;AJD REP +∀qα¬α≤Jb
αP≤](@λ →β⊂ ∀T,⋀@Aπ1≠¬¬ I&Aβ→0Aβπ8~∀4U~&bX→3PYzd,Jλ!DLS¬2∪αQ!∀U≥⋀
Be≥λX4⋀hAP@J⋀∈α⋀Jh$
≤QQ Jα∈⋀⋀∩eeid}⋀y→e h!~4-)T¬≤ Y3⊂!→T}4Tλ∃∪K6C#βd∈αbe9≠⋀l[+QPP
*$`9(∀C
96∪2f⊃ +Th(⊂∀EJ∀Pc!!4∃4i H∀
R3Uλ⊃".ph⊃λ∀
)3U⊂$∪h⊃+
⊂∈'b⊃aP*$⊃P i#Ufbg*βE MOVA DT,SIXMK2
JRSTUNBIND
α
SIXMK1:∪π¬∪∂
A⋀Xbh`$p∞RαM→αNM→α∞>u2⊗JQ⋀b6@<Z λλ_4q(
h∃4
λ4C"A∀Phλ
α'acg+⊃i*⊂!R i⊂*∪β SIX@IT
T@→≥∀Aβ$b0j`≥Aβ↓@4%jT%#G!∩⋀LJλ"⋀H~#λK9X∃L∀T
4
∀T ∃"b
Ydd-:4⋀ e(X∀%J λ∃4(⊂r+ B4 Z⊂H∀¬ C"G↔nh∃λ→q(∀i≠⊂R5⋀ 3H∃
λ⊂Q*4S@λ→H⊂5 ddaPlfa'S⊂ g A.¬
;8∈vA 5¬β ∃λA¬→¬→↔&A
≠ ⊗ aα
αRJ∈dJ2: yd-~λIt`$βj↔∈≥]]@⊂P-"i∪β WORD BECMH ↓)⊃
A¬)∨
λTD\↓'β- LA \~(~∃'∪aβ)5PJN⊗R|iα2Bt04(∈lzR*λ5E⋀t*↓PPYze≤J
@ ¬λ4pr)∀↔
W¬"B3)zQ3(
∀∪PJC"B*¹85⊗S$
∪PU(el#"J96⊂5∈↔@⋀e*Sh"P*∃⊗)$g∃ i'⋀Ni$g*⊃i'⊂)Pi"`∪ F
α SETZ T,
α LSHC T,6¬
ADDI T,40 ;CONT@ %(↓'∪!¬%(A)↓β'π∪$~∀&L"B α ¬D1 ⋀]iU$ae@ @π⊃β%¬β ∩⊗α*2⋀d
⋀t∃XaP@**5"¬9≠⋀
β⊃Q hSαh
MH P!j$g#@ IS IN PFBUF, @)∃%≠∪≥¬)βλA 2AαA9+⊃1ph!mX⋀⋀d|8~D*⋀α5∀d3Q⊗λ g" @πβ→↓%∪≥)∃%≤A <A≠β↔∀Aβ≤A¬)∨
\4⊂∩⋀r
!P&64)αQ¹2⋀rα@4GUMENT.~∀4∃!:∀26-hMαVN↓¬↓2⋀∀PJBVN@αA2∞⋀zB∈(hP&N⊗%R5αBt∩V_∀PJ6.Z*αQ2⋀r
V→bbB:,1-FThP&
¹2"αQ2Bt∩V→.eα0∀∃XeSλh!→T}Q(⊂*&+∀∪H
β"B)Yβk"dH i→ K&('!∃c∃!,U)kb∈B⋀d))∪βI B1!≥¬
4h∩α]M
A¬⊃0∃¬(1P@**5"¬λ⋀R)* FEβE('!&[≥⋀*f`&⊃P i2A(C@OPJ↓;GIP
AU A&2α2=αlzJ*λ⋀SiYαP$gλ(#!*⋀E⋀dQ(!⊂ K i_DB]bf)QP)`∀I@π⊗Aπ!β%βπQ $A∪8~∀≤z*¬α
⊃J¬2≥α>BλhP4(Q!P@HαC"ISH⊃∈⊗ ⊗c!πnn`λ→βc ⊗ERT APP@≤A%_ α αR=α q↓
$z5 1⋀I0∀+H⊂)D∀k1+
∀H∪hd⊂4∀
t⊂R(~α"P#∪βRM.A'β-∃&A \4⊂λ (αT∀ j&@:
IFE SAIL,[
SKAPN CE@+@~∀%⋀RJNQ¬αB:!⊂4(→ E∃Rλ¬⊗∃*∈E⋀PβAIG↓(Xb`$∩w!⋀q≡Mααy∃$Bλ⋀∀Ie"ajλ!"`∀WEEN 1 ANDb`~∀$A∃%'PA!!≥¬(d$KYα6Vα:B⋀∀TλUE¬(Z5≤,D ∀`$⊃⊃0dλStS!Q@⋀fgUα@
A ¬E@:α*⊗⊗∀'!*c↔F@
SEPZM↓!≥¬+_Vb$KZ0∀11⊂∃$ S @¬⊗∞
*N∃α|1α∞X¬(λ*cFEαb"aaSh¬ @(α`$%NαJ%J⋀9ye (αi*$Sα@∞A¬α0∩¬It⋀ 5(∀jJR3QaQ@⋀P%)j⊂(∀' j2 3ON @
β∪1+%
↓∃+'λααJ-hZ%"¬It⋀$0h⊃Ii&`jβE JRSP @N@@
β($∩w>p⋀¬≥ 88U≥~βλ⊂iYβ)P*T⊂ j'SP#!'SP)`∀RIH
∞~):∩`.,r⊃α≡2α&~∃¬~∈&0hRBBh~C∪Pα2U)Z⊃H∃
JdaQ@⋀P&Si"dP⊂T⋀Q.
λ⋀∩A⋀zB)αα¬@hPα4∃*9⊂π⊂( _@
PUSH↓
1 YQ(∩(M"2iααJBbk⊃Q M¬X⋀r $∀ ∀
P5¬↓⊃,¬agSαVE@%PA!%∨≥%β≠≠∃$⊂∀(Mα0≥αλk¬αeJAP@!2∪∀K)P ∀T
∪!U'⊃)¬↓2BBt
QP$KZ≤qP "*⊂ )∪βJECT
∪∃I' A↓=!β∀~(~∃!⋀r∈@#G!P@)1Q(
823 FA⋀aPdg⊂*∃⊗⊂
! ;77\h
@;tπSr⋀βs2*⊃1⊂∩ f#⊂∪βF @!A_∩(JαN.⋀ α¬¹2] 0∃ ⋀D] ¬PLACE IT WATH *~∀$@A¬'@A(@25B∈ <h⋀b!↔qu∩λZUr4hT∃0 bH P#$V'*fFB⋀fgk⊃P!⊗⊗LT(∀FB⋀h"iR%⊂ ⊂,AH∂≥_h ⊂Yzd,(⊂#¬V*∀
!Q@4∪j H⊂λ⊗βE(
8π ≥λαα0≤2 _d*¬8→∀`HαR1I⊂)`dS⊗-FEαa`dgλ**⊗⊗LD@ ;750∞nn\@rlA=≠∪))∃λA↓β1 A>2αBBaQ J⋀**5"¬λ d
⊃⊃∪@:Q0λ&⊂abP$U⊂+dj∩⊂⊃∈Eαe*fh⊃P**,PP@≥βPr∩α|A≠∪∂!(Aβ↓+ →↓)% βP@`AβLA∨6M"R,AQ%¬⋀βP5∈≥j&∪α@
A%!1]β↓A@$KZ2∈~α@λ 4q∩(k(⊂
$⊃P)dl⊂αIT CHARACT@ %&4⊂∩A∃I' ⊃α¬α0∀
F1⊂K]yλT`$⊃∪sHUα⊂!i⊃`j"P⊂d∈ ATLπ⊂∃α r⊃α∞|rMαyjD`4⊂∈$iU⋀¬∀∪1'⊂A%!1XQ!∀U∃:@λ
⊂π j
αλ
hH%n⊗t!α>→⋀J~9αα8∀Lβ"C!)`R PP@≥βPrtβ'-∪!αA⋀Y7"]t~∃!↓9β ⊃Mβ!P@&L "*4r∩D
∀r+λ5∪#!→_∩⋀T*id%λ(∩('⊂ ∈AT
λ¬!!≥¬(j`(Lj6@4Tλ"bk∃
αHh!~¬-≤ $¬αd9ye_!→T}Q3 ⊂⊂T⊂
!λP)~∀%!∨!↓ X~∃t∩∩`.,r⊃α≡2α&~9⋀!E@4P1n∞
"BVM⋀~∈BB≠ α∞$∩∈Iα≥"∈∈2bαR"J b1αRE∩6@;T
DEzv∩¬
)u+H⊂
$',*∃$)'kMP*$)∪hπ3 THRP⊃∪PA)↓%M!∈A$BJ∞∈⊂⋀¬$E)zs"⋀X*Td⋀βh⊃**Lλ⊃ia)%@∩dπGBND E@OPJ~∀4⊃'+¬Q)_∪π¬)π↓)⊃%∨\XA ∃∩N⊗Qb↓0∃≤X@ ⋀λ3Q⊂⊂αREAK ROUTIH
_h (αNsIZS03⋀λp5⊂i↓ ¬!`U(*`∪: PUCH P →⋀$∩wπ∨5!∪→ ⊂Aπ>$)α~⊂⋀αT≤~H4B⋀YjD-∃4 ⋀-∀QQ LzhTJ⋀∃E⋀
H⊃↔2⋀≤yZ⋀e∩λ¬∃*ThλH`j!dλ⊂*'Pλ∃!`j⊂βH"
MOVEI T,(A)¬
LS@ T,-SEGLOG
SKIPGE ST(T! 9SEE IF DAG GR TAGLIST
HBLI A,CATS@!
9πβ)1∪&~∃
β)!≠ `⊂Yzd,jλ∃D85∩1↓⊃.p bU⊂*h⊂⊂P!`j⊂βH FRAME
JSP T,ERSTP
MKVEM P$CATRTN
λ JRST (DT)
α
9CATCH-BARRIE@$4∃πβ) β$d∪A+'A@Y⋀αmβ $AQ~A,jAαRzαV"⊗pαR"J}9α&M⋀"6 4QQ LE)I∩⋀H8∃%≥λ;D85∪∩*⊂p5λ`a⊂≥& c@ AS CATC@⊂[ β%%∪∃$∩⋀∪5≠ ~⊗h⋀⋀
⊂p5 α".jI⊂⋀iP∩iP ∀HE CAT@π⊂A∪⊂~∀&U~AαQd*JNH%nN-"VAαλ⋀⋀`(5h⊂h~⊂r⊂) fbCE MOT¬⊗5¬↓2∞%∩R8Q!∀U∃8@λ¬∃
#!↓αA≥aPh!d S&∈E≥H*h'gλ g*)⊗]⊂ ∀T HAS ADR-DA∨ A
β)π⊃¬→_A
U≤XA(↓⊃β&A¬ $Aβ→) $A=)⊃ $αα~V_h"∞R≤
21hMαVN!¬↓2P4PJ∈.M¬"P$$KZB>&u!αR=⋀2&J ⋀⋀d|8~DL\βH∪hd⊂p5λd f&λ#*g∈⋀d)&∩P**⊗⊂`j)hn!`j⊂f&.!Pj!gfH≥c& P iP⊂P!gfT$f"bλ!`j!R f&∈⋀fgk⊃fP"* !`j$Q⋀D]j∩$iP$P*$"H!`j!R⊂$b∈⋀e)hλ*⊗"ij(⋀DNβSEDUP A NES CATCH FRAME
MOVEM @,AATRTL⋀∩(LRJNQαiE" H4(Q'4¬∀X→5-αλ⊂⋀85⊂rλ⊂∈∈E∃$) f∪≥⋀ibU-&P∀∀∀@ ;TURN↓∪⊂~Rzα¬αiz$lDλ4
⋀9↓PP**5"¬I
$ml""'h⋀HEN BREAK U@↓→∪↔↓αA:}∩6∈1¬""J8h($*I¬∀}vW M≤9~⋀*⋀EJTM∃Ia⊂K\_d⋀dz
Z4-∩ →e$-**U¬"λj$ lT
5$ 98T"Q!∩⋀≤→_r⋀"E
E"H⊃↔2⋀}$ ∀2~D⋀M~λ(Td}t
DD(⊂p*Hrλ⊃J(31+↓Q@(λ *Tu
I∀Suf1 .h
I⊃3H 4uλλ[⊂5λ
I⊃(⊂h⊂rλλjP31!Q@2Tj⋀∃∃β
Y0TRa⊃,su λαi+dbP!)⊃`eP'Uj⊂'cλ* "P∩d∈TERRUPT
THBOU12 SKIPNTT$CATRTN ;SKIP AF AATCH FRAME BELMP∞A L~∀%⋀RJNQ¬""J; 4(→Yu *p⋀P* !`j*h∈E⋀U" ∞E T,(DT) ∩wU→/∪≥⊂[!%∨Q π(A→%β≠|~∀%⋀RJNQ¬""J:E $%Nβ_U~Bλ94Mα ~B⋀≤yZ⋀d
HYEHhαB2JY4⊃(λ∃∩∀IZβZFE∃$)'kMα:↓SKIPF T,(TT$∩∩`-D~∈B∞@⋀⋀4|t dLBα(∂$¬⊂p5λd⊂#'ST@
JRST T@BOT∈`∀⊃↔4
H9α⋀LD T
⋀9λU~¬I
$mh∩1↓Q@⋀j&∪ ¬ D1∞∈≥α⋀$↔:5⋀0r0)D∀∀ShbiidS π NEEDED?
∩A)%'(AQ⊃%'! ∩∩wL*M1α$yαN≤hP&∞∈Lqα 1E!$$¬\~∈R∞Bα&⊃αl
R∞"-→|4(Jα*J αR"J}9T$]J⊗L4U""JE!`&6}2∃α"aq62-↓E-rYr∞%∩R96-∩JR¹9p¬¬%⊃↔4<zλ(∀≤Z yd*⋀8~D9β"B)34∪D∃ ∃
SumA⊃,¬c S&⊂"$'jcdλ$c⊂'P
ORE
THROW7: EXCH A,B
%@+≥(A ≠Ldr
∀% 1π⊂↓αQ⋀~(∪∃%'PA)⊃%=(
D∀Ph*R"∀zP≠!~¬-≤ $⋀5E¬JTu=λ⋀Sa↔u3Ui→β"⊂('j"aU⊂!d"PβKEB
λ MOVE P,TT ∃)!%1∪h∪' i~A!β9∪π ~(∪∪∨-M∩Aλ5→β b,bQ R4⊂∪⊃%I∩AλY∃%%)≤4⊂∪¬→PAλ@2-∩JR9\b⊗AEh∈⊂hPα33j ¬ C,@πβ)∪⊂∩∩`.<*Qα∞-∩J∈: α≤
H9α⋀LAQ M≥X ¬αdXλ3λhαB4 zλ⊂ λk∀β"A~⊃tλ
¬⊃S∀↓Q@⋀h'T⊂(⊗*∃∈@
POP P,PA3
PUCHJ P,UB@λ`∩$p∞J⊗≥"6J∃⋀~6 4I~DL\βThλ→Qλ∀
pq1(AαA⋀j∪''⊂!K!`j S&⋀D]PP!`j⊂βHALL?
POPJ P, ;NOPE, RE@)U%≤A !%∨/≤ααP∀JXPhPα16λ→λ⊂#λ⋀D]j⊂cP iH#$i)U⊂ i#K⊂+ fλ iP)Qa`∂ND
↓TLL@
A1∞∈R≤z4$¬\~0≤4∩3λ∂c"A∀⊂TTjDλ⊂j!⊃,p bT⊂!*S⊂!gfT$f"bλ!cb"CE CALLF 2,(C) ;ELSE CALL THE USER'S FULCTIOLλ
⋀∪A≠!)¬↓0$⋀KZJ∈-∩0∩⋀hZr¬4→D⋀L2λ¬∩λT⊂p5λd f&λ!*g RATURLS
TH@%M!∈t∪Q→≥
APYπβ)¬→_∩m∞∈R≤B∈"xh %αU∩N@"λI¬∀}vQ⊂K_Z2b¬xT⋀D
hT⋀4}YhB⋀
λyt`¹8λ⊃TH→αbP*∪β S@)= Aβ(4⊂λ&Rdr∃αQd~∈BVαzHK8¬3JY3Qβ*
Su⊃(h∨FEαP!))U⊂*$)∪αXT 8π3 0A∪∂≥=%∃ααI⋀*⋀h⋀P) ∈E⋀U& ∞E T,CAT@πβ⋀∩$p∞∞$~!6
∩J&⊗α#phPα(∩J*uλ∃
Pp0AQ@5∪ H⊃⊗⊂βATLIS ;A LIST OF TAGS >4⊂∩A→∃%$A]~&b
M"rNB,~&∈1⋀~∈B∞@α~J∈l)1α-!α:=¬2∈"_@λ
K4⊃(λ$j)P⊃l ST!\]
PU@' A @2λh &BαZ4B¬¬H HK8⋀p*hαP'"Qb"b ACS
IOVEI A,(@⋀R$KZ≤
H9α¬$_qP@!33uHY(⊂@⊗
*⊂DDNβH ≥!α>→¬"∈≡LhP&BVα9⋀R¬¬IT,4,"!↔pr⊃(eP#'⊂
EM@¬⊗≤B&A↓D"6⊗M⋀r6@"λHU≥∀Sv$∃
#!↓33uHT∃ ⊂!⊃,p `U ¬ @)!
A% M+⊂∩_h &B}↓αA∩⊂h &B}↓αA∩λh &,jB*λ@
I∀SV
A".u*p4Q⋀⊃h∪H[∃λ⊂h~⊂r⊂) fbCE JRSP @)!%∨.j$∩w →M
A
∨U→Aα↓≠β)π XA'↓ ≡A !
AβπQ+β_AQ⊃%∨.4∀~¬)!%πβ⋀h∪!+π A Yα4∀∪!+M⊂A Yλ∩∩w≤
Z¬αt*⊗∩⊗ α∈∞LhP&64*%α¬bB↓$⊃↔4
H9α¬$_qPPYzd,Jλ%BE⊃⊃∪L∩4u⋀qH∃λtc"A~∃0r $∀ ∪(Y4,"!↔pr⊃(eP#'⊂&bfP i)d∩h⊂∀"biP'h⊂""h)'lH**∀F⋀fgk⊃P*⊗ BD]`∪AVA DHE RESUHTS
POP P,B
λ POP P$A
JUMPA D1)⊃%∨\h $↔84
$9↓T⋀
*)∀-D dmλ∩3D∩4u⋀qH∃λtkλλZTStAQ@⋀e)h⊂"$'kZDB]bf)QP#'j ⋀ AMATCH, SO DO @)!
AβπQ+β_AQ⊃%∨.4∀⊂∀$BJ>!P&*Vmα9α e""J;8$%9ir⋀≤~H4B⋀h⋀P)( #$λr5Q$1uλλZStC!↓2TTjD∪∀t
(5α"'dc⊂'∪P*$)∪βP∞A ¬∞PA !%∨.AQ~A)∨@A→
∃_~(hP&*≥!αR∀
20$KZ∞ X ∀d D
$,3uP)D⊃qHλ∀⊂p5λd f&βE JRST DHROW1 ;COMPILED THROTπ&Aπ=≠
A⊃∃%
~∃∃%+≥ <pλ&N\JB9α-∩JR8HIf∞yZ⋀LdX@⋀-∃%D⋀ TD dmX→B⋀-**4-λ⊃6 ~α⊂!gSbP$""BE⋀H%))jλ&)`)⊃h⋀ ;RETURL TO TOPLET¬⊗0hR⊗JβP4*&4qαVN,b⊗NM`JN⊗TiαRf}~\4(LRV - `⋀
⊃0 *Sα0 ;EH '0A¬% ¬⊗A+αα∈ 2λZ%∃≤XAP@M99∃⋀(⊂ ↔)bb∈B⋀P ∪KIPF VERRSET ;ERRSET BEING BROKEN BY AN↓ %%∨H~∀%αα*JN ⋀⋀-∃YbhPα4∃*9λ⊂ λ B3)Zβ"dP⊃⊗_X_ D@ ;ERRSET USER IN@)∃%%+¬ 4(~
U≤DαH∀¬23U↓Q@4∪j⋀∀ ⊂!Q@⋀e)h⊂"i∃g_∈EβEieRh P*∃⊗!`j*'⋀DNβP@⊃∨= 2XA
_∞ - →D,"λ9t$(⊂si4h∩λZQ(∃iλαg⊂ H⋀@
GO@¬%⊗t$A≠∨-∀A)(Y∃%%)≤$∩w∂↓_∞Iαα(U%-)`⋀`8pq4J4∃r5 K DOOP SERROUNDED BY A CATC@ AN@λAβ8~∀`-β32⋀
**4-αβHλλZTStJ4⊂p5*¹8(⊃∩λT⊂∈'gT⊂*'P ¬ @%∀[ ≥)∃%βλ\4∀vv↓
J≡,qαJ⊗αJU∀u4
tD3H∃ λαP&'Sh⊂!'Uj NE PEBFLπ%≠↓α~⋀lp
αRE∩0≥h⊃∪d⊂⊃(
H1h⊂J(α`e@.
.CEE BREAK
.SEE $@REAK
~∃ %π h∪≠∨-∃∩AαYE↓% β,∩∩`.≤
R∞↓⋀J⊃↓u⋀∩J,→1P@*:α¬%EH4
¬λ6⊂HK8⋀q*D∃0λλ`j!dλ!) fQFA⋀h∃i`⊂( "∈E⋀T*id P, ≤∩$p∞J⊗αJU∀rλ tLUλ⊃Ii⊂"i'i∈Eαe)`⊂∃⊗"`∩STP ;SET UP EBRSET FRAME
SETOH
A I%'.~(∪∪∨-∃~A Y∃%%)≤4⊂∪∃%M(A[1 %' @ZbQ$∩wπβ1_A%β9 ∨5¬∩>@-I→d(hαC"G]]P! ¬AK↓→∨∨↓+' λ↓
e↓T∩J,→1PP PTIJ .B*4r
¬⊃S∀↓Q@⋀h*d⊂(⊗,(∈Eαh*`∪H P,SP
∪!U'⊃)¬↓2RHZd ⊃↔4-P3∃(~⊃(⊃Ii&P)⊃`b∈Eαfgk"SP V+ α ;STICKT¬β→+∀A∪≤(~∀¬*N"$
αe$J
$LUα"'h)$g∃⊂+ f∃b@
HRRZ TT _Zβ⊃"A⊃Q LE*+"⋀αβ _J(⊂
HRRZ R,(P)
∀∪A≠!%¬↓1L4PJBVNDQαAJλDd≤α∩b!↔pr⊃(eP ⊂DL @→ Y ⊂∩LhP&*≥!αR$*JBJHH%nR-∩BJ%⋀J→α¬αJ>Bα)∀
⊃#"AQPTS
π@4∃*9λ⊂λ⊗⊂αRLP ; ∀(TTA¬¬'∪∈A %⊗∈X⋀⋀d|βtλ¬%JJJAQ@⋀ieRh"P K!&#⋀B]` F USEB↓' ⊗Bα DL,Dλ∩⋀∃(X∀Z⋀β∪sj⋀⊃StIUβ"B$ TTu⋀λαk fαDX ET¬β→+¬)∃αM!↓"J-"VJ:α4¬$zλ*$eαα#"A~∃0 d⊂(⊗*∪)"`bαDX OTH@ %/%'
A∀*∈⊃αλ⋀⋀4})QP@J *%≥λ BfA ¬⋀Pλ)b`∀Z AR10∩∩`.|qαxeB⋀dβst⋀λP0rdλ1P
"⊂*"i∀)$g#CE PUSHJ P →)∃% b~(∩@A∃I' ⊃↓p¬S HαB4i94⊃(
⋀@∨→1% ∩m∪ A$B∃α~}∩5α~4⋀-
λ¬∪d⊂⋀"FBα CAME A1(
$βs∪
*α".dSs@⊗SαIL VAH +↓_∞→ααI⋀*¬h~$L )HR↓]¬AP@!(λ∩J*uλ⊂J∀λ
⋀B]P ∀HEH A$B∈@" XT Th∀HZα*`∩N NIL
λ⋀∪≠∨Y ∩Aααb0∀AQ$*S∀ G⋀fgk⊃dP!,QBREAK
∀∪)%'(AQ⊃%∨.βλ$%8Z484⊃(λjSs ⊂⊂αRGEN L@∨∨@~∀4T∩J2Aα@∞A→⊂∈)-λ!⊗∀ JD@ ;λR@ )+I_ ↓r4z0≠∀ T,h⋀h
(αj*i∪α THE
∪π¬∪
A⋀αbFJ⊗αJU∀pα".dP3∃(T⊂πc⊂'gFEαP
RST BRLP1∩m_∞@$α⊃4JdibP⊃h∈AL AH
λAA%∪≥(ααR"∃⋀20≥QQ LU:⋀¬"bX8∀%⊂β"PJ∀λnA~∃0r $∀ ⊃* f∈Eαe))jλ!)&(∈Eβ≥S ∪TLπ%
9' ∩⊃↓↓:NαIu∪
¬j5$}& α`*u∪tFD P j∪βR4
0⊗Xπ0LU8⋀¬"bβPu i"D]Uibb @¬2Aπ=≠!&d*⊃α∞|"∀4'33@4⊂πg @πβ→→%_
:¬j5$}(T¬,* ZU≥λ∩⊂*HαP%*h⋀ COMP@→ Q λAβ8@E∪≥Q %!∀*R∈⊃⊂h!mX⋀⋀
∃(≠∩¬∀XhU∀h8R⋀|d
4l1(∩i→β"⊗⊂⊂αY @!U'⊃)<J0∀h∩3Jh⊂
$⊃P i)⊂lP$"Pb"`∩
λ⋀vvXα∈ 4Dλtlhpλ
h∪sHT⊂πc⊂∃$"P'⊃$f`_↓%∨+$J0∀4k@⊂λ* λIS LEAVES @)!
A'βH~∀`-β0∞dqH∃ λαP i h REFE@%∃_
∞⊗ ⋀⋀LH∪∩*84Kλλ→β"⊂*∩ ¬ IND@ !¬:0≥∀D ∀`$∀KC!≥]P≠↓αAπ∨9)β∪≥LA)"*αP∀JXR¬$βh∀jtQ( →β*'P∃$"P ) lWβE
.SP ∂%∀pλ&N\JB9α ¬DdM8~ hPα(∩J*uλ J:⊂πf-αDX ERROR IF @≥↓β%%βdA%
∃%⊗:≤*⊃αH~D,⊃Q LDβ∪λλ⊂4p*%⊃
#!⋀j&'∪α D,AS(
'⊂$∩w/βLA∪(A¬_A&[∃1!% M'∪∨≤αα∈JJ
I|4(Jα*JN ⋀α`*u∪tF!αA↔)U'i_≥αdgk"RP**,(R) 8π3 αaαNR}∩∃α¬⋀B∈ $eZt`:Qλ∀*X3P
$U,@
JUM@L R,.STOR1
λ HBLM A,@TTSAR(@λ@$hP&*≥!↓"QHh ⊂ ¬↔)U'i_Mαd))&H V *∃)`i(D)~∀%∃%'λα↓"Q⊃Q hh⋀u i→≥⋀U& ∞N↓λYβ9
0@.
→0∀Sα.j9p⋀h⊂∩c⊂#$V'*f@ Lπ$A
1_∞ 5YQP@)1S@⊂⊃!#& Ua`_FLAG, JRS@(α↓0∃≥Iz# ¬↔"S)bDP αVALUE
∀∪5≠ ~⊗Jα→1λ@
!Q@⋀j&∪αN D1β&@:5@4(∀ %≥αλ@ λ⊃QL+↓ .qhZα⊂#&∪d∈UM↓# ⊗∈u"&@∃D¬ 95∩⊂e`h⊂ j*i∪αλ
(J↓α*NααQ2~β e#λα".ii⊂&`Va"P#Qh⊂#$V'*f@ QP β≥Q∪ ∩dhP&⊗λ9α¬%EJ hPα33j ¬M R,@TTSAR(D$∩w'$zJ*λ⋀5(→U∩5 ∀⊂⋀g*∪β ARRAY¬
JRSTQ→$hP4*&4qαα
4b∈≥∞≥B~2∈8b`_h%j5$}&G M$β∪SDλλ∈ iK ⋀B+AS(
π@I`≥≤αr4⋀ 1H⊃ Z0S⊃$tH⊂iYαh&"V⋀@
IFL⋀A 1→→β∞↓∃%' ⋀α`*u∪tF⋀¬∀]∃→'
X
Z∈e*∀4!→TmQ2(λλ⊃∀CE"!$ CX$ TL@≥≤αα⊃2~r∩λQ(D$α⊂!l ⋀P%)T⊂*⊗!V'+⊂⊃X 0↔∂∃(Aπ∨5!→ @⋀¬
03U ~α,V⊂∃βITH↓'↔β↓%⊗-∩0⊂ ¬"! ⋀P⊂%h⊂",DBN@D∩∩`.}⊃α6L∩∃α≡-!α$βu0IHαP ⊃UAH
)∪Q2~*$⊃∀&≥↓αQH;⋀`L#"A→3uQ$λ∈&$`i∈EαbhλCH TT,R
∪≠=(
T
"d¬JJ4
λA⊂K]8¬∪j(αP ⊃UAH
)∪Q2A&u"0~⋀~*$
Hβ"B(⊃∩(
#!↓33uHYαP",@TTSAR(T)
λ JRST F)
P~∩$p∞⊗: ⋀⋀`¹8H∩1I⊂"!#∪ cUaV#& cCE
IFN DXFLAG10 4)u~R>!P&BIib⋀αβ⊂4eH⊗α"'~pr4⋀ 1H⊃
Z⊃⊃6↓Q@⋀P↔ f*bBD@]d⊂#'jλ* j ⊂*$"Sα EBRLπ$@QU→↔:}:0∩⋀~*$
Jλ¬⊗**#"A~∃0r⋀
λ∈#∈B⋀h"iR⊂#$( )αE⋀)h⊂* ",'+ FA⋀fh∈E T,LISAR
EXC@ TT, FXP)~∃-α∪≠∨Y ⊂∃α⊂¬D¬%J8∃∩EE⊃∪@:u∪tHT∀50)∩5⊗$ 3P
'H i) VFA%`B`b"$H**⊗_CE%`DSdπVEM B,@TTSAR!(R4TZ⋀&∈$"%α ¬CλhαRr)9α1∪)Zβ"f@ R,@DTSAR(T)
∃↔%↔⊂∪β⊃ ∩A%!1HQ!∃⋀}⋀λeEαβ⊂∃
Jp4B
E ∈E⋀Pb"$P∃*⊗_F⋀fgk⊃dP"∈⊂**)`∀*∀F⋀h'h⊂(⊗∈,@D]Qd∈D OF AFN DXFLAG
;.CET .CET1 FWLACK FWNAC1 LWNACK ERSTP LERSTP EBUL0 ERR1A ERR1 EPC1
; ¹6l∪∃'↓(X]'∃(∩w M λA¬dAπ∨≠A∪→ λ↓π∨
4∀vv↓β)∂~ααR=≤*Qα&p⋀⋀
∪∃D⋀ tD
d eXT¬$z
8U"¬It⋀LRλ∃`hS572¬λT¬$JXR⋀mZ:B⋀zD⋀((⊂
⊂∈⊂(U`g"$U,W∈EβE↔)bU≥bl⊂d⊂ F⊂i_FE)bjλN⋀h*iR⊂(⊗ CE PUSHB P,BIND ;BIL¬A)¬↔ &AM3≠¬∨0A∪≤A⋀XA-β1+
A∪8Aβ$b4∀∪!∨@A Iα$∩∩w !∪&AπI∨π.M~!α&mα2∈⊗lrR∈RLz0$λL*b∞↓⋀ 2∈λH%mα⋀*J~∀jMᬬ~⊗Aα∃Iα∩y→d:⋀∀
5⋀ 8)∀dAQ LU*:B¬≤ZK⋀Mα".d∩⊃3Dλ∩4ph~Q∩3Ht∃∩⊃$λR3Q →Qh⊃Js(∀j ¬∈EβE→P≠; JSP TT$FWNACK ;GR LWNACK
;;8∈∩@A→β11⊃`XY#
=~∩αw=$A βa1101#
∨≡4∀vv↓β⊃ π-&A
∨HAβ≤A→'#¬Q→' $RA$B∈Q$B∃αJL:"Qαu*6
⊗⊂α>→α
∩≡F6,rRL4SYem<*J∃αα
$mR1⊃(λ⊂3HD⊃q3HZP5⊃*4⊂3@⊂⊂h(!'T)$`j⊃P+g H"i)'⊂ c⊂'j↔∈≥]]P∃$"P#⊂l,$,λ∀ AXXXX) HAS TH@
A→=(
α
M!↓Aα4zIα¹2≥*αI1β α
⊂α~NV∃⊃0⊂ ¬≥]Nβ BIT 2P∨≤αα&Mα≤*Qα_hb⋀<XJDLQh⊃+λ0p
&⊗P ∞ ARCUMEL¬)&A%&Aβπ
!)β →
\~(~∃
<r∈∞
β!∃≤-K$¬"⊃⊃∪@8pπjg∃⊂*h⊂⊂aj*`S⊂#"fP i⊂'⊂ i#FE⋀fi"dP⊃⊗∀ DBDYf"Pi"aP ¬GATIP
A= A≥ 5¬β$A= Aβ%≥&Aβ≤ααQ04T2^*∈≠ `⊂*YU⋀
λADeh_4XH↔4¬≤zλ8∀r⋀h→Db→jDj⋀β∀u(*H⊂rλXp¬biβEd)-⊂"⊗
⊂FEαice H*∩#+S aP⊃
λ
∃→]→βπh∪∪∨-∀AλHQQ(Rαm∂ (A]_∞J⊃⋀z→α
M"L4(L
N!α a"Q$hP&RIhR⋀αF!⊂K]99∃α¬YiD-≥4
ttλQ!∩⋀U*:Bβ
JBH!→%∃≥D
tdF↓⊂K\yt¬¬xJT≤*λ∀¬ :SQc)k04Hzh⊃4JtC"AQ@∈E≥Nβ; @USH CRUFT FLπ$Aβ8Aβ%%M @>≤
R∞↓}∩⊗∈∩,z→α~α(∀l(Q'3@7h⊂Q*`i"PH* "P⊂βH∂ ⋀J2∈I⋀"⊗B⊗t"Mαy`λ
I⊃(∪λYβ#j$λ'c⊂*∩ ¬~lp
mα-∩JN⊗ ⋀⋀5∀→XR⋀∀Y→d:⋀∀λ4|Tq⊂) C"AQQ0 )U(≥⋀h∃id⊂( ( YDB]Q"i)bj↓λ(*`∪H
↓PUSH P,SP ;MUST SAVE TT -SEE $TYI
PUSH P,FLPλ
(MαVN!¬↓2~Bh"J⊗⋀*∈Qαd*AE0MαVN!¬↓2⊗∃"0∩Zh*⋀≤UAQ$d-*:Eβ-+K(ZTq∀↓⊃".sλYβ#j$λ'c⊂"))bjλ(*`∪H
∪⊃1_A(YU→% β0∩∩g≤yα^∃⋀"⊗∞_HT"¬It¬⋀ 90⋀⋀}Iλ HλU)JQ03⋀⋀A⋀d∪&"P* %`
@!1_∞N~BA$¬Zα∈*⊃α∩⊗J≥9 α∈u"0~⋀βsQ$
⊃∪λ
9⊃uβ!↓2TTjDλ⊃α!Q@∈E"*g⊂≥αd))-λ**⊗")*'⋀B]cbg⊃i f⊂⊂αREAK OUDMF AN ARRSEP
SKIPE @ →+%%)≤~(∩Aπβ%_A)(αa""α#"A∀λ∩TJ:α⊂"i_`FEαe)h⊂∃*⊗*dPαRK 9H β3
A¬%∃β⊗A+@AαA M $A∪9) %%U!(A
%%'(~(∪∃%'PA %+8`~*-∩IF¬PJ"JRαRQ∩-∩JR8HIfN"-∩∃α^*α∈J∃¬*:^&t"&*≥¬"<4(MαVN"Rα~bAe*:^∀x%n" r∩2∃¬*:^&t!6BJ}"⊗∞PhP&64)αA∩-∩JR8hR⊗J P&N%R5αB r&∞@hP&"2bα⊃2.mα2>N-→"A⊃↔5≤z
xR⋀$X9∀$1λ∃ T∀⊂0i4⊂Su ⋀∪qH⋀3TQ(λC"A→∪∪⊃)T⊃ ∃)jQ03↓⊃.h⊂)hλλQ**TuhD 3U∪dsQ(
λ⊃λ∀iuβ"A→∀TQ*4∩s4 tq4e
λ⋀FEαfgk)RP"⊗⊗S h_ELT(∀FB⋀d))∩P"⊗")*'∈B⋀a&*λ"⊂ ERRTN+LEP1-D~∀β'U⋀A Y∃!∈b~(∪!∨↓ Y
⊃@~∀β!= A Y→→ ~∀%!∨ A@Y)(~(∪!∨↓ Y!L~∀&U∩NQ,∩⊃@]∩⊗NR}∩∃α∞|r∩&RLz0∃~λ→d"¬λ)t≤,XAPP(Z⋀≠!→D-β∃EDd-∈⊃PPh P@∨∪9)⊗I⋀J0∩⋀_4¬%Q!∃¬-9 "⋀T⋀ ⊂,UH
/!I_ %9λ∀`(α E UH
/∪9λA!∀zR,8¬∩)d∈~∀% 1π⊂αα⊃2 h ⊂λ*$j¬J@ ¬V*⊃∀CE HRRO FXP,1(D) ∩w)+'(AM ⊃αd*~QαD
22 xb¬⋀ID¬⋀|→jD-∃1Q LJ)r⋀J¬C
DE⊃⊂KZλIrαk∀λd`:H⊂R('h⊗⊂⊂e"⊂&⊃h⋀ @DLOV
HRROI P,-UIFBM(@ ∩~)∪
≤AMβ∪_Yl~∀&5BB¹4≠
⋀$bλ~#λh!_de⋀i≠¬⋀⊂∈⊂ _BE⋀T ∈IXPDL AR1
] 9ENDLπ A∪→_ αN J0$!→TmQ3 ⊂⊗*diPi*⊗jc∀#,∀∀@ ;LEPλA↓↓∃αα8∀4(∪uHZH⊂ "h⋀GRATION
λ⋀∪≠∨Y ⊂∃αα@
Y4p5JE⊃P (
DX @(ααR>qQ LzhTj⋀5JTM≤~h∩l85¬αHα.pd⊂πgFBα MOVEH
A⋀αbV&N
2¬ ,∃8"Eαα".h⊂*'gCE MOT¬⊗5⋀ 2V≤
P∀λ¬⊂K\∀
D`9βFE⋀))`∀↓+∪≥!α` (αC"Gh⋀@⊃∪LA%∨+Q∪⊂~∃⋀2& 4J4⋀ Dβλ∃)+`g" h)'j⊃aj)P⊂α@ )/∃ ⊂→ααI⋀*⋀8¬4J(αg" SPACK PGSITION
λ⋀vAβ9λA)⊃∀A↓ ≤JJ,D
5$ 90¬⋀}9~DLpπ⊂∀⊂iP#'Ue"⊂$Sα TT ,⋀@A∪_Aβ≤AU≥/∪≥⊂[!%∨Q π(A%&~∀↓
∨+≥⊂XA)⊃∃_ h∀SY↓↓αλ¬∩¬$λT¬,Uy→d"mλ)u$ 8¬⊂j aeH!) fQP S POP'ED *WITHGUT UPDATING↓
1 A=$A
→@T⊂∀X↓↓α JαNAαM→αV<zV*⊃¬"5αRD)α∞Vα*$,Uλ⊂I→β"$gP EVEH
; C) T@E FUNCTIH∂9⋀JMα∞ b2,D
tM⊂⋀⊂"Uα@ %3Q⊃∪≥∞ααN∈Z, 4)4⋀α⋀αα(∃iλαg⊂*∩ ¬ FUL¬π)∪=_ αJ-"VJ:α5B⋀ 84⋀
∀T
$-≥Iz$,"λ→d"¬IλR¬zZDLQ(⊂iYβ*$g∃biFE∞β SEARC@⊃∪9∞A
∨HA)"*α0∀4⋀ ∀↓+⊂~^Lr⊃αBα)u$0p
∈Bα; @/! ⊂→αtyα6∀)αV:αy∀`(α⊂ ⊂RLπ ∩⊗≥"Mα⊗β ∃≥α →b¬$α⊃(
:⊃0r(i11⊂ g#bH'c⊂*∩ ¬ @!⊃_X~lA)↓∪LA%∨+Q∪⊂~∃¬∩⊗@%X⋀SJ4∃∪h ~α)P!Pd ER, WHI@π⊂A∪LA⊗BαλT:α"b TO @%∃' ∩∀(4)4λeEαλ→d"⋀iJααD→hB¬⋀βtti_S⊗( h⋀@⊃ I&RA
I_∞ *λ¬∩λT∀p
PβK FRAH
AQ⊃β(A]β&A-~⊗⊃ααIr¬≥IzhSαh∃ λαP ∃NTπ∪≥λαjBJ$*≥λ⊂ bPi!d∈Bα; CALLED↓(∞&R@⋀¬¬-9 "⋀T⋀ ⊂,
0⊗AQ(Aπ∨9)β∪≥LA→<*N@"λ_E∩¬It¬≤,~(4@ ¬≥@ PRE@'∃%- ~α∈ $βλ⊂(tc"JYβ+h)∪β:~lp
mα j0≥3P
Lπ A≥"V~→¬""∈Q⋀:⊗@%4
¬-≤α⊃1⋀50 jλ!"P+Qd⋀@_A⊃
∪≥∃λXAπ!β⊂~≡*αV 5z
U_hαN`≥Nβ @∪↓∪ ⊃α≤B∈ 4xZ0hh⋀q(T∃3Uj4c"A~∃0 dλ ∈P⊃αb⊂ (αB4
Zp⋀⊂#⊗(⊂ T
λ⋀∪!-~!α~β
αe⊂β"B*4r⊂,(⊗*∃⋀¬∀vβY`_h!→¬∃∃αTh
α".id∈LY P@ 1¬α∈JPhP&&4*%αIbBNA⊃⊃∪@8u0 )⊃d∈T VAH +↓≠ A≥↓α&9⋀~∈N∃⋀r0~⋀h⋀P)4h⊃IZαg"∈B*g ↔PR20∀∪M↔∪!↓λYπβQ%)8hRV 5z
# Pα(⊂h→3⊃(
⊃¬⊃ ⋀]d⊂h∈E WE GONE TOO @
β$|~∀%αα*JN ⋀¬,uz
% ↔9dj⋀β3tHT⊃P SbiP(∪βSSIBLA, SM RETURN
HRLZI T,CAP +=$%9~2¬$α∩4dλ3H∃)+dg" h)'j⊃aj⊂# fb←CE TDLN @(αa""α#"A∀⊂¬))U⊂*g+SαXT 8π⊂~ αV 5y→d"mλ⋀SjHαa`∀0A'=¬~.&A¬""&M⋀2J∈6(h ⊂λ⋀TIP(⊗"αDY`∩ESET PDL _A]∪⊂∩D
t`:Rh⊂K∀∀⊃∪⋀uH∪H[∃λ∀
Zp⋀∈E`R⋀h$hλ@!⊃_A(~(~∀`-β0∞d
∃0 dλ''j"CE↔ ∪EE UNWPUS
PU@' A¬ "α¬E,TQ0)A .qJq(∃ 4h∀ dg* Lπ⊂→α b2>]⋀r5αVα8U∩⋀α3U⋀zc"C!⋀ibj∪d¬ @+9%⊗∈`h &"∃∩b5α5BA2J,
22dhP4(→Yu (αP ∀0Q @$HI`≤<X@¬⋀|α3UλZH⊂
'H*g#dS ⋀ HAL@DER
∪≠=(
N∀λBbHZβ
[∃
αHK8⋀Q*:∪tQ$ ⊂4hλjP31$¬∀sP*(Q1λλjSs λZTL"!Q@2∀J)(⊃ λZTU∪AQ@⋀a&∃⊂"⊗")*'¬S"h_VLFE⋀iUa⊂ ⊗⊃h!XF⋀h'hλ(⊗"⋀BDYcbU⊂'f"λ#, ∈⋀h'hλ(⊗#&∀⋀D]i⊃ij'i⊃P#&(βEh'T⊂(⊗)αDD]iPk"P&⊃h∈EL TO SP UNWIL@ TO
POP P,PA3
PUSHJ FPP,SAV5 ;SAVE ALL PROTECTED ACC
MOVEI B,(T) 8π!∂∪9) $AQ_
α∞|jB&2,!α~Vt~R&>pα6IαdJNP4Ph)mXαBVNBα2>R(h):N,)αV=αVL4PJBVNDQαA¹2≤
ZaTHI`≤h@¬,uλ)u$,8¬⊃(D⊃sQ*¹1"C"A→∀TR$
⊃¬ B3)zβ"dP∃*∩∀)
FE⋀h∃id%⊂∀⊗*a" ⋀D]j;tw2λ)h∈Eαh*adλ#&(⊗∃∈A⋀iQj ∂I A,
JSP T,SPEC@IND
0 A,PWIOINT
∀∪M )5~↓% β→12~⋀∪A∨ A
1 Y(~(~∀β)1_
9α ¬D85⊂siQ".piYαh$f⊃b⊂!gQ ¬7
BRST UNWL¬π
∩$s⊂~⋀)1αV≤)αBJ|:8$,r^BV≠iui_H$%Nu*6
⊗α λ c⊂ ⊂USHES DOFE MH A
a ∩(Lj>J⊗JαRQ⊃E!$4λLBJ2%¬"Q1e*:^BαZ2keλeE↔8$e"λ tLU⊃4D⊃h⊃λ~⊂(∃ λ5λ∪*Zuλ⊂HT⊂∈gk⊃b∈E⋀PdπS TT
∀∪5∨ ~⊗Jα⊃2Vu:BVMi "RQHI`≤J@⋀,TD
⋀lhHU⊂!_$e"λ¬∃¬E⊃
"!↔pS∃⋀λ3∪λ →αh'i∃ g*⊂,(⊂"⊂j FEαd))'RP#$( ∀"∀DB]c"kH#((∈$c'⊂`df⊗FE⋀h∃id⊂( **∈Eαc,(#∩l("&λ**∈Eαh'h⊂∀⊗**∈.D]bS ⊂'cλ$c'⊂`df∈∈A⋀h∃id%⊂∀⊗∀!∀BDYdg'ebP∃$"P*+dg"∀)'j"Pj$ggλ!gb"CEieRh FE∃g+g!S]P(∃id%⊂∀⊗$h)cg∈Eαh*`∪HJ P,UNBIND ;@+9 ≡A)!
A:|J:R∃∩VBQ¬αJ>R,~R&>ph(&-~")αbJNC($%nα(U≥z(R⋀ :1PPM
Z4DRλk¬αe*:C(!~⋀}∀λeEF⊃⊂K\iJU≤B
8∃4 D
Tu∀X→B⋀5)yR¬≥H_4X!→%∃≥D
Tu=
A⊃!"U)sV∃π⋀fgk⊃P"⊗≡ f"h_X←∃^⊂`j)*∪α-EBRTN>(D) ;GO BACK OFE AATCH
↓JUMPN D,UNWPR1 ;IF MORA FRAMES TO CHEC@⊗AQ⊃β≤A≥≡A>ph*V=αJQhMα>Aα5BA2 h(&B}↓α~αbH4(Mα>Aα5BA2PhP&Bαα~bAd 4(⋀zB)α5BA04P1n∞LqAα∞|rMFB5Aα∞≡u→F~A⋀~> 5:λeB⋀9ye≤¹5⋀λ4lTr5⋀λP4∪j H⊂
(h!⊂(h'#%λ!ah'T%⊂⊂⊂POPB PMP2J APOPJ POP3J POPAJ1 S1PAJ POPAJ CPOPAJ POP1J1 POPJ1 POP1J CPOP1J M1PTPJ PGPCJ C@OPCB ULLKFALSE UNLKDRUE @X1J CPXDFLJ PXDFLJ @!=!1 ↓∞Bb$P4(Q*5,∃JI@M∀~)∀`:αiP!SβH ≠∨8Aβ!∪Q&~∀~)∞&¹9βP&&9α↓∪@:u0 ($ibPCE
;8∈vA$B⊗N∃¬∩6@-I→d-~λ~$*¬X⋀q(3λ⊃Ii⊂!gSαS@∪≥≤A+ A1∪')↓≠ A≥U≠¬ ∃_4)50∞d¬⊂4h
:⊂5∃*4⊃Q3H~⊂⋀ggP ∂FTEH A <XA
∨HA∪≥≥"∈ 48U∩`!αA≥@;8∈AαA
β→1¬"0~⋀9ye≠ iλ
df&⊂∃ ebP⊂P ∞@+5↓⊗I⋀J0∩¬J@λλ→Qλ∪(→q(⊂$
p3QiH5∪sAQL¬P≠≠ LAST OF IT. SUCCESSIVE AALLS T@≡A
∨⊂~N5Aα^→IB¬$λYb¬$_92⋀tXpλ *fa")FE≥Nβ; ONTO @)!
A
¬=→(A∨_A)↓↓→∪'λαq↓α∞|rMFB5Aα∈: ⋀⋀9βc ∪PFX ARE SIMIH β$0~∀`-β32⋀∃Z@λ
tλ∃ λαP'*Sa"a FROM↓
1 \A∪≤AQ⊃∪&A]β2A∨9
Aπβ8A!%∨⊃+π
A9+∪¬ I&~∀vβY`~⋀α3@⊂'i+` ⋀S OR@ ⋀αaαBVα9⋀LQh∃ λαfP'Sα F@1@XA)⊃∃_ αVα8R¬$α⊃4hT∀Su*I3Q4aQL¬P≠lA)=⋀~6 54
DD3(∃*⋀⊂⋀g R@ - I'
A∨I ⊗IbαBJ>%*≤hpλλ∀⊃StJ`i")H& ijλ'c⊂*∩ ¬M.
λ⋀⊂∀(9t`*l4⊃Kπ@5⊃ P!,@⋀⊂∀(9t`*l1Vπ⋀P ∀DX¬αA⋀αb⊂ ¬!gSαSPFX8⋀∩@AA_∞Aα5BA2 h ∀≤βsThk∞B2J:λ⊃⊗,!ggF@
COL¬'!P&BVα9⋀R¬¬H4`9β)FE⊂αAPOPJ:∪≠=(
∀λ"bD∃⊃P@!4∪t $∀ β!↓α@
;≠8∈A$B⊗Iα≤z6&>p⋀⋀-Dα5∀aQ@∈E-∀'h%≥αh⋀DZA TT,TT 3@5∃%≡A%!1αRD*0∩¬ z⋀P"T∪jURNA∀⊂Tt⋀λ∈#,∪αV1 ;FX@≥DXA)⊃∃_ αB}α( ((85⋀} ' Mz "¬αβ⊂pjt∩B'd∈OT@π!∨!(BA/∪1_A'πI ≥α∀
.@%(_4(hαC"F
⊂πh%∞α SKIPA A1∞&9α↓∪@:∃0
A @→∪M A
∪a_
V5β↓α&9⋀ α∈: ⋀¬⋀} !P@*⊂πh→≥ PMP@∩A@XdαwA≠ @⊂αB$βλ∀iu∀hλ→β"⊂(∪βP@∀~)∞B⋀Q`⊂M z⋀R¬¬H5⋀} !∩`*q1(λ e`∀RACE ;SAC@%∃λA)↓
∈.αJ$ ≤QQ%⋀}⋀⋀rG⋀h'h∩P(⊗→CE POPJ @0~∀4Uα0≥⋀→&∪@!03th∀λ∈P⊃λP)∩wA_∞AαLrR=αλ¬B¬$α⊃3D
p¬dhλ)"`∀URN¬
S1PAJ: PGPI P _b$p∞Bz⋀β
¬λIB¬≤β∪u¬D∀∪t⋀ 3P
'H V⊂ Sα@λA↓=!∀4Uα6B∈SP&BααA2⋀HI`≥⋀z⋀⋀
λ⊂
$⊃d∈ @!=!∀4T~B>B Q`⊂M z⋀R¬¬J⋀`:⊂2C!↓αA('T_e_]α`gi`H⊗XT(
DX @!= @bAA _Aπ1≠ ⊃⊃¬""d
4\M⋀
$-∃0 'βE('h_X
AH∂'αα↓"A⊃↔5≤~
⋀LQh∀ Z⊂¬⊂)⊃h⋀U@%8~∃!∨@c∀dA!⋀IαAλIfBα↓EαB$aαNIzB⋀h@λ
t∩C!λt∪t∈→LB4 Z⊂¬⊂( (#h_⋀A∈E∪Xj*(≥ieRh P*∃⊗,!VLDX -DA∪≤AQ(XA$B⊗)αα u⋀Pβ"T h!e≥αP('hλ(∩!DB]h'hλ!P TH@ ≤AA≠!(hR∈B⋀~)h⋀zB)αα¬E⋀}λ9 hPβ"U)∩qP)Jq(
⋀U - @ A(A ;UNLOCK @∪≥Q %%+A)&@1¬∩⊗@%X⋀SI→β#P#⊂d⋀SE (NIL)
UNLKP %+∀pλ%αlzP∀2(⊂%∀U5 ↓,p
g∪'ae@ IH
) I%+!%→1αJ-"VJ:Lr≥α∃*R!↓E!$4!⊃∃,I:⋀`:⊂¬∈EβE( _E∀tβ!=!∩A
a Xb∩$p∞~¹2-~!↓E⋀2bAα≤b0≥λ∈⊂*∩ ¬N PLπ!)¬↓0$(:¬D⋀iI#@!4∪t $∀ ∀ λ⊃S∩AQ@∈E(⊗ #&%∞α HLLX D,(P)∩m!∨ A→1 A∪9)≡Aλ0A)↓ 8A!∨!(A H~(∪∃%'P@dY!=!1 !λRZα∈*⊃¬∩⊗NR}∩∃α~d
≡Mα5∩> *λ¬∩λT∀λ∀iuβ"AQT∪t λ⊂NB*tλ⊃K
λ∈"⋀B]h'hλ!( ⊂ SHGTIH
)↓λXA$B⊗)α5I2 RSP5M3 SAVX5 SAVX3 BSTX5 PXTTTJ PGPXTJ @%M)0fAI'!0dααJNA α∞B}α:Z(hP4*N,∩RR⊂M2∈J&}*Mα∞|j6>d
4
Q(⊂)Hλ⊂Q*:α'i"H)'jj∩d∈E@&4⊂∩≤
YUhMαVN↓¬↓2⋀∀U~∈IVi `⊂MλZ4B¬¬H hU8~c,k'!∃¬-9¬αd1Q%≤
dYS≠P~
U≤B
¬D
∪⊃Q M¬X9α¬αH~#∀λQ(5⋀} #@!4∪t $⊃R∀¬"C"J85LnA~∃0r⋀
⊂c!
p5LG!4∃4i⋀∀ ⊂AQTp5F↔@⋀h*d⊂(⊗⊂FE⋀hh!⊂#⊗(∩∈EβE))j]⋀h'T⊂(⊗ CEh'T⊂(⊗!βEh'T⊂(⊗!CEh'T%⊂#,∀⊗∈E)h→≥⋀T'h⊂( FE⋀T'h⊂( !∈E⋀T'h%⊂,(⊗∈B))j_N⋀h'hλ(⊗ F⋀h'h⊂#$( ∈E∈E)j~]αh'h⊂∀⊗ i→⊂FA⋀hh⊂(⊗⊂i_FEαh'h⊂∀⊗!FEαh'h⊂∀⊗!∈Eαh'h⊂∀⊗ FEαh'h%λ#,(⊗βEαE)
fXh%⋀h*iR⊂#,( !ah'T%αE)j~fXNα POP P,AR2A
POP P,AR1
POP P,C
POP P,B
CR5M1PJ: POPJ FXP,R5M1PJ
RST5M28⋀∪!∨@A YβHeα~∀%!∨ A@Yβ$b4∀∪!∨@A Y∈4∀∪!∨A∀A
1@X~∀~)%'(k4ft∪!= A Y¬$eα~(∪!∨↓ YβD~∀∪!=!∀A
a X~∀4∃'β-`jt∪!U'⊂A
a Y(~(∪!+'!∀A YMβ-0f4∀∪!+M⊂A
1@Y ~∀%!∨!↓ X~∀4∃'β-`ftβ!U'⊂A
a Y)(4∀∪!+M⊂A
1@Yλ~∀%!+'↓
1 YH~∀∪!=!∀A0~∀~∃I')0h∪!∨↓
1 Y_~∀∪!= A
1@Y$~∀%!∨ A→1 Yλ4∃!1)Q)∀t∪A∨ A
a Y)(4∃!∨!a)∀t∪A∨ A
a Y(~(∪!∨!(A X~(~∃%'Q0ft∪A∨ A
a Y$~)%')¹0Hp∪!∨@A
11λ~∃%M)0bt%!∨ A→1 Y)P~∃π!=!≥-h∪!∨!(A Y!=!≥-∀4∀~∀~(_vI I%
%β5
@I Yβ→
%­
@IU∪
%β5
AλI∃)β→
Iβ≠
A¬
!∨!(@Iβ!A→3
%­
~∀4∀~∀~)'+¬)Q_∪-βI∪∨+↓↔∪≥ LA∨ A→%β≠↓≠β%↔∃%&~∀4∀I %I
%β≠∀zbdHjdXY∃!∨!∀$∩w %I∨$A
Iβ≠
~(I⊗Z b~J∈l)uE+⊃UI1eα>AJPIf⊗Z aα~J j∀4[Y↓∩¬α2f∀
6∃+⊃UI⊂a2∈~⋀zB(\
BBJα~J∈l)α∩⊗4J:,Dλ$,DzqPR¬Y_e∀XWS+∪V"S∩H:⋀}⋀→!⊂K]X⋀q*$⊂3UλZTU4
D⊃PP)!"C!'nnhλtS0*D⊃qHλZβ f# fb]βE_ +l∩y
→@|XXy→1 |~(p
mlKbNAybar¹4z)Sp'73@1)⊃5H⊃P SbBE& ¬VALFRAME==3 ;@→ 9∂!⊂A= A -¬→¬%β5
~⋀~(rvvA→≠%≠βPA∨ A¬!!¹2L2J∈6+P4)530JTλ∃∀≥4¬Rh'73HKβ⊃S
πK ∂λk∀ C!πnnb'Jt @⊗ ≡#*gj gg⋀E≥]Nβ $APPLYFRAME
.SEE L$EVALFBAME¬
;9; GHERE -- ARGS -- MAQ BE @∨≥∀A∨ AQ⊃% ↓)⊃β≥≥&XA ∃!β≥ %→∈~lp
mα|qα&~α2⊗~ α"∈23P4)530Ld¬RMπYDM≥D t2⋀~(u_'73@13∩π∈↓3∩β¬JRλ∞`Sa%'∀'`g*⊃i⊂ ∀O ARGS VECTLπ$@Q∀X
:dλd`:H∪∀jXTJ#!πnnb)I∂Hα*)∂3⊂*:α⊂ i]P'j∩ ¬R AR@∂&A¬%∃α∀*2>]¬""&M⋀z0∩¬IλPhSαh
@; S@)¬∞-→⋀J1αRDJMα∞
~∃αRD)α∈B⋀bf~J j∃αX≠∩⋀∀T Tm∀QQ#@7nb"*I⊂3@⊂'ji Tπ⊂≡J%→α2≡t90 ('33@4⊃2⊂)Z⊂∈"]αDfgk⊃dP F∀c'gFB≥]]DBDfgk⊃dP!∈∀a i∈B≥]]DBDa`f∪⊂→⊗(Ujhλ
9;; CAUSES THIS AP@LYFRAME TO APPEAR GN↓)⊃
AM)βπh~∀`-YX$$¬αa2F~|x4)MYX$$¬∩a2F
⊂4)4∈na⊃ /⊃IJ∂K πHβ( ∨βE→P≠; <SP>,,QUUP⊂~(rvv∩$∩Iβ!A→3
¬¬≠
∀4⊃β
⋀zB)!→⋀e∀T
Bbk%
αHHα.p*
⊂∈,c fbP∀'h%∈B⋀iedT π @($∩∩`.4J≡@-(T⋀`:αj⊂&⊃d∈GTH OF
IOVEI T,1 0⊗A¬!!¹2Jα~J∈l(4(__D$Jλ¬⊗⋀¬∀∪!%→αAPXQ(R4⊂λ&NαX"¬αβ∃α!⊃,¬`⊂OP C@%U
(A
I≠⊂∃ααλD` ¬⋀h∪βP@∀A@X∩$KZJ-JZ$`!α@
$AP@!13
%β5
zj⊂∈S∪+%ED 5 z⋀PKαp4
⊗(⊃J(31#!⋀¬∀~(~∀_w
→Q'⊗bA→→)'⊗β⊃α¹4JJ4]αλiE%≥H λλ∃∀qK⋀⊃S∃
¹8Sλ∪J)` @HA≥-≤Z&Aαu2N.R⊂⋀⋀`TrqIAα@
~∃M+¬))0∪⊂~Vl*J&
¬"fB∃m"⊗NRLr≥ "λ9t`Q0 )Rdπ@≤↓β⊂~⊃¬2∈ %XT¬∀}X¬∩) ¬S
IFN BIGNUH
W
→β∞αZ≥DiH∀:⊗c"H∃∀rf↔@⋀RkU P'&Uα5∩m+⊂~∈≤~⊗BR ∩2* jTl-)_2¬4→JT(hαR1HT⊂π i∩h⋀@⊂X%∃%' ¬I2αβ8de%9:¬hKαpsλX4H∀λP#& iFE.BDX END @∨↓∪
≤A ∪∂,i.∩
4b∈≥8;⋀4d_qP@(β&*)Y_
%Tπ ∩¬⋀r6@31⊃∪@9β'g-L¬+≠ I∪∈A4
2V∀hR&~∃⋀r∈J$A0&∃~Q↓Idα`≤¹4JJ4]¬Q↔49α"`iλ(!P#∪ ciFBα@
→)M↔ t∪5_∞@4Y∀¬%"β
⊂%⊃ ⋀]A& ∂AT S@↔∪@@ αJ}*R&:(h ⊂J9α¬%EEU≤,yIt8Hα.`⊂λ)` IPS 0 FLπ$A
%1≥+≠LX@bA→_∞Iα4b0≤U34d¬⊃t@λu0SλZh#"A→∀TVD∃ ∀jE∃∃∀BDX LEAP
~α0∃XZ$L~λh∀e,T ∀`$∃∃β!$c"P∪αARITH, 2@@∪↓∃%'(αα↓" ¬∩dJJ5$J→DM≥AQ$L¹4d d
~Iαbα⋀∈$$Ld 4U∃8@λ∈⊂
∃
E4∈c&∃)j!,QH ≥ %n∩M~B∈R≤Aα∈: ⋀⋀9α"`iλ(!P#∪ ciFBα ∃
1)')⋀βP&~¹2%~-H⋀KZ2&N I`≤-*)u⊂!_de%8kHKαqR+U3"'~p¬dhP_∈Eαc&*)&⋀D]&'g*SDY`∪KIPS 1
DB⊂∪
→)M
_∩m ∨+¬1
∩`.α94M¬4∈⊂hT8∈∩αc&*)X@ ;@π⊂≡⊗α D-8Z%∀}!Q$%BA_de%90 !⊃,¬b*T&"`_ 8π %%=$⊂∀
∀9⊂&~e"N-DHI`≤_ye, ⋀]b)'i∈Bα FLTSK2 8π'3≠ ≠⊂⊂\*JJ⊂h ∀DβI⊂λ)"`⊂EAPλA⊃9↔⊂∩xp
f∃α⊂#&∃)` $$p∞"VtZL%8Z%∀}!Q L¹4JJ4[⊂α".j(3Q∪iQ,¬bi'i∈Eαc&*)YD]Pi) lB]b`∩RLπ$4TJ~9↓pj~2≥"↓6:%JB-5D¬,
)`λ ~βi'gP ENGP ⊂AQβ¬→ t~∀4TJ~9α∀J≡*VhQqE6t
J&R@πbb⋀h¬Ti8QnC! 1S@λ$cg*SU' i∩h λ, NMSKBG:~∃→→)'
`pλ&6}2∃α a"¬$hP&*≥!↓"QHh $
L21α
L::V5SaE6:
∩&Bπ` ⋀UTrhk∞C"H∃∀qIGB33j ¬ @)PXQαR4∀∪∃%M(@bQPR~⋀~(~∃∪
8A¬∪∂9+~TD[≥β%%)⊂|Yl~∃≥
M↔ dt$K ≡Rλ⋀⋀`5Hb!↔pπ'g e*fb$aP+⊂f*bF'+)eRh≥⋀fi"dP∃*⊗∀ JD@ ;"NUMERIC VALUE SKIP"
λ LSH TT,-SEGLOG ∩wM↔∪!h@`@Zαα∀LyjTjB⋀⊂βj⋀i≠⋀eUDβ∩Tλdd|βQ3%D⊃3∀hT⊃0 )∪βR~∀%⊃%%¹4↓)(I'PQ)(R$∩w2,
R-4 e,10 $Pβ VALUE IN TT
"DIF JRSP @(TT ∩Y9)'.αH"eI~5 H∃j4,*λ⋀uλI4pβ!↓ SUJ9u⊂@≥αg+!eT→ ;LIST 8π %%=$∩∀∪9)'.5@$%N4Jb:VhIfN∞MαM↓DhP&:Z≤Z~0$KZ~2>u*4%Nα94M¬4∈ hTH @Luj95β⊂α".hu0Sλ"Pv⋀A3QTi: B"'acfh∪"h∈E⊃,∩⋀g)` P2 3DUPLEX
BG$ NVSKBG ;BIGFUM ;SKIPS 0, LEAVES BIGJUM HAADER AN↓)(~∀%≥-'↔@d∩∩wM3∪¬∨0∩w ¬I_∞H∀TB9↓↓¬∩⊗B⊗
!α":\b0≤4⊃B⋀uj95β⊂α.r
Rtb'bi)'⋀¬
NTS@↔H∩∩`.α(∀dyQ∪L-*)u⊂!→e%≤αp A⊃,¬`i lD]Qi)'iβE$c'λ↔⊗g+ej!-LTYPES( GARN KWRONG↓→ ≥∂Q⊂A)β → 4hP4*:αj4\¹4G!∀luQ(
λ∈∀ JF@
JRST 2(T!
] ↓;EL¬⊃α|1α&~pα∀LyjTjSF∃T`(4R5 πβ
λλ
⋀~(~∀_w≥≠M↔ dA9≠'↔∪@A≥≠'-)⋀A≥5'↔
↓→≠'↔→_∩⋀~)∪
≤A9β%∪) Y6~∀4⊂vvV↓_
V6-∩&
α≤Z&Aα∀zVR→hPhSαh
MBDe)hλ*⊂ NMSKAP
λ;;+ @¬≥⊂J↓0∩a⊃∪@9⊃0 "H!'i⊂αIGNUMS; LEAVES HEADER IN TT
8∈vv∪⊃0@∩8X\αm⊃⊗J*α~>I⋀"VBH[hSαh
@; CX$ ... ;@⊃ I
A
∨HAπ∂≠A→ hQ`≠1_Dα∀¬br⊃↔4D4Q(λtH⊃ Z0S⊃'P EAT@ &A→∪%'(ααV =(@λ →β⊂ ∀T
0⊗YX$%↓pq0$\B⊗J∃⋀26Iα4b6 5YS2⋀dX~d-~
h∀e,T ∀r¬JAPS71⊂Jea⊂K\λZ$*⋀iz"⋀¹4≠ e,k4 D,
hZ2¬4→JT*⋀→`λ
β"Ng]P fgP!f⊃`i)P∃$"P(⊂P#& iFE∈'&ieT→_
%WPA NMV3 9JON
NUMERIC VALUE
NMSKIP:↓MOTAI TT,(A)
∪→M⊂A)(0[' ∂1_∞≤4PJ"JRαRQ¹2≥!"RQHh)↓↓β∩∩&→¬Z*J ↓I2↓E"Q&VtjN.R⊂¬E D~:@hPβ"Njλh⊃Sλth∩)D∃∩∩*4∃⊂0IH(∪5*:λ⊂Q$ Q0SaQSS4i⊂NB)&ieh⋀DD]S$ij∈⋀g&ic,⋀DB]c$l∪*fFEαg&ie&⋀DDNβFLONUM¬
D@$ NMSKDB 3DOUBLE
CX$ NMSKCX ;CH∂≠↓1 0~∃⊃0H∪≥5'↔ 0$∩∩g U!→ 04∃¬∞H%≥≠'↔ ∞∩αm↓∪∂≥U~~∀∪9-'β⊂$$]~f6
|`4*"r!↓αJ-α⊗∈Q⋀B:.Ixr[D e5≤:∈ Kλ¬3I:c"B)Trt∈!"".j(3Q∪i"B3Jjpt A⊃".p**P6#!)1SH¬3UTi⊂K3JK4⊃4eD∃p4ID⊗utIyQh∪λQu∩⋀⊂0Sλ#"C!S4rhk∞B3)Q(∃
⊂*!Q@2TJλ⊂R(U3*hK⊃S⊂(upv⊃IH1jqλS⊂1e6*∃
!QC"SIZrqSπ!33uHT∃∃ ¬λ*#"A→TTu⋀λR1sJ*q⊗λ⊂1jh;⊃S⊂(uq⊂QIH1j∃¬"C"HHIα3IZrq⊂G!33uHT∃∃ ¬λ*#"HHIα")*Tuλλ 1sU)Uq⊗⊃IH1jpkS⊂1e
#"AQPr↓↓LT1 IFLT2↓∪
→(β!α&~e!L4(hP4*¹2∪9A`+β(
→ ⋀@ ;LAP AL@λA
¬'⊂∩αα"∈Z*αR"~4¬
03U ~α,P!∃df*∩d∈~∀4⊃⊃αqAh¬ ↓0∪α↓Q Jα⋀∈hTF⊂ FλαXλ 4$bP→Bβ`∞↓Q@⋀P⊂ ⋀¬∀~)∞∩Vα C Pα1∃* ""!⊃,¬c'⊂⊂λ% 0 0 DUP@_b$~∃ππ5!_bt%∞ - F⊂HHα".htH
⋀T λ ⋀λp∈`⊂L1)~∃
¬_bβP&∩
cλ$$⊃↔44}$¬α*β⋀∈α⋀⊂S % ¬!c∩l_]⋀$hλ "$∩∩\20≥∩¬ $∈λλλ⊂$hλ "αH4*∞4b0≤
F⊂∞Dλβ&'`U_@ ;FOR (% 0 0 FLLπβ(bαH4*8∈β@!4Q4λX5λ∪
l λ¬)(!g∃⊗⊂ .RPC@≥ I`≤≤βs3)Yβ⊂& T⊂!ggh⋀ANTS ALSL∈A+≤*⊃αJα2&Nαα≤q⊃#!⋀¬∃5i0 `+β(
FBαIFL X¬5 )lr∈∞Mbα`∃UαO') a`∪ ;@≥ ∃λAβ(αα2,~:BβDβP0j¹7H∪qD⊂⋀"iQF@
REP@ β(αα`∃UαKλ¬)(!g∃⊗h
ZZ
P⊃hpλ$⋀KZP≥~HRα∃λ5T`$H⊂
'H πED↓)⊃
A
_∞ 58¬⊂)λ 3DλSt@⊂d¬ALL N~∀4⊂λ (αN`≥Nβ @∪≥Q %≥β0A¬→∨9+⊂∃6$y6~DrV *λ9t`Q0 )Rdπ@≤X⋀⋀$|X4⋀`h⊃4JtH⊂iλαaeiKαλ
Xπ3@4⊂ssJ ¬RTS NUMBER IN TT TL∈A¬↓αA
∪a_
V5bα≤⊂πa!⊃i$g#H ⋀ ≤~(p
mm¬""*λ9t`Q0 )Rdπ@≤A%&Aα
→>}⊃∩⋀βt@⊂λα@ ≥$J⊗I ⋀2V 48¬∩)d∈.
8∈vvAQ⊃β(A%&P⊃↓~qU↓uβ`λ∈5λ⊂U*Dλ∈QW
P≡P≡Z`@8hP4*&4Jah→ZTdJλ¬∃¬ λλ⋀B]b`_PMH
≥PA∪≤AQ(XA≠¬≥)∪'MαA&p⋀⋀ ¬⋀jaP ∀T,TT 8π ∩αM→α"∈≤Yα∞⊗αJ2⋀l_ydM∃1⊃$qH⊃+
⊂πg"SαT
AS@ D,-24∪(TT) ;SHIFT DHE @≠β9)∪'π⋀~∀&lzP∀(⊂
* ⋀D] ibf∃⊂ N↓)(~∀%∃%'λα↓"Q⊃Q hPβ"Ng]P$g∃ ¬RNAL FIXLUM-TL∈P⊗~dz2V5⋀~6 5hZ%≤yabα¬8~d-~λA`hPβ"R(⊃p5π⋀j&'⊃P**,50∞n@`∩∩w→_∞Iαα u≤MI~d*⋀α3Uλq0 )H→≠W @¬∪)↓≠$A→∃'&H~(∩A¬%M(A&4bQD⊃↔2⋀≤→`λ 4q⊂∃ibP#aP ∀O SCALE
∃∪→→(jPJ~N
¬"Q1≠_$%N5~¬αiz$lI≠$-~λ(U≥JAP@**5"αλ@
!Q@∈E$&*_Mαj C TT,774∈``@$∩w)⊃∀A'β≠∀A⊃βπ,A/∂%-&A
∨HA≥ ∂¬)∪-↓→+≠¬∃%&~∀%)→π≤↓)(X\h
AAH%mα<JR!αtyα6∀)αRα q↓I]p⋀¬≤Lyi∀4L8→e"⋀)~E_!∀⋀U∃:@⋀L¹4JBPh_iE#∪!→T}∀YPλλ⊂1S
G"".htH G¬H⊂
'H→ZW @¬∪)↓∨ Aπ%∂≥∪
%∞∈:≤)04!→%,m D¬%"I_de#1⊃∪@4∃q(λ→βc ⊗ERT DHE @→ →(Aβ≥⊂A%∪∂!(A↓β1(
-1Q LJ+"⋀αJJ@HKαh∀hZ⊂4P*3⊗+⋀λ3Q
I⊃3@⊂⊂b"⊂*∩ ¬M, TRUNCAP@∪≥≤~∀&lzP∀2(∃
λ⋀"*
F@
IFLT4: FSC D,25 *$∩w'π¬→∃αα)∀<ED ⋀ ⊃C"ATph
λ∈→33 ∩wM∞∈2*α2,h¬⊂∩ f#∈Bα FAD TT,D 0↔β⊃λA)∨≥ ∩λZ hPα33j ¬ D1∪
→(βH$%8⋀Q*:α ∂RE @
JRS@(α↓"Q⊃Q h_iE#!→⋀etλBe%A⊃∪@¹8St@ ¬GATIP
A9+⊂⊗
-∩M "λ¬q$50 jβE HRROA TT, @)PR∩X⋀¬¬xJT¹8(⊂
$⊃P!gi ¬C@(ααN&≡ph ⊂L→y$
⋀EI∀4eFAP@ ↓GqS∪J_hλ EFLFF1 BLNV1 EDBLV1 D@NV!↓∞bh¬L+⋀⊃0v L(⊂kUHλ@ EDXNV1 DXNT⋀bA∃~bNQ⋀rBVN@⋀⬬X⋀r⋀∈λπ⊂⊂PUS@⊂A
∪⊂~∀*1α→jE∀Dλ4D0rr$λαi)bU*h∈EβE_ 6βYα:Vl*J&
¬2∈ %XT¬∀}X¬∩) ¬S.A)"-~∃α∞D*≤Zλ→b¬~β16
Q0 iRe`∞
8∈vvA→_∞Iα∀*& 4t
DD(⊃⊃*94Q1⋀U31*)0h∃ ~⊃+λλ→β"⊂('b*aQP FE∞β;; WRNG-TYPE-AR@∞A I%∨$A% Aβ!A%∨!∀J∈@$U`λ⋀u∩⊃*p4q!QL¬P≠lA)"*αP∀JXR⋀|d
DD(∪U)XQ0 IS LIFTED↓∪⊂~RzαRQ↓D!2I22I0⊂ ¬∈E⊂βH∂6l*0∃"∂HeDud⋀ ≥λ ∈P⊃≥XdtA
a_
YMRα~bhfC@β"C!≥]U@ FX@≥D@PdLXh@%¬"∈.⊗~αM ,X∈∀⋀ 3H⊂$¬⊂K⊂eH4L ∀H g" PUTS T¬β→+∀A∪≤AQ(@AλαbI2→Jp4(Q)∃∃⋀4λ∀
Bβ⊗d&&m↔#!λαc _NT!AC:
IFN AC-A, E@1
⊂AαY¬α~∀∩$K ≡Rλ⋀⋀5DβS1*!α@
IFL⋀Aβ5αP∪ a∞!αλ¬D Q(eDud_∀7@⋀fgUα@ ∩AQ(ZbW¬
"α⊂0e⊃,¬ad⊃a` DAP αAQ3!
~(∪%∨(↓)(@5λ¬4 ~β 4hp∈'cCE SKIP@_AQ(ZbW¬αP∩Nα@
λ∈P@+AC ∩~(∩A)→9_ α ¬S
\_5D5⊃↔5≤\~⋀⋀L4dλdMDβP
fCE JRSD↓
"u1∈∈ HH%nIz4(hαB3)Zβ"P*∃⊗XU`Pβ(λ@" →$$↔8t-λ⊂ S*bP$Sα @≥,j⊗J&~α∈ 4PJ*JNα@λ¬λ⋀FE∃ i&dSαλ
(hP4*~drP∪
αλ
⋀Pdπ@∃αααQ2~drP∪λα".h⊃QL$p5∩⋀
p¬dhλ)"`∀URN¬
λ@
→9( E!∀U-⊂(⊃IS14AQQS∪J_X
SKH∂)(αα¬ $iA⊂K\xZB⋀¹4Iye,Jλ¬P)1(∩)⊂** FROM↓α~∀↓∃%'(αα⊗~2u1D4λLj>@4T
E"bα⊂"!Q@⋀e)h⊂∀*
FA∈E∩c'⊂"⊂#& cK-FE"Q!'#_Nα %@/QαA ¬9≠ $~) ¬≥Dpλ&N\zRQαλb∩λ$KZ≡⊗Q⋀">@,)HR¬4→JT*⋀α3@⊂
**⊗"
P#!'SP FEαP!))U⊂"b!+_DDNβHAGH ORDER WORD AN↓)(HA1∨ ≥α}∩∩-$ ∀b⋀AQ$\λα33j ¬ @)PXQαR4⊃↔α∪5∨%
A⊂XbQα$~∃↔∪-_∪ ≠=(
*λ¬∃¬E⊂*#!↓2TTjD
⊃α!QT∈DDNβENDMF IFL DBFLAG
IFN CXFLAG,[
CXNV1X: AMJA T,CXNV1 ↓;CXNV1 Tπ∪)⊂↓'↔β↓% )+I_⊂∀λhR⊗∞bu1Eh∀Zu$
λ;⋀tlX!PT jc P~94}¬Dλ∩d↓⊃∪\<Z@⋀ s0∪λ[λ∃P)1(∩)D
⊃∃¬λ(⊃Js(⊂!Q@⋀P%)j⊂"Pl##_BD]`∩EAL PART IN TT, IH β∂%_
∈Jα& 2λAPD\⊃→T}∀T
E"bλ⊃⊂h8⊃∀l]hT⋀"c∃λ∩Hh)9∀\_IT}∀T
E"bλ∃⊂hPα2TJλ
∃¬"W"!↔q3Q⋀qH∩(H⊂vλ⊂1c!!"R1ID⊃⊗⊃IH1k⊗aQQ1⊗ +_]⋀Iij @ DXNMER
DXLV1: SKOTT A,DX 3GET DUPLAP VAH +↓∪⊂→↓E⊃2→¹2%!2⊃¬⋀2J>5⋀λ4(∀ %∃≥DλT4hf⊂HK8⋀Q(λ⊂⊂*λ∩3D¬∀K⊃E∃α⊂$fPc`g ,P$gλ∀**,D)~∃-α∪% A β(PXA ∨Y
A)(,xdF]I!π≥!q1:⋀~:Q"λH4*.LZ0&∩lzP∀(⊂@⊗∀ TFB%` KL DMOVE TT (A)
JRST (T)
Y ;EH
λA= A∪
8A 1
1β∞~∀4∀@@A β↔!%<~∃%'a'(t∪!%%4AQ(Y-%∃β )β →
∩wI βλA
⊃β%β
) $AM3≥)β`~∀∪⊃I%4A)PY))'¬$Q)$∩vA)¬¬→
AM )+ 4∀∪⊃%1∩A)0PQα$∩∩w+M λAβLA∪≥ %% π↓β %∃'&A/%)⊂~∀%≠∨- 4A)(YI'1)⋀$∩w∪≥⊃ 0A
% →λA⋀~∀@↓≥∨!%<~∀∪∃I'(@QPR~∀~(~∀~∀4∀~∃'U¬))_%'+!!=%(A
=$A→β@←
β'1β Aπ=
~∀4∀vv↓+'
AQ⊃αA↓U'⊃≤A5βπ%↓)≡A!U'⊂A↓→∪_OL@P`OLX@`@O&RA=≥)≡A@@Q
1@XA
→@R\4SYmmαM!α^∈daα≡⊗t*J∈R*↓α*ααQ2¬*N!6p↓↓!B¬*N!1β↓1BB-~!%α
→α∈¬∩0≥¬)_∃$aQ#K4λ4|4∩3λλ⊂shHαP ∃SES DHESE ROP )∪9 &A-∃%2A
I #+ 9)→2\4∀∩∃%∃!ββ↓_
:-~!0&≤z2
dr:BV≤A5:⋀~:Q2uαVN!cP&BV≤AαA¹2∪9@4)j¬-π!∀U∃:DαE⊃Q hU(Z⋀,
D c¬¬X9α`L9yd~¬Ib¬¬-9¬Re∃λ9e"e
Z4B!~¬-⋀λeEJ&sH&
¬-¬!∀U∃:DαE⊃Q hU(Z⋀,
D cαs
U≤A_4|Ph↔ f L∀
Zr +J*⊂sU¬T∃4i¬∞B4
Zrλ⊃IJ ∀Mf L F
∃4rπ$∩TTjD
∃
!QA"C!(r3U
3∞B)U∀Q)A".tHQ∪s$4q1Jλ∀Q*4S@λ⊃∀Q*:c"C!)3U∀HY∞B4 zλ⊃V
¬∩3R _R5α%jq1(
S∪pi9".piy1(∩λZQ(∃ t∀⊃4HtS λH⊂
g∪'aedCE!d"Ped]⋀edh'λ''hjRj⋀D]Pd"aeH#'i⊂⊃"f lQb⊂$g∃))*h∃)FE⋀H)edh⊂$g*&#FEαP⊂('T%⊂ ⊗αD]bl∩h⋀ IF NONE
↓JRST CKI0 ;EHSE GO PRMCESS
.SEE ANTXIT
JRST CPCALL ;CATCHALL IN COMPIHED AKDE
JRST CAT@¬β$∩$p∞∞$~!6
∩J&⊗⊂α&)α≤z6B&d*⊃α∞|"∀4(LRJNQ⋀~∈RBαZ0H89tm→HT"⋀9xD*⋀8→De~λ8∃$↓Q$-∃8ZE-!Q M¬Z9α¬H!∪\≤yZ⋀LDXD⋀ |HT⋀ IJ2⋀-**4-Q!∀U≥⋀
Bd-*:E!→T}4YT¬αdZ*%$Q!∃≤-K)R⋀-**58!~4\MλT⋀λH⊃↔54JXR⋀dλ∩⋀$Z85∀L(Z2¬λZDD
$λU∃z*2¬¬)→e h!∀¬≤-IyR⋀-**58!→%∃≥D¬¬%⊃Q ciH4 dβλ IHp1M$¬S⊂p(h Sλ`c$ ,LCAFL .LCADB .LCACX .LCADX
λSUBTTL SUPP@∨%PA
∨↓∞ X⋀∩)H1λ∪
:0TTaQ@∈E≥Nβ; ORDINARY TYPE COMPILED LS@+ %&A¬∃∂∪≤AQ⊃⊗⊂α≤\HT¬ 95∩β!πnnb)*tλ⊃¬S⊂p)β"Ng]P'*Sbi$aH*,h"H!cfh∩d⋀ED↓→'+¬I&A¬ ≥∪⊂→ααI⋀,M$λ4l$T
tM⊂⋀∈E∞β;; JSP D ,¬→πβ1_[≤∩$s⊂→αM→α¬α5*0∀≥I→t`$⊂πc⊂∃$"P*⊗h"FE∞β;; JSP D,.LCALL
;8∈vA$B&Mαα)u-⋀α3Q$⊂2q*4⊂p4HT⊂πc⊂⊂αINDIL¬≥α
∩≡ $x4⋀ Qλ⊂*(βc ∃M BOR↓)⊃
~(p
mm⋀∩⊗ 4Xi∃"⋀βqH
I⊃(⊂*(βR⊂)Qh⋀ARG, AND L@∪'Q∪
%⋀2V 48¬∩)d∈S,
λ⋀vvVαα∈ 4D
D \Tλ4
∀T t2⋀iJU≤Dα3Qd⊂⋀"P⊂i#jfQd∈TS FROM↓)⊃
AM)βπ⊗8~∀4SY`≠Zλ¬∩λT⊂πi"⊃i⊂'cλ* λESE ENTRY @OIH
)↓∪&A¬U∪⊂∩Q⋀J0∃$t
DD(⊂siZ⊂⋀f"⋀¬
JRST .LCADX ;SETUP FOR DUPLAP TYPE CMH !∪1 λA→M+¬%&4⊂∪∃%M(@@:d~∈∞`KZN⊗-↓α
⊂α≤q0λ&⊃l⊂ ∀YP@
Aπ=≠!&d*⊃α≥*∃∃1Q LU*:BαH8∀$↔:4-∃0λ⊂'i⊂"∪h¬BLE TYPE CGMPIH λαα2NV∃∩L4(LRJNQαr2∞∈4`%nN-"VAα4zIα~dz0∃T
EM⋀Tλ4l4∩3λλ∪∀jXTTc!⋀e))U⊂⊂∞LCAFP⊂m' )+@A¬∨$αα~& jTj¬K~⋀*⋀9yU⋀HXB⋀e8¬0J*c"KIHp3∪π⋀h"iR⊂(⊗)
X⋀]iQh⋀U@↓
∨$AI ∂+→¬$Aπ∨GJUM
JRST .L@πβ 8H%n⊗L:"Qα
→α^⊗daα
Vhα~>I⋀r=α∀:V6⊗u"L4(LBJ2M¬ $$\:>@"
Ir⋀<Z@λ
)1λ∪hd∃∩⊃$λ4Qu)3U∀aQ@⋀ij⊂(⊗*βE↔&!Pc≠]⋀*fh"H"⊗*g⊂$g"⋀B]j$$P"l$U⊂)dc f)P`f&⊂∃'P''U,h"P∪)ja) ⊂'i⊂∪!`f&λ*#P'∃fb`∩IC
PUSH P,D ;EH '↓ 1β↓)⊃%∨U∂⊂A
%0bA∨HA #+%-β→ 9(X~∀%∃%'(ααV*
Lr⊂$Zα6⊗∈tJ2:λ(T=H~"⋀≤→IB¬$βh∪JY10 $Pβ @→'U↓$4Ph!:2≤
~ahMαVN!¬↓2∞~MAD$¬]αVN↓⋀
∩%(Z5~⋀iz"⋀≤yjd-∃I→d<00r →β"P'∃da"iλ* ∂ FIX@≥,h4(_→tT
λ@ ¬&!`c
D@]dSαCREMEH
(A⊂A!β'PA)↓↓∞∈2bαR=↓tb≤IESα¬y ∀9λ⊃Si⊃utaQ@∈E↔∪!`c&∞α PESH P,CFLOAT1
α AMJA D,.LCAF5
λ.LCADB2
DB$ PUS@ P,CDBL1
∃ λH∪β∨)αAλ9→πβT~∃ ⋀α(&"⊗∃⊃αnNMB∀MD D ID¬$zλIu,HUU%MλT¬-≤Z λ Ju0TD↔#"AQKS⊂h_v
C!λv α*4r⊂∀⊗!afT&_FE⊂βX$ AMJA D,.LCAF5
CX%∪→∃%$A]~&b
M!αb∞ b1αRzα∈ <X⋀∪λ[ 0
,T P ∃SER LSUBR!\]
α
.LCADX:~∃⊃0@∪!U'⊂A1∞∩Vα CλhαQ⊗⋀A03rH∀⊃ IHp1M!QQ⊗∩Bd"`∩R [SIX@¬∪(Aqββ→↓)≡A U!→ ⊂5)3!↓+' ⋀αα2NV∃⊃∈rthP1n:}∩⊗@"¬j%≤-D dm53h I4u I4q⊗⋀∩4u ∈h∩s ~uλ∩II4u⊂∩d ST ILIST1 ILIST3 GPRDT@⋀A∂)I (p~(~∀`-β32¬$λZ4*¬I
$,*λjTt≥I→t`*h∪1*(3⊗(
85Q(
I⊃(∪ ibi∃$"P*'ja&⊃P ∂F TYPING "SETQ "∞
~∃9≠% λβP&BVα9⋀R¬¬Id}⋀iz@HK8⋀u(
HλλF⋀d!)⊗&P F∃αNORET
α POPB P,
α
,RSET8 PUSHJ @,NOTNOT ;SUBR 1
↓MOTAM A,V.RSET
POPJ P,
NOUUM:∪!U'⊃⋀A@Y≥∨)9∨ ∩m'+¬b~∀∪!%%5~↓αQ-≥=++≡~(∪!∨!(A H~(~∀~∃M+¬))0∪-β%%∨#&A1∪')∪9∞Aβ≥⊂A
[1∪')∪9∞A%∨U)∪≥ L~∀4Tb&NPJBVN@α~bAd~∈B⋀P$%Ne~V
HhR2&N%A`⊂Yzd,Jλ⊃D`)3α"'a idPβALLY, THE BUNCTION@
2≥! (!~4\M `λ
∃α"'P!`f∪ ¬D WIP@⊂A⋀A!+≤B)α~β
α`hαS∩*:⊗ nA∀∩U3*λ(⊂@⊗⊂βPOPXJ
∀∪5∨ ~⊗Jα↓1αλH$%89D`8PQ4J4⊂+⊂E ∃∃¬J@∈E⋀T'h⊂( BE⋀)h⊂* ("&'∪eFE⋀)h⊂* ⊂aggFE⋀`Se P) & ij⊗→FE∈≥]]@∩d∈TERLAL LISTING FUNAT@∪∨8rA
¬→+β)∃&AαA1∪'(A= Aβ%≥&X@~(rvvAM)βπ↔%→∈A)! ∪$AYβ⊃+ LA∨≤AQ⊃∃ααλD`!Q$\~:C@ J%R⋀%E⋀
H⊃↔5≥-λZ"lD_94M⋀
d-∃9→tp"B4
Zrλ∀¬HC"B)
TVHλλ⊂*!QRS∩*∞B2 JVH⊂EE⊂*"!↔p⊂0i94rλ
H4Tr)yβ⊂ ↔HIC@⊂A⊃∨ '≥(~⋀∪A+'⊂A@Y⋀αlA -β0A
∪%M(Aβ%≤A∨$A
≠ ⊗ α&P4PJ"JRα¬1λ⊃⊂h→I∃≥!→T}∀Y∀¬"c↓⊃∪@8p3∪λλ⊂V$ Ttλ
λ∈$f∩ij∈Eαe*fh⊃P V∀∃*⊂FEαh*adλ!( ⊗∃*∈E⋀T*id FXP,T 3CONTAINS 0 - USED AS COP ≥ ∃$∩⋀∪A+'A→1 I$$∩w -~QαN
2∃αIλh"&2M~QEHMαVN↓¬↓2⋀⋀KZ6@$λZ% 94q+⋀⊂∩4dλ5P3⋀⊂πghβE HLRZ A (A) 8∈A6
Iα∞∩|∩α∈I⋀
2fRDJ2¹8Q!∃¬-9 "¬αβ⊃5Hβ"R)I4q→⋀bd!R⊂ V∀∀∀@ ;SAVE TALUE OF STACK
HRRX A,(A)¬
SH∂&4bQ
1@R∩αw
_∞F"αR∈¹2,*L4(LRV6Bpα¬2∈dJNADhP&Bαα~bAe⊂$%nα(U≥z(R¬⊂Q!∃⋀}⋀λeEJA⊂K]D ⋀
~¬SB
⋀βqH
H3∃1*4⊃s@⊂∀ >
λ POPJ FHP,
3 ¹6l@∪∃'@A(I∂Q% )⋀$s∂ LA% β⊃)β¬→∀A∪≤A¬$eα↓β∃λA5β3¬↓∞"⊗≤ZMα~}⊃α⊗∀zJMaQ hTzJ$%$'!∀E∃+$⋀
∪(∃E *Q01
H0S⊃!Q@4ri~∪H∃EJTq5↓⊃,¬bi'i⊂!R ¬CKS IFF *RSET NON
LIL
BRST (D
↓SKOPT AR2A,SA
α JRST↓∂!% Pp∩∩w∃%%∨$↓∪ A≥=(Aβ%Iβ24PJ6 =hT¬%"H~4
λ~#∀⊃Q M$β∪Q$∃ ⊂*¹7∀Q∃πa .q**St@ H∪SjD∀Q0(⊂0SλT∃⊗4λT⊂4TH≠ ∈E⋀H%))jλ∀*∀FB πTRDT8: MMP
↓β$eααbJ,_JD HQ∪@9β`∞ ERROR RE@'Q_∞J∃¬"0~¬8¬⊂)Hα i"λ)"`b∃ a&"CE EX@π⊂AβHeαY-I β )¬¬→
~(∪ "≤Aα∈∀ 2⋀Q!∃¬-9 "¬αβ⊃u
(α*≤DB]cdk⊃P ∂UT A FAIH ≠β
(∩(Lj>@4Y∀⋀
Bα⊂4F(*#"A→TTu⋀λβj)"∃! ;TRP∩A¬∂β∪≤αα&→αdzN⊗I¬∩⊗@%X⋀SJ4∃∪h
Zc"C!β≥`∞OIL¬) ∃∩VBQ⋀r6&:α@ ⋀λp⋀"ah¬ CHEC@↔λ⋀⋀`p3U∈∀⊂π'dS*~P'∪dg"3 NOINT4 NOIH
)ααα0∀|α3U∈$⊃3Si→β*∈EβE)ba∃* NLπ∪≥$*JJVα
B⋀U3PjI3sC!⋀¬∃≥=∪⊂~R-∩JVB π LUYZ⋀*⋀∃H4D0ru!↔tp
a⊂_P⊗H g a∪ Wb$`a&"CE CAIH AααbF@%K⊃P@J *%≥λ⊂rλXp¬`∃
λ⋀∪' Q_
α¬`H$%4
$ Q∪s$λ4p g⊂βHRONMP &~)_
>&u!Ah_[⋀9λ⊂ ⊗∃d∈REAL ↓; ¬% β0A)&l)∩⋀α3UλZTU4
Jc"B*9p4⊃hT⊂""'P⊂λCLLππ.α4⋀ Qλ∃
K*#"A∀⊂∈gk⊃dP F∃)*`∀H
∪!=!∀Aα`4(Q'3@7h⊂rλXp¬P#∪βR ANY DELAYED ¬% β0A)&l)∩⋀α3UλZTU4
Jh∈⊂ S ⋀ @%U_A)⊃∃~~⋀vlp
α_d⋀ Uα+@⊂∪hib DO @)! ⊂∃αLqαRλT⋀`:Q⊃4D QkwK¬λ⊂s a` @0Aβ≥λαα0≥⊂⋀"i αλ
⋀lp
αizD*¬Iλ∃"⋀_jD-∩λ⊂λ h∪tD β(λ, @π⊃ π-*A∂ Q&Aπβ1→⊗⊃⋀
≡∈&p¬`hSαh
@; @ECTROYS D AND B~∀4⊂
∞α,~.@+αB4i94∪@⊂∃e)"`S⋀X NOL¬∃α≤
1α
*αBhI∀`(βP$cλ''j DALAYIH
∞~(∩A¬%M(A
∨%→(`~(~∃π⊃∃∞.PJBVN@αA2⋀hP&BVα9⋀R¬¬JTLU∀∃!QSSr) .B*9r4⊃$¬∀
#!↓(∩TJ:λ∪Si→β*~FB⋀iedT ¬ D1+∃%9∞∩g¬∩0≤≤X:2¬QkwK⋀⊃R4J:β"B$ TTu⋀λpr,H⊃,¬`∀OP @→ Y ⊂⊃α}⊃α⊗∃∩R9ααy∀dbλIr⋀
λ9⋀,≤αp
FB''dg∃~X
PUS@J P,FOILTA ;LOW PROCESS ALARMCLO@π⊗A∪9)⊗∃*BRLhP%α∃~Qα~|J2QDhR2>&u!Mh~94M⋀tλbej(T
⊂↔9dmh⊂3K∀∪u∩λZH∩3JH4TU*∀c"A∀⊂¬))U⊂#'dS*~∈EαiciP∃d∈REARλ
∀∪5≠ ~∃⋀!2V∀*∈I"2H4(%∩0∀(⊃⊗
__⊂⊂00 0↔∪_@Q:|J2R⊗α*%-¬D⋀u%∃∃B¬≥X⋀∀
(4p FB⋀P ∪KIPF (P)∩v↓))2A%_
R⊗∃∩VB~α∈AααI⋀M~λI∀l(Q!∩α¬λ¬4i H⊂ 4r3JA,¬f`VP!f'P!"`∩↓$@Aπ∃
A+∪M)β⊗R4⊂∪∃%M(A
∨%→(b~(~∃≥∨%≥(ht%'↔∪!≤AαY+9%ββ_4∀∩A≠=(
∈%⋀ 2R-" (αB4 Zλ⊂
YTQ0)A B2J*uλ∃)→U⊃6↓Q@∈E≥Nβ; DO NOT↓)%β≥M
∨%~ααR"∃α∩BVNDQ1αB}α) α≤*F@,Yh4-~ →e$z⋀)%∃≥D AQL¬P≠lA3 π%→(A ∃! ≥ LA∨ A1≠⊂≡∞Lr≥α αR"∃¬αVNαRα∈∩∀*NMααIr¬≤XT¬,DXI⋀-⊂β"Ng]P#bH!`fbH!)'fH''dg∃ i)*T*⊂'iλ"f)bUd"`∩E!
α
LOINTA:↓SKIPF D,UNRRUN~∀$A∃%'PA≥∨∪9(d
∀%' )54A+≥¬I+∀4PJBVNDQαAL*N& h &B}α)αA`h":>LrQI!~4\M `⋀"eYj%$QQ J⋀αTTjD∀∪t & ∈E⋀bj-&H*g!*∩d@
PUSHJ P$YESIND
λ POPJ P,
λλ
*,r0≤h@∞GB""%)bbP∃dg"λ∪⋀@
;CAR@π $∃∞∈∩$"I↓⊗≤
∩α⊂↓⊗∞∈$"I↓⊗≤
∩∈Iα*≤ J λ⋀Xp04D⋀0p4D⋀0q⊃λHα)⊂∩Pb"" ⊂∩ab⊃ )⊂∩Pb" iλ⊂ab"⊂∩ab⊂i⊂∩aQ)⊂∩aP`b")λ⊂a``Q i⊂∩PβAADR !CAAAR %CDADDR !CDADAR %@π β H@@⊗∞$
∈I↓,~∈∈∈%⊃↓∈∞
∈∈Iα*∈∩∩ "I↓⊗≤"∩∈⊂↓⊗∞∩
∩I↓,~∩∈∈
⊃↓∈∞ "∈∩Iα*≤ H_∃⊂!Q Hh!⊃PE≥X*E$_8∃∩|8J"¬zZDLQ0 P⊂e"⊂#∃e!`∀ILπ⊂~LhP4)4∈fd ⊃0Q$λQ3∪jP#'f∪'kP*∩ ¬ "FAST"↓∞∈Il~∩Iαα)u-⋀α3Q*5α⊂∈E∞β;; USED WH@ ≤)%' λβj0∀ED⋀ TDλ%J⋀9yU⋀HXB⋀≤xHR`!αA≥]Nβ @≥∨Q
A)⊃¬(A)⊃∀A% →¬)∪-↓ ∪'↓1βπ ≠∃_
Qα|1αRλT⋀5h:DLpπ⊂"*),P∀'` NTS
;;8∈A~αP∀4TTJ*T⋀P$Sh'i*⊂e*⊂*∪β THE P@∨∨=$Aπ∨5!→$\α4)50∞d⊂πg*λ"k"iλ!d gbP"$⊃dPPF⋀@
CARCDR: ∩m∪⊂~∩-Aα:Vl∩⊗Iα4zIα∞ b1αJα∞ X⋀∩)H1λ⊂i⊃#"DXp1⊃λJL¬⋀idh @ A((A ;
!CADDAR: HLRZ A, ⊃α$∩v@b4∀Cπβ⊃ $`(M~.&Bλα¬!αλ¬⊂HK4∈ hRX8∀$
'!∀De+$⋀
bα⊂"!⊃,¬P→CE∩a`Q)_
SKIPAA((A$∩∩fP~∀Kπ¬β$d∪!→%$A⋀XQαR$∩v@J4∀CπβHpλ&"e∩aα¬bB¬$$KY↓X∀PJ*J ↓"Q⊃Q",≤HHD%∪αB4i94⊂ λ∃λ⊂ ∀B]P∀∈⊂ab"⊃ i≥⋀R&)-⊂⊂V⊂λA ; )
π ⊃ $`(M~.&Bλ⋀⋀
λ⊂ ∀BDYP⊃0,
∀K
∩⊃P&"¹2∃Qα¬1D $$↔6∪
@∈E∩Pb")
αiadh⊂P V∀⊂T@D]LY↔∈E ab i∞α HLRX A,(A)↓ ;13&
%CDR: HRRZ A,(A) ∩Dh\
∀%∃%'(Q(R~(Kπββ⊃ $`(M~.&B
α¬!αλH%m2p4)⊗≤
∈∩A) ;32.
%CDAAAR: HLRZ A,(A) ;33.
JRST %CDAAR¬
%AADADR: SKIPA A,(A) 935.
!CADAAR: HLRZ A, A) ;3&.
∪∃I'(@K
β β$4∀~∀~(_vKπ¬%π $↓utAβ⊂A∪πβ⊃% A∪ X
J@hP4(Q'3KZλI⋀*⋀iyDd}y→d:¬H_$d
~2⋀
λJ$ u8hU∩¬hX5$}'$⋀<MhYb¬$α⊃( →β#'VS*fa"⋀¬
;;8∈@A∨_AαAπ¬$[π HA∨! Iβ)&|q1αN
Iα91¬""dλ4
∀8J%@9β⊗Y.H$iP*∩ @
;8∈v@A¬ ↓% M&A∂↓)⊃
A→β'(AI∨ ⊗RLr∃α~}⊃αR"
!α>B-∩∈R∈|q9↓αtzR¬ααI⋀
"λI⋀('73@4λ∩3Hk3U)XQ0@ ~h∪SjD∃∩⊃$
p31$λ4h∃ λαP$g⊃"hλ-NUMBER-FOR-CKM@ILED-CMDE
9;; ALSO, THE TMP !3, BITS ENCLπ
A⋀A↓ π=≠!∨'%)∨ A= A)⊃∀Aα[λααNBJLr≥α→jDh'73@4λλ ∀H* "P∪ c ∀5≠↔' ⋀⋀`:⊃0 U$gg - !↓
&QαAEα~}⊃↓
⊃⊂⋀⋀ Qλ ⋀St@⋀ Q∀Vλ⋀@
;lp
↓⊂¬∩¬$λT⋀LQSh *fa"⊂ ∂F THE "TAIL" - & @¬∪)PE)β%_DA∪LA% ≠¬∪⊂~∩-⊃α>→h!mX&¬6 ⋀¬≥¬)→d:λλ⊃%HβP∞, TAIL ⋀A>2↓∀ HH∀"∩ ~2α∀HH∀"⊃Q#K4⋀β~Jλ¬∩λTλPSk∀⊂4Q$⊂⊃4hT⊂π ∃M@@ %↓%β≥ =~DA≥U≠¬ ⋀ααP≤Dα0r⋀⊂⊃(λdπE@ILAR
9;; USES Tπ⊃ ≤↓_∞@-J
U%$→hr⋀∀~:B⋀U:⋀⋀ IJ2¬$λT¬$DT⋀T
(8E∩¬)zU$hZ2`HαC"DXp4PhJL¬⋀FBαIRP X,$[A,@
AA(AD1 αY ⊂~∃ββ⋀Yββλαb∈∩¬d
∩⊃HH∀
DH_Bd⋀H⊂ λHα"∈E⊂```@,AAAD1ββ ααb∈∈∩ ¬D $_⊂ λ⊂1⊗⊂b" @,ADDD
λ@AAA,@AAD,@ADA,@ADD,@DAA,@DAD,@DDA,@DDD]AD,,X∈`Xb4⊂`@¹1αaE #⊃Q#αc¬FαcαF∃C
+ !QL ¬F ∈¬ ¬Fβ"L%F+ #∈∃α_V_K_V_nU&⊂ ,[0,0
2,3,2,3
4,5,6,5(λhTXlXn4⊂ EAc E #⊗!C F⊗Bc UF∪"c⊗qP@&, &∃α_Y∈ YV_Z _ZV_M⊗_[nCE `¹5hzzK¬0C$~(∪β LjTW)1>db\αYskin≠πK∂'⊃z`;&5b←!Q%$
)Y∀`!α@
ICADRP: PUSH P,@π
∪0D∩∩fW%_
R⊗α)d Bβ0p*(q∀T↓Q@⋀e)T⊂*⊗$PT∈RP
λ CETO DT,
∀∪A∨!⋀A@X~(hQemm¬~.&B*α&→α≤
J∞⊂⋀⋀5h:DLqKλ
Y5∩λ→βb"P∃dπRD↓∪⊂→ααJ@h_5e∃!_4 Dλ∩e 8~ HJ⋀⋀βL6≤.7 HαB(λ`df"H V(aQ ⋀DDR ;Last@πβ%π⊃$Ags4~∀%αα*J ⋀αE"α#"F(⊂1H d&)-λ**⊗∀⊂Th
%CARCDR,QCAR
∪→M⊂A)(0Zb
∀%∃%'(α↓E"QHh c\8⋀TjXTTc!⋀¬∀~(p
mm¬~R∈:$
J↓αLrR∈¬∩⊗@$X λ
:0TTdλSt@
I⊃(∃H~R3u*4⊂p4EXq∀C!πnn` h"a U$gg)Kα THESE CALL A↓∞⊗:%∩∈!α$*≤q⊃4Dp⋀$aR⊂ g *RSET
0⊗YYα6>$)αB⊗α(d`:S4h
K4⊃(λd"aeRg#P'Sα THE OPERAJD AT EACH S@)∃ \
∀4⊃π%'U
JMβ!P@)4Tλ ¬ ⊗p%Hλ∈ `K b⊗"⊂T⋀DD
λAAA1ββλY¬ αYβ⊃λY β⋀Y↓βλαb∩$∃HD$Q(∀ ∃H∀ EH∀ $∃H∀ $EH∀$ ∃H∀$ EH∀$⊂+⊂(Hα"∈E⊃ ``@,DAAD1 β ααb∩∈∩ ¬D$⊂0 ⊗⊃ ⋀AD1 ∩∩λ¬D$⊃⊃↔!QPh6⋀~L¬⋀eh⊂#⊗⊂βR0
TARMIL⋀⊂∀!Q#@7nh∪λZα⊂ @=0, DtbP⊃α r⊃αHZB⋀≥{ ∃@*H⊂Q$λ(⊂p*0q∀Dt⊃4H~⊂⋀gg ⊂+dj∩⋀¬∀vβY`~¬IλR¬4~)∀ HZ2¬:K↓EJ$
$ Qr3Ht⊃uQ*$≤¬V K ⋀p≤\αα2-Dλ∩⋀uYX$-∩ aP@'nj`⊂⊂ ¬ COMPU@)∃λAπ∨I%⊗N⋀z0∀⊂⋀g#H* ∂ CXYZWR AS FLπ⊂∩∩}:Mi↓h!mmX⋀⋀`$∂""!∀λλ⊗D¬hλ@⊂λ⊂⊂⊂$⊂+V, ,P i⊃P ∞@+1_∩Xπ3@4⊂π⊂≡BDP⊂⊂λ⊂,U→λ∃P-⊂P~⊂⊂λ⊂⊂$cλ+P X↓β%
A9+⊃0hQ`≠4 bβ(λλ⋀⋀λλλ ¬Mλ
d *L@¬4⊗H
d∈,λλ⋀⋀⊂⋀c⊂∃β @∪↓_
V2`h ∪50λ ⊂≡P+_X⊂∃H,⊃~P,U→λ∃P%⊂P→_⊂λ⊂⊂$cλ''g"H'c⊂+K,∩,V⊗α ARE NULL
0⊗YYα:$)αR^zαR"→hu≠Pβ"Ng]P%@1] THIS REPRASENTATIOL⋀A>2α¬α∞
⊃6∞⊂⋀⋀`:⊃0 U$gg IS EASILY
λ;;;@¬∪)/%'
A ∃β⊂≡∩ ∩2¬9¬""*λ⋀∪j95∩3i⊂ ∂F THE FIRSDbA¬∪P~∀`-β32⋀hI∀85⊃4d⊂⋀"Ph i*λ'c⊂*∩ ¬ @%∃' A∨_A)"*α⊗ 49xDLTuD¬ 9⊂⋀adλ$ iFBα;;+0 FOR CAR0@bA
=$Aπ HAβ(A∃βπ!¬α6N$J0≤KC"G]]P-,P#'⊂ g,H)bj MF OPERATILπ⊂~M⋀~6 - HU$(⊃TIYαP!`⊂ g"λ!b),
0⊗YYαRα∀zV≡↓⋀~∈∈Ibα≤ J ⋀¬KK@⊂∃'P⊃&⊃h∈EL M" CAR-CDR'S (THOSE Tπ∪)⊂4⊂vvV↓~AαOLAβ≥λαα⊃=5∃B¬$ ~2⋀h9t$hpλ
Sq∃(4h⊂$λpπfh⊂aj⊂"SαC@∨ %_
:ββ"G]]DDBP⊂⊂⊂λ⊂"U@1
0⊗Xπ2¬<~Iα⋀rλ⋀P)!`g#H!)'fH→⊂ ∀O 2 -1 INAH +≤JP∀+C"G]]FE∞β;; L¬β≠
$A≤@Q=∞@$→E⊂LR¬λ$LP4V% NfgP⊂⊂!PiP⊂λ→ 10
λ;;+ CDR 3 11~lp
m↓αα≤ ~!∩αα⋀A⊂Jα∈⊂ ∈↓α@
;≠8∈@@A
β $@@j∩$@@bD~∀`-β32αα¬`α`$ C"G]]P⊂λ!b" Q) 31↓ 1110!
λ;;; CDDDAR 36 1111⊂
0⊗YY↓↓α≤"∩α⊂I↓↓Mαq⊂K ⊗∩∪λ!Q hPc\:"α⋀≥&∀⋀
∪_∀⋀≥∪$λ5∪~λ:#:⋀:&B⋀≥&T⋀≥∪aQ hQ(5∪!~4\MλT¬2u*8U h!∀⋀U∃:@⋀≥∪⊃Q Mz⋀¬αeAQ LU*:B⋀αX8∃∀≤J%Sd≥*:T∃∃56∪rDe⊃∪@:520i4∃Q4J93sHλtH
J*q5πT⊃R3↓QA"Pj&,B4
Zr∩H
¬∀p5K∈b".h9s0∩)1λ⊂i⊃(⊂*:u31*4∪P
fPaiP)Pc"FE⊂i_`Mαfgk"RP"⊗∀⊂TBE⊂λ⊂→"$⊂-fgUαAI T,(F)]400 @dYπ∃~V
~YD%4Bβββ⋀⋀⋀M~λiu∩⋀8⊃d$4C"H~LNB*9su∃⋀λ∈&)BDYad⊃a` FMR LIST DYPE~∀$A∃%'PAπ$h4⊃π$h∪!%≥∀A(Xb$∩w'↔% Aβ↓ββ$A=!β%βQ∪∨8hP%αN\JB¬α"a"⊃⋀hP%↓αDbJiα"a"⊃⋀hP&J"αQ1¹5λh(&∀r∃αQc9]H⋀KZN.αα&→α b1α∩|r∀4(Jα*J α≥∪!Q$
∪w!∀l]hY∩⋀EλBH!→%∃≥D
%≥∈1⊂K\9yU⋀HXB⋀xHR⋀
::Tl-4 e,L_:2¬≤_hPhPβ"Pj∞B5
Q(∃¬F ".iH∪Q+λ⊂4Ht∩4sDzλ⊂( I4uβ!!(⊂ eRh P) +!b)αD]`∀HEH Aπ! π-⋀zVQα :∈&:≥!αB⊗∀j&NNL∩2&RL*L4(J↓α64)αI¹24~∈H4PJ*V¹6⋀qαI2≥⊃T4(M"J:9⋀!15DHI`≤Ld tt∀ dLBλ→d"⋀I~5%~λλU∀~:4LHQP@J *%≥αλ:#(H↔:DDd D-λ∪R)D⊂Q0id¬E NIHλ@Q
β$A≥%_R@h⋀αD≤J λ $f∀P∂P ∞IL
∪∃I' Aπ⋀Y↓ ⋀$∩w →M
PA¬=≠⋀A∨U(~(hR∈IUβ!∀821(
∀4v)XSsβ!⋀P%)h⊂!i
αλ
⋀∪Q%≥
A⊂XZb~(∩A)→9
A)(αbNdQ!∩α**5"⋀8 aQ@⋀e)h⊂!`K ⋀E@$$∩w2}~∃α_d⋀`(αdj$⊃i⊂'$S⊂#'iλ)lfa∪βHλ~∀4⊂
∞3P&∞∈LqαI¹2 b&NPhP%α**5"⋀8⊃d$4B"'d⋀@∪'PA) ≥!α>dλ∃∀h∩⊂*4⊂3∀HX1⊗(λh23⊃(λ⊂ gH ∈AIL
∪∃I' ⊃α≥⊃L$↔9∀2⋀8~"d≤J λ 'j⊂⊃∪$i`∀λX@E'e≠¬∨λXA⊂↓∀→D"`HαB"!⊃,¬P*∩ ¬N OK FOR AN@3Q⊃∪≥∞4⊂λ1nh¬∩⋀U∩⊂hJH∪U λq
( ⊂⊂q∈D⊃P
$⊂b_P'∃$!bλλ'*$!Q→⊂'*∩!b~∈Bα ∀~(p
mm⋀rR!β∞s⊃α~αI⋀≤%$¬R∈Nd¬%∃≤X@λ
≡h≠p∪→α, try to dh∞AMα GS¹3J4(Q'2αDβP
$λ'⊂#'Sβ) @%∃)+%≥LA)"*α0∃$⋀λ4
∩λ∈uiλαi"P
'*$ 0 FOO) @∪Qπβ$αα~>≥Mh4)4↓∩αα⋀⋀α⋀452* f"g∃⊂*'P
!`i (NTHCDR N↓
∨=JH4)4¬⋀`⊂⊂q
$⊂π⊂#∪βH∞@%¬∩⊗@%X⋀SJ4∃∩⊃$
Q0 jS*⊂'cλ⊂π@≤Nαα≤%$z0hPβ"C!'*$: P 5⋀A$Y$4⊃≥)⊃
$`(Lj6@4Y∀¬∩eJ*U$⊃↔5∩⋀α4h⋀R,$CAR
POPJ P, ;THEN RETURNλ
∀~)≥)⊃π⊂`t∪∃U≠!≤AQ(Y≥)!∪ ≤∩$s∪≥ ∃0@Dλ~∀&-B∈!α
b⊂h!→%,M `¬∩d: u⋀Pα".i4uλ[⊂5λλtH∪JI⊂q∀AQ@⋀e*Sh"P" ⊂!`iαDX BE@π⊂≡XTα(p4@DSt@¬U∩⊂ ⊂,∀FB⋀e))U⊂!`iβE
NTHCD20∀∪5≠ ~∃⋀11" Hh &N}→α_Q!∃¬-9 "¬αβ∪⊂*⊂rb!↔u⊂2hTλJ⊃E∀H⊂q
*h∈⊂)dh⊂$⊂)`∃CCESCFUL
JRST NTHER ↓; ERROR IF AR@∞Zλα≤%*4⋀M~λ~D`9αdaFB⋀e*fT'⊂ ∩1_
R"≤!P$!→¬∃∃αH⊃¬E⊃
#!↓4rsjλ⊃β Jc"B$ U34 D⊃ ∪JI⊃0C!↓2∪∀K⋀⊂+
λE ⋀D]'i⊂⊃∪*$⊃∈B⋀h'h⊂(⊗∈B⋀@
NTHCD4~ HRRZ A,(D) ∩w→_∞I↓∀rR"∞%⊃∩bλ¬⊂)¹8(⊃R) f⊂!Q)
POPJ P,
λ ;PNGL¬⊗A⋀r≡*-λ⋀¬⋀tyi3∩¬8∈0iYβ)P)Vacg2 SYCOL⋀bA¬~f∞yj2¬⋀βPsi)P 'Y⊂!h⊗*
SEBTTD SYH ¬∨0Aπ>u~⊗HQ!P@*⊂π#g] ADDI C,PNBUF-1 ;MH
→¹2↓↓2A∪9)β%≤α↓5αBαZ$L¹4_Z2¬⋀h→T*⋀α1H
3⊃5H→U^