FASLPU*U.UDEFLISTQUOTEANLFNPROCSTATCRFLAPOSTATxFLAGCOMPILEu*U*UxGLOBALUNDEFG*GSEEN*BTIME*EXPAND*HAVEARGS*NOTUSE*NOLIST*U*U*UDCLGLB*ENTPTS*UNDEFNS*SEEN*TSEEN*OP**CLOC*PFILES*CURLIN*U*U*UPRETITL**CREFTIME*SAVEPROPSDFPRINT*MAXARG**CREFSUMMARY*RLISP*CREF*DEFNU+U*U*MODE*GLOBALS*ALGEBRAICS		



xFLUIDGLOBS*CALLS*LOCLS*TOPLV*W*]nuCURFUN*xSETQTxxxxw*TCxxSTANDARDFUNCTIONSEXPRARGCOUNT $ NCONCu*U B,xxLAMBDAABSADD1U*U*UAPPENDAPPLYASSOCATOMCARCDRCAARCADRCDARU*U*UCDDRCAAARCAADRCADARCADDRCDAARCDADRCDDARCDDDRU*U*UCAAAARCAAADRCAADARCAADDRCADAARCADADRCADDARCADDDRCDAAARU*U*UCDAADRCDADARCDADDRCDDAARCDDADRCDDDARCDDDDRCLOSECODEPU*U*UCOMPRESSCONSCONSTANTPDEDELETEDFDIFFERENCEDIGITU*U*UDIVIDEDMEJECTEQEQNEQUALERRORERRORSETU*U*UEVALEVLISEXPANDEXPLODEEXPTFIXFIXPFLAGPFLOATU*U*UFLOATPFLUIDPFUNCTIONGENSYMGETGETDGETVGLOBALPGOU*U*UGREATERPIDPINTERNLENGTHLESSPLINELENGTHLITERLPOSNMAPU*U*UMAPCMAPCANMAPCARMAPCONMAPLISTMAX2MEMBERMEMQMINUSU*U*UMINUSPMIN2MKVECTNOTNULLNUMBERPONEPOPENPAGELENGTHU*U*UPAIRPAIRPPLUS2POSNPRIN2PRINTPRIN1PROG2PUTU*U*UPUTDPUTVQUOTIENTRDSREADREADCHREMAINDERREMDREMFLAGU*U*UREMOBREMPROPRETURNREVERSERPLACARPLACDSASSOCSETSTRINGPU*U*USUBLISSUBSTSUB1TERPRITIMES2UNFLUIDUPBVVECTORPWRSW*U*UZEROP  !!""##$$%%&&''(())**++,,--..//00101223034455660778899::;;<<=4=>>??@@AABBCC4DDEEFFGGHHIIJJKKLLMMNNO4OPPOQQ0R0R0SST4T4UUVVWWXXYY0ZZ[[0\\4]]^^__HxANDCONDLISTMAXMINORPLUSU+U.UPROGPROGNTIMES``aabbccQddxCASENARYARGScd`bdab`ceaex*COMPEMSG*W*]!*RAISEffgxBEGINCREFOFF`J>gSWV]h7xCREFON.J59*@@`(e$@@g@@gTIMEi BREFPRINT "i B "I$R B 5BSYMBOLIC &jNEWNAM $jALGEBRAIC "kFBQNOLIST $k  $8 DCLGLB!D" $l @@	@@	@@
@@
@@@@D$@@@@@@
@@@@@@ " B@@)4@@ $  Errors or questionables "lSETPAGEm "g>4B BD "+I `$EOF$2Bm+#@@g g4B#0[[ Bg[gZSZg Bg*BAKGAG)& n $%NEXTTYInz6 B`5B g
24B)PGLINEo gXCONSo B n $)@bTz6 B`5B[` B`N4B#4@[`DSKIN0Bp+6INPUT $pZ`LS@` go g. BgZ` Bg+# `QA2!MKQUOTEq  "iLIST2q n $6  A( $7[`:4BH[`0B+Fz Z` Z[H5BFZ`Z[/5BF 1 $Z`Z[EQCARr4BH n $H" `6 5B#/K,x
P)UNDEFDCHK,8DEFD $s:5BP 	 `.P U B	+P "/Q,x(KPRIN2NGGETESu*UtPRIN2N"t8RMSORTSMACROLSTTREE2LSTTREESORTp@D!"Quuvvwvx.p59*@@@@ 5BW $j "kH`!Wi 1 B` 
+a Bg[b  Bg~CALLEDBY $w=5B_ 	 g~. B	@ #! g~rZg5BZ@@g 
w $vCR+q Bg~[ Bg~TSEEN $xWFUNS $x@  g~= Bg+m Bg}[ Bg}rRCCNAM  $y g}WZg}5Bi g g~. g!#. BgZg~5Bd gREVERSIPy B
 C	+z Bg[ Bg~USEDUNBY $z=4By HJ! g~. BZg5Bt $  Summary "zmQ@BNEWPAGE{@@g + Bg~[Z g 0R. BgZg~5B~ gy Crossreference listing for files: "{QHTCPUNUSED| B 	Entry Points: "|| B	 	RE$Undefined Functions: "}| B	 Undeclared Global Variables: "}| Bd*! Global variables: "~| B 
Functions: "~|
  B
 
+" Bg[ Bg~ procedures: $[0RqZg~|XCg~[g~8 Bg~) "Q@$NCONS  g~( $o Bg@Zg~+! Bg~[t Bg}Z g	XCg}Zg}AQCg}Zg~5BZg5B 	BJ!5BK 4B+ 4B+ $  Global Variable Usage "m
{ ++ Bg[ Bg~CREF6Zg	J5B( 
4B.   Function Usage "CREF52 
@R+4 Bg[ Bg~ procedures &[   "Q@`RLIST3Zg~Zg5B/ $  Toplevel calls: "Bm " Bg +K Bg[ Bg~CALLS!FH $=5B=GLOBS $ g~=4BJ g	A44B?{@@g "4NEWLINE "4 g~(h:!s "SPACES2 "B $1Qi
UNDERLINE2Calls: & $ g~CREF51 
0	4BJGlobals: &	 $ g~Zg5B8 
*J*5B[GALLALSOISSAMEAS	w

z  
REMPROPSSSEENRJG*RCINTHISsz  
REMFLAGSSUSEDBYBOUNDBYSETBY
z
z jU% GSEENGLB2RFGLB2BDGLB2STlz  @ 
+V Bg[ $x[WZg5BS@0	 +Z Bg[ $WZg5BX@@!H&# " 
4Boi 1 B $Rh:% Timing Information "m{ "4 Total Time= "PRTATM(tC! PRTNUM (ms) " "4RCR Analysis Time= " ` "4 Sorting Time= "fC! ` 1 "4 "4 @1 "/p,x88
S.}59* B`A
 4B| Dg " `PRTLST "4

% gw $v Bg $LPRINT "4 g/},x@q0.59* Dg $m{ g+ B`[CREF5Z`5B/,xX@C!(~.559*@@g B` "4 "4Ph `P " $	 `= Bg4B@$ZP[g Bg+Undefined "O!P  " $e `:4B  Nary Args   "+ C $ `= Bg4B "O gOR
C Args   "O "B $1 g
H:!4B( "Line: "
 "H0ZgZ/ "Zg[R$  in  "[gCalled by: & $w `$  & $ `Is also: & $
 `2
Same as: & $
 ` 4B3 &	 
 $ ` "/5,xX`.?59* Fg= B`4B> " g
C `w $v $/?,x,06,8 "4 `P "
H@Q " BGlobal in: & $
 `CREF61R$ Undeclared: & $z `Bound in: & $
 `2
Set by: & $ ` 4BN*** Not Used ***!D1 "/O,x@.[59* FgBC	= B`4BZ 5BU "+V@@@h4 g `w $v $/[u*u,x@PFLAG1UVQuaxREMFLAG1u:UjuQ uVaxISGLOBQ u:lxCHKSEENSQ!u!`J:!da!
.!
xGLOBREFQ"u`J:da.xANATOMu+TQ"u``J4@J`J:da.xCHKGSEENGQ#u#`J:#d.#a#xDO-GLOBAL.m59*[QCRF$$ B`N4Bl 4Bl 4Bl `1+j Bg[ Bg $:5Bi  gh0
. B g $Zg5Bb $lDw `/m,x@\Q$xQ$x`1.59*[$ B`N4B~ 4B~@ ! 4B~ `+| Bg[ Bg $:	d!5B{  g. B g $PZg5Bt $l `V/,xMXnADD2LOCS."59*@@g B` 4B! `0
+  Bg[ Bg~  Bg4B "4QiRQERLINE%*** Variable  "&O g~P nested declaration in  "&
O s "4 g ".XCg	@d2 + g~o . B $l g~PQ:5B $ g~:4B g~GLOBIND' (:! $ g~:4B  "4%*** Function  "'Oi#! g~s used as variable in  "(O s "4DZg5B/",x  P,8!P $ $ `:5B+ ` $d  `. B+, "/-,xh p#REMLOCS.B59*@@g B` 4BA@# `+@ Bg[ Bg~  Bg5B;!DC "g>5B9 g~ Lvar confused ")q  "4t06 g~ ")qREDERR)ZgZ4B>H2XCg+@  gEFFACE1* BZg5B1 !/B,x  -ADD2CALLS,8 $k:
b 5BK $ `:5BK  `. BP&A ` $/M$ "/M,xh(CANFORM,84B] 4B\ `
b 4B\1B+\@4B\  `5B\  4 $ `:5B\ ` $ H(Q `. B+^ "+^ `ANFORM1+t/_,x0NANFORML,8 `5Bd@[`+Z` B`+` `4Bq 4BqP& `4Bq1B+q@4Bq  `
b!5Bq $ `:5Bq ` $H  `. B "/r,x@_.59*@@g B`[ BgZ` B` g@b
5Bz g++ g@4B $lE1 g:4B $ g:5B g!H! $  g. B+  g@&4B `/", g* `A(t@  gCHECKARGCOUNT,NOANL $- g:5B  $ g= Bg4B `  g@h+ `, "/,x@8s,8[%Z`,[`/&@2"(ANLSETQ,8, 4B![` 4 B` $:4B! ` $/"/@,xXQ-x,8+& B`[,DZ`5B$/',x#.159* B`@ [%Z`+/ Bg[ Bg5B/@  g+Zg5B+[`/2"(M8(FOREACH,8ZZ[+[`%Z`ZZZ[+[`	B4/;"(`2FOR,8Z[,L0[`% `(+[`/C$"(h<,8[ B`N4BG `	P/U"+ $l `:4BP $ `:
 5BS ` $  `. B	b+T  `5BS `/U"* "/V,xHC?-x.}59*!@@g@@g B`Z,[` B` $r444B^Z`[/~ERSANFORM"/ $. `r
`5Bc $a `r Bg4BeZ`[ BgQD0QUOTP/5Bg `/~"+Z`Z,b
Zg[ BgN4Bl g++| $E1  g:5B| $l g:4Bw $ g@h2:5B| g $  g.@` B+| g* g4B|Z`ZA
  g, "/,xBF#QhV,8*LAMBIND*0+*SPECRSTR*0t/,xpANLMAP,8Z,Z`bZ[ B`/4BZ`[ B`@(b 4B `ISGLOBL15B  `5B h $ `/$, "/,x]*\XINDO.22DDFEFE3Q21x.!59* B`Z,Z`[ Bg/4B Zg[ Bg@@4B Z`Z[ B` $ar4B @AZ`A  g, "/",xAH,8 $r5B& $< `ru.P/',xx"CREFSIMPFGQ34hhxOUTREF.HHD"59*0 B` Dg*U% Fg Hg~ANP!ATOMANP!IDBANP!EQANP!UNKNOWN5566z  gH
 4B0 "+1 gA Bg{5B4 $ g0=  g~ `OUTRDEFUN7 B` g{4B;@`1 g% g+ g(+E g4BEA@4BE g0B6+D g  $
A# `Q ` $
 gTRAPUT7+E g(h1* `OUTREFEND8 "0/H,xPDPH '.V59* B` Fg= Bg4BR@ 5BT g H5BTZg g.@` XCg+T   `Q "/Vu*p,xxITOPUTWUNIONQ8u9`9Q`99=9x.$59* B` 4B` 4B^ $ `=$  9+^   $ `Q@4 +n Bg[ Bg $V gPb!3B`+m $:5Bk g $@@ 
 g. B
 ` $w g7Zg	B@5Ba 4Bv 4Bt $ `= D@@ 9+t   $ `Q 1 + Bg[ Bg $l:4B{ "
+ $ $ g:5B  g. B g
 $ "z `  g7 g
1 $V $ g:4B g!A4 $V ` $
 g7 $ g:
4B g $V ` $ g7DPZg5Bw/,xWRECREF,8H0,8 "%*** Redefinition to  ": gP procedure, of:!@j  "; `
z  ` "/, Q" .=59* Dg FgQTYPNM;  B` $s:4B% g `:+' `
1  $s $< g:4B2 $l `H:5B-  `4B2 "4%**** Variable !@tC! "<O `s defined as function "<O "4i1 g4B6NARYARG $= g:5B6 g `Q@FDEFINEARGS= g .  $	 `QB@@@@ ` B/=,xpU8  MACROFEXPR>>=x.i59* B` Dg $< gP:4BI $ `:5BH ` $d 
 `. B
 `+h@@g@@g~`@@g~ $x g= Bg~4BPZ `ATSOC? Bg4BPZ+h g~5B[ g84 Bg} "  g} $o  Bg~  $x gQ 
 g. B
@` `8 Bg~. Bg `oZg~.`0XCg~ g~[g~ Bg~A g~.   $y gQ g $x g7 g/jbQ,x008>.{59*0NAME?Q Dg $= Bg5Bq g ?HASARG@bB+y  g55By $w ?=4BwT0  g g ?INSTDOF@ g ?@!D "0/{,xXj.59*CR0? Dg Fg Hg~ "4%*****  "AH0O ?P called with  "AO gO instead of !@tC "BO gO arguments in: "BO g~w!@f $v Bg~O  g~ "4D0/,x(( |. 59*F"0? Dg . B  g@
H24B "4%****  "CO ?P has !@tC! "CO gO arguments "DO "4f g $ ?Q0/!,xX@d.059*0? Dg $e:5B.! $ ?= Bg g5B* ?@+/H`55B.   g g ?@!D "0/1,xH!.N59*!#
@@g B` 4B6[FILEMKD+6*TTYINPUT* d "E Bg  B4B;[ BgZL@2 B+F= B go . B@`0 g8ZyZy BgA gF!.  $y Q 4BHZ gD . B " B B B `+ W8 "/O,x
1NMACROjuE3x#,8 4BTZ`[QCPUTXF4BT `
0/VANPUTX"F `/V",
OWPUTCQG=Qx,8 $r4B] $3Z`[P1:5B] $Z`[:/^,xX@`W.59*@@g~ B`[$ BgZ`@[$ BgZ`Z[ B`4BjAP `$ Bg~ "5+<z [`H4BvZ`[ B` $r4BrZ`Z[ 1 Bg~Z`[+ `@4B ` Bg~ A@ "5+[`0B+} $>Z`[r`A4B} `'$ Bg~ "6+[`0B=+Z`Z[F4BZ`[$0 Z`Z[Z[; Bg~ "6+ [`MKCODE0BG+
Z`[+Z`Z@[$ B`@@g~+ `$ Bg~ "64 B` g g~ ` g4 "/,x,	  h_,8 4B `/"FLQ `/",
  $OUTDEFR$HJ(9x $>$H $>$H0 Z;Z[Z[[(4,84B) Pb1B+) $r4B&Z`[+) `f+?VALUE?? "H8./*,xH!u0>>juE<xLAP.D59*[$ B`N4BCD 0@@g} `4BAD$[N4B@[`[ B $= Bg}14B: `  g}+@ 4B@
[`Z+? Bg|[ Bg|ANLAPEVIZg|445B=Z` B`+2QOUTREFEJ "0/D4,xHH**ENTRY,8J[`ZZZ[Z[[/K&7IB!R(E 5BV 5BN 4BW?LAP?? "KI8. B $:5BV  $d#  
 . B
 8 ",x]b K*LAMBIND,8(+\ B`[['DZ`5BY/],x8X*PROGBIND,8[Z[+c B`[['Z`5B`4/d,x@^LINCALL,8[Z B`@[*Z`Z[[`/k$,]:\He*LINKQMLx*LINKEQMLx,8 B`N4B}( !z [`H4B{Z`[ B` $:
 5Bv ` $  `. BRbDSTORE $N :4B} & $ `/~&Q[`IZ`+l/~,x]8	k*STORENNx,8 
4B	 `/	"!` " B
/	 {X N4B	[4,x 	  "$q	.	59* B` 4B	 `[2B+	@Z+	 DgZ*  gXO/	ujU,x 		OxPOPMOVEMSETZMW( HRRZMOPPQNxLAPCALLF.	!59*@@g[Z B`)Z[E $Rr4B	 `' Bg&!*[` g/	!$, 4B	 Z`[@WI/	",x	JCALLQRQxW+T)CALLFQSQxJCALLFQSQxCALL,8(R0z 5`5B	& `/	0"QZ` B`4B	.[N4B	.[`[0B4+	. `(Z[P O'+	& "/	0,x@	"FASLP