(SYSTEM::VERSION '(20020129.))
#0Y UTF-8
#Y(#:TOP-LEVEL-FORM-1 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01)
   "COMMON-LISP" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-2
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB 71 CA 31 D9 19 01) SYSTEM::DEBUG
   "SYSTEM")
#Y(#:TOP-LEVEL-FORM-3 #17Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 31 D5 19 01)
   (COMMON-LISP::ARRAY COMMON-LISP::ATOM COMMON-LISP::BASE-CHAR
    COMMON-LISP::BASE-STRING COMMON-LISP::BIGNUM COMMON-LISP::BIT
    COMMON-LISP::BIT-VECTOR COMMON-LISP::BOOLEAN COMMON-LISP::CHARACTER
    COMMON-LISP::COMPILED-FUNCTION COMMON-LISP::COMPLEX COMMON-LISP::CONS
    COMMON-LISP::DOUBLE-FLOAT COMMON-LISP::EXTENDED-CHAR COMMON-LISP::FIXNUM
    COMMON-LISP::FLOAT COMMON-LISP::FUNCTION COMMON-LISP::HASH-TABLE
    COMMON-LISP::INTEGER COMMON-LISP::KEYWORD COMMON-LISP::LIST
    COMMON-LISP::LIST* COMMON-LISP::CHAR-CODE-LIMIT
    COMMON-LISP::LOGICAL-PATHNAME COMMON-LISP::LONG-FLOAT COMMON-LISP::NIL
    COMMON-LISP::NULL COMMON-LISP::NUMBER COMMON-LISP::PACKAGE
    COMMON-LISP::PATHNAME COMMON-LISP::RANDOM-STATE COMMON-LISP::RATIO
    COMMON-LISP::RATIONAL COMMON-LISP::READTABLE COMMON-LISP::REAL
    COMMON-LISP::SEQUENCE COMMON-LISP::SHORT-FLOAT COMMON-LISP::SIMPLE-ARRAY
    COMMON-LISP::SIMPLE-BASE-STRING COMMON-LISP::SIMPLE-BIT-VECTOR
    COMMON-LISP::SIMPLE-STRING COMMON-LISP::SIMPLE-VECTOR
    COMMON-LISP::SINGLE-FLOAT COMMON-LISP::STANDARD-CHAR COMMON-LISP::STREAM
    COMMON-LISP::FILE-STREAM COMMON-LISP::SYNONYM-STREAM
    COMMON-LISP::BROADCAST-STREAM COMMON-LISP::CONCATENATED-STREAM
    COMMON-LISP::TWO-WAY-STREAM COMMON-LISP::ECHO-STREAM
    COMMON-LISP::STRING-STREAM COMMON-LISP::STRING COMMON-LISP::SYMBOL
    COMMON-LISP::T COMMON-LISP::VECTOR COMMON-LISP::SATISFIES
    COMMON-LISP::VALUES COMMON-LISP::MOD COMMON-LISP::SIGNED-BYTE
    COMMON-LISP::UNSIGNED-BYTE COMMON-LISP::LAMBDA-LIST-KEYWORDS
    COMMON-LISP::LAMBDA-PARAMETERS-LIMIT COMMON-LISP::NIL COMMON-LISP::T
    COMMON-LISP::CALL-ARGUMENTS-LIMIT COMMON-LISP::MULTIPLE-VALUES-LIMIT
    COMMON-LISP::PI COMMON-LISP::BOOLE-CLR COMMON-LISP::BOOLE-SET
    COMMON-LISP::BOOLE-1 COMMON-LISP::BOOLE-2 COMMON-LISP::BOOLE-C1
    COMMON-LISP::BOOLE-C2 COMMON-LISP::BOOLE-AND COMMON-LISP::BOOLE-IOR
    COMMON-LISP::BOOLE-XOR COMMON-LISP::BOOLE-EQV COMMON-LISP::BOOLE-NAND
    COMMON-LISP::BOOLE-NOR COMMON-LISP::BOOLE-ANDC1 COMMON-LISP::BOOLE-ANDC2
    COMMON-LISP::BOOLE-ORC1 COMMON-LISP::BOOLE-ORC2
    COMMON-LISP::MOST-POSITIVE-FIXNUM COMMON-LISP::MOST-NEGATIVE-FIXNUM
    COMMON-LISP::MOST-POSITIVE-SHORT-FLOAT
    COMMON-LISP::LEAST-POSITIVE-SHORT-FLOAT
    COMMON-LISP::LEAST-NEGATIVE-SHORT-FLOAT
    COMMON-LISP::MOST-NEGATIVE-SHORT-FLOAT
    COMMON-LISP::MOST-POSITIVE-SINGLE-FLOAT
    COMMON-LISP::LEAST-POSITIVE-SINGLE-FLOAT
    COMMON-LISP::LEAST-NEGATIVE-SINGLE-FLOAT
    COMMON-LISP::MOST-NEGATIVE-SINGLE-FLOAT
    COMMON-LISP::MOST-POSITIVE-DOUBLE-FLOAT
    COMMON-LISP::LEAST-POSITIVE-DOUBLE-FLOAT
    COMMON-LISP::LEAST-NEGATIVE-DOUBLE-FLOAT
    COMMON-LISP::MOST-NEGATIVE-DOUBLE-FLOAT
    COMMON-LISP::MOST-POSITIVE-LONG-FLOAT
    COMMON-LISP::LEAST-POSITIVE-LONG-FLOAT
    COMMON-LISP::LEAST-NEGATIVE-LONG-FLOAT
    COMMON-LISP::MOST-NEGATIVE-LONG-FLOAT
    COMMON-LISP::LEAST-POSITIVE-NORMALIZED-SHORT-FLOAT
    COMMON-LISP::LEAST-NEGATIVE-NORMALIZED-SHORT-FLOAT
    COMMON-LISP::LEAST-POSITIVE-NORMALIZED-SINGLE-FLOAT
    COMMON-LISP::LEAST-NEGATIVE-NORMALIZED-SINGLE-FLOAT
    COMMON-LISP::LEAST-POSITIVE-NORMALIZED-DOUBLE-FLOAT
    COMMON-LISP::LEAST-NEGATIVE-NORMALIZED-DOUBLE-FLOAT
    COMMON-LISP::LEAST-POSITIVE-NORMALIZED-LONG-FLOAT
    COMMON-LISP::LEAST-NEGATIVE-NORMALIZED-LONG-FLOAT
    COMMON-LISP::SHORT-FLOAT-EPSILON COMMON-LISP::SINGLE-FLOAT-EPSILON
    COMMON-LISP::DOUBLE-FLOAT-EPSILON COMMON-LISP::LONG-FLOAT-EPSILON
    COMMON-LISP::SHORT-FLOAT-NEGATIVE-EPSILON
    COMMON-LISP::SINGLE-FLOAT-NEGATIVE-EPSILON
    COMMON-LISP::DOUBLE-FLOAT-NEGATIVE-EPSILON
    COMMON-LISP::LONG-FLOAT-NEGATIVE-EPSILON COMMON-LISP::ARRAY-RANK-LIMIT
    COMMON-LISP::ARRAY-DIMENSION-LIMIT COMMON-LISP::ARRAY-TOTAL-SIZE-LIMIT
    COMMON-LISP::INTERNAL-TIME-UNITS-PER-SECOND COMMON-LISP::*MACROEXPAND-HOOK*
    COMMON-LISP::*GENSYM-COUNTER* COMMON-LISP::*PACKAGE* COMMON-LISP::*MODULES*
    COMMON-LISP::*RANDOM-STATE* COMMON-LISP::+ COMMON-LISP::++ COMMON-LISP::+++
    COMMON-LISP::- COMMON-LISP::* COMMON-LISP::** COMMON-LISP::***
    COMMON-LISP::/ COMMON-LISP::// COMMON-LISP::///
    COMMON-LISP::*STANDARD-INPUT* COMMON-LISP::*STANDARD-OUTPUT*
    COMMON-LISP::*ERROR-OUTPUT* COMMON-LISP::*QUERY-IO* COMMON-LISP::*DEBUG-IO*
    COMMON-LISP::*TERMINAL-IO* COMMON-LISP::*TRACE-OUTPUT*
    COMMON-LISP::*READ-BASE* COMMON-LISP::*READ-SUPPRESS*
    COMMON-LISP::*READ-EVAL* COMMON-LISP::*READTABLE*
    COMMON-LISP::*PRINT-READABLY* COMMON-LISP::*PRINT-ESCAPE*
    COMMON-LISP::*PRINT-PRETTY* COMMON-LISP::*PRINT-CIRCLE*
    COMMON-LISP::*PRINT-BASE* COMMON-LISP::*PRINT-RADIX*
    COMMON-LISP::*PRINT-CASE* COMMON-LISP::*PRINT-GENSYM*
    COMMON-LISP::*PRINT-LEVEL* COMMON-LISP::*PRINT-LENGTH*
    COMMON-LISP::*PRINT-LINES* COMMON-LISP::*PRINT-MISER-WIDTH*
    COMMON-LISP::*PRINT-PPRINT-DISPATCH* COMMON-LISP::*PRINT-ARRAY*
    COMMON-LISP::*PRINT-RIGHT-MARGIN* COMMON-LISP::*READ-DEFAULT-FLOAT-FORMAT*
    COMMON-LISP::*DEFAULT-PATHNAME-DEFAULTS* COMMON-LISP::*LOAD-VERBOSE*
    COMMON-LISP::*LOAD-PRINT* COMMON-LISP::*LOAD-PATHNAME*
    COMMON-LISP::*LOAD-TRUENAME* COMMON-LISP::*COMPILE-VERBOSE*
    COMMON-LISP::*COMPILE-PRINT* COMMON-LISP::*COMPILE-FILE-PATHNAME*
    COMMON-LISP::*COMPILE-FILE-TRUENAME* COMMON-LISP::*FEATURES*
    COMMON-LISP::COERCE COMMON-LISP::TYPE-OF
    COMMON-LISP::UPGRADED-ARRAY-ELEMENT-TYPE
    COMMON-LISP::UPGRADED-COMPLEX-PART-TYPE COMMON-LISP::TYPEP
    COMMON-LISP::SUBTYPEP COMMON-LISP::NULL COMMON-LISP::SYMBOLP
    COMMON-LISP::ATOM COMMON-LISP::CONSP COMMON-LISP::LISTP
    COMMON-LISP::NUMBERP COMMON-LISP::INTEGERP COMMON-LISP::RATIONALP
    COMMON-LISP::FLOATP COMMON-LISP::REALP COMMON-LISP::COMPLEXP
    COMMON-LISP::CHARACTERP COMMON-LISP::STRINGP COMMON-LISP::BIT-VECTOR-P
    COMMON-LISP::VECTORP COMMON-LISP::SIMPLE-VECTOR-P
    COMMON-LISP::SIMPLE-STRING-P COMMON-LISP::SIMPLE-BIT-VECTOR-P
    COMMON-LISP::ARRAYP COMMON-LISP::PACKAGEP COMMON-LISP::FUNCTIONP
    COMMON-LISP::COMPILED-FUNCTION-P COMMON-LISP::EQ COMMON-LISP::EQL
    COMMON-LISP::EQUAL COMMON-LISP::EQUALP COMMON-LISP::NOT
    COMMON-LISP::SYMBOL-VALUE COMMON-LISP::SYMBOL-FUNCTION
    COMMON-LISP::FDEFINITION COMMON-LISP::BOUNDP COMMON-LISP::FBOUNDP
    COMMON-LISP::SPECIAL-OPERATOR-P COMMON-LISP::SET COMMON-LISP::MAKUNBOUND
    COMMON-LISP::FMAKUNBOUND COMMON-LISP::GET-SETF-EXPANSION COMMON-LISP::APPLY
    COMMON-LISP::FUNCALL COMMON-LISP::MAPCAR COMMON-LISP::MAPLIST
    COMMON-LISP::MAPC COMMON-LISP::MAPL COMMON-LISP::MAPCAN COMMON-LISP::MAPCON
    COMMON-LISP::VALUES COMMON-LISP::VALUES-LIST COMMON-LISP::MACRO-FUNCTION
    COMMON-LISP::MACROEXPAND COMMON-LISP::MACROEXPAND-1 COMMON-LISP::PROCLAIM
    COMMON-LISP::GET COMMON-LISP::REMPROP COMMON-LISP::SYMBOL-PLIST
    COMMON-LISP::GETF COMMON-LISP::GET-PROPERTIES COMMON-LISP::SYMBOL-NAME
    COMMON-LISP::MAKE-SYMBOL COMMON-LISP::COPY-SYMBOL COMMON-LISP::GENSYM
    COMMON-LISP::GENTEMP COMMON-LISP::SYMBOL-PACKAGE COMMON-LISP::KEYWORDP
    COMMON-LISP::MAKE-PACKAGE COMMON-LISP::IN-PACKAGE COMMON-LISP::FIND-PACKAGE
    COMMON-LISP::PACKAGE-NAME COMMON-LISP::PACKAGE-NICKNAMES
    COMMON-LISP::RENAME-PACKAGE COMMON-LISP::PACKAGE-USE-LIST
    COMMON-LISP::PACKAGE-USED-BY-LIST COMMON-LISP::PACKAGE-SHADOWING-SYMBOLS
    COMMON-LISP::LIST-ALL-PACKAGES COMMON-LISP::DELETE-PACKAGE
    COMMON-LISP::INTERN COMMON-LISP::FIND-SYMBOL COMMON-LISP::UNINTERN
    COMMON-LISP::EXPORT COMMON-LISP::UNEXPORT COMMON-LISP::IMPORT
    COMMON-LISP::SHADOWING-IMPORT COMMON-LISP::SHADOW COMMON-LISP::USE-PACKAGE
    COMMON-LISP::UNUSE-PACKAGE COMMON-LISP::FIND-ALL-SYMBOLS
    COMMON-LISP::PROVIDE COMMON-LISP::REQUIRE COMMON-LISP::ZEROP
    COMMON-LISP::PLUSP COMMON-LISP::MINUSP COMMON-LISP::ODDP COMMON-LISP::EVENP
    COMMON-LISP::= COMMON-LISP::/= COMMON-LISP::< COMMON-LISP::>
    COMMON-LISP::<= COMMON-LISP::>= COMMON-LISP::MAX COMMON-LISP::MIN
    COMMON-LISP::+ COMMON-LISP::- COMMON-LISP::* COMMON-LISP::/ COMMON-LISP::1+
    COMMON-LISP::1- COMMON-LISP::CONJUGATE COMMON-LISP::GCD COMMON-LISP::LCM
    COMMON-LISP::EXP COMMON-LISP::EXPT COMMON-LISP::LOG COMMON-LISP::SQRT
    COMMON-LISP::ISQRT COMMON-LISP::ABS COMMON-LISP::PHASE COMMON-LISP::SIGNUM
    COMMON-LISP::SIN COMMON-LISP::COS COMMON-LISP::TAN COMMON-LISP::CIS
    COMMON-LISP::ASIN COMMON-LISP::ACOS COMMON-LISP::ATAN COMMON-LISP::SINH
    COMMON-LISP::COSH COMMON-LISP::TANH COMMON-LISP::ASINH COMMON-LISP::ACOSH
    COMMON-LISP::ATANH COMMON-LISP::FLOAT COMMON-LISP::RATIONAL
    COMMON-LISP::RATIONALIZE COMMON-LISP::NUMERATOR COMMON-LISP::DENOMINATOR
    COMMON-LISP::FLOOR COMMON-LISP::CEILING COMMON-LISP::TRUNCATE
    COMMON-LISP::ROUND COMMON-LISP::MOD COMMON-LISP::REM COMMON-LISP::FFLOOR
    COMMON-LISP::FCEILING COMMON-LISP::FTRUNCATE COMMON-LISP::FROUND
    COMMON-LISP::DECODE-FLOAT COMMON-LISP::SCALE-FLOAT COMMON-LISP::FLOAT-RADIX
    COMMON-LISP::FLOAT-SIGN COMMON-LISP::FLOAT-DIGITS
    COMMON-LISP::FLOAT-PRECISION COMMON-LISP::INTEGER-DECODE-FLOAT
    COMMON-LISP::COMPLEX COMMON-LISP::REALPART COMMON-LISP::IMAGPART
    COMMON-LISP::LOGIOR COMMON-LISP::LOGXOR COMMON-LISP::LOGAND
    COMMON-LISP::LOGEQV COMMON-LISP::LOGNAND COMMON-LISP::LOGNOR
    COMMON-LISP::LOGANDC1 COMMON-LISP::LOGANDC2 COMMON-LISP::LOGORC1
    COMMON-LISP::LOGORC2 COMMON-LISP::BOOLE COMMON-LISP::LOGNOT
    COMMON-LISP::LOGTEST COMMON-LISP::LOGBITP COMMON-LISP::ASH
    COMMON-LISP::LOGCOUNT COMMON-LISP::INTEGER-LENGTH COMMON-LISP::BYTE
    COMMON-LISP::BYTE-SIZE COMMON-LISP::BYTE-POSITION COMMON-LISP::LDB
    COMMON-LISP::LDB-TEST COMMON-LISP::MASK-FIELD COMMON-LISP::DPB
    COMMON-LISP::DEPOSIT-FIELD COMMON-LISP::RANDOM
    COMMON-LISP::MAKE-RANDOM-STATE COMMON-LISP::RANDOM-STATE-P
    COMMON-LISP::STANDARD-CHAR-P COMMON-LISP::GRAPHIC-CHAR-P
    COMMON-LISP::ALPHA-CHAR-P COMMON-LISP::UPPER-CASE-P
    COMMON-LISP::LOWER-CASE-P COMMON-LISP::BOTH-CASE-P
    COMMON-LISP::DIGIT-CHAR-P COMMON-LISP::ALPHANUMERICP COMMON-LISP::CHAR=
    COMMON-LISP::CHAR/= COMMON-LISP::CHAR< COMMON-LISP::CHAR>
    COMMON-LISP::CHAR<= COMMON-LISP::CHAR>= COMMON-LISP::CHAR-EQUAL
    COMMON-LISP::CHAR-NOT-EQUAL COMMON-LISP::CHAR-LESSP
    COMMON-LISP::CHAR-GREATERP COMMON-LISP::CHAR-NOT-GREATERP
    COMMON-LISP::CHAR-NOT-LESSP COMMON-LISP::CHAR-CODE COMMON-LISP::CODE-CHAR
    COMMON-LISP::CHARACTER COMMON-LISP::CHAR-UPCASE COMMON-LISP::CHAR-DOWNCASE
    COMMON-LISP::DIGIT-CHAR COMMON-LISP::CHAR-INT COMMON-LISP::CHAR-NAME
    COMMON-LISP::NAME-CHAR COMMON-LISP::COMPLEMENT COMMON-LISP::CONSTANTLY
    COMMON-LISP::ELT COMMON-LISP::SUBSEQ COMMON-LISP::COPY-SEQ
    COMMON-LISP::LENGTH COMMON-LISP::REVERSE COMMON-LISP::NREVERSE
    COMMON-LISP::MAKE-SEQUENCE COMMON-LISP::CONCATENATE COMMON-LISP::MAP
    COMMON-LISP::MAP-INTO COMMON-LISP::SOME COMMON-LISP::EVERY
    COMMON-LISP::NOTANY COMMON-LISP::NOTEVERY COMMON-LISP::REDUCE
    COMMON-LISP::FILL COMMON-LISP::REPLACE COMMON-LISP::REMOVE
    COMMON-LISP::REMOVE-IF COMMON-LISP::REMOVE-IF-NOT COMMON-LISP::DELETE
    COMMON-LISP::DELETE-IF COMMON-LISP::DELETE-IF-NOT
    COMMON-LISP::REMOVE-DUPLICATES COMMON-LISP::DELETE-DUPLICATES
    COMMON-LISP::SUBSTITUTE COMMON-LISP::SUBSTITUTE-IF
    COMMON-LISP::SUBSTITUTE-IF-NOT COMMON-LISP::NSUBSTITUTE
    COMMON-LISP::NSUBSTITUTE-IF COMMON-LISP::NSUBSTITUTE-IF-NOT
    COMMON-LISP::FIND COMMON-LISP::FIND-IF COMMON-LISP::FIND-IF-NOT
    COMMON-LISP::POSITION COMMON-LISP::POSITION-IF COMMON-LISP::POSITION-IF-NOT
    COMMON-LISP::COUNT COMMON-LISP::COUNT-IF COMMON-LISP::COUNT-IF-NOT
    COMMON-LISP::MISMATCH COMMON-LISP::SEARCH COMMON-LISP::SORT
    COMMON-LISP::STABLE-SORT COMMON-LISP::MERGE COMMON-LISP::CAR
    COMMON-LISP::CDR COMMON-LISP::CAAR COMMON-LISP::CADR COMMON-LISP::CDAR
    COMMON-LISP::CDDR COMMON-LISP::CAAAR COMMON-LISP::CAADR COMMON-LISP::CADAR
    COMMON-LISP::CADDR COMMON-LISP::CDAAR COMMON-LISP::CDADR COMMON-LISP::CDDAR
    COMMON-LISP::CDDDR COMMON-LISP::CAAAAR COMMON-LISP::CAAADR
    COMMON-LISP::CAADAR COMMON-LISP::CAADDR COMMON-LISP::CADAAR
    COMMON-LISP::CADADR COMMON-LISP::CADDAR COMMON-LISP::CADDDR
    COMMON-LISP::CDAAAR COMMON-LISP::CDAADR COMMON-LISP::CDADAR
    COMMON-LISP::CDADDR COMMON-LISP::CDDAAR COMMON-LISP::CDDADR
    COMMON-LISP::CDDDAR COMMON-LISP::CDDDDR COMMON-LISP::CONS
    COMMON-LISP::TREE-EQUAL COMMON-LISP::ENDP COMMON-LISP::LIST-LENGTH
    COMMON-LISP::NTH COMMON-LISP::FIRST COMMON-LISP::SECOND COMMON-LISP::THIRD
    COMMON-LISP::FOURTH COMMON-LISP::FIFTH COMMON-LISP::SIXTH
    COMMON-LISP::SEVENTH COMMON-LISP::EIGHTH COMMON-LISP::NINTH
    COMMON-LISP::TENTH COMMON-LISP::REST COMMON-LISP::NTHCDR COMMON-LISP::LAST
    COMMON-LISP::LIST COMMON-LISP::MAKE-LIST COMMON-LISP::APPEND
    COMMON-LISP::COPY-LIST COMMON-LISP::COPY-ALIST COMMON-LISP::COPY-TREE
    COMMON-LISP::REVAPPEND COMMON-LISP::NCONC COMMON-LISP::NRECONC
    COMMON-LISP::BUTLAST COMMON-LISP::NBUTLAST COMMON-LISP::LDIFF
    COMMON-LISP::RPLACA COMMON-LISP::RPLACD COMMON-LISP::SUBST
    COMMON-LISP::SUBST-IF COMMON-LISP::SUBST-IF-NOT COMMON-LISP::NSUBST
    COMMON-LISP::NSUBST-IF COMMON-LISP::NSUBST-IF-NOT COMMON-LISP::SUBLIS
    COMMON-LISP::NSUBLIS COMMON-LISP::MEMBER COMMON-LISP::MEMBER-IF
    COMMON-LISP::MEMBER-IF-NOT COMMON-LISP::TAILP COMMON-LISP::ADJOIN
    COMMON-LISP::UNION COMMON-LISP::NUNION COMMON-LISP::INTERSECTION
    COMMON-LISP::NINTERSECTION COMMON-LISP::SET-DIFFERENCE
    COMMON-LISP::NSET-DIFFERENCE COMMON-LISP::SET-EXCLUSIVE-OR
    COMMON-LISP::NSET-EXCLUSIVE-OR COMMON-LISP::SUBSETP COMMON-LISP::ACONS
    COMMON-LISP::PAIRLIS COMMON-LISP::ASSOC COMMON-LISP::ASSOC-IF
    COMMON-LISP::ASSOC-IF-NOT COMMON-LISP::RASSOC COMMON-LISP::RASSOC-IF
    COMMON-LISP::RASSOC-IF-NOT COMMON-LISP::MAKE-HASH-TABLE
    COMMON-LISP::HASH-TABLE-P COMMON-LISP::GETHASH COMMON-LISP::REMHASH
    COMMON-LISP::MAPHASH COMMON-LISP::CLRHASH COMMON-LISP::HASH-TABLE-COUNT
    COMMON-LISP::HASH-TABLE-REHASH-SIZE
    COMMON-LISP::HASH-TABLE-REHASH-THRESHOLD COMMON-LISP::HASH-TABLE-SIZE
    COMMON-LISP::HASH-TABLE-TEST COMMON-LISP::SXHASH COMMON-LISP::MAKE-ARRAY
    COMMON-LISP::VECTOR COMMON-LISP::AREF COMMON-LISP::SVREF
    COMMON-LISP::ARRAY-ELEMENT-TYPE COMMON-LISP::ARRAY-RANK
    COMMON-LISP::ARRAY-DIMENSION COMMON-LISP::ARRAY-DIMENSIONS
    COMMON-LISP::ARRAY-TOTAL-SIZE COMMON-LISP::ARRAY-IN-BOUNDS-P
    COMMON-LISP::ARRAY-ROW-MAJOR-INDEX COMMON-LISP::ROW-MAJOR-AREF
    COMMON-LISP::ADJUSTABLE-ARRAY-P COMMON-LISP::ARRAY-DISPLACEMENT
    COMMON-LISP::BIT COMMON-LISP::SBIT COMMON-LISP::BIT-AND
    COMMON-LISP::BIT-IOR COMMON-LISP::BIT-XOR COMMON-LISP::BIT-EQV
    COMMON-LISP::BIT-NAND COMMON-LISP::BIT-NOR COMMON-LISP::BIT-ANDC1
    COMMON-LISP::BIT-ANDC2 COMMON-LISP::BIT-ORC1 COMMON-LISP::BIT-ORC2
    COMMON-LISP::BIT-NOT COMMON-LISP::ARRAY-HAS-FILL-POINTER-P
    COMMON-LISP::FILL-POINTER COMMON-LISP::VECTOR-PUSH
    COMMON-LISP::VECTOR-PUSH-EXTEND COMMON-LISP::VECTOR-POP
    COMMON-LISP::ADJUST-ARRAY COMMON-LISP::CHAR COMMON-LISP::SCHAR
    COMMON-LISP::STRING= COMMON-LISP::STRING-EQUAL COMMON-LISP::STRING<
    COMMON-LISP::STRING> COMMON-LISP::STRING<= COMMON-LISP::STRING>=
    COMMON-LISP::STRING/= COMMON-LISP::STRING-LESSP
    COMMON-LISP::STRING-GREATERP COMMON-LISP::STRING-NOT-GREATERP
    COMMON-LISP::STRING-NOT-LESSP COMMON-LISP::STRING-NOT-EQUAL
    COMMON-LISP::MAKE-STRING COMMON-LISP::STRING-TRIM
    COMMON-LISP::STRING-LEFT-TRIM COMMON-LISP::STRING-RIGHT-TRIM
    COMMON-LISP::STRING-UPCASE COMMON-LISP::STRING-DOWNCASE
    COMMON-LISP::STRING-CAPITALIZE COMMON-LISP::NSTRING-UPCASE
    COMMON-LISP::NSTRING-DOWNCASE COMMON-LISP::NSTRING-CAPITALIZE
    COMMON-LISP::STRING COMMON-LISP::COPY-STRUCTURE COMMON-LISP::EVAL
    COMMON-LISP::CONSTANTP COMMON-LISP::MAKE-SYNONYM-STREAM
    COMMON-LISP::MAKE-BROADCAST-STREAM COMMON-LISP::MAKE-CONCATENATED-STREAM
    COMMON-LISP::MAKE-TWO-WAY-STREAM COMMON-LISP::MAKE-ECHO-STREAM
    COMMON-LISP::MAKE-STRING-INPUT-STREAM
    COMMON-LISP::MAKE-STRING-OUTPUT-STREAM
    COMMON-LISP::GET-OUTPUT-STREAM-STRING COMMON-LISP::STREAMP
    COMMON-LISP::OPEN-STREAM-P COMMON-LISP::INPUT-STREAM-P
    COMMON-LISP::OUTPUT-STREAM-P COMMON-LISP::STREAM-ELEMENT-TYPE
    COMMON-LISP::STREAM-EXTERNAL-FORMAT COMMON-LISP::CLOSE
    COMMON-LISP::BROADCAST-STREAM-STREAMS
    COMMON-LISP::CONCATENATED-STREAM-STREAMS
    COMMON-LISP::ECHO-STREAM-INPUT-STREAM
    COMMON-LISP::ECHO-STREAM-OUTPUT-STREAM COMMON-LISP::SYNONYM-STREAM-SYMBOL
    COMMON-LISP::TWO-WAY-STREAM-INPUT-STREAM
    COMMON-LISP::TWO-WAY-STREAM-OUTPUT-STREAM COMMON-LISP::INTERACTIVE-STREAM-P
    COMMON-LISP::COPY-READTABLE COMMON-LISP::READTABLEP
    COMMON-LISP::SET-SYNTAX-FROM-CHAR COMMON-LISP::SET-MACRO-CHARACTER
    COMMON-LISP::GET-MACRO-CHARACTER COMMON-LISP::MAKE-DISPATCH-MACRO-CHARACTER
    COMMON-LISP::SET-DISPATCH-MACRO-CHARACTER
    COMMON-LISP::GET-DISPATCH-MACRO-CHARACTER COMMON-LISP::READTABLE-CASE
    COMMON-LISP::READ COMMON-LISP::READ-PRESERVING-WHITESPACE
    COMMON-LISP::READ-DELIMITED-LIST COMMON-LISP::READ-LINE
    COMMON-LISP::READ-CHAR COMMON-LISP::UNREAD-CHAR COMMON-LISP::PEEK-CHAR
    COMMON-LISP::LISTEN COMMON-LISP::READ-CHAR-NO-HANG COMMON-LISP::CLEAR-INPUT
    COMMON-LISP::READ-FROM-STRING COMMON-LISP::PARSE-INTEGER
    COMMON-LISP::READ-BYTE COMMON-LISP::WRITE COMMON-LISP::PRIN1
    COMMON-LISP::PRINT COMMON-LISP::PPRINT COMMON-LISP::PRINC
    COMMON-LISP::WRITE-TO-STRING COMMON-LISP::PPRINT-DISPATCH
    COMMON-LISP::COPY-PPRINT-DISPATCH COMMON-LISP::SET-PPRINT-DISPATCH
    COMMON-LISP::PPRINT-FILL COMMON-LISP::PPRINT-INDENT
    COMMON-LISP::PPRINT-LINEAR COMMON-LISP::PPRINT-NEWLINE
    COMMON-LISP::PPRINT-TAB COMMON-LISP::PPRINT-TABULAR
    COMMON-LISP::PPRINT-EXIT-IF-LIST-EXHAUSTED
    COMMON-LISP::PPRINT-LOGICAL-BLOCK COMMON-LISP::PPRINT-POP
    COMMON-LISP::PRIN1-TO-STRING COMMON-LISP::PRINC-TO-STRING
    COMMON-LISP::WRITE-CHAR COMMON-LISP::WRITE-STRING COMMON-LISP::WRITE-LINE
    COMMON-LISP::TERPRI COMMON-LISP::FRESH-LINE COMMON-LISP::FINISH-OUTPUT
    COMMON-LISP::FORCE-OUTPUT COMMON-LISP::CLEAR-OUTPUT COMMON-LISP::WRITE-BYTE
    COMMON-LISP::FORMAT COMMON-LISP::Y-OR-N-P COMMON-LISP::YES-OR-NO-P
    COMMON-LISP::WILD-PATHNAME-P COMMON-LISP::PATHNAME-MATCH-P
    COMMON-LISP::TRANSLATE-PATHNAME COMMON-LISP::LOGICAL-PATHNAME
    COMMON-LISP::TRANSLATE-LOGICAL-PATHNAME
    COMMON-LISP::LOGICAL-PATHNAME-TRANSLATIONS
    COMMON-LISP::LOAD-LOGICAL-PATHNAME-TRANSLATIONS
    COMMON-LISP::COMPILE-FILE-PATHNAME COMMON-LISP::PATHNAME
    COMMON-LISP::TRUENAME COMMON-LISP::PARSE-NAMESTRING
    COMMON-LISP::MERGE-PATHNAMES COMMON-LISP::MAKE-PATHNAME
    COMMON-LISP::PATHNAMEP COMMON-LISP::PATHNAME-HOST
    COMMON-LISP::PATHNAME-DEVICE COMMON-LISP::PATHNAME-DIRECTORY
    COMMON-LISP::PATHNAME-NAME COMMON-LISP::PATHNAME-TYPE
    COMMON-LISP::PATHNAME-VERSION COMMON-LISP::NAMESTRING
    COMMON-LISP::FILE-NAMESTRING COMMON-LISP::DIRECTORY-NAMESTRING
    COMMON-LISP::HOST-NAMESTRING COMMON-LISP::ENOUGH-NAMESTRING
    COMMON-LISP::USER-HOMEDIR-PATHNAME COMMON-LISP::OPEN
    COMMON-LISP::RENAME-FILE COMMON-LISP::DELETE-FILE COMMON-LISP::PROBE-FILE
    COMMON-LISP::FILE-WRITE-DATE COMMON-LISP::FILE-AUTHOR
    COMMON-LISP::FILE-POSITION COMMON-LISP::FILE-LENGTH
    COMMON-LISP::FILE-STRING-LENGTH COMMON-LISP::LOAD COMMON-LISP::DIRECTORY
    COMMON-LISP::ENSURE-DIRECTORIES-EXIST COMMON-LISP::ERROR
    COMMON-LISP::CERROR COMMON-LISP::WARN COMMON-LISP::BREAK
    COMMON-LISP::COMPILE COMMON-LISP::COMPILE-FILE COMMON-LISP::DISASSEMBLE
    COMMON-LISP::WITH-COMPILATION-UNIT COMMON-LISP::DOCUMENTATION
    COMMON-LISP::VARIABLE COMMON-LISP::STRUCTURE COMMON-LISP::TYPE
    COMMON-LISP::DESCRIBE COMMON-LISP::INSPECT COMMON-LISP::ROOM
    COMMON-LISP::ED COMMON-LISP::DRIBBLE COMMON-LISP::APROPOS
    COMMON-LISP::APROPOS-LIST COMMON-LISP::GET-DECODED-TIME
    COMMON-LISP::GET-UNIVERSAL-TIME COMMON-LISP::DECODE-UNIVERSAL-TIME
    COMMON-LISP::ENCODE-UNIVERSAL-TIME COMMON-LISP::GET-INTERNAL-RUN-TIME
    COMMON-LISP::GET-INTERNAL-REAL-TIME COMMON-LISP::SLEEP
    COMMON-LISP::LISP-IMPLEMENTATION-TYPE
    COMMON-LISP::LISP-IMPLEMENTATION-VERSION COMMON-LISP::MACHINE-TYPE
    COMMON-LISP::MACHINE-VERSION COMMON-LISP::MACHINE-INSTANCE
    COMMON-LISP::SOFTWARE-TYPE COMMON-LISP::SOFTWARE-VERSION
    COMMON-LISP::SHORT-SITE-NAME COMMON-LISP::LONG-SITE-NAME
    COMMON-LISP::IDENTITY COMMON-LISP::EVAL-WHEN COMMON-LISP::QUOTE
    COMMON-LISP::FUNCTION COMMON-LISP::SETQ COMMON-LISP::PROGN COMMON-LISP::LET
    COMMON-LISP::LET* COMMON-LISP::LOCALLY COMMON-LISP::PROGV COMMON-LISP::FLET
    COMMON-LISP::LABELS COMMON-LISP::MACROLET COMMON-LISP::SYMBOL-MACROLET
    COMMON-LISP::IF COMMON-LISP::BLOCK COMMON-LISP::RETURN-FROM
    COMMON-LISP::TAGBODY COMMON-LISP::GO COMMON-LISP::MULTIPLE-VALUE-CALL
    COMMON-LISP::MULTIPLE-VALUE-PROG1 COMMON-LISP::CATCH
    COMMON-LISP::UNWIND-PROTECT COMMON-LISP::THROW COMMON-LISP::DECLARE
    COMMON-LISP::THE COMMON-LISP::LOAD-TIME-VALUE COMMON-LISP::DEFTYPE
    COMMON-LISP::DEFUN COMMON-LISP::DEFVAR COMMON-LISP::DEFPARAMETER
    COMMON-LISP::DEFCONSTANT COMMON-LISP::AND COMMON-LISP::OR
    COMMON-LISP::PSETQ COMMON-LISP::SETF COMMON-LISP::PSETF COMMON-LISP::SHIFTF
    COMMON-LISP::ROTATEF COMMON-LISP::DEFINE-MODIFY-MACRO COMMON-LISP::DEFSETF
    COMMON-LISP::DEFINE-SETF-EXPANDER COMMON-LISP::PROG1 COMMON-LISP::PROG2
    COMMON-LISP::WHEN COMMON-LISP::UNLESS COMMON-LISP::COND COMMON-LISP::CASE
    COMMON-LISP::TYPECASE COMMON-LISP::OTHERWISE COMMON-LISP::RETURN
    COMMON-LISP::LOOP COMMON-LISP::DO COMMON-LISP::DO* COMMON-LISP::DOLIST
    COMMON-LISP::DOTIMES COMMON-LISP::PROG COMMON-LISP::PROG*
    COMMON-LISP::MULTIPLE-VALUE-LIST COMMON-LISP::MULTIPLE-VALUE-BIND
    COMMON-LISP::MULTIPLE-VALUE-SETQ COMMON-LISP::DEFMACRO COMMON-LISP::REMF
    COMMON-LISP::DO-SYMBOLS COMMON-LISP::DO-EXTERNAL-SYMBOLS
    COMMON-LISP::DO-ALL-SYMBOLS COMMON-LISP::WITH-PACKAGE-ITERATOR
    COMMON-LISP::INCF COMMON-LISP::DECF COMMON-LISP::PUSH COMMON-LISP::PUSHNEW
    COMMON-LISP::POP COMMON-LISP::DEFSTRUCT COMMON-LISP::WITH-OPEN-STREAM
    COMMON-LISP::WITH-INPUT-FROM-STRING COMMON-LISP::WITH-OUTPUT-TO-STRING
    COMMON-LISP::WITH-STANDARD-IO-SYNTAX COMMON-LISP::WITH-OPEN-FILE
    COMMON-LISP::DEFINE-SYMBOL-MACRO COMMON-LISP::CHECK-TYPE
    COMMON-LISP::ASSERT COMMON-LISP::ETYPECASE COMMON-LISP::CTYPECASE
    COMMON-LISP::ECASE COMMON-LISP::CCASE COMMON-LISP::TRACE
    COMMON-LISP::UNTRACE COMMON-LISP::STEP COMMON-LISP::TIME
    COMMON-LISP::FORMATTER COMMON-LISP::COMPILER-MACRO
    COMMON-LISP::COMPILER-MACRO-FUNCTION COMMON-LISP::DEFINE-COMPILER-MACRO
    COMMON-LISP::EVAL COMMON-LISP::LOAD COMMON-LISP::COMPILE
    COMMON-LISP::SPECIAL COMMON-LISP::TYPE COMMON-LISP::FTYPE
    COMMON-LISP::FUNCTION COMMON-LISP::INLINE COMMON-LISP::NOTINLINE
    COMMON-LISP::IGNORE COMMON-LISP::IGNORABLE COMMON-LISP::OPTIMIZE
    COMMON-LISP::SPEED COMMON-LISP::SPACE COMMON-LISP::SAFETY
    COMMON-LISP::COMPILATION-SPEED COMMON-LISP::DEBUG COMMON-LISP::DECLARATION
    COMMON-LISP::DYNAMIC-EXTENT COMMON-LISP::COMPILE COMMON-LISP::HANDLER-BIND
    COMMON-LISP::FIND-RESTART COMMON-LISP::COMPUTE-RESTARTS
    COMMON-LISP::INVOKE-RESTART-INTERACTIVELY COMMON-LISP::RESTART
    COMMON-LISP::CONTINUE COMMON-LISP::END-OF-FILE COMMON-LISP::CONDITION
    COMMON-LISP::WARNING COMMON-LISP::SERIOUS-CONDITION COMMON-LISP::ERROR
    COMMON-LISP::STORAGE-CONDITION COMMON-LISP::TYPE-ERROR
    COMMON-LISP::PROGRAM-ERROR COMMON-LISP::CONTROL-ERROR
    COMMON-LISP::PACKAGE-ERROR COMMON-LISP::PRINT-NOT-READABLE
    COMMON-LISP::PARSE-ERROR COMMON-LISP::STREAM-ERROR COMMON-LISP::END-OF-FILE
    COMMON-LISP::READER-ERROR COMMON-LISP::FILE-ERROR COMMON-LISP::CELL-ERROR
    COMMON-LISP::UNBOUND-VARIABLE COMMON-LISP::UNDEFINED-FUNCTION
    COMMON-LISP::UNBOUND-SLOT COMMON-LISP::ARITHMETIC-ERROR
    COMMON-LISP::DIVISION-BY-ZERO COMMON-LISP::FLOATING-POINT-OVERFLOW
    COMMON-LISP::FLOATING-POINT-UNDERFLOW COMMON-LISP::FLOATING-POINT-INEXACT
    COMMON-LISP::FLOATING-POINT-INVALID-OPERATION))
