7EXPRFUNCTIONDEFEXPRQUOTEDFMACRODMNEXPRDNDFPRINTFASLFASTBIND*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*FATALERRORGTWARRAYLIST3FLAG1FLUID1GLOBAL1PUTENTRYIGNORESTARTUPTIMEBOTHTIMESLOADTIMEUNFLUIDREMFLAGGLOBALFLUIDFLAGDEFLISTEVALGk<
<*** %r has not been defined, because it is flagged LOSE
<<<<@<<<<<<<<<@<<<@<<@<<> 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<~<<<<<<<<	<  +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,7 = L * L * B,~<%)<FASLEND not within FASLOUT2@+F M+, ,
 B,I 	+   B  D  B,~@VW*** Compiling %wVXCouldn't find file%w.buildY<@ZW.red.sl> Bx @ @ @~ @~ @} @} @|-46$0V+h *-4
 x (, Bx-4	6$1V+k (,+" $$bD%n% D}@@~2@}+x ~2l}+x ~ x:l" d"Z$, 3B+w * L}:~+n3@}+ 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	>|,~<xNOQR<U*** Init code length is %w  ,  6,
   6,   5 5,+<<$<%)Z$ +> Bx$H D0d@+= +G H,  F3F+A +G & F H x, x &, B&:& >,~x<'> @x,' &/$  &  B6p0V+^   B r,( ,("p B $qbDqnr DxZ$ x."& :  Q$I"`   B+NZ$ )&  Dx  )  x * Q$I"`Z$	 *."&  Dx  x + Q$I"` + +,, >~,~<xx<'BPS exhausted during FaslOut; output file too large> Bx D3@+
  * +df:* @Z, L  x,-,-3B+ +	@@ * +df:* ,. B+ .2,*+ ,/+
 + >~,~Ds> ,/ BxZ$&".Dx@@,/ B+ x,/ B+@@)@@*Z$Z"	&  x& .+.$ D* +/ F. ,
 B&Z, L& >,~> Bx   B6L1V+( +( *3B+-  3BN+, +- *3B+J @ @ @~ x     D6L1V+5 +H  B~, x     M,0,
  F~ F   B6L1V+@ +H  B~, x     M,0,
 ~ B8 ~  D~+< M,
>}+ x>}+<<<%<0<> Bx   B6t1V+T +T *3B+Y  3Bv+X +Y *3B+r @ @ @~ x     D6t1V+a +p  B~,  u,!,
  F~ F   B6t1V+j +p  B~,  u,!,
 ~ B8 ~  D~+f u,
>}+ x>}+<<<%<1<> Bx   B61V+| +| *3B+  3B+ + *3B+ @ @ @~ x     D61V+	 +  B~,  ,!,
  F~ F   B61V+ +  B~,  ,!,
 ~ B8 ~  D~+ ,
>}+ x>}+<<<%<1<> Bx   B6O1V+$ +$ *3B+)  3BQ+( +) *3B+M @ @ @~ x     D6O1V+1 +K  B~ , B} ~  ,  x    } P,,
  F~ F   B6O1V+? +K  B~ , B} ~  ,  x    } P,,
 ~ B8 ~  D~+; P,
>}+ x>}+<<<%<<> Bx  D6[1V+V +Z  ,   B+T>,~<    6i1V+` +a *3B+e 3Bj+d +e *3B+h    +
 +<<%w.b G,1 F,1 F,1 E,1 E,1 D,1 D,1 C,1 C,1 B,1 B,1 A,1 A,1 @ LZ& @ ?,2 ? >,0 ? >,0 ? =,0 ? =,0 ? <,0 ? <,0 ? ;,0Z& @ ;,2 ; : :, ; : 9, ; : 9, 8 : >, 8 : =, 7 : =, 7 : >, 6 : 6, 5 : 5, ,
 BZ& @ 4,2Z&. @ 4,2Z&D @ 3,2 3 3,0Z&\ @ 2,2Z&- @ 2,2 1,1 1,1 0,1 0,1Z&9 @ /,2Z&y @ /+2<,<%<&<&<+<*<<<2<<<<
\<%RwO#<3<3<4<<<4<(<5<5<6<6<7<7<<j<<*<.<+<)<)<<<<<<<(@|(D
D@"TD"QD "
T"EA"(DD
 D(A"D
 D
xDPU"UU*U*T|UE("~U
Q"T*
""@ E@D"D(*" 
E+~"*
 
 (

(@
DD*
UDaE(E Q"DT"*
D?D
 A
@A
@"`QE"E "E (Ap"A"D@(D@T* ~" "QU*U*UU**UU*U*U*U*UU*U*U*
U
U*QQ+`