; RHQU*]*USETQSRCTRNVERNOQUOTE20xFERRORCERRORLISTPBARFU*U*ULISTP-FERROR-EXPANDERMSOUTMACROEXPANDno-funp|NULLTYPEPLISTEQORU*U non-simple-x|T*:AR2*:ARNSUBRZ[ @2,8[`Z "-, $ -, $-,`11+ @jC01 &  `1*` B`4B` `-,1 -,-,2J 1 $-,z Ƶ-, $-,0d-,1,X-, -,h$`1 ``  J  H /0u*U+ $<>>=<=ASSQU*U*ULENGTHDATAWRNG-NO-ARGSNOTside-effectsp|+INTERNAL-DUP-PGENTEMP:LOCAL-VARPUTPROPU*T0ANDLAMBDANREVERSELETML-<>-EXPANDER,8,82@`  z Xl[ B`4B}Zg@" 1.`G0n`G+&@j &  g Zg,8`[Z[[ `Z `,8,8,8 p0N`i4J4`@-,13-, $(-,d@-,1 $-,  Bg|+|@b`*`! g`!Zg|b-, Bg~`! g{ g+A ,g# & a% 0-,1 g~-, g-,` g}-,13-,3-, @0-,1,X-, $-, 3Bg~+S-,1-,1`,X-, '-,-,0@@1,X-, B` ,Xg{@4 +|Zg| ,g# & @a%`-,1 `-,-,1``,8,8Zg~7@`+th@[` ,g# &  Bg~a% 0-,13-,3-,@ 07@g}+m-,1 g~-, g}H-,-,1 $-,+p 0-,1 g~-,3-, g-,Z` Bg D` Jg~`0 @0*` $-,-,0H 1,X-, )-, 0  Bg|/ J   H g-,,x7U:U.UFLUSH-MACROMEMOSSI:PICK-A-MASK++xDEFPROPSI:PICK-A-MASK MACROMACRO-/xMACROFETCHWrong number args for macro1ERROR-LSHMACROMEMO5B@" `1N` ,8,8,8g", d<Z`[3z '$f -, $-, @2-,1 5-, $-, & ] $ `a7,x1+U*U*U*/+$-$*$/$\1+1-U*U*U1+$1-$^^$PLUSDIFFERENCETIMESQUOTIENTSUB1U*U*UADD1REMAINDEREXPTASHROTBOOLEFIXIFIXFLOATU*U*UFSCSQRTSINCOSLOGEXPATANLDBLOAD-BYTEU*U*UDEPOSIT-BYTEDPBHAULONGHAIPARTGETCHARNFLATCFLATSIZESXHASHconstant-p|U SI:EVALUATE-NUMBER?*EVAL,8` a7 `3 8anb`1A-,+ "`g`+ QAs[3`#`9;=? A!C"E#G$I%K&M'O(Q)S*U+W,Y-[.]/_0+zP=4J![(Z (Q0H++&a1c2z@ʱK[ Z 0F`C  0  H`+&+3@,83A`S`a`` B`7@g`[`eL  4B0`]34B0@`O "/0@b@04B3`g`g "/+5jU*U !Bad 'byte-length'PROG2Bad 'position'+INTERNAL-PERMUTIBLE-PU( FIXNUMDECLAREFOO-BYTE-EXPANDER,<,<,<0 -,-[Z[Z [(Z([ Z[ " ,8,8@`  g~` Bg~ `` B`@`3``  g0B.``,< g~3{ an+O4.O1n`@j & $4 g{ /.L(P8Q Pp7@`+Wiz{Zu`y-,0H 13-, $-, $5-,0@ `y0N+b7@```y`@a-,13-, $5-,`y0 g|34B1 an`@ 1n+k@j & k g{ ,<3 g|(N@ 3+ ./ (P8 g/.L(R8$ ;`_ . 2/-,-,1 g}-, $`-, Bg} "w-, g}-,@a -, $(-,`_ g|3`4B Aw-,7@`+@3+ g/.L(P8s,<(P8B`Ap(NH/0 Pw~ "w~`_7@`+-,1 g| -, $-,Dp  5N `+ `-,1d3-,7 $6-, $(-,``_ "p-, g}-,@` m-, $(-,7@g~`G@ g~4N/7@g~`O g~ g{(N@-,0@ 2`W "p-,3-,  -, $(-,-,1 `-,2H $6-, $(-,B/`y7@``w g|-,2@`1 $-,-,13-,  $-, "p-,,X-,2H -, $(-,`y@@g{` Bg{+-,1 g~-,c g|-,3-,75BD@@g{@  3+7@`` g|-,1 $-,0d-,13-, $-,H-,1 $-,-,1d,X-, -, $(-,@h@ Bg{+ ,g# & a%`03 Bg~ g|3 an+[0N` " g} -,1 $-,-,13-,0-,13`i`3`` Jg{ g-,1 g{-, ` -, $(-,,8g,8D3+s ,g# & a%-,1 gy-,13-,0@3-, 8@ an`-,1 g-,2@ $-, Bg6@g~`-,0H1 `-, $-, B` g @2-,13-, m-, $(0-,3`-,1 ` @0-, $6-, $(-, B`H g g}-, o-,-,1  $8-,-,1,X-,0H g~-, )-,0 0 J  H g{-, 0 :/,xiLDB-EXPANDER[ 0[ &Z`,80?[` As Bg3`` `Zg[` 3,8 ,85B'@bg|` g~(N}+? g~,?,<3`a -, 2-,1 ;-,73-, $.a-,+O3 Bgg+6@ 03 Bgw-,1 $p 2-,7 ;-,73-, ]aD-,+O ,g# & a% 0 g|-,1 `-,-,0 @01-,1 o-,-,2@1 $8-,@-,1 $p-,0@ 7 ;-,73-, ]-,0`-,13-,,X-,   )-,/ g| J !@KU  H /,xLOGNOTU*U*ULOGANDLOGIORLOGXORFLONUMPFLOATPXU*@EVENPODDPSUBSTML-TRANS-EXPANDER[ZgB g-,,8y,8 2s`5z 2@[-, $:dS-, $(-,+mu;6w<z l  Z4Bfy=zPAs-, $(-,0* Jg+m{>}?}z dQpoZ0 & }@[@+m@@g~@7@g~+u[g 82np`Zg 83.pA`+u@j &  ` / 2,X  J + -jU*UxSMAPCFUNCTIONYG0034ZLFUNU*U*UCARCDRMEMQGETSOURCE-TRANSCONSGETLLSUBREQUALU*]pAUTOLOADLISPMLSUBFASLA'B'CDDEA'}DCF}%}GDC}HF}IJ%}JIBu;ws{?  q.]9[/x;