#Y(#:TOP-LEVEL-FORM-4 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 81 19 01)
   COMMON-LISP::LAMBDA-LIST-KEYWORDS
   (COMMON-LISP::&OPTIONAL COMMON-LISP::&REST COMMON-LISP::&KEY
    COMMON-LISP::&ALLOW-OTHER-KEYS COMMON-LISP::&AUX COMMON-LISP::&BODY
    COMMON-LISP::&WHOLE COMMON-LISP::&ENVIRONMENT))
#Y(#:TOP-LEVEL-FORM-5 #17Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 31 D5 19 01)
   #.COMMON-LISP::LAMBDA-LIST-KEYWORDS)
#Y(#:TOP-LEVEL-FORM-6 #15Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 19 01)
   (COMMON-LISP::SPECIAL COMMON-LISP::*FEATURES*))
#Y(#:TOP-LEVEL-FORM-7 #15Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 19 01)
   (COMMON-LISP::SPECIAL SYSTEM::*COMPILING* SYSTEM::*COMPILING-FROM-FILE*))
#Y(#:TOP-LEVEL-FORM-8 #15Y(00 00 00 00 00 00 00 00 00 01 00 0F 00 19 01)
   SYSTEM::*COMPILING*)
#Y(#:TOP-LEVEL-FORM-9 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 DA 19 01)
   ("COMMON-LISP" "EXT") "SYSTEM")
