FASLPU*]*RFLAGQUOTEOFFEVALxBYEEXPRQUITzhJ"(DELCP,8; $EQ5BRc$Q$ $ `5B> "ASCIIQ@INTERN  `/	,x@R);PERROR1 $1 "ERRORx	FILETYPE,8( B`ATOM	4B "+[`	5B@!#Z`5B[`+[`DEVP
4B[`RDIR:0B
+Z`Z[+Z`[(b+Z`IDP4BZ`/,xXF,8	NULL5B" `4B"F
! `EXPLODEREVERSIP[: $
tR/#,x ORDERP3"7%T ".Uj,xX#GLOBAL$EOL$xSEPRP,8 !FH	 $5B/	 $ `5B/ FH3 `5B/ "  `@* /0,xx&GCTIME ",x]*\@_0REMFLAGPRINTPROMPTLOSEx ",x01xW*].u**ESCxSETQ*ESC*xESC*xxBEGINW*U*uGOxFLUIDLREADFN**ECHO*MODE*SLINxCRCHAR*U*UjUDATE*ORIG**EXTRAECHO*HELP*INTxCONTL*IFL*IPL*U:U`!OFL*OPL*xSYSTEM**BAKGAGx,8 " BI"  B " B B B B BDJ  B`@@@@@@ "RDSLSH  "QH %SCANSET  5B@ `4BPReduce Parsing ... "!PRIN2TjK#
!+PREDUCEINI"" zFILEP#4BDREDUCE.INI%G# "#NCONS$IN$TERPRI% 4BFRI#R$ "%+F9 "&LINELENGTH&REDUCE 3.0,  "'QHtCRPRIN2' ' ... "(!ADDSQ "(QFH!GETD)4BLALGEBRAIC ")+MSYMBOLIC "* BH3!@@ 4BPFor help, type HELP<escape> "*'% " BQPT:!BEGIN1+ " BRESETPARSER+Entering LISP ... ",!R(h* ",SETPCHAR- "/W,x`2u:]*Wx15-Apr-83-xLARGEST-SMALL-MODULUS.xEXPT..//xPI#]LOGAND2   "0BOOLE&1WLOGOR2):   "2&1YLOGXOR2  RujU "3&1([IRIGHTSHIFT3xPUTSMACROLAMBDAU*]juUNLSHMINUS4345566576x3xLEFTSHIFT474556656xMKFILQ.%59*@@g@@g~@@g~ B`4BfSTRINGP8 
5Bf `4Bd `+$ `/&FILERRBFQ"99 `EXPLODEC9 Bg gNEXTELM: Bg}Z Bg[g} Bg} g4B[0B
)4Q+r g}! ":CONS; $
XCONS;Q@c$MKFRAG< g;+.0B<+} g}4BZg: Bg~Z Bg g}< Bg}@`0[g~< g}; g; Bg@@g}+R<0B=+Zg: Bg~Z Bg>% 0 $=EQCAR>5B `9[g~< Bg}
 g "
; g};+1B=+[ @`R0B>+Zg: Bg~Z Bg, $?@`0>5B `9[g~< Bg~Zg:H1 Bg~Z Bg] $?>5B `9@0[g~<  g~LIST2@ g; BgAZg Bg+1B?+0B?+ `9@&
 g5Bh g}4B#< Bg} g5B"DSK:(#@z g}; Bg gREVERSEA/&,xua888]LITERS*Ax.<59*@@g!#@@g B`4B:<
==>??z [MEMQB5B:[`QDA#LITERB4B2 A[`ATSOCC Bg g
4B1Z+5[`+5[`DIGITC g(04B6[`;+8 ":;[`; BgZ` B`+) ` g/<$;]*U*U 'aAbBcCdDU*U*UeEfFgGhHiU*U*UIjJkKlLmMU*U*UnoOpPqQrRU*U*UsStuvVwWxU*Uj%XyYzZADD EE FF GG HH II JJ KK LL MM NN OO PP Q6 QR RS ST TU UV V W5 WX XY YZ Z[ [\ 
xfile name $\TYPERR@t0Q$]=,8COMPRESS] B`NUMBERP^4BB `+C `/D,x@>xFASLP