17EXPRFUNCTIONDEFEXPRQUOTEDFMACRODMNEXPRDNDFPRINTFASLFASTBIND*WRITINGFASLFILEMEMQCONSATSOC*COMPPUTDFASTUNBINDFLAGPERRORPRINTFNCONSPUTLENGTHLIST4&COMPROCXCONSLAPMKQUOTESAVEUNCOMPILEDEXPRESSIONPOSNWRITECHARPRIN1GETFASTAPPLYGETDCADDDRFASLPREEVAL*ENTRYCFNTYPECOMPILELOSELAMBDA	FASLPREEVALLOADTIME
UNCOMPILEDEXPRESSIONS*TCONCFASLOUTMODULENAME**QUIET_FASLOUTFUNBOUNDPPRIN2T	FASLFILENAMEFORMAT*BLDMSGBINARYOPENWRITECODEOUT*DFPRINT**DEFNBEGIN1FASLENDSTDERROR
COMPILEUNCOMPILEDEXPRESSIONSCOMFILE*LOWERNONSTRINGERROREQUALFILEPLIST2CONTINUABLEERRORSUBSEQCONCATMEMBEREVINDSKIN**FASL**INITCODE**PROGNFINDIDNUMBERNEXTIDNUMBER*ORDEREDIDLIST*IDNUMBERSYSTEMFASLFIXUPREMPROPID2STRINGCURRENTOFFSET*INITOFFSET*CODEBASE*BITTABLEOFFSET*BITTABLEBASE*FASLBLOCKEND*DELWARRAYUPDATEBITTABLEDIFFERENCEMINUSPADD1MAXFASLOFFSET*FATALERRORGTWARRAYLIST3FLAG1FLUID1GLOBAL1PUTENTRYIGNORESTARTUPTIMEBOTHTIMESLOADTIMEUNFLUIDREMFLAGGLOBALFLUIDFLAGDEFLISTEVAL@dx$
x$*** %r has not been defined, because it is flagged LOSE$$
x$x$xx@xx$$x$x$xx$$x$xx@xx$x@xx@xx> Bx @ @ @~-4 * L61V+  +
  D~3D+b  ~,3B+P x   D x   , Bx  ~,  D 2L+1-4 x  ,-4	  ,	3B+6  ,
 +
  ,	3B+E ,
   , x  ,    , B~  x, ~,
 Bx,
+L , B~ , B} x,  } ~ ,,,4bNZ", , +
61V+R +
  x , B~3B+X  x ,+
 x ,  D~3D+` 2L+`  x ,,+
 x, +
 x   B x    D x, B~  B~61V+l +l *3B+q ~ 3B+p +q *3B+P    D  B~61V+w +x *3B+| ~ 3B+| +| *3B+P    F6
0V+P  ~ ,3B+P ~   D~ 
 ,3B+P ~ Lx+,-4	>},~>>x>~$$xxxxxxx$x$	x  +60V+  , ,~>When all done execute (FASLEND)FASLOUT: (DSKIN files) or type in expressionsWhen all done execute FASLEND;FASLOUT: IN files; or type in expressions B2@+6 ?,2B+4 ?, >,+6 >, =,  ,, B,4 = L * L * B,~x%)xFASLEND not within FASLOUT2@+F M+, ,
 B,E 	+   B  D  B,~@V$W*** Compiling %wV$XCouldn't find file%w.buildYx@Z$W.red.sl> Bx @ @ @~ @~ @} @} @|-46"0V+h *-4
 x %, Bx-4	6"1V+k %,+ ^ D}@@~2@}+v ~2l}+v ~ x:d""Z$, 3B+u * L}:~+m3@}+ x, 2B+~ x,  %,!  $Z"1,!+  ~@@ x," B }: ~> x," B~+ $ L|3@|+ |  x," B, 2B+ |  D|+2@|+ x,  %,!  $Z"1,!+  |  B~ x L  Lx x #,
 * L , # ~,#3B+ x,
,#+ x,$, *-4	>|,~>:$NO$QRxU*** Init code length is %w  ,  3,
   3,   2 2,+xx$x%&Z$1 +	> BxZ D0d@+: +D E,  F3F+> +D & F E x, x &, B&:& >,~x'> @x,' &/$  &  B6k0V+Y   B k,( ,(Z B^ DxZ$ x."& :  Q$I"`   B+JZ$ )&  Dx  )  x * Q$I"`Z$	 *."&  Dx  x + Q$I"` + +,, >~,~>x'BPS exhausted during FaslOut; output file too large> Bx D3@+  * +df:* @Z, L  x,-,-3B+} +@@ * +df:* ,. B+y .2,*+ ,/+ + >~,~Dl> ,/ BxZ$&".Dx@@,/ B+ x,/ B+@@)@@*Z$Z"	&  x& .+.$ D* +/ F. ,
 B&Z, L& >,~> Bx   B6E1V+! +! *3B+&  3BG+% +& *3B+C @ @ @~ x     D6E1V+. +A  B~, x     F,0,
  F~ F   B6E1V+9 +A  B~, x     F,0,
 ~ B8 ~  D~+5 F,
>}+ x>}+>>x%x0x> Bx   B6m1V+M +M *3B+R  3Bo+Q +R *3B+k @ @ @~ x     D6m1V+Z +i  B~,  n,!,
  F~ F   B6m1V+c +i  B~,  n,!,
 ~ B8 ~  D~+_ n,
>}+ x>}+>>x%x1x> Bx   B61V+u +u *3B+z  3B+y +z *3B+ @ @ @~ x     D61V+ +  B~,  ,!,
  F~ F   B61V+ +  B~,  ,!,
 ~ B8 ~  D~+ ,
>}+ x>}+>>x%x1x> Bx   B6H1V+ + *3B+"  3BJ+! +" *3B+F @ @ @~ x     D6H1V+* +D  B~ , B} ~  ,  x    } I,,
  F~ F   B6H1V+8 +D  B~ , B} ~  ,  x    } I,,
 ~ B8 ~  D~+4 I,
>}+ x>}+>>x%xx> Bx  D6T1V+O +S  ,   B+M>,~>    6b1V+Y +Z *3B+^ 3Bc+] +^ *3B+a    +
 +>x%w.b @,1 ?,1 ?,1 >,1 >,1 =,1 =,1 <,1 <,1 ;,1 ;,1 :,1 :,1 9 LZ& 9 8,2 8 7,0 8 7,0 8 6,0 8 6,0 8 5,0 8 5,0 8 4,0Z& 9 4,2 4 3 3, 4 3 2, 4 3 2, 1 3 7, 1 3 6, 0 3 6, 0 3 7, / 3 /, . 3 ., ,
 BZ& 9 -,2Z&. 9 -,2Z&D 9 ,,2 , ,,0Z&\ 9 +,2Z&* 9 +,2 *,1 *,1 ),1 ),1Z&6 9 (,2Z&r 9 (+2x,x%x&x&x+x*xxx2xxxx
<Ux%<K<<p<H<x3x3x4xxx4x(x5x5x6x6x7x7xxcxx*x.x+x)x)xxxxxxx'@|(D
D@"TD"QD "
T"EA"(DD
 D(A"D
 D
xDPU"UU*U*T|UE("~U
Q"TAAD"E@EDEPT(D*@p"Q UH@E@"D"T
 @"A@@T`E""EU"0@"T"D
(Q"*D@"
D E@D E@Q`D(AE"P"PTAx Q"D@TD T~Q(@F*U*UU*U
UU*U*U*U*UU*U*UU

EU
E*UQ(Up