#Y(#:TOP-LEVEL-FORM-10 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01)
   "SYSTEM" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-11
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB 6F 02 32 80 19 01)
   COMMON-LISP::IN-PACKAGE
   #Y(COMMON-LISP::IN-PACKAGE
      #48Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 AC 8E 05 08 AC 8F 04 12 AC 81
           8A 00 DE DF E0 E1 E2 B1 7B 02 7B 03 61 03 19 04 DA DB 6F 02 DD AF 33
           02 1F)
      SYSTEM::SOURCE-PROGRAM-ERROR
      "~S: argument ~S should be a string or a symbol" SYSTEM::TEXT
      COMMON-LISP::IN-PACKAGE COMMON-LISP::EVAL-WHEN
      (COMMON-LISP::COMPILE COMMON-LISP::LOAD COMMON-LISP::EVAL)
      COMMON-LISP::SETQ COMMON-LISP::*PACKAGE* SYSTEM::%FIND-PACKAGE)
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-12 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 80 19 01)
   COMMON-LISP::CERROR
   #Y(COMMON-LISP::CERROR
      #30Y(00 00 00 00 00 00 00 00 01 16 38 01 31 8B DA 38 01 31 83 AD 38 01 31
           80 38 01 31 8A 19 02)
      "cerror: "))
#Y(#:TOP-LEVEL-FORM-13 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 80 19 01)
   COMMON-LISP::FORMAT
   #Y(COMMON-LISP::FORMAT
      #17Y(00 00 00 00 00 00 00 00 01 16 AD 38 01 31 81 19 02)))
#Y(#:TOP-LEVEL-FORM-14 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 DA 19 01)
   ("COMMON-LISP" "CUSTOM") "EXT")
#Y(#:TOP-LEVEL-FORM-15 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01)
   "EXT" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-16 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 80 19 01)
   EXT::EXIT #.#'SYSTEM::%EXIT)
#Y(#:TOP-LEVEL-FORM-17 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 80 19 01)
   EXT::QUIT #.#'SYSTEM::%EXIT)
#Y(#:TOP-LEVEL-FORM-18 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 80 19 01)
   EXT::BYE #.#'SYSTEM::%EXIT)
#Y(#:TOP-LEVEL-FORM-19 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 D5 19 01)
   (EXT::RE-EXPORT EXT::MAKE-ENCODING EXT::ENCODING EXT::SHOW-STACK EXT::GC
    EXT::EXIT EXT::QUIT EXT::BYE EXT::PROBE-DIRECTORY EXT::CD EXT::MAKE-DIR
    EXT::DELETE-DIR EXT::DEFAULT-DIRECTORY EXT::DIR EXT::XGCD EXT::EXQUO EXT::!
    EXT::EVALHOOK EXT::APPLYHOOK EXT::SUBSTRING EXT::STRING-CONCAT
    EXT::STRING-CHAR EXT::MAKE-CHAR EXT::STRING-WIDTH EXT::CHAR-WIDTH
    EXT::INT-CHAR EXT::CHAR-BITS EXT::CHAR-FONT EXT::CHAR-BIT EXT::SET-CHAR-BIT
    EXT::BASE-CHAR-CODE-LIMIT EXT::CHAR-FONT-LIMIT EXT::CHAR-BITS-LIMIT
    EXT::CHAR-CONTROL-BIT EXT::CHAR-META-BIT EXT::CHAR-SUPER-BIT
    EXT::CHAR-HYPER-BIT EXT::STRING-CHAR-P EXT::LONG-FLOAT-DIGITS
    EXT::PACKAGE-LOCK EXT::HASH-TABLE-WEAK-P EXT::WEAK-KEY-VALUE-TABLE
    EXT::THE-ENVIRONMENT EXT::ARGLIST EXT::GETENV EXT::SPECIAL-VARIABLE-P
    EXT::*DRIVER* EXT::*BREAK-DRIVER* EXT::*ARGS* EXT::*KEYBOARD-INPUT*
    EXT::CLHS-ROOT EXT::SHELL EXT::EXECUTE EXT::CONSTANT-INLINE
    EXT::CONSTANT-NOTINLINE EXT::SIMPLE-2BIT-VECTOR EXT::2BIT-VECTOR
    EXT::SIMPLE-4BIT-VECTOR EXT::4BIT-VECTOR EXT::SIMPLE-8BIT-VECTOR
    EXT::8BIT-VECTOR EXT::SIMPLE-16BIT-VECTOR EXT::16BIT-VECTOR
    EXT::SIMPLE-32BIT-VECTOR EXT::32BIT-VECTOR EXT::SPECIAL-FORM
    EXT::SYSTEM-FUNCTION EXT::MACRO EXT::FUNCTION-MACRO EXT::FOREIGN-POINTER
    EXT::SYMBOL-MACRO EXT::SYMBOL-MACRO-EXPAND EXT::DESIGNATOR EXT::ADDRESS
    EXT::SPECIAL-OPERATOR EXT::FINALIZE EXT::FINALIZER EXT::WEAK-POINTER
    EXT::MAKE-WEAK-POINTER EXT::WEAK-POINTER-P EXT::WEAK-POINTER-VALUE
    EXT::READ-INTEGER EXT::READ-FLOAT EXT::WRITE-INTEGER EXT::WRITE-FLOAT
    EXT::READ-BYTE-LOOKAHEAD EXT::READ-BYTE-WILL-HANG-P EXT::READ-BYTE-NO-HANG
    EXT::READ-CHAR-WILL-HANG-P EXT::READ-CHAR-SEQUENCE EXT::WRITE-CHAR-SEQUENCE
    EXT::READ-BYTE-SEQUENCE EXT::WRITE-BYTE-SEQUENCE
    EXT::CONVERT-STRING-FROM-BYTES EXT::CONVERT-STRING-TO-BYTES
    EXT::MAKE-PIPE-OUTPUT-STREAM EXT::MAKE-PIPE-INPUT-STREAM
    EXT::MAKE-PIPE-IO-STREAM EXT::MAKE-BUFFERED-INPUT-STREAM
    EXT::MAKE-BUFFERED-OUTPUT-STREAM EXT::GET-SETF-METHOD EXT::LOCAL
    EXT::COMPILER-LET EXT::LOAD-TIME-EVAL)
   "EXT")
#Y(#:TOP-LEVEL-FORM-20 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01)
   "CUSTOM" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-21 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 D5 19 01)
   (CUSTOM::*LOAD-PATHS* CUSTOM::*EDITOR* CUSTOM::*CLHS-ROOT-DEFAULT*
    CUSTOM::*LOAD-ECHO* CUSTOM::*APPLYHOOK* CUSTOM::*EVALHOOK*
    CUSTOM::*LOAD-COMPILING* CUSTOM::*COMPILE-WARNINGS* CUSTOM::*ANSI*
    CUSTOM::*CURRENT-LANGUAGE* CUSTOM::*LIB-DIRECTORY*
    CUSTOM::*DEFAULT-FILE-ENCODING* CUSTOM::*MISC-ENCODING*
    CUSTOM::*TERMINAL-ENCODING* CUSTOM::*PATHNAME-ENCODING*
    CUSTOM::*SOURCE-FILE-TYPES* CUSTOM::*COMPILED-FILE-TYPES*)
   "CUSTOM")
#Y(#:TOP-LEVEL-FORM-22 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01)
   "SYSTEM" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-23 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 E3 19 01)
   "CUSTOM" "EXT")
#Y(#:TOP-LEVEL-FORM-24 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01)
   "COMMON-LISP" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-25 #15Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 19 01)
   (EXT::CONSTANT-NOTINLINE COMMON-LISP::LAMBDA-PARAMETERS-LIMIT
    COMMON-LISP::CALL-ARGUMENTS-LIMIT SYSTEM::*JMPBUF-SIZE*
    SYSTEM::*BIG-ENDIAN* COMMON-LISP::MOST-POSITIVE-FIXNUM
    COMMON-LISP::MOST-NEGATIVE-FIXNUM COMMON-LISP::MOST-POSITIVE-SHORT-FLOAT
    COMMON-LISP::MOST-NEGATIVE-SHORT-FLOAT
    COMMON-LISP::LEAST-POSITIVE-SHORT-FLOAT
    COMMON-LISP::LEAST-NEGATIVE-SHORT-FLOAT
    COMMON-LISP::MOST-POSITIVE-SINGLE-FLOAT
    COMMON-LISP::MOST-NEGATIVE-SINGLE-FLOAT
    COMMON-LISP::LEAST-POSITIVE-SINGLE-FLOAT
    COMMON-LISP::LEAST-NEGATIVE-SINGLE-FLOAT
    COMMON-LISP::MOST-POSITIVE-DOUBLE-FLOAT
    COMMON-LISP::MOST-NEGATIVE-DOUBLE-FLOAT
    COMMON-LISP::LEAST-POSITIVE-DOUBLE-FLOAT
    COMMON-LISP::LEAST-NEGATIVE-DOUBLE-FLOAT COMMON-LISP::SHORT-FLOAT-EPSILON
    COMMON-LISP::SHORT-FLOAT-NEGATIVE-EPSILON COMMON-LISP::SINGLE-FLOAT-EPSILON
    COMMON-LISP::SINGLE-FLOAT-NEGATIVE-EPSILON
    COMMON-LISP::DOUBLE-FLOAT-EPSILON
    COMMON-LISP::DOUBLE-FLOAT-NEGATIVE-EPSILON COMMON-LISP::CHAR-CODE-LIMIT
    COMMON-LISP::ARRAY-TOTAL-SIZE-LIMIT COMMON-LISP::ARRAY-DIMENSION-LIMIT
    COMMON-LISP::ARRAY-RANK-LIMIT COMMON-LISP::INTERNAL-TIME-UNITS-PER-SECOND))
#Y(#:TOP-LEVEL-FORM-26 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 DA 19 01)
   ("COMMON-LISP") "CLOS")
#Y(#:TOP-LEVEL-FORM-27 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01)
   "CLOS" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-28 #17Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 31 D5 19 01)
   (CLOS::SLOT-VALUE CLOS::SLOT-BOUNDP CLOS::SLOT-MAKUNBOUND
    CLOS::SLOT-EXISTS-P CLOS::WITH-SLOTS CLOS::WITH-ACCESSORS CLOS::FIND-CLASS
    CLOS::CLASS-OF CLOS::DEFCLASS CLOS::DEFMETHOD CLOS::CALL-NEXT-METHOD
    CLOS::NEXT-METHOD-P CLOS::DEFGENERIC CLOS::GENERIC-FUNCTION
    CLOS::CLASS-NAME CLOS::NO-APPLICABLE-METHOD CLOS::NO-NEXT-METHOD
    CLOS::FIND-METHOD CLOS::ADD-METHOD CLOS::REMOVE-METHOD
    CLOS::COMPUTE-APPLICABLE-METHODS CLOS::METHOD-QUALIFIERS
    CLOS::FUNCTION-KEYWORDS CLOS::SLOT-MISSING CLOS::SLOT-UNBOUND
    CLOS::PRINT-OBJECT CLOS::DESCRIBE-OBJECT CLOS::MAKE-INSTANCE
    CLOS::ALLOCATE-INSTANCE CLOS::INITIALIZE-INSTANCE
    CLOS::REINITIALIZE-INSTANCE CLOS::SHARED-INITIALIZE CLOS::MAKE-LOAD-FORM
    CLOS::MAKE-LOAD-FORM-SAVING-SLOTS CLOS::CLASS CLOS::STANDARD-CLASS
    CLOS::STRUCTURE-CLASS CLOS::BUILT-IN-CLASS CLOS::STANDARD-OBJECT
    COMMON-LISP::STRUCTURE-OBJECT CLOS::GENERIC-FUNCTION
    CLOS::STANDARD-GENERIC-FUNCTION CLOS::METHOD CLOS::STANDARD-METHOD
    CLOS::STANDARD))
#Y(#:TOP-LEVEL-FORM-29 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 DA 19 01)
   ("CLOS") "COMMON-LISP")
#Y(#:TOP-LEVEL-FORM-30 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 E3 19 01)
   "CLOS" "COMMON-LISP")
#Y(#:TOP-LEVEL-FORM-31
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 D5 DA DC 31 D7 DA DD 31 D5 19
        01)
   (CLOS::GENERIC-FLET CLOS::GENERIC-LABELS CLOS::NO-PRIMARY-METHOD) "CLOS"
   "EXT" "EXT")
#Y(#:TOP-LEVEL-FORM-32 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01)
   "SYSTEM" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-33 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 DA 19 01)
   ("COMMON-LISP" "EXT") "CL-USER")
#Y(#:TOP-LEVEL-FORM-34 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 80 19 01)
   SYSTEM::FBOUND-STRING
   #Y(SYSTEM::FBOUND-STRING
      #39Y(00 00 00 00 01 00 00 00 00 02 AD 8C 50 10 AD 38 01 8C 56 0D AD 8D 4F
           0C C8 14 2F 01 19 02 C5 1B 78 C7 1B 75 00 19 02)
      "special operator" SYSTEM::TEXT "macro" "function"))
#Y(#:TOP-LEVEL-FORM-35 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 80 19 01)
   SYSTEM::CHECK-REDEFINITION
   #Y(SYSTEM::CHECK-REDEFINITION
      #79Y(00 00 00 00 03 00 00 00 00 04 AE A1 20 0C B0 89 00 0B A1 5C 5B 14 32
           88 1B 2E A1 1B 78 63 B1 1B 1A 9D 1B 08 94 00 9D 20 78 9D 5C 5B 14 AC
           8F 04 03 AC 32 88 F8 84 02 16 01 83 00 9D 21 66 16 01 AC 31 A2 16 01
           1C 01 00 14 B1 2D 03 01 19 04)
      SYSTEM::FUNCTION-NAME-P SYSTEM::CHECK-PACKAGE-LOCK))
#Y(#:TOP-LEVEL-FORM-36 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 80 19 01)
   SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::REMOVE-OLD-DEFINITIONS
      #87Y(00 00 00 00 01 00 00 00 00 02 AD 8C 50 3F AD DD AF 6F 04 2D 03 05 AD
           31 53 AD E0 32 87 AD E1 32 87 AD E2 38 01 8F 82 06 AD E3 63 2D 03 0A
           AD E5 38 01 8F 82 05 AD E5 64 32 86 AD E6 38 01 32 82 1F 13 E7 6F 02
           AE 30 0E AD 2F 0F 19 02 DA DB 6F 02 AF 33 01 1F 19 02)
      COMMON-LISP::ERROR "~S is a special operator and may not be redefined."
      SYSTEM::TEXT "DEFUN/DEFMACRO" SYSTEM::FBOUND-STRING
      SYSTEM::CHECK-REDEFINITION EXT::MACRO SYSTEM::DEFSTRUCT-READER
      SYSTEM::DOCUMENTATION-STRINGS COMMON-LISP::FUNCTION
      SYSTEM::%SET-DOCUMENTATION SYSTEM::INLINE-EXPANSION
      SYSTEM::TRACED-DEFINITION "DEFUN/DEFMACRO: redefining ~S; it was traced!"
      COMMON-LISP::WARN SYSTEM::UNTRACE2))
#Y(#:TOP-LEVEL-FORM-37 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 80 19 01)
   SYSTEM::%THE-ENVIRONMENT
   #Y(SYSTEM::%THE-ENVIRONMENT
      #23Y(00 00 00 00 02 00 00 00 00 03 AD C5 5F 14 C6 5F 14 AE C5 60 9E 19
           03)
      0. 2.))
#Y(#:TOP-LEVEL-FORM-38 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 80 19 01)
   SYSTEM::%THE-ENVIRONMENT-ERROR
   #Y(SYSTEM::%THE-ENVIRONMENT-ERROR
      #18Y(00 00 00 00 00 00 00 00 00 01 DA DB 6F 02 DD 33 01 1F)
      SYSTEM::SOURCE-PROGRAM-ERROR "~S is impossible in compiled code"
      SYSTEM::TEXT EXT::THE-ENVIRONMENT))
#Y(#:TOP-LEVEL-FORM-39
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB 6F 02 32 80 19 01)
   EXT::THE-ENVIRONMENT
   #Y(EXT::THE-ENVIRONMENT #13Y(00 00 00 00 02 00 00 00 00 03 C5 19 03)
      (COMMON-LISP::PROGN
       (COMMON-LISP::EVAL-WHEN ((COMMON-LISP::NOT COMMON-LISP::EVAL))
        (SYSTEM::%THE-ENVIRONMENT-ERROR))
       (COMMON-LISP::LET ((CUSTOM::*EVALHOOK* #'SYSTEM::%THE-ENVIRONMENT))
        0.)))
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-40 #15Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 19 01)
   (COMMON-LISP::SPECIAL SYSTEM::*TOPLEVEL-ENVIRONMENT*))
#Y(#:TOP-LEVEL-FORM-41 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 5A 0F 01 19 01)
   (EXT::THE-ENVIRONMENT) SYSTEM::*TOPLEVEL-ENVIRONMENT*)
#Y(#:TOP-LEVEL-FORM-42 #15Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 19 01)
   (COMMON-LISP::SPECIAL SYSTEM::*TOPLEVEL-DENV*))
#Y(#:TOP-LEVEL-FORM-43
   #18Y(00 00 00 00 00 00 00 00 00 01 6B 00 C6 5F 0F 02 19 01)
   SYSTEM::*TOPLEVEL-ENVIRONMENT* 4. SYSTEM::*TOPLEVEL-DENV*)
#Y(#:TOP-LEVEL-FORM-44
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::FUNCTION-BLOCK-NAME SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::FUNCTION-BLOCK-NAME
      #21Y(00 00 00 00 01 00 00 00 00 02 9E 20 05 9E 5C 5B 19 02 9E 19 02)))
#Y(#:TOP-LEVEL-FORM-45
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::ADD-IMPLICIT-BLOCK SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::ADD-IMPLICIT-BLOCK
      #53Y(00 00 00 00 02 00 00 00 00 03 AD 64 6B 00 6B 01 73 02 00 31 5E 42 03
           93 01 05 DC 9F 7A 61 01 14 93 01 03 14 61 01 14 DD B4 6F 04 A3 7C 02
           7B 01 33 03 23 19 06)
      SYSTEM::*VENV* SYSTEM::*FENV* COMMON-LISP::DECLARE COMMON-LISP::BLOCK
      SYSTEM::FUNCTION-BLOCK-NAME))
#Y(#:TOP-LEVEL-FORM-46-1 #16Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 3E 19 01)
   (COMMON-LISP::SPECIAL SYSTEM::*KEYWORD-PACKAGE*))
#Y(#:TOP-LEVEL-FORM-46-2
   #18Y(00 00 00 00 00 00 00 00 00 01 DA 31 CA 0F 01 3E 19 01) "KEYWORD"
   SYSTEM::*KEYWORD-PACKAGE*)
#Y(#:TOP-LEVEL-FORM-46-3 #16Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 3E 19 01)
   (COMMON-LISP::SPECIAL SYSTEM::*FENV*))
#Y(#:TOP-LEVEL-FORM-46-4
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::FENV-ASSOC SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::FENV-ASSOC
      #79Y(00 00 00 00 02 00 00 00 00 03 93 01 3F 14 8E 22 0C DC DD AF DE DF E0
           6F 07 B3 33 05 1F AD 72 45 72 96 DA 1B 15 AF AD 32 95 5F 19 05 B0 B0
           9F 5F 14 8E 00 71 DB AD 82 02 36 00 AC AE 91 01 2E 6C B0 B0 9F 5F 14
           29 02 07 00 92 01 41 02 19 03)
      0. 2. COMMON-LISP::TYPE-ERROR :DATUM :EXPECTED-TYPE
      (COMMON-LISP::OR COMMON-LISP::NULL COMMON-LISP::SIMPLE-VECTOR)
      "~S is an invalid function environment" SYSTEM::TEXT))
#Y(#:TOP-LEVEL-FORM-46-5
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::GLOBAL-IN-FENV-P SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::GLOBAL-IN-FENV-P
      #18Y(00 00 00 00 02 00 00 00 00 03 AE AE 70 00 02 5A 19 03)
      SYSTEM::FENV-ASSOC))
#Y(#:TOP-LEVEL-FORM-46-6 #16Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 3E 19 01)
   (COMMON-LISP::SPECIAL SYSTEM::*VENV*))
#Y(#:TOP-LEVEL-FORM-46-7
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::VENV-ASSOC SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::VENV-ASSOC
      #86Y(00 00 00 00 02 00 00 00 00 03 93 01 3D 14 8E 22 0C DC DD AF DE DF E0
           6F 07 B3 33 05 1F AD 72 45 72 96 DA 1B 13 AF AD 32 95 5F 19 05 B0 B0
           9F 5F 22 73 DB AD 82 02 36 00 AC AE 91 01 2E 6E B0 B0 9F 5F 14 29 02
           07 00 92 01 43 AE 31 4E 1F 05 AE 2F 08 19 03 19 03)
      0. 2. COMMON-LISP::TYPE-ERROR :DATUM :EXPECTED-TYPE
      (COMMON-LISP::OR COMMON-LISP::NULL COMMON-LISP::SIMPLE-VECTOR)
      "~S is an invalid variable environment" SYSTEM::TEXT
      SYSTEM::%SYMBOL-VALUE))
#Y(#:TOP-LEVEL-FORM-46-8
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-CONS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-CONS
      #29Y(00 00 00 00 05 00 00 00 00 06 92 03 0A 92 01 07 B1 00 14 40 02 19 06
           B0 A0 7A 02 1B 75)))
#Y(#:TOP-LEVEL-FORM-46-9
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-FORM SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-FORM
      #1410Y(03 00 00 00 01 00 00 00 00 02 9E 21 84 F5 63 AE 8F 04 0A AE 6B 00
             30 01 F8 14 88 02 07 AE 00 14 40 02 19 03 AC DD 72 29 02 1B 74 9E
             26 07 84 BC 98 08 45 B0 05 00 00 03 78 63 CD 1B 82 A6 AF 00 1B 85
             09 E7 E8 6F 0F D5 1B 80 57 AC 88 0C 74 EB EC 6F 0F D5 1B 85 01 05
             00 00 03 5C 78 6B 05 70 06 AC 02 22 0B AC 8E 08 07 AC 88 0B 03 92
             00 5B 05 00 00 03 79 63 40 02 16 01 1B 84 B3 98 08 45 B0 E4 63 05
             00 00 03 5C 5C 21 80 40 05 00 00 03 5C 78 88 04 42 05 00 00 03 5C
             5B 21 13 E7 ED 6F 0F D5 14 67 00 00 03 05 00 00 03 5C 78 33 03 1F
             98 08 45 05 01 00 03 79 05 01 00 03 5C 78 2F 14 41 05 01 00 03 5C
             79 63 46 1B 84 64 98 08 45 05 01 00 03 79 05 01 00 03 5C 78 63 98
             08 45 05 02 00 03 5C 79 05 02 00 03 5C 5C 78 2F 14 41 05 02 00 03
             5C 5C 79 63 46 1B 83 E6 00 10 16 F1 F2 F3 A6 5C 5C 7A 31 5A 43 14
             7B 02 7B 02 64 40 02 1B 80 D1 EF A1 5C 78 38 03 8C B2 5F 98 08 45
             B0 05 00 00 03 78 63 CD 1B 81 BB 0E 00 10 00 A3 5C 79 2F 1A 98 08
             45 B3 05 00 00 06 78 63 98 08 45 05 01 00 06 79 05 01 00 06 5C 78
             2F 1B 1B 23 0E 00 10 00 A3 5C 79 2F 1A 98 08 45 B3 05 00 00 06 78
             63 98 08 45 05 01 00 06 79 05 01 00 06 5C 78 2F 1C 41 05 01 00 06
             5C 79 2F 09 1B 80 62 0E 00 10 00 95 06 2F 1A 98 08 45 B3 05 00 00
             06 78 63 05 00 00 06 79 2F 09 1B 80 48 0E 00 10 00 A3 5C 5C 79 2F
             1A 98 08 45 B3 F7 63 98 08 45 05 01 00 06 79 05 01 00 06 5C 78 63
             98 08 45 05 02 00 06 5C 79 05 02 00 06 5C 5C 78 28 FE 3F 41 05 02
             00 06 5C 78 2F 1E 05 02 00 06 5C 5C 79 2F 09 41 46 41 46 41 46 11
             19 04 99 1F A1 5C 78 73 00 17 99 20 A2 5C 78 33 00 17 13 F3 05 00
             00 03 5C 5C 7A 6C FE 08 64 40 02 11 18 01 00 19 04 98 08 45 B0 05
             00 00 03 78 63 05 00 00 03 79 2F 21 1B 83 11 98 08 45 B0 05 00 00
             03 78 63 98 08 45 05 01 00 03 79 05 01 00 03 5C 78 28 FD D0 41 05
             01 00 03 5C 79 2F 22 1B 82 9A 98 08 45 B2 05 00 00 05 78 63 98 08
             45 05 01 00 05 79 05 01 00 05 5C 78 63 67 01 00 01 67 01 00 00 46
             41 46 19 06 9E 1B 1C 9E 5B 1B 18 A0 5C 79 2F 09 42 02 A2 5C 78 AE
             8A 23 45 9E 20 68 9E 5C 1D 67 F3 9F 5D 14 64 40 02 19 06 03 26 1B
             07 94 03 24 25 77 03 27 14 AC 38 01 71 56 AD A3 5C 7A 6B 00 6B 05
             73 02 00 76 02 6C FD 58 64 40 02 19 05 95 03 88 24 59 98 08 45 B0
             05 00 00 03 78 63 05 00 00 03 79 2F 28 1B 82 60 65 2A A1 1B 81 0F
             A0 5C 78 88 29 74 98 08 45 B0 65 2B 63 CD 5E 45 05 01 00 03 79 05
             01 00 03 5C 78 63 1B 81 E3 98 08 45 B0 05 00 00 03 78 63 05 00 00
             03 79 2F 2C 1B 82 27 00 1B 82 3D A0 5C 5B 1B 82 33 A0 5C 1D 72 A0
             5C 5C 1D 71 98 08 45 B0 05 00 00 03 5B 1B 81 FF 03 19 1B 80 B5 A0
             5C 5B 1D 76 A0 5C 78 6F 2D 98 08 45 B1 05 00 00 04 78 63 98 08 45
             05 01 00 04 79 05 01 00 04 5C 78 2F 2E 41 03 2F 1B 80 B5 03 19 1B
             80 86 A0 5C 5B 1D 76 A0 5C 78 6F 2D 65 2F 9E 37 00 10 05 98 08 45
             B4 05 00 00 07 78 63 98 08 45 05 01 00 07 79 05 01 00 07 5C 78 2F
             2E 41 05 01 00 07 5C 79 2F 09 41 46 41 46 11 19 05 A0 5C 78 63 1B
             27 E7 03 31 1B 80 96 E7 03 32 1B 80 C7 94 01 9D 20 6F 94 00 8F 04
             6A 9D 5C 20 66 AC 6F 30 94 01 A0 5D 5D F9 16 01 83 01 9E 21 62 92
             01 59 65 2F 6B 05 9F 7A 32 47 37 00 10 05 03 19 1B 80 D4 A0 5C 5B
             1C 0A 03 19 14 A1 5C 5C 5D 1B 81 5C A0 5C 78 6F 33 98 08 45 B1 05
             00 00 04 78 63 98 08 45 05 01 00 04 79 05 01 00 04 5C 78 2F 34 41
             03 2F 14 05 01 00 00 37 00 10 05 05 01 00 04 5C 79 2F 09 11 41 46
             41 46 19 05 A0 5C 78 63 1B 3D 65 35 65 36 6F 0F 65 37 A1 1B 81 48
             E7 03 39 14 6F 0F 9F 1B 35 94 01 9D 20 72 94 00 8F 04 6D 9D 5C 20
             69 9D 5C 5C 1C 64 94 00 9E 5C 78 AD 8E 8D 4F AC 6F 38 AE A2 5D 5D
             FB 16 03 83 01 9E 21 55 93 01 0B E7 03 3A 14 6F 0F A0 14 33 01 1F
             65 2F 6B 00 9F 7A 32 47 37 00 10 00 A5 5C 79 6F 1A A6 5C 78 1B 1A
             E7 65 3C 6F 0F 65 37 A0 5B 5B 1B 80 E3 9D 5B 78 AE 65 3B 38 02 8C
             B2 68 83 00 9D 21 70 16 02 03 3D 14 A6 5C 5C 7A 6C FB 53 64 40 02
             11 19 06 98 08 45 B0 05 00 00 03 78 63 98 08 45 05 01 00 03 79 05
             01 00 03 5C 78 2F 3E 41 05 01 00 03 5C 79 2F 09 41 46 1B 80 4B CD
             1B 38 9D 1B 80 4F AD 8F 04 04 AD 8C 50 71 AD 8F 04 08 AD 38 01 80
             56 00 1C 68 CD 1B 1D 94 01 AC 89 04 80 69 AC 6B 05 70 06 AC 02 22
             FB 17 AC 8E 08 07 AC 88 0B 03 92 00 15 CD 5E 45 B0 05 00 00 01 14
             63 05 00 00 03 79 2F 09 41 46 19 04 AC 89 0C 19 AC 2F 3F 14 B0 6B
             00 6B 05 73 02 00 36 02 14 28 FA C0 14 02 14 40 02 19 04 EB 65 40
             6F 0F 03 41 14 0E 05 1B 21 98 08 45 AF 67 00 00 00 2F 14 41 05 00
             00 02 79 2F 09 41 46 19 03 9D 21 67 E7 65 42 6F 0F 65 41 A2 14 33
             02 1F)
      SYSTEM::*VENV* SYSTEM::VENV-ASSOC SYSTEM::SYMBOL-MACRO-P 0.
      SYSTEM::FUNCTION-NAME-P SYSTEM::*FENV* SYSTEM::FENV-ASSOC
      #S(COMMON-LISP::HASH-TABLE COMMON-LISP::EQ
         (SYSTEM::%HANDLER-BIND . 1167.) (COMMON-LISP::SYMBOL-MACROLET . 1014.)
         (SYSTEM::FUNCTION-MACRO-LET . 941.) (COMMON-LISP::MACROLET . 873.)
         (COMMON-LISP::LABELS . 814.) (COMMON-LISP::FLET . 767.)
         (COMMON-LISP::PROGN . 741.) (COMMON-LISP::TAGBODY . 711.)
         (COMMON-LISP::MULTIPLE-VALUE-SETQ . 680.) (COMMON-LISP::PSETQ . 649.)
         (COMMON-LISP::SETQ . 649.) (COMMON-LISP::BLOCK . 581.)
         (COMMON-LISP::CASE . 497.) (COMMON-LISP::COND . 477.)
         (EXT::COMPILER-LET . 440.) (COMMON-LISP::MULTIPLE-VALUE-BIND . 363.)
         (COMMON-LISP::LOCALLY . 335.) (COMMON-LISP::LET* . 288.)
         (COMMON-LISP::LET . 251.) (COMMON-LISP::EVAL-WHEN . 228.)
         (COMMON-LISP::FUNCTION . 79.) (COMMON-LISP::LOAD-TIME-VALUE . 16.)
         (COMMON-LISP::DECLARE . 16.) (COMMON-LISP::GO . 16.)
         (COMMON-LISP::QUOTE . 16.) (COMMON-LISP::THE . 2.)
         (COMMON-LISP::RETURN-FROM . 2.))
      SYSTEM::%EXPAND-CONS SYSTEM::%EXPAND-LIST COMMON-LISP::FUNCTION
      SYSTEM::FUNCTION-MACRO-P SYSTEM::MACROP SYSTEM::SOURCE-PROGRAM-ERROR
      "~S: ~S is illegal since ~S is a local macro" SYSTEM::TEXT
      SYSTEM::%EXPAND COMMON-LISP::ERROR "~S: invalid function environment ~S"
      "~S: ~S is invalid since ~S is not a symbol" SYSTEM::%EXPAND-LAMBDA
      COMMON-LISP::COMPILE SYSTEM::*COMPILING-FROM-FILE*
      COMMON-LISP::VALUES-LIST COMMON-LISP::QUOTE COMMON-LISP::PROGN
      SYSTEM::%EXPAND-SPECIAL-DECLARATIONS SYSTEM::%EXPAND-VARSPEZ
      SYSTEM::%EXPAND-VARSPEZ* COMMON-LISP::MULTIPLE-VALUE-BIND
      SYSTEM::%EXPAND-LEXICAL-VARIABLES SYSTEM::%EXPAND-VARSPEC-VAR
      SYSTEM::%EXPAND-VARSPEC-VAL SYSTEM::%EXPAND-COND SYSTEM::%EXPAND-CASE
      SYSTEM::%RETURN-P SYSTEM::%EXPAND-SETQLIST-MACROP COMMON-LISP::SETQ
      COMMON-LISP::SETF COMMON-LISP::PSETF SYSTEM::%EXPAND-SETQLIST
      SYSTEM::%EXPAND-VARLIST-MACROP SYSTEM::MULTIPLE-VALUE-SETF
      COMMON-LISP::MULTIPLE-VALUE-SETQ SYSTEM::%EXPAND-TAGBODY
      SYSTEM::%EXPAND-FUNDEFS-1 SYSTEM::%EXPAND-FUNDEFS-2
      #.#'COMMON-LISP::VECTOR SYSTEM::MAKE-MACRO-EXPANDER
      "illegal syntax in MACROLET: ~S"
      "code after MACROLET contains a dotted list, ending with ~S"
      SYSTEM::%EXPAND-FUNMACDEFS-1 SYSTEM::%EXPAND-FUNMACDEFS-2
      COMMON-LISP::PROGRAM-ERROR
      "~S: symbol ~S is declared special and must not be declared a macro"
      COMMON-LISP::SYMBOL-MACROLET SYSTEM::MAKE-SYMBOL-MACRO
      "illegal syntax in SYMBOL-MACROLET: ~S"
      "code after SYMBOL-MACROLET contains a dotted list, ending with ~S"
      #.#'COMMON-LISP::EQ
      "~S: symbol ~S must not be declared SPECIAL and a macro at the same time"
      COMMON-LISP::LOCALLY SYSTEM::%EXPAND-HANDLERS SYSTEM::MACRO-EXPANDER
      "bad function environment occurred in ~S: ~S" SYSTEM::%EXPAND-FORM
      "~S: invalid form ~S"))
#Y(#:TOP-LEVEL-FORM-46-10
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-LIST SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-LIST
      #53Y(01 00 00 00 01 00 00 00 00 02 9E 20 1F 98 03 45 AE 05 00 00 01 78 2F
           04 41 05 00 00 01 79 28 6A 41 46 19 02 DA DB 6F 02 AF 33 01 1F 92 01
           75 01 02 40 02 19 02)
      SYSTEM::SOURCE-PROGRAM-ERROR
      "code contains a dotted list, ending with ~S" SYSTEM::TEXT
      SYSTEM::%EXPAND-CONS SYSTEM::%EXPAND-FORM))
#Y(#:TOP-LEVEL-FORM-46-11
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-LEXICAL-VARIABLES SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-LEXICAL-VARIABLES
      #56Y(00 00 00 00 01 00 00 00 00 02 9E 1F 29 DA 63 AF 1B 0E 94 00 AC 63 7B
           02 AF 80 A1 02 16 01 83 00 9D 21 6F 16 01 AC 80 A2 00 6B 01 7B 01 33
           02 24 37 00 0F 01 19 02 19 02)
      #.#'COMMON-LISP::VECTOR SYSTEM::*VENV*))
#Y(#:TOP-LEVEL-FORM-46-12
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-SPECIAL-DECLARATIONS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-SPECIAL-DECLARATIONS
      #96Y(00 00 00 00 01 00 00 00 00 02 AD 63 6B 00 6B 01 73 02 00 31 5E 42 02
           63 AD 72 47 AC 1B 33 95 00 AC 1B 11 AC 84 06 16 01 1B 08 94 00 AC 8E
           04 73 16 01 83 00 9D 21 73 16 03 1B 14 94 00 9D 20 0D AC 38 01 31 9B
           5C 1C 05 94 00 24 02 51 16 01 83 00 9D 21 67 16 02 AC 81 47 00 14 2F
           03 15 19 04)
      SYSTEM::*VENV* SYSTEM::*FENV* COMMON-LISP::SPECIAL
      SYSTEM::%EXPAND-LEXICAL-VARIABLES))
#Y(#:TOP-LEVEL-FORM-46-13
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-LAMBDA SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-LAMBDA
      #41Y(01 00 00 00 01 00 00 00 00 02 94 01 25 00 11 98 05 45 AE DA 63 05 00
           00 01 79 2F 06 41 46 19 02 DB DC 6F 03 DE B0 33 02 1F)
      COMMON-LISP::LAMBDA SYSTEM::SOURCE-PROGRAM-ERROR
      "~S: ~S should be a lambda expression" SYSTEM::TEXT SYSTEM::%EXPAND-FORM
      SYSTEM::%EXPAND-CONS SYSTEM::%EXPAND-LAMBDABODY))
#Y(#:TOP-LEVEL-FORM-46-14
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-LAMBDABODY SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-LAMBDABODY
      #115Y(00 00 00 00 01 00 02 00 00 0D 3D 02 3D 01 95 03 9D 20 12 94 00 AC
            8F 02 07 94 00 C5 5A 1C 80 42 16 01 1C 80 48 0E 02 10 02 93 05 09
            94 07 B3 95 09 30 03 5D FF 94 07 6F 04 DA DB B6 7B 02 7B 02 95 09
            2F 05 7C 02 64 40 02 11 19 05 94 00 C6 5A 16 03 1D 51 1B 17 94 00
            AC 8E 02 70 16 03 1D 45 1B 0B 95 00 AC 8E 02 6E 16 02 1D FF B8 B0
            63 40 02 19 05)
      COMMON-LISP::DECLARE SYSTEM::SOURCE SYSTEM::*VENV*
      SYSTEM::ADD-IMPLICIT-BLOCK SYSTEM::%EXPAND-LAMBDALIST
      SYSTEM::%EXPAND-LIST))
#Y(#:TOP-LEVEL-FORM-46-15
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-LAMBDALIST SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-LAMBDALIST
      #79Y(01 00 00 00 01 00 00 00 00 02 9E 20 39 98 03 45 AE 05 00 00 01 78 2F
           04 41 05 00 00 01 78 AC DF E0 38 02 8C B2 0B AC 6F 07 63 6B 08 33 03
           00 0F 08 16 01 05 00 00 01 79 28 50 41 46 19 02 DA DB 6F 02 AF 33 01
           1F 92 01 75 01 02 40 02 19 02)
      SYSTEM::SOURCE-PROGRAM-ERROR "lambda list must not end with the atom ~S"
      SYSTEM::TEXT SYSTEM::%EXPAND-CONS SYSTEM::%EXPAND-PARSPEZ
      #.COMMON-LISP::LAMBDA-LIST-KEYWORDS #.#'COMMON-LISP::EQ
      SYSTEM::%EXPAND-VARSPEC-VAR SYSTEM::*VENV*))
#Y(#:TOP-LEVEL-FORM-46-16
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-PARSPEZ SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-PARSPEZ
      #62Y(02 00 00 00 01 00 00 00 00 02 9E 20 2B 9E 5C 20 27 98 00 45 AE 05 00
           00 01 78 63 98 00 45 05 01 00 01 79 05 01 00 01 5C 78 2F 01 41 05 01
           00 01 5C 79 63 46 41 46 19 02 AD 63 40 02 19 02)
      SYSTEM::%EXPAND-CONS SYSTEM::%EXPAND-FORM))
#Y(#:TOP-LEVEL-FORM-46-17
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-VARSPEZ SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-VARSPEZ
      #81Y(01 00 00 00 01 00 01 00 00 08 3D 01 9F 20 2E 98 06 45 AF 05 00 00 02
           78 2F 07 41 05 00 00 02 79 63 05 00 00 02 78 6F 08 05 00 00 01 7C 02
           28 5A 41 46 19 03 DA DB 6F 02 DD B1 33 02 1F 92 02 74 DE 6B 05 A0 7A
           32 47 37 00 0F 05 01 02 40 02 19 03)
      SYSTEM::SOURCE-PROGRAM-ERROR "~S: variable list ends with the atom ~S"
      SYSTEM::TEXT COMMON-LISP::LET #.#'COMMON-LISP::VECTOR SYSTEM::*VENV*
      SYSTEM::%EXPAND-CONS SYSTEM::%EXPAND-PARSPEZ
      SYSTEM::%EXPAND-VARSPEC-VAR))
#Y(#:TOP-LEVEL-FORM-46-18
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-VARSPEZ* SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-VARSPEZ*
      #69Y(01 00 00 00 01 00 00 00 00 02 9E 20 2F 98 04 45 AE 05 00 00 01 78 2F
           05 41 05 00 00 01 78 6F 06 63 6B 07 33 03 00 0F 07 05 00 00 01 79 28
           5B 41 46 19 02 DA DB 6F 02 DD B0 33 02 1F 92 01 74 01 02 40 02 19
           02)
      SYSTEM::SOURCE-PROGRAM-ERROR "~S: variable list ends with the atom ~S"
      SYSTEM::TEXT COMMON-LISP::LET* SYSTEM::%EXPAND-CONS
      SYSTEM::%EXPAND-PARSPEZ SYSTEM::%EXPAND-VARSPEC-VAR SYSTEM::*VENV*))
#Y(#:TOP-LEVEL-FORM-46-19
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-VARSPEC-VAR SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-VARSPEC-VAR
      #20Y(00 00 00 00 01 00 00 00 00 02 9E 20 04 9E 5B 19 02 9E 19 02)))
#Y(#:TOP-LEVEL-FORM-46-20
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-VARSPEC-VAL SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-VARSPEC-VAL
      #23Y(00 00 00 00 01 00 00 00 00 02 9E 20 07 9E 5C 78 31 5A 19 02 00 19
           02)))
#Y(#:TOP-LEVEL-FORM-46-21
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-COND SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-COND
      #42Y(01 00 00 00 01 00 00 00 00 02 9E 20 17 98 00 45 AE 05 00 00 01 78 2F
           01 41 05 00 00 01 79 28 6A 41 46 19 02 AD 63 40 02 19 02)
      SYSTEM::%EXPAND-CONS SYSTEM::%EXPAND-LIST))
#Y(#:TOP-LEVEL-FORM-46-22
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-CASE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-CASE
      #60Y(02 00 00 00 01 00 00 00 00 02 9E 20 29 98 00 45 AE 98 00 45 05 01 00
           01 78 05 01 00 01 5B 78 63 05 01 00 01 5B 79 2F 01 41 46 41 05 00 00
           01 79 28 58 41 46 19 02 AD 63 40 02 19 02)
      SYSTEM::%EXPAND-CONS SYSTEM::%EXPAND-LIST))
#Y(#:TOP-LEVEL-FORM-46-23
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%RETURN-P SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%RETURN-P
      #70Y(00 00 00 00 02 00 00 00 00 03 9E 20 33 94 01 9D 20 28 94 00 25 00 06
           9D 5C 78 A1 22 26 9D 5B 20 07 AF 94 01 28 64 1C 1B 94 00 25 01 06 9D
           5C 78 A1 22 07 AF 95 01 28 52 1C 09 16 01 83 01 1B 4A 00 19 03 02 19
           04)
      COMMON-LISP::RETURN-FROM COMMON-LISP::BLOCK))
#Y(#:TOP-LEVEL-FORM-46-24
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-VARLIST-MACROP SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-VARLIST-MACROP
      #38Y(00 00 00 00 01 00 00 00 00 02 AD 32 02 1F 15 94 01 8F 04 0A 94 01 6B
           00 70 01 2F 02 1E 06 95 01 29 01 03 66 19 02)
      SYSTEM::*VENV* SYSTEM::VENV-ASSOC SYSTEM::SYMBOL-MACRO-P))
#Y(#:TOP-LEVEL-FORM-46-25
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-SETQLIST-MACROP SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-SETQLIST-MACROP
      #45Y(00 00 00 00 01 00 00 00 00 02 AD 32 02 1F 1C 95 01 32 02 1F 16 94 01
           8F 04 0A 94 01 6B 00 70 01 2F 02 1E 07 9E 5C 79 29 01 03 5F 19 02)
      SYSTEM::*VENV* SYSTEM::VENV-ASSOC SYSTEM::SYMBOL-MACRO-P))
#Y(#:TOP-LEVEL-FORM-46-26
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-SETQLIST SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-SETQLIST
      #64Y(02 00 00 00 01 00 00 00 00 02 9E 20 2D 9E 5C 20 29 98 00 45 AE 05 00
           00 01 78 63 98 00 45 05 01 00 01 79 05 01 00 01 5C 78 2F 01 41 05 01
           00 01 5C 79 28 56 41 46 41 46 19 02 AD 63 40 02 19 02)
      SYSTEM::%EXPAND-CONS SYSTEM::%EXPAND-FORM))
#Y(#:TOP-LEVEL-FORM-46-27
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-TAGBODY SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-TAGBODY
      #86Y(01 00 00 00 01 00 00 00 00 02 9E 20 24 9E 5B 20 26 94 01 2F 01 42 02
           9E 20 32 98 00 45 B0 67 00 00 01 67 00 00 00 05 00 00 03 79 28 5D 41
           46 19 04 AD 63 40 02 19 02 98 00 45 AE 05 00 00 01 78 63 05 00 00 01
           79 28 42 41 46 19 02 95 03 6C FF B9 64 40 02 19 04)
      SYSTEM::%EXPAND-CONS SYSTEM::%EXPAND-FORM))
#Y(#:TOP-LEVEL-FORM-46-28
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-FUNDEFS-1 SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-FUNDEFS-1
      #63Y(00 00 00 00 01 00 00 00 00 02 9E 20 1E 94 01 9D 20 09 94 00 89 04 04
           9D 5C 21 19 DA DF 6F 02 9F 14 33 01 1F DA DB 6F 02 A0 1B 75 92 01 76
           6B 03 61 01 19 02 94 00 63 95 04 28 4F 62 02 19 03)
      SYSTEM::SOURCE-PROGRAM-ERROR
      "FLET/LABELS: code contains a dotted list, ending with ~S" SYSTEM::TEXT
      SYSTEM::*FENV* SYSTEM::FUNCTION-NAME-P
      "illegal syntax in FLET/LABELS: ~S"))
#Y(#:TOP-LEVEL-FORM-46-29
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-FUNDEFS-2 SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-FUNDEFS-2
      #66Y(02 00 00 00 01 00 00 00 00 02 9E 20 2F 94 01 98 00 45 AF 98 00 45 67
           01 00 00 05 01 00 00 78 63 05 01 00 00 79 05 01 00 00 78 64 2D 03 01
           41 46 41 05 00 00 02 79 28 52 41 46 19 03 AD 63 40 02 19 02)
      SYSTEM::%EXPAND-CONS SYSTEM::%EXPAND-LAMBDABODY))
#Y(#:TOP-LEVEL-FORM-46-30
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-FUNMACDEFS-1 SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-FUNMACDEFS-1
      #86Y(00 00 00 00 01 00 00 00 00 02 9E 20 34 94 01 9D 20 1F 94 00 8F 04 1A
           9D 5C 20 16 9D 5C 5B 20 11 9D 5C 5C 20 0C 9D 5C 5C 5B 20 06 9D 5C 5C
           5C 1D 19 DA DE 6F 02 9F 14 33 01 1F DA DB 6F 02 A0 1B 75 92 01 76 6B
           03 61 01 19 02 94 00 63 95 04 28 FF B8 62 02 19 03)
      SYSTEM::SOURCE-PROGRAM-ERROR
      "FUNCTION-MACRO-LET: code contains a dotted list, ending with ~S"
      SYSTEM::TEXT SYSTEM::*FENV* "illegal syntax in FUNCTION-MACRO-LET: ~S"))
#Y(#:TOP-LEVEL-FORM-46-31
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-FUNMACDEFS-2 SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-FUNMACDEFS-2
      #101Y(04 00 00 00 01 00 00 00 00 02 9E 20 80 51 94 01 98 00 45 AF 98 00
            45 67 01 00 00 05 01 00 00 78 63 98 00 45 05 02 00 00 79 05 02 00
            00 5C 78 2F 01 41 98 00 45 05 03 00 00 5C 79 05 03 00 00 5C 5C 78
            2F 01 41 05 03 00 00 5C 5C 79 63 46 41 46 41 46 41 05 00 00 02 79
            28 FF AF 41 46 19 03 AD 63 40 02 19 02)
      SYSTEM::%EXPAND-CONS SYSTEM::%EXPAND-LAMBDABODY))
#Y(#:TOP-LEVEL-FORM-46-32
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-HANDLERS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-HANDLERS
      #59Y(02 00 00 00 01 00 00 00 00 02 9E 20 28 94 01 98 00 45 AF 98 00 45 67
           01 00 00 05 01 00 00 78 63 05 01 00 00 79 2F 01 41 46 41 05 00 00 02
           79 28 59 41 46 19 03 AD 63 40 02 19 02)
      SYSTEM::%EXPAND-CONS SYSTEM::%EXPAND-LIST))
#Y(#:TOP-LEVEL-FORM-46-33
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::%EXPAND-LAMBDABODY-MAIN SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%EXPAND-LAMBDABODY-MAIN
      #23Y(00 00 00 00 03 00 00 00 00 04 9F 10 00 A1 10 01 B5 2F 02 12 02 19
           04)
      SYSTEM::*VENV* SYSTEM::*FENV* SYSTEM::%EXPAND-LAMBDABODY))
#Y(#:TOP-LEVEL-FORM-46-34 #13Y(00 00 00 00 00 00 00 00 00 01 3E 19 01))
#Y(#:TOP-LEVEL-FORM-47-1 #16Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 3E 19 01)
   (COMMON-LISP::SPECIAL CUSTOM::*LOAD-PATHS*))
#Y(#:TOP-LEVEL-FORM-47-2 #16Y(00 00 00 00 00 00 00 00 00 01 00 0F 00 3E 19 01)
   CUSTOM::*LOAD-PATHS*)
#Y(#:TOP-LEVEL-FORM-47-3 #16Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 3E 19 01)
   (COMMON-LISP::SPECIAL CUSTOM::*SOURCE-FILE-TYPES*))
#Y(#:TOP-LEVEL-FORM-47-4 #16Y(00 00 00 00 00 00 00 00 00 01 C5 0F 01 3E 19 01)
   (#-CLISP #P".lisp"
    #+CLISP
    #S(COMMON-LISP::PATHNAME :HOST COMMON-LISP::NIL :DEVICE COMMON-LISP::NIL
       :DIRECTORY (:RELATIVE) :NAME COMMON-LISP::NIL :TYPE "lisp"
       :VERSION COMMON-LISP::NIL)
    #-CLISP #P".lsp"
    #+CLISP
    #S(COMMON-LISP::PATHNAME :HOST COMMON-LISP::NIL :DEVICE COMMON-LISP::NIL
       :DIRECTORY (:RELATIVE) :NAME COMMON-LISP::NIL :TYPE "lsp"
       :VERSION COMMON-LISP::NIL)
    #-CLISP #P".cl"
    #+CLISP
    #S(COMMON-LISP::PATHNAME :HOST COMMON-LISP::NIL :DEVICE COMMON-LISP::NIL
       :DIRECTORY (:RELATIVE) :NAME COMMON-LISP::NIL :TYPE "cl"
       :VERSION COMMON-LISP::NIL))
   CUSTOM::*SOURCE-FILE-TYPES*)
#Y(#:TOP-LEVEL-FORM-47-5 #16Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 3E 19 01)
   (COMMON-LISP::SPECIAL CUSTOM::*COMPILED-FILE-TYPES*))
#Y(#:TOP-LEVEL-FORM-47-6 #16Y(00 00 00 00 00 00 00 00 00 01 C5 0F 01 3E 19 01)
   (#-CLISP #P".fas"
    #+CLISP
    #S(COMMON-LISP::PATHNAME :HOST COMMON-LISP::NIL :DEVICE COMMON-LISP::NIL
       :DIRECTORY (:RELATIVE) :NAME COMMON-LISP::NIL :TYPE "fas"
       :VERSION COMMON-LISP::NIL))
   CUSTOM::*COMPILED-FILE-TYPES*)
#Y(#:TOP-LEVEL-FORM-47-7
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::SEARCH-FILE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::SEARCH-FILE
      #51Y(00 00 00 00 02 00 00 00 00 03 63 AE 1B 1B AC 61 01 1B 0D 94 00 B1 AD
           38 02 71 EF AC 8C F4 6F 00 F8 AF 80 A1 02 16 01 83 00 9D 21 67 16 01
           AC 31 A2 19 04)))
#Y(#:TOP-LEVEL-FORM-47-8 #16Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 3E 19 01)
   (COMMON-LISP::SPECIAL COMMON-LISP::*LOAD-VERBOSE*))
#Y(#:TOP-LEVEL-FORM-47-9 #16Y(00 00 00 00 00 00 00 00 00 01 02 0F 00 3E 19 01)
   COMMON-LISP::*LOAD-VERBOSE*)
#Y(#:TOP-LEVEL-FORM-47-10 #16Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 3E 19 01)
   (COMMON-LISP::SPECIAL COMMON-LISP::*LOAD-PRINT*))
#Y(#:TOP-LEVEL-FORM-47-11 #16Y(00 00 00 00 00 00 00 00 00 01 00 0F 00 3E 19 01)
   COMMON-LISP::*LOAD-PRINT*)
#Y(#:TOP-LEVEL-FORM-47-12 #16Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 3E 19 01)
   (COMMON-LISP::SPECIAL CUSTOM::*LOAD-ECHO*))
#Y(#:TOP-LEVEL-FORM-47-13 #16Y(00 00 00 00 00 00 00 00 00 01 00 0F 00 3E 19 01)
   CUSTOM::*LOAD-ECHO*)
#Y(#:TOP-LEVEL-FORM-47-14 #16Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 3E 19 01)
   (COMMON-LISP::SPECIAL CUSTOM::*LOAD-COMPILING*))
#Y(#:TOP-LEVEL-FORM-47-15 #16Y(00 00 00 00 00 00 00 00 00 01 00 0F 00 3E 19 01)
   CUSTOM::*LOAD-COMPILING*)
#Y(#:TOP-LEVEL-FORM-47-16 #16Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 3E 19 01)
   (COMMON-LISP::SPECIAL COMMON-LISP::*LOAD-PATHNAME*))
#Y(#:TOP-LEVEL-FORM-47-17 #16Y(00 00 00 00 00 00 00 00 00 01 00 0F 00 3E 19 01)
   COMMON-LISP::*LOAD-PATHNAME*)
#Y(#:TOP-LEVEL-FORM-47-18 #16Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 3E 19 01)
   (COMMON-LISP::SPECIAL COMMON-LISP::*LOAD-TRUENAME*))
#Y(#:TOP-LEVEL-FORM-47-19 #16Y(00 00 00 00 00 00 00 00 00 01 00 0F 00 3E 19 01)
   COMMON-LISP::*LOAD-TRUENAME*)
#Y(#:TOP-LEVEL-FORM-47-20 #16Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 3E 19 01)
   (COMMON-LISP::SPECIAL SYSTEM::*LOAD-INPUT-STREAM*))
#Y(#:TOP-LEVEL-FORM-47-21 #16Y(00 00 00 00 00 00 00 00 00 01 00 0F 00 3E 19 01)
   SYSTEM::*LOAD-INPUT-STREAM*)
#Y(#:TOP-LEVEL-FORM-47-22 #16Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 3E 19 01)
   (COMMON-LISP::SPECIAL SYSTEM::*LOAD-LEVEL*))
#Y(#:TOP-LEVEL-FORM-47-23 #16Y(00 00 00 00 00 00 00 00 00 01 C5 0F 01 3E 19 01)
   0. SYSTEM::*LOAD-LEVEL*)
#Y(#:TOP-LEVEL-FORM-47-24
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   COMMON-LISP::LOAD SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::LOAD
      #444Y(03 00 01 00 01 00 00 00 80 1C 07 00 00 00 3B 07 03 0E 07 FF 3B 06
            03 0E 08 FE 3B 05 02 7E 05 3B 04 02 CE FC 3B 03 03 0E 0A FB 3B 02
            03 0E 0B FA 3D 01 B4 8E 14 80 D7 B4 80 E5 08 14 E6 E7 38 04 BB 38
            01 71 EA 6B 0E E9 38 01 EA 8C B2 80 C3 A8 F9 7D 02 8C F7 2D B4 AE
            6B 0E 6B 12 73 03 23 70 13 AC 8C 91 80 B1 87 00 09 14 E6 E7 38 04
            BC 38 01 71 EA 6B 0E E9 38 01 EA 8C B2 80 A0 A9 F9 31 F7 16 01 14
            93 00 81 22 92 04 80 96 9D 14 6B 15 32 95 10 15 93 0C 80 92 6B 15
            F1 38 01 31 42 14 A1 10 18 BD 8F 18 02 04 11 10 19 C0 8F 18 03 C0
            31 F3 10 1A 0E 1B 10 1B 0E 1C 10 1C 93 1C 24 38 01 31 8B F7 38 03
            31 88 BB 38 03 31 88 65 1E 6F 1F 38 03 31 88 66 1D 38 01 31 83 65
            20 6F 1F 38 03 31 88 BF 64 30 21 53 80 6B 93 1A 04 38 01 31 8B C1
            63 65 22 38 01 71 73 AC 65 22 8C FF 30 AC 8E 07 36 93 1A 36 AC 2F
            23 14 36 00 1B 31 A5 1B FF 71 0E 11 1B FF 39 00 16 01 1B FF 66 0E
            11 1B FF 5C AC 6B 14 32 6F 1B FF 63 03 16 1B FF 70 16 01 56 93 1C
            80 6C 1B 80 44 9D 1B 4D AC 31 5A 43 F8 93 1E 08 93 00 05 78 38 01
            31 81 16 01 93 1A FF 9F 1B FF 98 67 00 00 13 05 00 00 14 22 08 67
            00 00 13 38 01 32 7B 67 00 00 14 05 00 00 1D 22 08 67 00 00 14 38
            01 32 7B 55 93 1C 25 38 01 31 8B 65 24 38 03 31 88 BB 38 03 31 88
            65 25 6F 1F 38 03 31 88 66 1D 38 01 31 83 65 26 6F 1F 38 03 31 88
            02 12 05 16 01 11 19 0B A3 1F 0D 65 27 65 28 B7 65 29 6F 1F B9 33
            03 1F 19 0A)
      :VERBOSE :PRINT :IF-DOES-NOT-EXIST :EXTERNAL-FORMAT :ECHO :COMPILING
      :EXTRA-FILE-TYPES COMMON-LISP::*LOAD-VERBOSE* COMMON-LISP::*LOAD-PRINT*
      :DEFAULT CUSTOM::*LOAD-ECHO* CUSTOM::*LOAD-COMPILING* :INPUT-IMMUTABLE
      COMMON-LISP::CHARACTER CUSTOM::*COMPILED-FILE-TYPES*
      #.#'COMMON-LISP::STRING= #.#'COMMON-LISP::PATHNAME-TYPE CHARSET::UTF-8
      CUSTOM::*SOURCE-FILE-TYPES* SYSTEM::SEARCH-FILE
      COMMON-LISP::*STANDARD-OUTPUT* SYSTEM::*LOAD-LEVEL* "" #\Space
      SYSTEM::*LOAD-INPUT-STREAM* COMMON-LISP::*LOAD-PATHNAME*
      COMMON-LISP::*LOAD-TRUENAME* COMMON-LISP::*PACKAGE*
      COMMON-LISP::*READTABLE* ";;" "Loading file " SYSTEM::TEXT " ..."
      SYSTEM::ALLOW-READ-EVAL "EOF"
      SYSTEM::COMPILE-FORM-IN-TOPLEVEL-ENVIRONMENT ";;" "Loading of file "
      " is finished." COMMON-LISP::FILE-ERROR :PATHNAME
      "A file with name ~A does not exist"))
#Y(#:TOP-LEVEL-FORM-47-25
   #19Y(00 00 00 00 00 00 00 00 00 01 DA DB 6F 02 32 80 3E 19 01)
   COMMON-LISP::DEFUN
   #Y(COMMON-LISP::DEFUN
      #123Y(00 00 00 00 02 00 00 00 00 03 9F 5C 20 22 9F 5C 5C 20 1D 9F 5C 78
            A0 5C 5C 78 A1 5C 5C 79 AE 8F 04 16 AE 8D 50 19 DA DF 6F 02 C8 14
            B1 33 02 1F DA DB 6F 02 DD 33 01 1F DA DE 6F 02 C8 1B 6C AC 64 B2
            31 5E 42 03 E0 E1 E2 B4 7B 02 E3 E4 E2 BA 7B 02 E5 7B 03 7B 04 E6
            E2 B5 7B 02 E7 B6 E8 B7 E9 EA BB 7B 02 A8 7C 02 EB BB AA 7C 02 7B
            04 7B 03 7B 03 E2 B5 7B 02 61 04 19 09)
      SYSTEM::SOURCE-PROGRAM-ERROR
      "~S: missing function name and/or parameter list" SYSTEM::TEXT
      COMMON-LISP::DEFUN "~S: ~S is not a symbol."
      "~S: special operator ~S cannot be redefined." COMMON-LISP::PROGN
      SYSTEM::%PUT COMMON-LISP::QUOTE 'SYSTEM::DEFINITION COMMON-LISP::CONS
      (EXT::THE-ENVIRONMENT) SYSTEM::%PUTD COMMON-LISP::FUNCTION
      COMMON-LISP::LAMBDA COMMON-LISP::DECLARE SYSTEM::IN-DEFUN
      COMMON-LISP::BLOCK)
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-47-26
   #19Y(00 00 00 00 00 00 00 00 00 01 DA DB 6F 02 32 80 3E 19 01)
   COMMON-LISP::DO
   #Y(COMMON-LISP::DO
      #160Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 A0 5C 5C 78 A1 5C 5C 79 9E
            20 2C 01 02 38 01 72 8E 38 01 72 8E B0 63 B6 31 5E 42 02 A5 20 3F
            94 08 83 09 9D 20 19 9D 5C 20 18 9D 5C 5C 21 17 9D 14 84 06 16 01
            1B 65 DA DB 6F 02 DD 33 01 1F 9D 1B 6E 9D 5B 1B 6A 94 00 9E 5C 78
            7B 02 84 06 9D 5C 5C 78 94 01 A4 62 02 FD 16 01 1B FF BE DE 63 DF
            B4 72 47 E0 A2 7A E1 E2 B5 7B 02 B6 B5 E3 BA 32 47 7A B8 E4 94 13
            E2 BD 7B 02 7B 03 E5 63 E6 04 16 5C 7A 7B 03 7B 04 33 02 23 7C 03
            7B 04 61 03 19 0C)
      SYSTEM::SOURCE-PROGRAM-ERROR "exit clause in ~S must be a list"
      SYSTEM::TEXT COMMON-LISP::DO COMMON-LISP::BLOCK COMMON-LISP::LET
      COMMON-LISP::DECLARE COMMON-LISP::TAGBODY COMMON-LISP::GO
      COMMON-LISP::PSETQ COMMON-LISP::OR COMMON-LISP::RETURN-FROM
      COMMON-LISP::PROGN)
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-47-27
   #19Y(00 00 00 00 00 00 00 00 00 01 DA DB 6F 02 32 80 3E 19 01)
   COMMON-LISP::DOTIMES
   #Y(COMMON-LISP::DOTIMES
      #70Y(00 00 00 00 02 00 00 00 00 03 9F 5C 5B 78 A0 5C 5B 5C 78 A1 5C 5B 5C
           5C 78 A2 5C 79 AC 63 B3 31 5E 42 02 38 01 72 8E DA B3 DB DC B6 7B 02
           7B 03 AE B4 7B 02 7B 02 DD B5 B0 7B 03 B3 7B 02 DE A2 7A A3 62 04 19
           0A)
      COMMON-LISP::DO 0. COMMON-LISP::1+ COMMON-LISP::>= COMMON-LISP::DECLARE)
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-47-28 #13Y(00 00 00 00 00 00 00 00 00 01 3E 19 01))
#Y(#:TOP-LEVEL-FORM-48 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "defseq" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-49 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "backquote" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-50-1
   #19Y(00 00 00 00 00 00 00 00 00 01 DA DB 6F 02 32 80 3E 19 01)
   SYSTEM::BACKQUOTE
   #Y(SYSTEM::BACKQUOTE #16Y(00 00 00 00 01 00 01 00 00 08 9F 5C 5C 5B 19 03))
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-50-2 #13Y(00 00 00 00 00 00 00 00 00 01 3E 19 01))
#Y(#:TOP-LEVEL-FORM-51 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "defmacro" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-52-1
   #19Y(00 00 00 00 00 00 00 00 00 01 DA DB 6F 02 32 80 3E 19 01)
   COMMON-LISP::DEFMACRO
   #Y(COMMON-LISP::DEFMACRO
      #94Y(00 00 00 00 01 00 01 00 00 08 95 02 2F 00 42 04 DB 63 DC DD DE DF B4
           7B 02 7B 02 92 05 30 00 14 E2 DF B6 7B 02 E3 B8 7B 02 7B 03 7B 01 33
           02 23 7C 03 DC E4 E5 DF B5 7B 02 E6 E7 DF BC 7B 02 D3 7C 02 7B 04 7B
           03 DF B3 7B 02 61 05 19 07 E0 DF B5 7B 02 E1 DF B5 7B 02 7B 04 61 01
           1B 41)
      SYSTEM::MAKE-MACRO-EXPANSION COMMON-LISP::LET COMMON-LISP::EVAL-WHEN
      (COMMON-LISP::COMPILE COMMON-LISP::LOAD COMMON-LISP::EVAL)
      SYSTEM::REMOVE-OLD-DEFINITIONS COMMON-LISP::QUOTE
      SYSTEM::%SET-DOCUMENTATION 'COMMON-LISP::FUNCTION SYSTEM::%PUTD
      SYSTEM::MAKE-MACRO (COMMON-LISP::EVAL) SYSTEM::%PUT 'SYSTEM::DEFINITION
      COMMON-LISP::CONS ((EXT::THE-ENVIRONMENT)))
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-52-2
   #19Y(00 00 00 00 00 00 00 00 00 01 DA DB 6F 02 32 80 3E 19 01)
   COMMON-LISP::DEFUN
   #Y(COMMON-LISP::DEFUN
      #388Y(00 00 00 00 02 00 00 00 00 03 9F 5C 20 19 9F 5C 78 89 04 1C 9F 5C
            5C 21 80 C4 DA E0 6F 02 C8 14 A2 5C 5B 14 33 02 1F DA DB 6F 02 DD
            A2 5C 1B 73 DA DF 6F 02 C8 1B 68 E1 A3 1B 80 C2 A7 1B 80 EB F6 F7
            E1 B9 7B 02 65 1E E1 BA 7B 02 7B 02 E1 B4 7B 02 7B 04 7B 02 65 1F
            65 20 65 21 B4 65 22 E1 B6 7B 02 7B 04 7B 03 61 02 1B 80 DF 0E 16
            1C 14 0E 17 1C 10 0E 18 1C 0C 0E 19 1C 08 6B 1A 6B 1B 8C FF FF BC
            F6 F7 E1 B9 7B 02 65 1E CC 1B 80 AE 65 1F 65 25 E8 65 26 65 27 65
            28 65 21 B7 65 29 E1 B9 7B 02 7B 04 7B 03 7B 03 61 03 1B 80 99 B6
            6B 12 ED 38 02 8D B2 80 7C 0E 10 1C FF AE B8 03 23 5F 1C 06 B8 03
            24 5F 1D 46 00 1B 80 7D 65 2A B2 65 2B E1 B6 7B 02 7B 04 61 01 1B
            80 73 9F 5C 78 A0 5C 5C 78 A1 5C 5C 79 AC 64 B2 31 5E 42 03 A2 20
            FF 43 E2 E3 E1 A5 5C 78 7B 02 61 02 14 7B 02 B1 E4 E5 B5 7B 02 A2
            7C 02 E6 B5 6F 0D A4 7C 02 7B 03 E8 63 E9 B0 7B 02 0E 10 1D 05 0E
            11 1C FF 8D A7 20 FF 16 A7 5C 78 2F 09 14 EE 38 01 72 82 24 15 FF
            84 F6 F7 E1 B9 7B 02 65 1E CC 14 BA 7B 02 7B 02 7B 03 61 02 14 61
            01 14 92 06 FF 7E 00 14 65 2C B3 65 2D BB 65 2E A7 7A 7B 03 7B 03
            65 1F 65 2F 65 21 B6 65 30 65 31 E1 C3 7B 02 03 32 7C 02 7B 04 7B
            03 E1 BB 7B 02 7B 03 33 03 23 62 03 19 0B)
      SYSTEM::SOURCE-PROGRAM-ERROR "~S: cannot define a function from that: ~S"
      SYSTEM::TEXT COMMON-LISP::DEFUN SYSTEM::FUNCTION-NAME-P
      "~S: the name of a function must be a symbol, not ~S"
      "~S: function ~S is missing a lambda list" COMMON-LISP::QUOTE
      COMMON-LISP::LOAD-TIME-VALUE SYSTEM::GET-SETF-SYMBOL COMMON-LISP::DECLARE
      SYSTEM::IN-DEFUN COMMON-LISP::BLOCK SYSTEM::FUNCTION-BLOCK-NAME
      COMMON-LISP::LET SYSTEM::REMOVE-OLD-DEFINITIONS SYSTEM::*COMPILING*
      SYSTEM::*COMPILING-FROM-FILE* SYSTEM::*INLINE-FUNCTIONS*
      #.#'COMMON-LISP::EQUAL SYSTEM::INLINABLE COMMON-LISP::INLINE
      SYSTEM::*VENV* SYSTEM::*FENV* SYSTEM::*BENV* SYSTEM::*GENV*
      SYSTEM::*DENV* SYSTEM::*TOPLEVEL-DENV* SYSTEM::EVAL-WHEN-COMPILE
      SYSTEM::C-DEFUN SYSTEM::LAMBDA-LIST-TO-SIGNATURE COMMON-LISP::EVAL-WHEN
      (COMMON-LISP::LOAD) SYSTEM::%PUT 'SYSTEM::INLINE-EXPANSION 0. 1.
      (COMMON-LISP::EVAL) ((SYSTEM::%ENV (EXT::THE-ENVIRONMENT)))
      COMMON-LISP::IF
      (COMMON-LISP::AND
       (COMMON-LISP::NULL (COMMON-LISP::SVREF SYSTEM::%ENV 0.))
       (COMMON-LISP::NULL (COMMON-LISP::SVREF SYSTEM::%ENV 1.))
       (COMMON-LISP::NULL (COMMON-LISP::SVREF SYSTEM::%ENV 2.))
       (COMMON-LISP::NULL (COMMON-LISP::SVREF SYSTEM::%ENV 3.))
       (COMMON-LISP::EQL (COMMON-LISP::SVREF SYSTEM::%ENV 4.)
        SYSTEM::*TOPLEVEL-DENV*))
      'SYSTEM::INLINE-EXPANSION SYSTEM::%SET-DOCUMENTATION
      'COMMON-LISP::FUNCTION SYSTEM::%PUTD COMMON-LISP::FUNCTION
      COMMON-LISP::LAMBDA (COMMON-LISP::EVAL) 'SYSTEM::DEFINITION
      COMMON-LISP::CONS ((EXT::THE-ENVIRONMENT)))
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-52-3 #13Y(00 00 00 00 00 00 00 00 00 01 3E 19 01))
#Y(#:TOP-LEVEL-FORM-53 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01)
   "SYSTEM" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-54 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "macros1" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-55 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "macros2" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-56 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "defs1" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-57 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "places" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-58 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "floatprint" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-59 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "type" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-60 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "defstruct" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-61 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "format" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-62 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "international" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-63 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01)
   "SYSTEM" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-64
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   EXT::DEFAULT-DIRECTORY SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(EXT::DEFAULT-DIRECTORY
      #16Y(00 00 00 00 00 00 00 00 00 01 38 01 31 F9 19 01)))
#Y(#:TOP-LEVEL-FORM-65
   #32Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 87 DA DC DD DE CA 7C 02 32 86 DA
        E0 63 2D 03 07 C5 19 01)
   EXT::DEFAULT-DIRECTORY SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER -1. 1.
   #Y(SYSTEM::SETF-DEFAULT-DIRECTORY
      #20Y(00 00 00 00 02 00 00 00 00 03 DA DB AF 7B 02 AF 61 03 19 03)
      COMMON-LISP::PROGN EXT::CD)
   COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION)
#Y(#:TOP-LEVEL-FORM-66-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DA DC 70 03 32 86 3E 19 01)
   SYSTEM::DATE-FORMAT SYSTEM::OTHER-LANGUAGE I18N::ENGLISH
   SYSTEM::DEFINTERNATIONAL-DEFAULT)
#Y(#:TOP-LEVEL-FORM-66-2 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   SYSTEM::DATE-FORMAT)
#Y(#:TOP-LEVEL-FORM-67-1 #16Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 3E 19 01)
   I18N::ENGLISH SYSTEM::ASSERT-LANGUAGE)
#Y(#:TOP-LEVEL-FORM-67-2
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   SYSTEM::DATE-FORMAT I18N::ENGLISH
   #Y(#:TOP-LEVEL-FORM-67-2-1
      #101Y(00 00 00 00 02 00 00 00 01 18 9F 3A 06 00 B6 01 06 B4 2D 08 00 DB
            B7 31 87 B6 01 02 DC DD 01 02 B5 2D 08 00 DB B7 31 87 B6 01 02 DC
            DD 01 02 B6 2D 08 00 DE B7 31 87 B6 01 02 DC DD 01 02 B7 2D 08 00
            DF B7 31 87 B6 01 02 DC DD 01 02 B8 2D 08 00 DF B7 31 87 B6 01 02
            DC DD 01 02 B9 2D 08 00 16 07 9E 19 04)
      SYSTEM::DO-FORMAT-DECIMAL #\- 2. #\0 #\Space #\:))
#Y(#:TOP-LEVEL-FORM-67-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   SYSTEM::DATE-FORMAT)
#Y(#:TOP-LEVEL-FORM-68
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::DATE-FORMAT SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::DATE-FORMAT #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
      SYSTEM::DATE-FORMAT I18N::LOCALIZED))
#Y(#:TOP-LEVEL-FORM-69
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01) EXT::DIR
   SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(EXT::DIR
      #32Y(00 00 00 00 00 00 01 00 00 07 3B 01 02 C5 F9 AD 8E 09 06 AD C6 34 3E
           19 02 DB AE 33 00 19 1B 76)
      ("*/" "*")
      #Y(EXT::DIR-ONEDIR
         #77Y(00 00 00 00 01 00 00 00 00 02 AD 64 64 71 F8 DA AD 90 00 29 0D 2E
              04 14 AD DC DF 38 02 72 65 63 1B 24 DB 63 AE DC DD 38 02 72 65 33
              02 16 19 03 87 01 00 E0 63 94 02 A0 5C 5C 5C 78 B2 A2 5C 5C 78 33
              05 16 83 01 AD 8D 91 66 00 19 06)
         #.#'COMMON-LISP::ATOM
         #Y(EXT::DIR-ONEDIR-1
            #32Y(00 00 00 00 02 00 00 00 01 18 AE 1B 0A B0 31 8A 94 00 83 01 B1
                 31 83 AC 8D 91 72 16 01 9E 19 04))
         #.#'COMMON-LISP::STRING< #.#'COMMON-LISP::NAMESTRING
         SYSTEM::DATE-FORMAT
         #Y(EXT::DIR-ONEDIR-2
            #18Y(00 00 00 00 01 00 00 00 00 02 94 01 38 01 31 F2 19 02))
         #Y(EXT::DIR-ONEDIR-3
            #81Y(00 00 00 00 04 00 00 00 01 1A B1 31 8A B0 B2 31 83 B1 01 02 DA
                 63 2D 05 01 B1 01 02 DC 01 03 B6 2D 08 03 B1 01 02 DE 63 2D 05
                 01 B1 71 8F 38 01 AD 72 73 B3 01 02 DF 01 03 B4 01 04 B8 BD BD
                 2D 03 06 09 0F B8 72 74 7B 01 2D 0D 07 16 02 9E 19 06)
            40. SYSTEM::FORMAT-TABULATE 7. SYSTEM::DO-FORMAT-DECIMAL 52. 21.
            SYSTEM::DO-FORMAT-INDIRECTION SYSTEM::DO-FORMAT-JUSTIFICATION))))
#Y(#:TOP-LEVEL-FORM-70
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::SEARCH-FILE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::SEARCH-FILE
      #212Y(00 00 00 00 02 00 00 00 00 03 00 2B 01 7F 02 00 00 AF 38 01 31 EA
            59 14 93 00 0A DA 68 02 00 33 00 17 0B 01 00 B0 DB 38 02 80 EF 04
            63 DC DD B3 38 01 71 E8 DE 38 02 8C B2 0B DF 6B 06 33 00 17 7A 63
            1B 80 88 00 1B 78 AC AE 38 07 7D 01 71 F1 64 64 71 F8 82 02 24 00
            93 05 80 64 1B 80 5B B2 6D 08 01 AD 38 05 81 51 00 93 00 80 57 14
            63 1B 10 87 01 00 14 99 09 9F 5C 5C 5B 77 00 31 A9 83 01 AD 8D 91
            6C 16 02 E4 AD E5 E6 38 02 72 65 33 00 17 19 0A 87 01 00 B3 AD 38
            02 71 EF 38 03 71 EF AC B0 DE 38 02 8C B2 20 AC 64 64 71 F8 AD 38
            01 71 EA 24 07 FF 91 93 05 06 06 06 00 1C FF 9F 92 00 FF A9 16 01
            AC 84 03 16 01 83 01 AD 8D 91 43 00 19 08)
      #.#'COMMON-LISP::PATHNAME-TYPE
      #-CLISP #P"*.*"
      #+CLISP
      #S(COMMON-LISP::PATHNAME :HOST COMMON-LISP::NIL :DEVICE COMMON-LISP::NIL
         :DIRECTORY (:RELATIVE) :NAME :WILD :TYPE :WILD
         :VERSION COMMON-LISP::NIL)
      #-CLISP #P""
      #+CLISP
      #S(COMMON-LISP::PATHNAME :HOST COMMON-LISP::NIL :DEVICE COMMON-LISP::NIL
         :DIRECTORY (:RELATIVE) :NAME COMMON-LISP::NIL :TYPE COMMON-LISP::NIL
         :VERSION COMMON-LISP::NIL)
      ".." #.#'COMMON-LISP::EQUAL #.#'COMMON-LISP::PATHNAME
      CUSTOM::*LOAD-PATHS* :WILD
      #Y(SYSTEM::SEARCH-FILE-1
         #26Y(00 00 00 00 01 00 00 00 00 02 94 01 38 01 71 EA 69 00 01 DB 38 02
              31 B2 19 02)
         COMMON-LISP::NIL #.#'COMMON-LISP::STRING=)
      COMMON-LISP::ENCODE-UNIVERSAL-TIME #.#'COMMON-LISP::FIRST
      #.#'COMMON-LISP::> #.#'COMMON-LISP::REST))
#Y(#:TOP-LEVEL-FORM-71 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "room" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-72 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "savemem" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-73
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::CERROR SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::CERROR
      #93Y(00 00 00 00 02 00 00 00 01 18 0E 00 1C 2E 6B 01 31 8A DC 6B 01 38 02
           31 88 6B 01 31 8A 99 03 6B 01 B0 A1 37 02 6B 04 31 8A 6B 04 89 05 04
           0E 06 1C 13 99 03 6B 04 A2 14 A1 9B 02 04 14 92 04 01 02 14 A1 1B 72
           E1 6F 08 6B 04 38 02 31 88 99 03 6B 04 B1 A1 37 02 6B 06 64 36 01 19
           04)
      CUSTOM::*ERROR-HANDLER* COMMON-LISP::*ERROR-OUTPUT*
      "** - Continuable Error" COMMON-LISP::FORMAT COMMON-LISP::*DEBUG-IO*
      COMMON-LISP::INTERACTIVE-STREAM-P EXT::*BREAK-DRIVER*
      "If you continue (by typing 'continue'): " SYSTEM::TEXT))
#Y(#:TOP-LEVEL-FORM-74 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 DA 19 01)
   ("COMMON-LISP") "POSIX")
#Y(#:TOP-LEVEL-FORM-75 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01)
   "POSIX" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-76
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 D5 DA DC 31 D7 DA DD 31 D5 19
        01)
   (POSIX::ERF POSIX::ERFC POSIX::J0 POSIX::J1 POSIX::JN POSIX::Y0 POSIX::Y1
    POSIX::YN POSIX::GAMMA POSIX::LGAMMA)
   "POSIX" "EXT" "EXT")
#Y(#:TOP-LEVEL-FORM-77 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01)
   "SYSTEM" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-78 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "trace" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-79 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "cmacros" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-80 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "compiler" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-81 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "defs2" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-82 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "loop" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-83 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "clos" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-84 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "disassem" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-85 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "condition" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-86 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "loadform" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-87 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "gray" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-88 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "gstream" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-89 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "xcharin" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-90 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "keyboard" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-91 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "screen" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-92 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 DA 19 01)
   ("SOCKET") "EXT")
#Y(#:TOP-LEVEL-FORM-93 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01)
   "SOCKET" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-94 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 D5 19 01)
   (SOCKET::SOCKET-SERVER SOCKET::SOCKET-SERVER-CLOSE
    SOCKET::SOCKET-SERVER-PORT SOCKET::SOCKET-SERVER-HOST SOCKET::SOCKET-ACCEPT
    SOCKET::SOCKET-WAIT SOCKET::SOCKET-STATUS SOCKET::SOCKET-CONNECT
    SOCKET::SOCKET-STREAM-HOST SOCKET::SOCKET-STREAM-PORT
    SOCKET::SOCKET-STREAM-PEER SOCKET::SOCKET-STREAM-LOCAL
    SOCKET::SOCKET-STREAM-HANDLE SOCKET::SOCKET-SERVICE-PORT)
   "SOCKET")
#Y(#:TOP-LEVEL-FORM-95 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 E3 19 01)
   "SOCKET" "EXT")
#Y(#:TOP-LEVEL-FORM-96 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01)
   "SYSTEM" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-97 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "runprog" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-98 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "query" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-99 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "reploop" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-100 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "dribble" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-101 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "complete" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-102 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "pprint" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-103 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "describe" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-104 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "edit" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-105 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "clhs" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-106 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "inspect" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-107 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "macros3" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-108 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "foreign1" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-109 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "posix" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-110 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "german" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-111 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "french" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-112 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "spanish" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-113 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "dutch" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-114 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "deprecated" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-115 #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01)
   "config" COMMON-LISP::LOAD)
#Y(#:TOP-LEVEL-FORM-116
   #18Y(00 00 00 00 00 00 00 00 00 01 00 0F 00 C6 0F 02 19 01)
   SYSTEM::*HOME-PACKAGE* 0. EXT::*COMMAND-INDEX*)
#Y(#:TOP-LEVEL-FORM-117
   #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01) "CL-USER"
   COMMON-LISP::*PACKAGE*)
