(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)
   "EXT" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-2 #17Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 31 D5 19 01)
   (EXT::TYPE-EXPAND))
#Y(#:TOP-LEVEL-FORM-3 #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-4
   #35Y(00 00 00 00 00 00 00 00 00 01 DA 31 4F 59 1F 11 DA 2F 01 DA DC 32 80 DD
        2F 01 DD DE 32 80 C8 19 01 19 01)
   CLOS::BUILT-IN-CLASS-P SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(CLOS::BUILT-IN-CLASS-P #13Y(00 00 00 00 01 00 00 00 00 02 00 19 02))
   CLOS::SUBCLASSP
   #Y(CLOS::SUBCLASSP #13Y(00 00 00 00 02 00 00 00 00 03 00 19 03)))
#Y(#:TOP-LEVEL-FORM-5
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::TYPESPEC-ERROR SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::TYPESPEC-ERROR
      #19Y(00 00 00 00 02 00 00 00 00 03 DA DB 6F 02 B0 B0 33 02 1F)
      COMMON-LISP::ERROR "~S: invalid type specification ~S" SYSTEM::TEXT))
#Y(#:TOP-LEVEL-FORM-6
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::ENCODING-CHARSET SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::ENCODING-CHARSET
      #16Y(00 00 00 00 01 00 00 00 00 02 AD DA 32 29 19 02) 3.))
#Y(#:TOP-LEVEL-FORM-7
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::CLOS-CLASS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::CLOS-CLASS
      #36Y(00 00 00 00 01 00 00 00 00 02 AD DA 38 01 72 82 9D 1F 0F 14 2F 01 1F
           0A AC 6F 02 A0 5A 1F 03 15 19 02 19 03)
      CLOS::CLOSCLASS CLOS::CLASS-P CLOS::CLASS-NAME))
#Y(#:TOP-LEVEL-FORM-8
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::TYPEP SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::TYPEP
      #292Y(00 00 00 00 02 00 00 00 00 03 63 AE 2F 00 FA 14 8F 04 80 E7 AE DB
            38 01 81 82 00 1C 09 AE DC 38 01 81 82 00 1D 13 14 B0 36 01 19 04
            AE B0 32 30 19 04 AF 72 26 9E 1B 80 D3 AE DD 38 01 8E 82 6C AE 2F
            04 F8 1C 6C CB 1B 80 D2 E4 E5 6F 0C E0 A2 5C 78 33 02 1F 9F 5C 78
            8F 04 6F 9F 5C 5B 5E 14 B0 36 01 1F 80 BC 1B 1B 94 02 25 08 06 AE
            72 45 24 09 62 94 02 25 0D 80 51 AF 95 03 38 03 31 B2 1F 80 9F 02
            19 04 AF A0 5C 78 31 FF 19 04 AF A0 5C 78 30 06 59 19 04 95 02 63
            1B 0F 95 02 63 1B 1B 87 01 00 B1 AD 8B 06 17 83 01 AD 8D 91 72 02
            19 06 87 01 00 B1 AD 8A 06 75 83 01 AD 8D 91 72 00 19 06 14 B0 A1
            5C 9B 01 04 94 02 25 0E 07 AE 72 45 24 09 FF B0 94 02 25 0F 07 AE
            72 45 24 09 FF AC 94 02 24 10 FF AF 94 02 24 11 FF AE 94 02 DC 38
            01 81 82 00 1C 4B CB 1B 21 9F 20 06 94 02 8E 04 FF 64 AE 89 12 0F
            AF 72 26 A0 14 30 05 19 04 AF AF 30 14 19 04 AE 88 13 76 CB 14 AF
            30 07 19 04 19 04)
      SYSTEM::EXPAND-DEFTYPE SYSTEM::TYPE-SYMBOL SYSTEM::TYPE-LIST
      SYSTEM::DEFSTRUCT-DESCRIPTION SYSTEM::CLOS-CLASS CLOS::SUBCLASSP
      COMMON-LISP::TYPEP SYSTEM::TYPESPEC-ERROR COMMON-LISP::SATISFIES 2.
      COMMON-LISP::ERROR "~S: argument to SATISFIES must be a symbol: ~S"
      SYSTEM::TEXT COMMON-LISP::MEMBER COMMON-LISP::EQL COMMON-LISP::NOT
      COMMON-LISP::AND COMMON-LISP::OR CLOS::CLASS-P SYSTEM::ENCODINGP
      SYSTEM::CHARSET-TYPEP))
#Y(#:TOP-LEVEL-FORM-9
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::UPGRADED-ARRAY-ELEMENT-TYPE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::UPGRADED-ARRAY-ELEMENT-TYPE
      #112Y(00 00 00 00 01 00 00 00 00 02 9E 26 00 80 48 C6 19 02 C7 19 02 02
            19 02 C6 19 05 CB 19 05 CD 19 05 CF 19 05 D1 19 05 D3 19 05 AC 72
            D2 AC DE 90 01 32 65 AC DF 90 01 32 62 AC E1 90 01 32 5F AC E3 90
            01 32 5C AC E5 90 01 32 59 AC E7 90 01 32 56 02 19 05 C7 19 04 AD
            2F 03 42 02 AD 8F 0A 08 AD 8E 92 04 AC 8E 0A 42 AF DC 8A 0F 67 02
            19 04)
      #S(COMMON-LISP::HASH-TABLE COMMON-LISP::EQ (COMMON-LISP::T . 8.)
         (COMMON-LISP::CHARACTER . 5.) (COMMON-LISP::BIT . 2.))
      COMMON-LISP::BIT COMMON-LISP::CHARACTER SYSTEM::SUBTYPE-INTEGER 1. 2.
      (COMMON-LISP::UNSIGNED-BYTE 2.) 4. (COMMON-LISP::UNSIGNED-BYTE 4.) 8.
      (COMMON-LISP::UNSIGNED-BYTE 8.) 16. (COMMON-LISP::UNSIGNED-BYTE 16.) 32.
      (COMMON-LISP::UNSIGNED-BYTE 32.) COMMON-LISP::SUBTYPEP))
#Y(#:TOP-LEVEL-FORM-10
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 DB 63 31 51 C6 19 01)
   (COMMON-LISP::SPECIAL SYSTEM::C-TYPEP-ALIST1) SYSTEM::C-TYPEP-ALIST1)
#Y(#:TOP-LEVEL-FORM-11
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 DB 63 31 51 C6 19 01)
   (COMMON-LISP::SPECIAL SYSTEM::C-TYPEP-ALIST2) SYSTEM::C-TYPEP-ALIST2)
#Y(#:TOP-LEVEL-FORM-12
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 DB 63 31 51 C6 19 01)
   (COMMON-LISP::SPECIAL SYSTEM::C-TYPEP-ALIST3) SYSTEM::C-TYPEP-ALIST3)
#Y(#:TOP-LEVEL-FORM-13
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   SYSTEM::DEF-ATOMIC-TYPE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::DEF-ATOMIC-TYPE
      #119Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 2F 80 46 9F 5C 78
            A0 5C 5C 78 AC 8F 02 04 94 00 C7 5A 14 DD DE DF E0 B2 7B 02 CC 7C
            02 92 03 2E E2 B1 61 02 14 7B 03 92 02 2E E5 EA E7 EA E8 E9 E0 B7
            7B 02 E0 A8 14 7B 02 7B 03 7B 02 7B 03 7B 03 E0 B2 7B 02 61 04 19
            06 AE 2F 01 19 03 E2 E3 B3 70 0A B2 61 03 1B 4C E5 E6 E7 E6 E8 E9
            E0 B7 7B 02 E0 A8 5C 1B 4F)
      3. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::LAMBDA COMMON-LISP::PROGN
      COMMON-LISP::SETF COMMON-LISP::GET COMMON-LISP::QUOTE
      ('SYSTEM::TYPE-SYMBOL) COMMON-LISP::FUNCTION "TYPE-SYMBOL-"
      SYSTEM::CONCAT-PNAMES COMMON-LISP::SETQ SYSTEM::C-TYPEP-ALIST2
      COMMON-LISP::NCONC COMMON-LISP::LIST COMMON-LISP::CONS
      SYSTEM::C-TYPEP-ALIST1)
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-14
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   SYSTEM::DEF-COMPOUND-TYPE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::DEF-COMPOUND-TYPE
      #154Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 2F 80 82 9F 5C 78
            A0 5C 5C 78 A1 5C 5C 5C 5B 78 B1 71 94 A3 5C 5C 5C 5C 5C 78 A4 5C
            5C 5C 5C 5C 5C 78 DC DD DE DF B5 7B 02 CB 7C 02 E1 E2 B6 70 09 E4
            B5 A8 7A 93 09 07 E5 E6 B7 7B 03 61 01 14 B5 7B 01 33 02 23 7C 02
            7B 03 7B 03 E7 E8 E9 E8 EA EB DF BA 7B 02 E1 E4 BA BC EC 33 02 23
            7A ED 93 0F 07 E5 EE BD 7B 03 61 01 14 BA 7B 01 33 02 23 7C 03 7B
            02 7B 03 7B 02 7B 03 7B 03 DF B5 7B 02 61 04 19 09 AE 2F 01 19 03)
      7. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::PROGN COMMON-LISP::SETF
      COMMON-LISP::GET COMMON-LISP::QUOTE ('SYSTEM::TYPE-LIST)
      COMMON-LISP::FUNCTION "TYPE-LIST-" SYSTEM::CONCAT-PNAMES
      COMMON-LISP::LAMBDA COMMON-LISP::MACROLET
      ((COMMON-LISP::ERROR (COMMON-LISP::&REST SYSTEM::ERROR-ARGS)
        (COMMON-LISP::LIST* 'SYSTEM::ERROR-OF-TYPE ''COMMON-LISP::ERROR
         SYSTEM::ERROR-ARGS)))
      COMMON-LISP::SETQ SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::NCONC
      COMMON-LISP::LIST COMMON-LISP::CONS
      (COMMON-LISP::&REST SYSTEM::ILLEGAL-ARGS)
      (COMMON-LISP::DECLARE (COMMON-LISP::IGNORE SYSTEM::ILLEGAL-ARGS))
      ((COMMON-LISP::ERROR (COMMON-LISP::&REST SYSTEM::ERROR-ARGS)
        (COMMON-LISP::LIST 'COMMON-LISP::PROGN
         (COMMON-LISP::LIST* 'SYSTEM::C-WARN SYSTEM::ERROR-ARGS)
         '(COMMON-LISP::THROW 'SYSTEM::C-TYPEP COMMON-LISP::NIL)))))
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-15-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::ARRAY SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::ARRAYP)
#Y(#:TOP-LEVEL-FORM-15-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::ARRAY COMMON-LISP::ARRAYP)
#Y(#:TOP-LEVEL-FORM-15-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::ARRAY)
#Y(#:TOP-LEVEL-FORM-16-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::ATOM SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::ATOM)
#Y(#:TOP-LEVEL-FORM-16-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C6 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::ATOM)
#Y(#:TOP-LEVEL-FORM-16-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::ATOM)
#Y(#:TOP-LEVEL-FORM-17-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::BASE-CHAR SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::CHARACTERP)
#Y(#:TOP-LEVEL-FORM-17-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::BASE-CHAR COMMON-LISP::CHARACTERP)
#Y(#:TOP-LEVEL-FORM-17-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::BASE-CHAR)
#Y(#:TOP-LEVEL-FORM-18-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::BASE-STRING SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::STRINGP)
#Y(#:TOP-LEVEL-FORM-18-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::BASE-STRING COMMON-LISP::STRINGP)
#Y(#:TOP-LEVEL-FORM-18-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::BASE-STRING)
#Y(#:TOP-LEVEL-FORM-19-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-SYMBOL-BIGNUM
      #23Y(00 00 00 00 01 00 00 00 00 02 AD 32 0A 1F 06 AD 32 0B 59 19 02 19
           02))
   COMMON-LISP::BIGNUM SYSTEM::TYPE-SYMBOL)
#Y(#:TOP-LEVEL-FORM-19-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST2 COMMON-LISP::BIGNUM
   ((SYSTEM::X)
    (COMMON-LISP::AND (COMMON-LISP::INTEGERP SYSTEM::X)
     (COMMON-LISP::NOT (SYSTEM::FIXNUMP SYSTEM::X)))))
#Y(#:TOP-LEVEL-FORM-19-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::BIGNUM)
#Y(#:TOP-LEVEL-FORM-20-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-SYMBOL-BIT
      #22Y(00 00 00 00 01 00 00 00 00 02 AD C5 5A 1E 05 AD C6 5A 19 02 19 02)
      0. 1.)
   COMMON-LISP::BIT SYSTEM::TYPE-SYMBOL)
#Y(#:TOP-LEVEL-FORM-20-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST2 COMMON-LISP::BIT
   ((SYSTEM::X)
    (COMMON-LISP::OR (COMMON-LISP::EQL SYSTEM::X 0.)
     (COMMON-LISP::EQL SYSTEM::X 1.))))
#Y(#:TOP-LEVEL-FORM-20-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::BIT)
#Y(#:TOP-LEVEL-FORM-21-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::BIT-VECTOR SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::BIT-VECTOR-P)
#Y(#:TOP-LEVEL-FORM-21-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::BIT-VECTOR COMMON-LISP::BIT-VECTOR-P)
#Y(#:TOP-LEVEL-FORM-21-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::BIT-VECTOR)
#Y(#:TOP-LEVEL-FORM-22-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-SYMBOL-BOOLEAN
      #21Y(00 00 00 00 01 00 00 00 00 02 9E 59 1E 05 AD 02 5A 19 02 19 02))
   COMMON-LISP::BOOLEAN SYSTEM::TYPE-SYMBOL)
#Y(#:TOP-LEVEL-FORM-22-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST2 COMMON-LISP::BOOLEAN
   ((SYSTEM::X)
    (COMMON-LISP::OR (COMMON-LISP::EQ SYSTEM::X 'COMMON-LISP::NIL)
     (COMMON-LISP::EQ SYSTEM::X 'COMMON-LISP::T))))
#Y(#:TOP-LEVEL-FORM-22-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::BOOLEAN)
#Y(#:TOP-LEVEL-FORM-23-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::CHARACTER SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::CHARACTERP)
#Y(#:TOP-LEVEL-FORM-23-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::CHARACTER COMMON-LISP::CHARACTERP)
#Y(#:TOP-LEVEL-FORM-23-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::CHARACTER)
#Y(#:TOP-LEVEL-FORM-24-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::COMPILED-FUNCTION SYSTEM::TYPE-SYMBOL
   #.#'COMMON-LISP::COMPILED-FUNCTION-P)
#Y(#:TOP-LEVEL-FORM-24-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::COMPILED-FUNCTION
   COMMON-LISP::COMPILED-FUNCTION-P)
#Y(#:TOP-LEVEL-FORM-24-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::COMPILED-FUNCTION)
#Y(#:TOP-LEVEL-FORM-25-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::COMPLEX SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::COMPLEXP)
#Y(#:TOP-LEVEL-FORM-25-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::COMPLEX COMMON-LISP::COMPLEXP)
#Y(#:TOP-LEVEL-FORM-25-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::COMPLEX)
#Y(#:TOP-LEVEL-FORM-26-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::CONS SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::CONSP)
#Y(#:TOP-LEVEL-FORM-26-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::CONS COMMON-LISP::CONSP)
#Y(#:TOP-LEVEL-FORM-26-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::CONS)
#Y(#:TOP-LEVEL-FORM-27-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::DOUBLE-FLOAT SYSTEM::TYPE-SYMBOL #.#'SYSTEM::DOUBLE-FLOAT-P)
#Y(#:TOP-LEVEL-FORM-27-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::DOUBLE-FLOAT SYSTEM::DOUBLE-FLOAT-P)
#Y(#:TOP-LEVEL-FORM-27-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::DOUBLE-FLOAT)
#Y(#:TOP-LEVEL-FORM-28-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01) EXT::ENCODING
   SYSTEM::TYPE-SYMBOL #.#'SYSTEM::ENCODINGP)
#Y(#:TOP-LEVEL-FORM-28-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 EXT::ENCODING SYSTEM::ENCODINGP)
#Y(#:TOP-LEVEL-FORM-28-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   EXT::ENCODING)
#Y(#:TOP-LEVEL-FORM-29-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-SYMBOL-EXTENDED-CHAR
      #13Y(00 00 00 00 01 00 00 00 00 02 00 19 02))
   COMMON-LISP::EXTENDED-CHAR SYSTEM::TYPE-SYMBOL)
#Y(#:TOP-LEVEL-FORM-29-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST2 COMMON-LISP::EXTENDED-CHAR
   ((SYSTEM::X) (COMMON-LISP::DECLARE (COMMON-LISP::IGNORE SYSTEM::X))
    COMMON-LISP::NIL))
#Y(#:TOP-LEVEL-FORM-29-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::EXTENDED-CHAR)
#Y(#:TOP-LEVEL-FORM-30-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::FIXNUM SYSTEM::TYPE-SYMBOL #.#'SYSTEM::FIXNUMP)
#Y(#:TOP-LEVEL-FORM-30-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::FIXNUM SYSTEM::FIXNUMP)
#Y(#:TOP-LEVEL-FORM-30-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::FIXNUM)
#Y(#:TOP-LEVEL-FORM-31-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::FLOAT SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::FLOATP)
#Y(#:TOP-LEVEL-FORM-31-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::FLOAT COMMON-LISP::FLOATP)
#Y(#:TOP-LEVEL-FORM-31-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::FLOAT)
#Y(#:TOP-LEVEL-FORM-32-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::FUNCTION SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::FUNCTIONP)
#Y(#:TOP-LEVEL-FORM-32-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::FUNCTION COMMON-LISP::FUNCTIONP)
#Y(#:TOP-LEVEL-FORM-32-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::FUNCTION)
#Y(#:TOP-LEVEL-FORM-33-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   CLOS::GENERIC-FUNCTION SYSTEM::TYPE-SYMBOL #.#'CLOS::GENERIC-FUNCTION-P)
#Y(#:TOP-LEVEL-FORM-33-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 CLOS::GENERIC-FUNCTION CLOS::GENERIC-FUNCTION-P)
#Y(#:TOP-LEVEL-FORM-33-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   CLOS::GENERIC-FUNCTION)
#Y(#:TOP-LEVEL-FORM-34-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::HASH-TABLE SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::HASH-TABLE-P)
#Y(#:TOP-LEVEL-FORM-34-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::HASH-TABLE COMMON-LISP::HASH-TABLE-P)
#Y(#:TOP-LEVEL-FORM-34-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::HASH-TABLE)
#Y(#:TOP-LEVEL-FORM-35-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::INTEGER SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::INTEGERP)
#Y(#:TOP-LEVEL-FORM-35-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::INTEGER COMMON-LISP::INTEGERP)
#Y(#:TOP-LEVEL-FORM-35-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::INTEGER)
#Y(#:TOP-LEVEL-FORM-36-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::KEYWORD SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::KEYWORDP)
#Y(#:TOP-LEVEL-FORM-36-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::KEYWORD COMMON-LISP::KEYWORDP)
#Y(#:TOP-LEVEL-FORM-36-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::KEYWORD)
#Y(#:TOP-LEVEL-FORM-37-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::LIST SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::LISTP)
#Y(#:TOP-LEVEL-FORM-37-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::LIST COMMON-LISP::LISTP)
#Y(#:TOP-LEVEL-FORM-37-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::LIST)
#Y(#:TOP-LEVEL-FORM-38-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::LOGICAL-PATHNAME SYSTEM::TYPE-SYMBOL
   #.#'SYSTEM::LOGICAL-PATHNAME-P)
#Y(#:TOP-LEVEL-FORM-38-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::LOGICAL-PATHNAME
   SYSTEM::LOGICAL-PATHNAME-P)
#Y(#:TOP-LEVEL-FORM-38-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::LOGICAL-PATHNAME)
#Y(#:TOP-LEVEL-FORM-39-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::LONG-FLOAT SYSTEM::TYPE-SYMBOL #.#'SYSTEM::LONG-FLOAT-P)
#Y(#:TOP-LEVEL-FORM-39-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::LONG-FLOAT SYSTEM::LONG-FLOAT-P)
#Y(#:TOP-LEVEL-FORM-39-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::LONG-FLOAT)
#Y(#:TOP-LEVEL-FORM-40-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA 63 DB AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-SYMBOL-NIL #13Y(00 00 00 00 01 00 00 00 00 02 00 19 02))
   SYSTEM::TYPE-SYMBOL)
#Y(#:TOP-LEVEL-FORM-40-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 63 C6 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST2
   ((SYSTEM::X) (COMMON-LISP::DECLARE (COMMON-LISP::IGNORE SYSTEM::X))
    COMMON-LISP::NIL))
#Y(#:TOP-LEVEL-FORM-40-3 #13Y(00 00 00 00 00 00 00 00 00 01 00 19 01))
#Y(#:TOP-LEVEL-FORM-41-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::NULL SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::NULL)
#Y(#:TOP-LEVEL-FORM-41-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C6 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::NULL)
#Y(#:TOP-LEVEL-FORM-41-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::NULL)
#Y(#:TOP-LEVEL-FORM-42-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::NUMBER SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::NUMBERP)
#Y(#:TOP-LEVEL-FORM-42-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::NUMBER COMMON-LISP::NUMBERP)
#Y(#:TOP-LEVEL-FORM-42-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::NUMBER)
#Y(#:TOP-LEVEL-FORM-43-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::PACKAGE SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::PACKAGEP)
#Y(#:TOP-LEVEL-FORM-43-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::PACKAGE COMMON-LISP::PACKAGEP)
#Y(#:TOP-LEVEL-FORM-43-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::PACKAGE)
#Y(#:TOP-LEVEL-FORM-44-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::PATHNAME SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::PATHNAMEP)
#Y(#:TOP-LEVEL-FORM-44-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::PATHNAME COMMON-LISP::PATHNAMEP)
#Y(#:TOP-LEVEL-FORM-44-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::PATHNAME)
#Y(#:TOP-LEVEL-FORM-45-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::RANDOM-STATE SYSTEM::TYPE-SYMBOL
   #.#'COMMON-LISP::RANDOM-STATE-P)
#Y(#:TOP-LEVEL-FORM-45-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::RANDOM-STATE
   COMMON-LISP::RANDOM-STATE-P)
#Y(#:TOP-LEVEL-FORM-45-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::RANDOM-STATE)
#Y(#:TOP-LEVEL-FORM-46-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-SYMBOL-RATIO
      #23Y(00 00 00 00 01 00 00 00 00 02 AD 32 0C 1F 06 AD 32 0A 59 19 02 19
           02))
   COMMON-LISP::RATIO SYSTEM::TYPE-SYMBOL)
#Y(#:TOP-LEVEL-FORM-46-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST2 COMMON-LISP::RATIO
   ((SYSTEM::X)
    (COMMON-LISP::AND (COMMON-LISP::RATIONALP SYSTEM::X)
     (COMMON-LISP::NOT (COMMON-LISP::INTEGERP SYSTEM::X)))))
#Y(#:TOP-LEVEL-FORM-46-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::RATIO)
#Y(#:TOP-LEVEL-FORM-47-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::RATIONAL SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::RATIONALP)
#Y(#:TOP-LEVEL-FORM-47-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::RATIONAL COMMON-LISP::RATIONALP)
#Y(#:TOP-LEVEL-FORM-47-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::RATIONAL)
#Y(#:TOP-LEVEL-FORM-48-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::READTABLE SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::READTABLEP)
#Y(#:TOP-LEVEL-FORM-48-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::READTABLE COMMON-LISP::READTABLEP)
#Y(#:TOP-LEVEL-FORM-48-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::READTABLE)
#Y(#:TOP-LEVEL-FORM-49-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::REAL SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::REALP)
#Y(#:TOP-LEVEL-FORM-49-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::REAL COMMON-LISP::REALP)
#Y(#:TOP-LEVEL-FORM-49-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::REAL)
#Y(#:TOP-LEVEL-FORM-50-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::SEQUENCE SYSTEM::TYPE-SYMBOL #.#'SYSTEM::SEQUENCEP)
#Y(#:TOP-LEVEL-FORM-50-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::SEQUENCE SYSTEM::SEQUENCEP)
#Y(#:TOP-LEVEL-FORM-50-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SEQUENCE)
#Y(#:TOP-LEVEL-FORM-51-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::SHORT-FLOAT SYSTEM::TYPE-SYMBOL #.#'SYSTEM::SHORT-FLOAT-P)
#Y(#:TOP-LEVEL-FORM-51-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::SHORT-FLOAT SYSTEM::SHORT-FLOAT-P)
#Y(#:TOP-LEVEL-FORM-51-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SHORT-FLOAT)
#Y(#:TOP-LEVEL-FORM-52-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::SIMPLE-ARRAY SYSTEM::TYPE-SYMBOL #.#'SYSTEM::SIMPLE-ARRAY-P)
#Y(#:TOP-LEVEL-FORM-52-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::SIMPLE-ARRAY SYSTEM::SIMPLE-ARRAY-P)
#Y(#:TOP-LEVEL-FORM-52-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SIMPLE-ARRAY)
#Y(#:TOP-LEVEL-FORM-53-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::SIMPLE-BASE-STRING SYSTEM::TYPE-SYMBOL
   #.#'COMMON-LISP::SIMPLE-STRING-P)
#Y(#:TOP-LEVEL-FORM-53-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::SIMPLE-BASE-STRING
   COMMON-LISP::SIMPLE-STRING-P)
#Y(#:TOP-LEVEL-FORM-53-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SIMPLE-BASE-STRING)
#Y(#:TOP-LEVEL-FORM-54-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::SIMPLE-BIT-VECTOR SYSTEM::TYPE-SYMBOL
   #.#'COMMON-LISP::SIMPLE-BIT-VECTOR-P)
#Y(#:TOP-LEVEL-FORM-54-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::SIMPLE-BIT-VECTOR
   COMMON-LISP::SIMPLE-BIT-VECTOR-P)
#Y(#:TOP-LEVEL-FORM-54-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SIMPLE-BIT-VECTOR)
#Y(#:TOP-LEVEL-FORM-55-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::SIMPLE-STRING SYSTEM::TYPE-SYMBOL
   #.#'COMMON-LISP::SIMPLE-STRING-P)
#Y(#:TOP-LEVEL-FORM-55-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::SIMPLE-STRING
   COMMON-LISP::SIMPLE-STRING-P)
#Y(#:TOP-LEVEL-FORM-55-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SIMPLE-STRING)
#Y(#:TOP-LEVEL-FORM-56-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::SIMPLE-VECTOR SYSTEM::TYPE-SYMBOL
   #.#'COMMON-LISP::SIMPLE-VECTOR-P)
#Y(#:TOP-LEVEL-FORM-56-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::SIMPLE-VECTOR
   COMMON-LISP::SIMPLE-VECTOR-P)
#Y(#:TOP-LEVEL-FORM-56-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SIMPLE-VECTOR)
#Y(#:TOP-LEVEL-FORM-57-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::SINGLE-FLOAT SYSTEM::TYPE-SYMBOL #.#'SYSTEM::SINGLE-FLOAT-P)
#Y(#:TOP-LEVEL-FORM-57-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::SINGLE-FLOAT SYSTEM::SINGLE-FLOAT-P)
#Y(#:TOP-LEVEL-FORM-57-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SINGLE-FLOAT)
#Y(#:TOP-LEVEL-FORM-58-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-SYMBOL-STANDARD-CHAR
      #22Y(00 00 00 00 01 00 00 00 00 02 AD 32 1A 1F 05 AD 31 1E 19 02 19 02))
   COMMON-LISP::STANDARD-CHAR SYSTEM::TYPE-SYMBOL)
#Y(#:TOP-LEVEL-FORM-58-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST2 COMMON-LISP::STANDARD-CHAR
   ((SYSTEM::X)
    (COMMON-LISP::AND (COMMON-LISP::CHARACTERP SYSTEM::X)
     (COMMON-LISP::STANDARD-CHAR-P SYSTEM::X))))
#Y(#:TOP-LEVEL-FORM-58-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::STANDARD-CHAR)
#Y(#:TOP-LEVEL-FORM-59-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   CLOS::STANDARD-GENERIC-FUNCTION SYSTEM::TYPE-SYMBOL
   #.#'CLOS::GENERIC-FUNCTION-P)
#Y(#:TOP-LEVEL-FORM-59-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 CLOS::STANDARD-GENERIC-FUNCTION
   CLOS::GENERIC-FUNCTION-P)
#Y(#:TOP-LEVEL-FORM-59-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   CLOS::STANDARD-GENERIC-FUNCTION)
#Y(#:TOP-LEVEL-FORM-60-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   CLOS::STANDARD-OBJECT SYSTEM::TYPE-SYMBOL #.#'CLOS::STD-INSTANCE-P)
#Y(#:TOP-LEVEL-FORM-60-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 CLOS::STANDARD-OBJECT CLOS::STD-INSTANCE-P)
#Y(#:TOP-LEVEL-FORM-60-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   CLOS::STANDARD-OBJECT)
#Y(#:TOP-LEVEL-FORM-61-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::STREAM SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::STREAMP)
#Y(#:TOP-LEVEL-FORM-61-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::STREAM COMMON-LISP::STREAMP)
#Y(#:TOP-LEVEL-FORM-61-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::STREAM)
#Y(#:TOP-LEVEL-FORM-62-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::FILE-STREAM SYSTEM::TYPE-SYMBOL #.#'SYSTEM::FILE-STREAM-P)
#Y(#:TOP-LEVEL-FORM-62-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::FILE-STREAM SYSTEM::FILE-STREAM-P)
#Y(#:TOP-LEVEL-FORM-62-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::FILE-STREAM)
#Y(#:TOP-LEVEL-FORM-63-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::SYNONYM-STREAM SYSTEM::TYPE-SYMBOL
   #.#'SYSTEM::SYNONYM-STREAM-P)
#Y(#:TOP-LEVEL-FORM-63-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::SYNONYM-STREAM SYSTEM::SYNONYM-STREAM-P)
#Y(#:TOP-LEVEL-FORM-63-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SYNONYM-STREAM)
#Y(#:TOP-LEVEL-FORM-64-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::BROADCAST-STREAM SYSTEM::TYPE-SYMBOL
   #.#'SYSTEM::BROADCAST-STREAM-P)
#Y(#:TOP-LEVEL-FORM-64-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::BROADCAST-STREAM
   SYSTEM::BROADCAST-STREAM-P)
#Y(#:TOP-LEVEL-FORM-64-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::BROADCAST-STREAM)
#Y(#:TOP-LEVEL-FORM-65-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::CONCATENATED-STREAM SYSTEM::TYPE-SYMBOL
   #.#'SYSTEM::CONCATENATED-STREAM-P)
#Y(#:TOP-LEVEL-FORM-65-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::CONCATENATED-STREAM
   SYSTEM::CONCATENATED-STREAM-P)
#Y(#:TOP-LEVEL-FORM-65-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::CONCATENATED-STREAM)
#Y(#:TOP-LEVEL-FORM-66-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::TWO-WAY-STREAM SYSTEM::TYPE-SYMBOL
   #.#'SYSTEM::TWO-WAY-STREAM-P)
#Y(#:TOP-LEVEL-FORM-66-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::TWO-WAY-STREAM SYSTEM::TWO-WAY-STREAM-P)
#Y(#:TOP-LEVEL-FORM-66-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::TWO-WAY-STREAM)
#Y(#:TOP-LEVEL-FORM-67-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::ECHO-STREAM SYSTEM::TYPE-SYMBOL #.#'SYSTEM::ECHO-STREAM-P)
#Y(#:TOP-LEVEL-FORM-67-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::ECHO-STREAM SYSTEM::ECHO-STREAM-P)
#Y(#:TOP-LEVEL-FORM-67-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::ECHO-STREAM)
#Y(#:TOP-LEVEL-FORM-68-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::STRING-STREAM SYSTEM::TYPE-SYMBOL #.#'SYSTEM::STRING-STREAM-P)
#Y(#:TOP-LEVEL-FORM-68-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::STRING-STREAM SYSTEM::STRING-STREAM-P)
#Y(#:TOP-LEVEL-FORM-68-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::STRING-STREAM)
#Y(#:TOP-LEVEL-FORM-69-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::STRING SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::STRINGP)
#Y(#:TOP-LEVEL-FORM-69-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::STRING COMMON-LISP::STRINGP)
#Y(#:TOP-LEVEL-FORM-69-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::STRING)
#Y(#:TOP-LEVEL-FORM-70-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01) EXT::STRING-CHAR
   SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::CHARACTERP)
#Y(#:TOP-LEVEL-FORM-70-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 EXT::STRING-CHAR COMMON-LISP::CHARACTERP)
#Y(#:TOP-LEVEL-FORM-70-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   EXT::STRING-CHAR)
#Y(#:TOP-LEVEL-FORM-71-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::STRUCTURE-OBJECT SYSTEM::TYPE-SYMBOL
   #.#'CLOS::STRUCTURE-OBJECT-P)
#Y(#:TOP-LEVEL-FORM-71-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::STRUCTURE-OBJECT
   CLOS::STRUCTURE-OBJECT-P)
#Y(#:TOP-LEVEL-FORM-71-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::STRUCTURE-OBJECT)
#Y(#:TOP-LEVEL-FORM-72-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::SYMBOL SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::SYMBOLP)
#Y(#:TOP-LEVEL-FORM-72-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::SYMBOL COMMON-LISP::SYMBOLP)
#Y(#:TOP-LEVEL-FORM-72-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SYMBOL)
#Y(#:TOP-LEVEL-FORM-73-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA 64 DB AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-SYMBOL-T #13Y(00 00 00 00 01 00 00 00 00 02 02 19 02))
   SYSTEM::TYPE-SYMBOL)
#Y(#:TOP-LEVEL-FORM-73-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 64 C6 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST2
   ((SYSTEM::X) (COMMON-LISP::DECLARE (COMMON-LISP::IGNORE SYSTEM::X))
    COMMON-LISP::T))
#Y(#:TOP-LEVEL-FORM-73-3 #13Y(00 00 00 00 00 00 00 00 00 01 02 19 01))
#Y(#:TOP-LEVEL-FORM-74-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-SYMBOL-FOREIGN-FUNCTION
      #17Y(00 00 00 00 01 00 00 00 00 02 AD 72 25 C5 5A 19 02)
      FFI::FOREIGN-FUNCTION)
   FFI::FOREIGN-FUNCTION SYSTEM::TYPE-SYMBOL)
#Y(#:TOP-LEVEL-FORM-74-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST2 FFI::FOREIGN-FUNCTION
   ((SYSTEM::X)
    (COMMON-LISP::EQ 'FFI::FOREIGN-FUNCTION (COMMON-LISP::TYPE-OF SYSTEM::X))))
#Y(#:TOP-LEVEL-FORM-74-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   FFI::FOREIGN-FUNCTION)
#Y(#:TOP-LEVEL-FORM-75-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-SYMBOL-FOREIGN-VARIABLE
      #17Y(00 00 00 00 01 00 00 00 00 02 AD 72 25 C5 5A 19 02)
      FFI::FOREIGN-VARIABLE)
   FFI::FOREIGN-VARIABLE SYSTEM::TYPE-SYMBOL)
#Y(#:TOP-LEVEL-FORM-75-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST2 FFI::FOREIGN-VARIABLE
   ((SYSTEM::X)
    (COMMON-LISP::EQ 'FFI::FOREIGN-VARIABLE (COMMON-LISP::TYPE-OF SYSTEM::X))))
#Y(#:TOP-LEVEL-FORM-75-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   FFI::FOREIGN-VARIABLE)
#Y(#:TOP-LEVEL-FORM-76-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-SYMBOL-FOREIGN-ADDRESS
      #17Y(00 00 00 00 01 00 00 00 00 02 AD 72 25 C5 5A 19 02)
      FFI::FOREIGN-ADDRESS)
   FFI::FOREIGN-ADDRESS SYSTEM::TYPE-SYMBOL)
#Y(#:TOP-LEVEL-FORM-76-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST2 FFI::FOREIGN-ADDRESS
   ((SYSTEM::X)
    (COMMON-LISP::EQ 'FFI::FOREIGN-ADDRESS (COMMON-LISP::TYPE-OF SYSTEM::X))))
#Y(#:TOP-LEVEL-FORM-76-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   FFI::FOREIGN-ADDRESS)
#Y(#:TOP-LEVEL-FORM-77-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-SYMBOL-FOREIGN-POINTER
      #17Y(00 00 00 00 01 00 00 00 00 02 AD 72 25 C5 5A 19 02)
      EXT::FOREIGN-POINTER)
   EXT::FOREIGN-POINTER SYSTEM::TYPE-SYMBOL)
#Y(#:TOP-LEVEL-FORM-77-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST2 EXT::FOREIGN-POINTER
   ((SYSTEM::X)
    (COMMON-LISP::EQ 'EXT::FOREIGN-POINTER (COMMON-LISP::TYPE-OF SYSTEM::X))))
#Y(#:TOP-LEVEL-FORM-77-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   EXT::FOREIGN-POINTER)
#Y(#:TOP-LEVEL-FORM-78-1
   #18Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 3E 19 01)
   COMMON-LISP::VECTOR SYSTEM::TYPE-SYMBOL #.#'COMMON-LISP::VECTORP)
#Y(#:TOP-LEVEL-FORM-78-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST1 COMMON-LISP::VECTOR COMMON-LISP::VECTORP)
#Y(#:TOP-LEVEL-FORM-78-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::VECTOR)
#Y(#:TOP-LEVEL-FORM-79
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::C-TYPEP-ARRAY SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::C-TYPEP-ARRAY
      #129Y(00 00 00 00 04 00 00 00 00 05 DA B1 AF 7B 02 B1 24 01 27 DC DD B1
            7B 02 DE B4 6F 05 7B 02 7B 03 61 01 14 B1 24 01 16 B1 8E 06 15 E0
            B2 72 45 E1 B3 7B 02 7B 03 E2 63 B4 1B 34 00 1B 65 00 1B 39 E0 B2
            E1 B3 7B 02 7B 03 61 01 1B 2D 00 1B 14 94 00 AC 24 01 77 E0 DE AE
            7B 02 E3 B8 B3 7B 03 7B 03 61 01 14 85 04 AF 80 A0 02 16 01 83 00
            9D 21 5E 16 01 AC 31 A2 16 02 5D 14 33 02 23 62 02 19 05)
      COMMON-LISP::AND COMMON-LISP::* COMMON-LISP::EQUAL
      COMMON-LISP::ARRAY-ELEMENT-TYPE COMMON-LISP::QUOTE
      COMMON-LISP::UPGRADED-ARRAY-ELEMENT-TYPE COMMON-LISP::EQL
      COMMON-LISP::ARRAY-RANK 0. COMMON-LISP::ARRAY-DIMENSION))
#Y(#:TOP-LEVEL-FORM-80
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::C-TYPEP-VECTOR SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::C-TYPEP-VECTOR
      #40Y(00 00 00 00 03 00 00 00 00 04 DA B0 AF 7B 02 B0 24 01 12 DC DD B1 C9
           7C 02 DF B3 7B 02 7B 03 61 01 62 02 19 04 00 1B 79)
      COMMON-LISP::AND COMMON-LISP::* COMMON-LISP::EQL
      COMMON-LISP::ARRAY-DIMENSION (0.) COMMON-LISP::QUOTE))
#Y(#:TOP-LEVEL-FORM-81
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::TYPEP-NUMBER-TEST SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::TYPEP-NUMBER-TEST
      #129Y(00 00 00 00 05 00 00 00 00 06 AE B2 36 01 1F 80 6E B0 24 00 20 AE
            B1 36 01 1C 80 40 A1 20 80 45 A1 5C 1C 80 40 AE 94 05 36 01 1D 39
            94 04 B2 33 01 30 1F 80 4A AF C5 5A 1E 80 44 AE B0 36 01 1C 2F A0
            20 0B A0 5C 1C 07 AE 94 04 36 01 1C 28 DB DF 6F 03 DE B0 B1 B2 A6
            14 33 05 1F B0 B2 33 01 32 1F 1C 1B 50 DB DC 6F 03 DE B0 B1 B2 A7
            1B 68 AF B2 33 01 33 19 06 94 03 B2 33 01 31 19 06 19 06)
      COMMON-LISP::* COMMON-LISP::ERROR
      "~S: argument to ~S must be *, ~S or a list of ~S: ~S" SYSTEM::TEXT
      COMMON-LISP::TYPEP
      "~S: argument to ~S must be *, ~S or a list of ~S: ~S"))
#Y(#:TOP-LEVEL-FORM-82
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::C-TYPEP-NUMBER SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::C-TYPEP-NUMBER
      #136Y(00 00 00 00 05 00 00 00 00 06 DA B1 AF 7B 02 B1 24 01 80 47 B2 B2
            36 01 1C 80 43 A2 20 80 43 A2 5C 1C 3F B2 94 06 36 01 1D 38 DD A3
            5B 14 B1 7B 03 61 01 14 B1 24 01 38 B3 B2 36 01 1C 35 A2 20 0B A2
            5C 1C 07 B3 94 06 36 01 1C 2B E5 6F 05 E0 B6 B7 B8 B6 2D 06 07 CD
            14 00 52 00 1B 55 DC A3 1B 4B DE 6F 05 E0 B5 B6 B7 B6 2D 06 07 CD
            1B 68 00 1B 0D E3 A3 1B 03 E4 A3 5B 14 B2 7B 03 61 01 14 33 02 23
            62 02 19 06)
      COMMON-LISP::AND COMMON-LISP::* COMMON-LISP::<= COMMON-LISP::<
      "~S: argument to ~S must be *, ~S or a list of ~S: ~S" SYSTEM::TEXT
      COMMON-LISP::TYPEP SYSTEM::C-WARN SYSTEM::C-TYPEP COMMON-LISP::>=
      COMMON-LISP::> "~S: argument to ~S must be *, ~S or a list of ~S: ~S"))
#Y(#:TOP-LEVEL-FORM-83-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-ARRAY
      #78Y(00 00 00 00 01 00 02 00 00 0D 3B 02 02 C5 FA 3B 01 02 C5 F9 AF 32 1E
           1F 33 AE 24 00 0A AF 71 05 AF 6F 01 32 00 1F 25 AD C5 5A 1E 20 AD 8E
           06 14 AD 72 45 B0 71 06 31 FF 1F 12 DC AE B1 71 08 33 01 29 19 04 AD
           B0 71 06 31 FF 19 04 19 04)
      COMMON-LISP::* COMMON-LISP::UPGRADED-ARRAY-ELEMENT-TYPE
      #Y(SYSTEM::TYPE-LIST-ARRAY-1
         #23Y(00 00 00 00 02 00 00 00 00 03 AE C5 5A 1E 06 AE AE 31 FF 19 03 19
              03)
         COMMON-LISP::*))
   COMMON-LISP::ARRAY SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-83-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::ARRAY
   #Y(#:TOP-LEVEL-FORM-83-2-1
      #29Y(00 00 00 00 01 00 02 00 01 00 3B 03 02 C5 FB 3B 02 02 C5 FA DB B0 B0
           B3 2D 04 02 19 05)
      COMMON-LISP::* COMMON-LISP::ARRAYP SYSTEM::C-TYPEP-ARRAY))
#Y(#:TOP-LEVEL-FORM-83-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::ARRAY)
#Y(#:TOP-LEVEL-FORM-84-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-SIMPLE-ARRAY
      #78Y(00 00 00 00 01 00 02 00 00 0D 3B 02 02 C5 FA 3B 01 02 C5 F9 AF 32 1F
           1F 33 AE 24 00 0A AF 71 05 AF 6F 01 32 00 1F 25 AD C5 5A 1E 20 AD 8E
           06 14 AD 72 45 B0 71 06 31 FF 1F 12 DC AE B1 71 08 33 01 29 19 04 AD
           B0 71 06 31 FF 19 04 19 04)
      COMMON-LISP::* COMMON-LISP::UPGRADED-ARRAY-ELEMENT-TYPE
      #Y(SYSTEM::TYPE-LIST-SIMPLE-ARRAY-1
         #23Y(00 00 00 00 02 00 00 00 00 03 AE C5 5A 1E 06 AE AE 31 FF 19 03 19
              03)
         COMMON-LISP::*))
   COMMON-LISP::SIMPLE-ARRAY SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-84-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::SIMPLE-ARRAY
   #Y(#:TOP-LEVEL-FORM-84-2-1
      #29Y(00 00 00 00 01 00 02 00 01 00 3B 03 02 C5 FB 3B 02 02 C5 FA DB B0 B0
           B3 2D 04 02 19 05)
      COMMON-LISP::* SYSTEM::SIMPLE-ARRAY-P SYSTEM::C-TYPEP-ARRAY))
#Y(#:TOP-LEVEL-FORM-84-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SIMPLE-ARRAY)
#Y(#:TOP-LEVEL-FORM-85-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-VECTOR
      #55Y(00 00 00 00 01 00 02 00 00 0D 3B 02 02 C5 FA 3B 01 02 C5 F9 AF 32 21
           1F 1C AE 24 00 0A AF 71 05 AF 6F 01 32 00 1F 0E AD C5 5A 1E 09 AF DC
           71 07 AE 31 FF 19 04 19 04)
      COMMON-LISP::* COMMON-LISP::UPGRADED-ARRAY-ELEMENT-TYPE 0.)
   COMMON-LISP::VECTOR SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-85-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::VECTOR
   #Y(#:TOP-LEVEL-FORM-85-2-1
      #77Y(00 00 00 00 01 00 02 00 01 00 3B 03 02 C5 FB 3B 02 02 C5 FA DB DC B2
           7B 02 B1 24 00 2A DD DE B4 7B 02 DF B4 6F 06 7B 02 7B 03 61 01 14 B1
           24 00 19 E1 E2 B5 CE 7C 02 DF B4 7B 02 7B 03 61 01 14 33 02 23 62 02
           19 05 00 1B 62 00 1B 72)
      COMMON-LISP::* COMMON-LISP::AND COMMON-LISP::VECTORP COMMON-LISP::EQUAL
      COMMON-LISP::ARRAY-ELEMENT-TYPE COMMON-LISP::QUOTE
      COMMON-LISP::UPGRADED-ARRAY-ELEMENT-TYPE COMMON-LISP::EQL
      COMMON-LISP::ARRAY-DIMENSION (0.)))
#Y(#:TOP-LEVEL-FORM-85-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::VECTOR)
#Y(#:TOP-LEVEL-FORM-86-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-SIMPLE-VECTOR
      #36Y(00 00 00 00 01 00 01 00 00 08 3B 01 02 C5 F9 AE 32 22 1F 0E AD C5 5A
           1E 09 AD AF DB 71 07 31 FF 19 03 19 03)
      COMMON-LISP::* 0.)
   COMMON-LISP::SIMPLE-VECTOR SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-86-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::SIMPLE-VECTOR
   #Y(#:TOP-LEVEL-FORM-86-2-1
      #23Y(00 00 00 00 01 00 01 00 01 00 3B 02 02 C5 FA DB AF B1 2D 03 02 19
           04)
      COMMON-LISP::* COMMON-LISP::SIMPLE-VECTOR-P SYSTEM::C-TYPEP-VECTOR))
#Y(#:TOP-LEVEL-FORM-86-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SIMPLE-VECTOR)
#Y(#:TOP-LEVEL-FORM-87-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-COMPLEX
      #52Y(00 00 00 00 01 00 02 00 00 0D 3B 02 02 C5 FA 3B 01 02 9F F9 AF 32 13
           1F 19 AE 24 00 08 AF 72 C4 AF 30 01 1F 0D AD C5 5A 1E 08 AF 72 C5 AE
           30 01 19 04 19 04)
      COMMON-LISP::* COMMON-LISP::TYPEP)
   COMMON-LISP::COMPLEX SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-87-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::COMPLEX
   #Y(#:TOP-LEVEL-FORM-87-2-1
      #74Y(00 00 00 00 01 00 02 00 01 00 3B 03 02 C5 FB 3B 02 02 A0 FA DB DC B2
           7B 02 B1 24 00 27 DD DE B4 7B 02 DF B4 7B 02 7B 03 61 01 14 B1 24 00
           18 DD E0 B5 7B 02 DF B4 7B 02 7B 03 61 01 14 33 02 23 62 02 19 05 00
           1B 63 00 1B 72)
      COMMON-LISP::* COMMON-LISP::AND COMMON-LISP::COMPLEXP COMMON-LISP::TYPEP
      COMMON-LISP::REALPART COMMON-LISP::QUOTE COMMON-LISP::IMAGPART))
#Y(#:TOP-LEVEL-FORM-87-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::COMPLEX)
#Y(#:TOP-LEVEL-FORM-88-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-INTEGER
      #30Y(00 00 00 00 01 00 02 00 00 0D 3B 02 02 C5 FA 3B 01 02 C5 F9 AF AF AF
           DB DC 2D 05 03 19 04)
      COMMON-LISP::* #.#'COMMON-LISP::INTEGERP COMMON-LISP::INTEGER
      SYSTEM::TYPEP-NUMBER-TEST)
   COMMON-LISP::INTEGER SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-88-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::INTEGER
   #Y(#:TOP-LEVEL-FORM-88-2-1
      #30Y(00 00 00 00 01 00 02 00 01 00 3B 03 02 C5 FB 3B 02 02 C5 FA DB DC B1
           B1 B4 2D 05 03 19 05)
      COMMON-LISP::* COMMON-LISP::INTEGER COMMON-LISP::INTEGERP
      SYSTEM::C-TYPEP-NUMBER))
#Y(#:TOP-LEVEL-FORM-88-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::INTEGER)
#Y(#:TOP-LEVEL-FORM-89-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-MOD
      #44Y(00 00 00 00 02 00 00 00 00 03 AD 8F 0A 13 AE 32 0A 1F 17 DE AF 33 01
           32 1F 10 AE AE 33 01 30 19 03 DA DB 6F 02 DD B0 33 02 1F 19 03)
      COMMON-LISP::ERROR "~S: argument to MOD must be an integer: ~S"
      SYSTEM::TEXT COMMON-LISP::TYPEP 0.)
   COMMON-LISP::MOD SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-89-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::MOD
   #Y(#:TOP-LEVEL-FORM-89-2-1
      #46Y(00 00 00 00 02 00 00 00 01 18 AE 8F 0A 15 DF E0 B1 7B 02 E1 E2 B3 7B
           02 7B 02 E3 B3 B3 7B 03 61 04 19 04 DA 6F 01 DC B0 2D 03 03 DE 00
           52)
      "~S: argument to MOD must be an integer: ~S" SYSTEM::TEXT
      COMMON-LISP::TYPEP SYSTEM::C-WARN SYSTEM::C-TYPEP COMMON-LISP::AND
      COMMON-LISP::INTEGERP COMMON-LISP::NOT COMMON-LISP::MINUSP
      COMMON-LISP::<))
#Y(#:TOP-LEVEL-FORM-89-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::MOD)
#Y(#:TOP-LEVEL-FORM-90-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-SIGNED-BYTE
      #53Y(00 00 00 00 01 00 01 00 00 08 3B 01 02 C5 F9 AD 24 00 04 AD 8F 0A 13
           AE 32 0A 1F 17 AD C5 5A 1E 12 AE 72 D2 AE 33 01 30 19 03 DB DC 6F 03
           DE B0 33 02 1F 19 03)
      COMMON-LISP::* COMMON-LISP::ERROR
      "~S: argument to SIGNED-BYTE must be an integer or * : ~S" SYSTEM::TEXT
      COMMON-LISP::TYPEP)
   COMMON-LISP::SIGNED-BYTE SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-90-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::SIGNED-BYTE
   #Y(#:TOP-LEVEL-FORM-90-2-1
      #60Y(00 00 00 00 01 00 01 00 01 00 3B 02 02 C5 FA AE 24 00 04 AE 8F 0A 17
           E0 E1 B1 7B 02 B0 24 00 19 E2 E3 B3 7B 02 B2 7B 03 61 01 62 02 19 04
           DB 6F 02 DD B0 2D 03 04 DF 00 52 00 1B 6E)
      COMMON-LISP::* "~S: argument to SIGNED-BYTE must be an integer or * : ~S"
      SYSTEM::TEXT COMMON-LISP::TYPEP SYSTEM::C-WARN SYSTEM::C-TYPEP
      COMMON-LISP::AND COMMON-LISP::INTEGERP COMMON-LISP::<
      COMMON-LISP::INTEGER-LENGTH))
#Y(#:TOP-LEVEL-FORM-90-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SIGNED-BYTE)
#Y(#:TOP-LEVEL-FORM-91-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-UNSIGNED-BYTE
      #59Y(00 00 00 00 01 00 01 00 00 08 3B 01 02 C5 F9 AD 24 00 04 AD 8F 0A 19
           AE 32 0A 1F 1D AE 32 92 59 1F 17 AD C5 5A 1E 12 AE 72 D2 AE 33 01 32
           19 03 DB DC 6F 03 DE B0 33 02 1F 19 03)
      COMMON-LISP::* COMMON-LISP::ERROR
      "~S: argument to UNSIGNED-BYTE must be an integer or * : ~S" SYSTEM::TEXT
      COMMON-LISP::TYPEP)
   COMMON-LISP::UNSIGNED-BYTE SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-91-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::UNSIGNED-BYTE
   #Y(#:TOP-LEVEL-FORM-91-2-1
      #67Y(00 00 00 00 01 00 01 00 01 00 3B 02 02 C5 FA AE 24 00 04 AE 8F 0A 1E
           E0 E1 B1 7B 02 E2 E3 B3 7B 02 7B 02 B1 24 00 19 E4 E5 B4 7B 02 B3 7B
           03 61 01 62 03 19 04 DB 6F 02 DD B0 2D 03 04 DF 00 52 00 1B 6E)
      COMMON-LISP::*
      "~S: argument to UNSIGNED-BYTE must be an integer or * : ~S" SYSTEM::TEXT
      COMMON-LISP::TYPEP SYSTEM::C-WARN SYSTEM::C-TYPEP COMMON-LISP::AND
      COMMON-LISP::INTEGERP COMMON-LISP::NOT COMMON-LISP::MINUSP
      COMMON-LISP::<= COMMON-LISP::INTEGER-LENGTH))
#Y(#:TOP-LEVEL-FORM-91-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::UNSIGNED-BYTE)
#Y(#:TOP-LEVEL-FORM-92-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-REAL
      #30Y(00 00 00 00 01 00 02 00 00 0D 3B 02 02 C5 FA 3B 01 02 C5 F9 AF AF AF
           DB DC 2D 05 03 19 04)
      COMMON-LISP::* #.#'COMMON-LISP::REALP COMMON-LISP::REAL
      SYSTEM::TYPEP-NUMBER-TEST)
   COMMON-LISP::REAL SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-92-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::REAL
   #Y(#:TOP-LEVEL-FORM-92-2-1
      #30Y(00 00 00 00 01 00 02 00 01 00 3B 03 02 C5 FB 3B 02 02 C5 FA DB DC B1
           B1 B4 2D 05 03 19 05)
      COMMON-LISP::* COMMON-LISP::REAL COMMON-LISP::REALP
      SYSTEM::C-TYPEP-NUMBER))
#Y(#:TOP-LEVEL-FORM-92-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::REAL)
#Y(#:TOP-LEVEL-FORM-93-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-RATIONAL
      #30Y(00 00 00 00 01 00 02 00 00 0D 3B 02 02 C5 FA 3B 01 02 C5 F9 AF AF AF
           DB DC 2D 05 03 19 04)
      COMMON-LISP::* #.#'COMMON-LISP::RATIONALP COMMON-LISP::RATIONAL
      SYSTEM::TYPEP-NUMBER-TEST)
   COMMON-LISP::RATIONAL SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-93-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::RATIONAL
   #Y(#:TOP-LEVEL-FORM-93-2-1
      #30Y(00 00 00 00 01 00 02 00 01 00 3B 03 02 C5 FB 3B 02 02 C5 FA DB DC B1
           B1 B4 2D 05 03 19 05)
      COMMON-LISP::* COMMON-LISP::RATIONAL COMMON-LISP::RATIONALP
      SYSTEM::C-TYPEP-NUMBER))
#Y(#:TOP-LEVEL-FORM-93-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::RATIONAL)
#Y(#:TOP-LEVEL-FORM-94-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-FLOAT
      #30Y(00 00 00 00 01 00 02 00 00 0D 3B 02 02 C5 FA 3B 01 02 C5 F9 AF AF AF
           DB DC 2D 05 03 19 04)
      COMMON-LISP::* #.#'COMMON-LISP::FLOATP COMMON-LISP::FLOAT
      SYSTEM::TYPEP-NUMBER-TEST)
   COMMON-LISP::FLOAT SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-94-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::FLOAT
   #Y(#:TOP-LEVEL-FORM-94-2-1
      #30Y(00 00 00 00 01 00 02 00 01 00 3B 03 02 C5 FB 3B 02 02 C5 FA DB DC B1
           B1 B4 2D 05 03 19 05)
      COMMON-LISP::* COMMON-LISP::FLOAT COMMON-LISP::FLOATP
      SYSTEM::C-TYPEP-NUMBER))
#Y(#:TOP-LEVEL-FORM-94-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::FLOAT)
#Y(#:TOP-LEVEL-FORM-95-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-SHORT-FLOAT
      #30Y(00 00 00 00 01 00 02 00 00 0D 3B 02 02 C5 FA 3B 01 02 C5 F9 AF AF AF
           DB DC 2D 05 03 19 04)
      COMMON-LISP::* #.#'SYSTEM::SHORT-FLOAT-P COMMON-LISP::SHORT-FLOAT
      SYSTEM::TYPEP-NUMBER-TEST)
   COMMON-LISP::SHORT-FLOAT SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-95-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::SHORT-FLOAT
   #Y(#:TOP-LEVEL-FORM-95-2-1
      #30Y(00 00 00 00 01 00 02 00 01 00 3B 03 02 C5 FB 3B 02 02 C5 FA DB DC B1
           B1 B4 2D 05 03 19 05)
      COMMON-LISP::* COMMON-LISP::SHORT-FLOAT SYSTEM::SHORT-FLOAT-P
      SYSTEM::C-TYPEP-NUMBER))
#Y(#:TOP-LEVEL-FORM-95-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SHORT-FLOAT)
#Y(#:TOP-LEVEL-FORM-96-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-SINGLE-FLOAT
      #30Y(00 00 00 00 01 00 02 00 00 0D 3B 02 02 C5 FA 3B 01 02 C5 F9 AF AF AF
           DB DC 2D 05 03 19 04)
      COMMON-LISP::* #.#'SYSTEM::SINGLE-FLOAT-P COMMON-LISP::SINGLE-FLOAT
      SYSTEM::TYPEP-NUMBER-TEST)
   COMMON-LISP::SINGLE-FLOAT SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-96-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::SINGLE-FLOAT
   #Y(#:TOP-LEVEL-FORM-96-2-1
      #30Y(00 00 00 00 01 00 02 00 01 00 3B 03 02 C5 FB 3B 02 02 C5 FA DB DC B1
           B1 B4 2D 05 03 19 05)
      COMMON-LISP::* COMMON-LISP::SINGLE-FLOAT SYSTEM::SINGLE-FLOAT-P
      SYSTEM::C-TYPEP-NUMBER))
#Y(#:TOP-LEVEL-FORM-96-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SINGLE-FLOAT)
#Y(#:TOP-LEVEL-FORM-97-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-DOUBLE-FLOAT
      #30Y(00 00 00 00 01 00 02 00 00 0D 3B 02 02 C5 FA 3B 01 02 C5 F9 AF AF AF
           DB DC 2D 05 03 19 04)
      COMMON-LISP::* #.#'SYSTEM::DOUBLE-FLOAT-P COMMON-LISP::DOUBLE-FLOAT
      SYSTEM::TYPEP-NUMBER-TEST)
   COMMON-LISP::DOUBLE-FLOAT SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-97-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::DOUBLE-FLOAT
   #Y(#:TOP-LEVEL-FORM-97-2-1
      #30Y(00 00 00 00 01 00 02 00 01 00 3B 03 02 C5 FB 3B 02 02 C5 FA DB DC B1
           B1 B4 2D 05 03 19 05)
      COMMON-LISP::* COMMON-LISP::DOUBLE-FLOAT SYSTEM::DOUBLE-FLOAT-P
      SYSTEM::C-TYPEP-NUMBER))
#Y(#:TOP-LEVEL-FORM-97-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::DOUBLE-FLOAT)
#Y(#:TOP-LEVEL-FORM-98-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-LONG-FLOAT
      #30Y(00 00 00 00 01 00 02 00 00 0D 3B 02 02 C5 FA 3B 01 02 C5 F9 AF AF AF
           DB DC 2D 05 03 19 04)
      COMMON-LISP::* #.#'SYSTEM::LONG-FLOAT-P COMMON-LISP::LONG-FLOAT
      SYSTEM::TYPEP-NUMBER-TEST)
   COMMON-LISP::LONG-FLOAT SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-98-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::LONG-FLOAT
   #Y(#:TOP-LEVEL-FORM-98-2-1
      #30Y(00 00 00 00 01 00 02 00 01 00 3B 03 02 C5 FB 3B 02 02 C5 FA DB DC B1
           B1 B4 2D 05 03 19 05)
      COMMON-LISP::* COMMON-LISP::LONG-FLOAT SYSTEM::LONG-FLOAT-P
      SYSTEM::C-TYPEP-NUMBER))
#Y(#:TOP-LEVEL-FORM-98-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::LONG-FLOAT)
#Y(#:TOP-LEVEL-FORM-99-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-STRING
      #36Y(00 00 00 00 01 00 01 00 00 08 3B 01 02 C5 F9 AE 32 05 1F 0E AD C5 5A
           1E 09 AD AF DB 71 07 31 FF 19 03 19 03)
      COMMON-LISP::* 0.)
   COMMON-LISP::STRING SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-99-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::STRING
   #Y(#:TOP-LEVEL-FORM-99-2-1
      #23Y(00 00 00 00 01 00 01 00 01 00 3B 02 02 C5 FA DB AF B1 2D 03 02 19
           04)
      COMMON-LISP::* COMMON-LISP::STRINGP SYSTEM::C-TYPEP-VECTOR))
#Y(#:TOP-LEVEL-FORM-99-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::STRING)
#Y(#:TOP-LEVEL-FORM-100-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-SIMPLE-STRING
      #36Y(00 00 00 00 01 00 01 00 00 08 3B 01 02 C5 F9 AE 32 23 1F 0E AD C5 5A
           1E 09 AD AF DB 71 07 31 FF 19 03 19 03)
      COMMON-LISP::* 0.)
   COMMON-LISP::SIMPLE-STRING SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-100-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::SIMPLE-STRING
   #Y(#:TOP-LEVEL-FORM-100-2-1
      #23Y(00 00 00 00 01 00 01 00 01 00 3B 02 02 C5 FA DB AF B1 2D 03 02 19
           04)
      COMMON-LISP::* COMMON-LISP::SIMPLE-STRING-P SYSTEM::C-TYPEP-VECTOR))
#Y(#:TOP-LEVEL-FORM-100-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SIMPLE-STRING)
#Y(#:TOP-LEVEL-FORM-101-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-BASE-STRING
      #36Y(00 00 00 00 01 00 01 00 00 08 3B 01 02 C5 F9 AE 32 05 1F 0E AD C5 5A
           1E 09 AD AF DB 71 07 31 FF 19 03 19 03)
      COMMON-LISP::* 0.)
   COMMON-LISP::BASE-STRING SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-101-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::BASE-STRING
   #Y(#:TOP-LEVEL-FORM-101-2-1
      #23Y(00 00 00 00 01 00 01 00 01 00 3B 02 02 C5 FA DB AF B1 2D 03 02 19
           04)
      COMMON-LISP::* COMMON-LISP::STRINGP SYSTEM::C-TYPEP-VECTOR))
#Y(#:TOP-LEVEL-FORM-101-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::BASE-STRING)
#Y(#:TOP-LEVEL-FORM-102-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-SIMPLE-BASE-STRING
      #36Y(00 00 00 00 01 00 01 00 00 08 3B 01 02 C5 F9 AE 32 23 1F 0E AD C5 5A
           1E 09 AD AF DB 71 07 31 FF 19 03 19 03)
      COMMON-LISP::* 0.)
   COMMON-LISP::SIMPLE-BASE-STRING SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-102-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::SIMPLE-BASE-STRING
   #Y(#:TOP-LEVEL-FORM-102-2-1
      #23Y(00 00 00 00 01 00 01 00 01 00 3B 02 02 C5 FA DB AF B1 2D 03 02 19
           04)
      COMMON-LISP::* COMMON-LISP::SIMPLE-STRING-P SYSTEM::C-TYPEP-VECTOR))
#Y(#:TOP-LEVEL-FORM-102-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SIMPLE-BASE-STRING)
#Y(#:TOP-LEVEL-FORM-103-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-BIT-VECTOR
      #36Y(00 00 00 00 01 00 01 00 00 08 3B 01 02 C5 F9 AE 32 20 1F 0E AD C5 5A
           1E 09 AD AF DB 71 07 31 FF 19 03 19 03)
      COMMON-LISP::* 0.)
   COMMON-LISP::BIT-VECTOR SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-103-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::BIT-VECTOR
   #Y(#:TOP-LEVEL-FORM-103-2-1
      #23Y(00 00 00 00 01 00 01 00 01 00 3B 02 02 C5 FA DB AF B1 2D 03 02 19
           04)
      COMMON-LISP::* COMMON-LISP::BIT-VECTOR-P SYSTEM::C-TYPEP-VECTOR))
#Y(#:TOP-LEVEL-FORM-103-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::BIT-VECTOR)
#Y(#:TOP-LEVEL-FORM-104-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-SIMPLE-BIT-VECTOR
      #36Y(00 00 00 00 01 00 01 00 00 08 3B 01 02 C5 F9 AE 32 24 1F 0E AD C5 5A
           1E 09 AD AF DB 71 07 31 FF 19 03 19 03)
      COMMON-LISP::* 0.)
   COMMON-LISP::SIMPLE-BIT-VECTOR SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-104-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::SIMPLE-BIT-VECTOR
   #Y(#:TOP-LEVEL-FORM-104-2-1
      #23Y(00 00 00 00 01 00 01 00 01 00 3B 02 02 C5 FA DB AF B1 2D 03 02 19
           04)
      COMMON-LISP::* COMMON-LISP::SIMPLE-BIT-VECTOR-P SYSTEM::C-TYPEP-VECTOR))
#Y(#:TOP-LEVEL-FORM-104-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::SIMPLE-BIT-VECTOR)
#Y(#:TOP-LEVEL-FORM-105-1
   #21Y(00 00 00 00 00 00 00 00 00 01 DA DB DC AE 32 86 16 01 3E 19 01)
   #Y(SYSTEM::TYPE-LIST-CONS
      #50Y(00 00 00 00 01 00 02 00 00 0D 3B 02 02 C5 FA 3B 01 02 C5 F9 AF 32 02
           1F 17 AE 24 00 07 94 03 AF 30 01 1F 0C AD C5 5A 1E 07 95 03 AE 30 01
           19 04 19 04)
      COMMON-LISP::* COMMON-LISP::TYPEP)
   COMMON-LISP::CONS SYSTEM::TYPE-LIST)
#Y(#:TOP-LEVEL-FORM-105-2
   #25Y(00 00 00 00 00 00 00 00 00 01 6B 00 DB C7 7A 7B 01 33 02 24 0F 00 3E 19
        01)
   SYSTEM::C-TYPEP-ALIST3 COMMON-LISP::CONS
   #Y(#:TOP-LEVEL-FORM-105-2-1
      #74Y(00 00 00 00 01 00 02 00 01 00 3B 03 02 C5 FB 3B 02 02 C5 FA DB DC B2
           7B 02 B1 24 00 27 DD DE B4 7B 02 DF B4 7B 02 7B 03 61 01 14 B1 24 00
           18 DD E0 B5 7B 02 DF B4 7B 02 7B 03 61 01 14 33 02 23 62 02 19 05 00
           1B 63 00 1B 72)
      COMMON-LISP::* COMMON-LISP::AND COMMON-LISP::CONSP COMMON-LISP::TYPEP
      COMMON-LISP::CAR COMMON-LISP::QUOTE COMMON-LISP::CDR))
#Y(#:TOP-LEVEL-FORM-105-3 #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   COMMON-LISP::CONS)
#Y(#:TOP-LEVEL-FORM-106 #15Y(00 00 00 00 00 00 00 00 00 01 DA 31 53 19 01)
   SYSTEM::DEF-ATOMIC-TYPE)
#Y(#:TOP-LEVEL-FORM-107 #15Y(00 00 00 00 00 00 00 00 00 01 DA 31 53 19 01)
   SYSTEM::DEF-COMPOUND-TYPE)
#Y(#:TOP-LEVEL-FORM-108
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::SAFE-TYPEP SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::SAFE-TYPEP
      #29Y(02 00 01 00 02 00 00 00 00 03 47 00 0E AE 2C 01 01 10 02 B4 B4 30 03
           11 48 19 03 19 03)
      SYSTEM::SAFE-TYPEP
      #Y(SYSTEM::SAFE-TYPEP-1 #13Y(00 00 00 00 00 00 00 00 01 16 00 49 00)
         COMMON-LISP::NIL)
      CUSTOM::*ERROR-HANDLER* COMMON-LISP::TYPEP))
#Y(#:TOP-LEVEL-FORM-109
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::TYPE-FOR-DISCRIMINATION SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::TYPE-FOR-DISCRIMINATION
      #176Y(00 00 00 00 01 00 01 00 00 08 3D 01 63 AF 8E 04 0B A0 20 05 94 03
            8E 04 21 A0 19 04 AF DA 38 01 8E 82 76 AF DB 38 01 8E 82 6F AF DC
            38 01 81 82 00 1D 66 14 B0 61 01 1B 80 63 A0 5B 26 03 80 47 A0 5C
            78 AC A1 59 14 6C 41 AC AE 8C FF 80 5B DE AD 61 02 19 06 95 03 63
            AD 1B 0D 94 00 AC B3 6C FF A8 84 02 16 01 83 00 9D 21 70 16 01 AC
            80 A2 00 DF AE AE 90 01 29 32 94 05 9E 5D 19 06 00 19 04 92 02 7A
            CB 19 04 94 03 DB 38 01 8E 82 FF 89 94 03 DC 38 01 81 82 00 1D FF
            7E 14 A1 14 76 01 AC B0 6C FF 65 AC AE 8D FF 03 A2 19 06 15 19 05)
      SYSTEM::TYPE-SYMBOL SYSTEM::TYPE-LIST SYSTEM::DEFTYPE-EXPANDER
      #S(COMMON-LISP::HASH-TABLE COMMON-LISP::EQ (COMMON-LISP::FUNCTION . 67.)
         (COMMON-LISP::VALUES . 23.) (COMMON-LISP::COMPLEX . 23.)
         (COMMON-LISP::OR . 23.) (COMMON-LISP::AND . 23.)
         (COMMON-LISP::NOT . 2.) (COMMON-LISP::EQL . -37.)
         (COMMON-LISP::MEMBER . -37.) (COMMON-LISP::SATISFIES . -37.))
      COMMON-LISP::NOT #.#'COMMON-LISP::EQL COMMON-LISP::FUNCTION))
#Y(#:TOP-LEVEL-FORM-110
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::%THE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%THE
      #391Y(00 00 00 00 02 00 00 00 00 03 9E 20 05 94 01 24 00 15 AE 8F 02 02
            9F 5B 14 AC AF 30 03 1E 81 65 AC 72 25 C9 5A 19 04 AE 95 02 1B 21
            AC 72 25 C9 5A 16 01 1D 80 AC 1B 11 9E 20 80 A6 94 01 AC 94 02 8B
            03 68 16 01 1D 80 99 83 01 83 00 9D 20 09 94 00 DB DC 38 02 8D B2
            5F 9D 20 80 62 94 00 25 05 80 5C 1B 80 4B AC 72 25 C9 5A 16 01 1D
            80 72 1B 3D 9E 20 80 5A 1B 80 69 E1 CD 1B 1B 00 19 06 83 01 20 75
            AE 94 02 8A 03 06 AE 72 25 25 04 6D 83 01 16 01 1B 3A E1 CD 14 6F
            09 A3 1B 80 89 9E 20 0F 94 01 AC 94 02 8B 03 FF BB 16 01 1D 33 83
            01 83 00 9D 20 09 94 00 DB DC 38 02 8D B2 60 9D 20 FF AF 94 00 AC
            24 06 FF B6 AC 25 0A 48 16 01 9D 20 80 AE 94 00 25 0A 80 45 83 00
            AD 72 45 8F 93 03 00 19 05 63 1B 80 79 E1 E2 6F 09 A4 1B 38 AC 72
            25 C9 5A 16 01 1C 80 61 00 19 08 83 01 16 01 1B 80 7E AE 1B 10 00
            19 07 94 00 AE DC 38 02 8D B2 74 9D 5C 5C F8 9D 21 70 16 02 1B 80
            63 9D 20 80 5F E1 E2 6F 09 A2 14 33 01 1F 94 01 AC 8F 09 FF B6 AC
            72 45 25 0B FF AF 94 00 8F 04 FF A9 94 00 72 8A 6B 0C 71 D2 B0 AD
            38 01 72 83 AC A0 5C 78 8B 03 FF 9A 16 01 1D FF 9F AC 84 02 16 02
            83 01 9E 20 0A 94 01 DB DC 38 02 8D B2 FF BD 9E 20 06 94 01 24 0D
            FF 85 AE E8 38 01 8F 83 FF 84 16 01 02 19 05 19 04)
      COMMON-LISP::VALUES #.COMMON-LISP::LAMBDA-LIST-KEYWORDS
      #.#'COMMON-LISP::EQ COMMON-LISP::TYPEP SYSTEM::READ-LABEL
      COMMON-LISP::&OPTIONAL COMMON-LISP::&REST COMMON-LISP::ERROR
      "Invalid type specifier ~S" SYSTEM::TEXT COMMON-LISP::&KEY 2.
      SYSTEM::*KEYWORD-PACKAGE* COMMON-LISP::&ALLOW-OTHER-KEYS
      :ALLOW-OTHER-KEYS))
#Y(#:TOP-LEVEL-FORM-111
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::CANONICALIZE-TYPE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::CANONICALIZE-TYPE
      #655Y(00 00 00 00 01 00 00 00 00 02 AD 2F 00 F9 14 8E 04 1A 9E 20 06 94
            01 8E 04 80 66 AD 88 2D 82 29 AD 88 30 82 44 65 24 AE 30 25 19 02
            9E 26 01 80 41 C7 19 02 C8 19 02 C9 19 02 CA 19 02 CB 19 02 CC 19
            02 CD 19 02 CE 19 02 CF 19 02 D0 19 02 D1 19 02 D2 19 02 D3 19 02
            D4 19 02 D5 19 02 D6 19 02 C8 19 02 D7 19 02 D8 19 02 AD 7B 01 29
            01 03 FF 98 AD 6F 14 93 00 82 11 14 88 15 82 0C 15 19 02 9E 5B 26
            16 81 DF 9E 5C 1C 81 DA 03 17 19 02 F2 9F 5C 78 61 02 19 02 9D 1B
            80 8A 03 1D 19 03 03 20 19 03 9E 5C 1D 81 BD 99 19 95 02 73 00 17
            38 06 03 1A F9 72 53 9D 5C 1D 5D 94 02 25 1B 08 F6 AD F4 38 02 8C
            B2 54 94 02 25 1E 08 65 1F AD 38 03 8C B2 4B 63 AD 1B 1E 9D 5C 1B
            11 A0 19 04 94 00 9D 20 06 94 00 A3 5B 22 6E AC 61 01 14 AF 80 A0
            02 16 01 83 00 9D 21 66 16 01 AC 80 A2 00 38 06 03 1A F9 72 53 AC
            95 04 8E 00 50 94 03 9E 7A 29 01 05 FE F4 9E 5C 78 6C FE EE 9D 20
            22 94 00 25 21 1D 9D 5C 5B 19 03 03 1E 1B 0F 03 1B 1B 0B 94 00 AC
            24 1B 72 AC 24 1E 72 00 F8 61 01 19 03 9D 20 0D 94 00 65 22 38 03
            8D B2 04 9D 5C 1D 60 65 21 AD 61 02 19 03 9E 5C 78 AC 8F 0A 07 AC
            65 23 90 01 33 05 65 24 AF 30 25 EA 03 23 1B 80 B4 D5 19 03 9E 5C
            5B 1C 02 03 26 14 AC 24 26 71 AC 8F 0A 04 AC 8E 91 05 65 24 AF 30
            25 65 27 97 01 72 D0 EA AD 33 00 37 1B 80 A6 03 28 19 03 9E 5C 5B
            1C 02 03 26 14 AC 24 26 70 AC 8F 0A 07 AC 65 23 90 01 33 05 65 24
            AF 30 25 65 27 AD 72 D0 EA 03 23 1B 80 7B 9E 5C 5B 1C 02 03 26 14
            65 29 03 2A 1B 80 50 9E 5C 5B 1C 02 03 26 14 65 29 C8 1B 80 42 9E
            5C 5B 1C 02 03 26 14 65 29 03 2B 1B 34 9E 5C 5B 1C 02 03 26 14 65
            29 02 1B 27 9E 5C 5B 1C 02 03 26 14 65 2C 03 2A 1B 19 9E 5C 5B 1C
            02 03 26 14 65 2C C8 1B 0C 9E 5C 5B 1C 02 03 26 14 65 2C 03 2B 14
            AE 7B 01 61 03 19 03 9E 5C 5B 1C 02 03 26 14 9F 5C 5C 5B 1C 02 03
            26 14 65 2C 9F 14 AE 7B 01 61 03 19 04 AD 89 15 19 AD 6F 2E 65 2F
            38 01 72 82 9F 23 0D AD 6F 2E 29 01 03 FD A9 AD 2F 14 1E 27 9E 19
            02 AD 6F 31 9D 26 32 06 C8 19 03 C8 19 03 AC 8F 05 10 AC 65 33 38
            04 8C 34 71 AC 65 34 38 04 8C 34 69 9F 19 03 19 02)
      SYSTEM::EXPAND-DEFTYPE
      #S(COMMON-LISP::HASH-TABLE COMMON-LISP::EQ
         (COMMON-LISP::STRING-STREAM . 562.) (COMMON-LISP::ECHO-STREAM . 562.)
         (COMMON-LISP::TWO-WAY-STREAM . 562.)
         (COMMON-LISP::CONCATENATED-STREAM . 562.)
         (COMMON-LISP::BROADCAST-STREAM . 562.)
         (COMMON-LISP::SYNONYM-STREAM . 562.) (COMMON-LISP::FILE-STREAM . 562.)
         (COMMON-LISP::STREAM . 562.) (COMMON-LISP::LONG-FLOAT . 59.)
         (COMMON-LISP::DOUBLE-FLOAT . 59.) (COMMON-LISP::SINGLE-FLOAT . 59.)
         (COMMON-LISP::SHORT-FLOAT . 59.) (COMMON-LISP::FLOAT . 59.)
         (COMMON-LISP::RATIONAL . 59.) (COMMON-LISP::INTEGER . 59.)
         (COMMON-LISP::REAL . 59.) (COMMON-LISP::COMPLEX . 59.)
         (COMMON-LISP::SIMPLE-VECTOR . 59.) (COMMON-LISP::VECTOR . 59.)
         (COMMON-LISP::SIMPLE-BASE-STRING . 59.)
         (COMMON-LISP::BASE-STRING . 59.) (COMMON-LISP::SIMPLE-STRING . 59.)
         (COMMON-LISP::STRING . 59.) (COMMON-LISP::SIMPLE-BIT-VECTOR . 59.)
         (COMMON-LISP::BIT-VECTOR . 59.) (COMMON-LISP::SIMPLE-ARRAY . 59.)
         (COMMON-LISP::ARRAY . 59.) (COMMON-LISP::UNSIGNED-BYTE . 56.)
         (COMMON-LISP::T . 53.) (EXT::STRING-CHAR . 50.)
         (COMMON-LISP::STANDARD-CHAR . 47.) (COMMON-LISP::SIGNED-BYTE . 44.)
         (COMMON-LISP::SEQUENCE . 41.) (COMMON-LISP::RATIO . 38.)
         (COMMON-LISP::NUMBER . 35.) (COMMON-LISP::NULL . 32.)
         (COMMON-LISP::NIL . 29.) (COMMON-LISP::LIST . 26.)
         (COMMON-LISP::KEYWORD . 23.) (COMMON-LISP::FIXNUM . 20.)
         (COMMON-LISP::EXTENDED-CHAR . 17.) (COMMON-LISP::BOOLEAN . 14.)
         (COMMON-LISP::BIT . 11.) (COMMON-LISP::BIGNUM . 8.)
         (COMMON-LISP::BASE-CHAR . 5.) (COMMON-LISP::ATOM . 2.))
      (COMMON-LISP::NOT COMMON-LISP::CONS) COMMON-LISP::CHARACTER
      (COMMON-LISP::AND COMMON-LISP::INTEGER
       (COMMON-LISP::NOT COMMON-LISP::FIXNUM))
      (COMMON-LISP::INTEGER 0. 1.)
      (COMMON-LISP::MEMBER COMMON-LISP::NIL COMMON-LISP::T) (COMMON-LISP::OR)
      (COMMON-LISP::INTEGER #.COMMON-LISP::MOST-NEGATIVE-FIXNUM
       #.COMMON-LISP::MOST-POSITIVE-FIXNUM)
      (COMMON-LISP::AND COMMON-LISP::SYMBOL
       (COMMON-LISP::SATISFIES COMMON-LISP::KEYWORDP))
      (COMMON-LISP::OR COMMON-LISP::CONS
       (COMMON-LISP::MEMBER COMMON-LISP::NIL))
      (COMMON-LISP::OR) (COMMON-LISP::MEMBER COMMON-LISP::NIL)
      (COMMON-LISP::OR COMMON-LISP::REAL COMMON-LISP::COMPLEX)
      (COMMON-LISP::AND COMMON-LISP::RATIONAL
       (COMMON-LISP::NOT COMMON-LISP::INTEGER))
      (COMMON-LISP::OR COMMON-LISP::LIST COMMON-LISP::VECTOR)
      COMMON-LISP::INTEGER
      (COMMON-LISP::AND COMMON-LISP::CHARACTER
       (COMMON-LISP::SATISFIES COMMON-LISP::STANDARD-CHAR-P))
      (COMMON-LISP::AND) (COMMON-LISP::INTEGER 0. COMMON-LISP::*)
      SYSTEM::CLOS-CLASS CLOS::BUILT-IN-CLASS-P
      #S(COMMON-LISP::HASH-TABLE COMMON-LISP::EQ (COMMON-LISP::VECTOR . 424.)
         (COMMON-LISP::BASE-STRING . 404.) (COMMON-LISP::STRING . 391.)
         (COMMON-LISP::BIT-VECTOR . 377.) (COMMON-LISP::SIMPLE-VECTOR . 364.)
         (COMMON-LISP::SIMPLE-BASE-STRING . 350.)
         (COMMON-LISP::SIMPLE-STRING . 336.)
         (COMMON-LISP::SIMPLE-BIT-VECTOR . 321.)
         (COMMON-LISP::UNSIGNED-BYTE . 282.) (COMMON-LISP::SIGNED-BYTE . 239.)
         (COMMON-LISP::MOD . 211.) (COMMON-LISP::NOT . 145.)
         (COMMON-LISP::OR . 31.) (COMMON-LISP::AND . 31.)
         (COMMON-LISP::EQL . 11.) (COMMON-LISP::MEMBER . 2.))
      (COMMON-LISP::OR) COMMON-LISP::MEMBER SYSTEM::CANONICALIZE-TYPE
      #.#'COMMON-LISP::EQUAL COMMON-LISP::AND (COMMON-LISP::OR)
      (COMMON-LISP::OR) COMMON-LISP::OR (COMMON-LISP::AND) (COMMON-LISP::AND)
      COMMON-LISP::NOT (COMMON-LISP::AND COMMON-LISP::OR) 0.
      COMMON-LISP::SUBTYPEP SYSTEM::TYPESPEC-ERROR COMMON-LISP::* 1.
      (COMMON-LISP::INTEGER 0. COMMON-LISP::*) COMMON-LISP::SIMPLE-ARRAY
      COMMON-LISP::BIT COMMON-LISP::BASE-CHAR COMMON-LISP::ARRAY CLOS::CLASS-P
      CLOS::CLASS-NAME CLOS::CLOSCLASS SYSTEM::ENCODINGP
      SYSTEM::ENCODING-CHARSET
      #S(COMMON-LISP::HASH-TABLE COMMON-LISP::EQ (CHARSET::JAVA . 1.)
         (CHARSET::UTF-8 . 1.) (CHARSET::UNICODE-32-LITTLE-ENDIAN . 1.)
         (CHARSET::UNICODE-32-BIG-ENDIAN . 1.)
         (CHARSET::UNICODE-16-LITTLE-ENDIAN . 1.)
         (CHARSET::UNICODE-16-BIG-ENDIAN . 1.))
      "UTF-16" "UTF-7"))
#Y(#:TOP-LEVEL-FORM-112
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::SUBTYPEP SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::SUBTYPEP
      #1417Y(00 00 00 00 02 00 00 00 00 03 AE 2F 00 FA AD 2F 00 F9 DB AF 8E 00
             80 5E 64 AE 8E 00 80 58 DC AE 8E 00 80 56 AE AE 8E 00 80 54 9F 20
             18 94 02 24 03 80 4F 94 02 25 05 07 AE 72 45 24 06 80 6C 94 02 24
             07 80 7F 9E 20 80 E7 94 01 25 05 07 AD 72 45 24 06 85 2D 94 01 25
             08 80 CA 95 01 63 AD 8C 91 80 87 87 01 00 B0 AD 28 FF 9F 42 02 92
             01 80 72 63 9E 1B 83 EE 02 1B 84 FE 00 1B 84 FA 02 1B 84 F6 95 02
             63 1B 0E 00 1B 83 B6 87 01 00 14 B0 8B 04 74 83 01 AD 8D 91 72 02
             1B 83 A4 9F 5C 78 AE 28 FF 66 1D 84 DB 00 1B 84 CD 9E 20 6F 94 01
             25 05 6A AD 72 45 25 06 64 9E 5C 78 A0 5C 78 29 02 05 FF 46 95 02
             63 1B 12 87 01 00 14 B0 28 FF 39 42 02 93 01 FF 9A 16 02 83 01 AD
             8D 91 6A 02 1B 83 5E 16 02 83 01 1B FF 74 02 1B 83 53 02 1B 83 4F
             95 01 63 AD 8C 91 27 87 01 00 B0 AD 28 FF 09 1C 6B 83 01 1B 6E 95
             02 63 1B 10 02 1B 83 31 87 01 00 14 B0 28 FE F2 1C 72 83 01 AD 8D
             91 70 63 00 1B 83 1E 94 01 25 07 06 9E 5C 1C 44 7D 01 9F 20 05 94
             02 24 08 4F AE 8F 04 80 4B AE E3 38 01 8F 82 80 43 AD 8F 04 3F AD
             E3 38 01 8F 82 38 AE E3 38 01 72 82 CF 5F 14 AE E3 38 01 72 82 CF
             5F 14 1B 1B 02 1B 82 D9 02 1B 84 0C AE 89 0B 09 AD 89 0B 05 AE AE
             8A 0C 6F 00 1B 83 FB 83 01 AD 9E 22 61 9E 21 77 16 02 AE 88 0B 60
             AD 88 0B 5C 9F 21 04 AE 61 01 FA 9F 5B 26 0D 83 E0 9F 5C 5B 1B 80
             47 A0 5C 5C 5B 1B 80 48 02 1B 82 93 A0 5C 5B 1B 80 60 A1 5C 5C 5B
             1B 80 61 AE 72 45 AD 72 45 8D FF 80 8B EB AF AE 33 01 29 16 02 1B
             82 71 AC 8E 09 67 AE 32 45 1B 80 65 EC AD 33 00 29 16 02 1B 82 5D
             9F 5C 1C FF B4 D3 14 A0 5C 5C 1C FF B2 D3 14 AF 24 0F FF B2 AF A2
             5B 22 FF AC A0 20 80 53 94 03 24 0F 07 94 03 A2 5B 23 80 47 A0 5C
             1C FF 9B D3 14 A1 5C 5C 1C FF 99 D3 14 AD 24 0E 0F AF D3 5A 59 1D
             29 AF 6F 10 AE 6F 10 8F 00 20 AC D3 5A 1C 1B AE 8E 09 FF 96 AC 8E
             09 0A 9F 14 AD 31 FF 16 02 1B 81 F9 AE AD 72 45 8C FF FF 8A 16 02
             1B 81 EC 00 1B 81 E8 9F 5C 5B 1B 80 54 A0 5C 5C 5B 1B 80 55 02 1B
             81 D7 A0 5C 5B 1B 15 A1 5C 5C 5B 1B 16 AE AD 28 FD 90 16 02 1B 81
             C2 A0 5C 1C 67 D3 14 A1 5C 5C 1C 65 9D 14 AD 24 0E 0D AF D3 5A 59
             1D 12 AF AE 28 FD 6F 1D 0B AC D3 5A 1C 06 AE D3 5A 59 1C 4D 16 02
             1B 81 94 9F 5C 1C FF A7 D3 14 A0 5C 5C 1C FF A5 9D 14 AF 24 13 FF
             A5 AF 24 14 FF A0 A0 20 06 94 03 24 13 FF B0 00 1B 81 6E 94 02 A0
             5B 26 15 80 74 03 16 1B 80 70 03 17 1B 80 6B 03 18 1B 80 66 03 19
             1B 80 61 A0 5C 5B 1B 80 62 A1 5C 5C 5B 1B 80 63 B0 8F 06 80 74 85
             04 1B 80 6F AF 8F 06 80 77 86 03 1B 80 72 02 1B 81 EC 02 1B 81 E8
             A4 5C 5B 1B 80 9D A5 5C 5C 5B 1B 80 9E B3 AF 91 01 31 80 EF 1B 80
             D8 B2 AE 33 01 30 1B 80 E4 00 1B 81 C5 93 02 79 B3 8F 04 81 E7 B3
             F5 38 03 8C B2 81 DF 00 1B 81 B1 00 7A A0 5C 1C FF 99 D3 14 A1 5C
             5C 1C FF 97 D3 14 94 05 03 1A 5A 14 64 64 A1 20 80 09 87 04 04 92
             02 FF 89 7D 01 A0 20 80 09 87 03 03 92 02 FF 86 7D 00 B0 8F 06 1A
             AF 8F 06 16 B0 B0 90 01 30 80 0F B0 B0 91 01 2E FF 78 93 01 FF 74
             93 00 FF 70 B3 B2 38 03 8C B2 FF 6C A4 20 FF 8F 94 07 B2 38 03 8D
             B2 FF 86 A4 5C 1C FF 5E D3 14 A5 5C 5C 1C FF 5C D3 14 94 09 03 1A
             5A 14 9F 20 80 0E 87 02 02 93 00 80 09 AE 8F 06 80 02 85 02 7D 04
             9E 20 80 0E 87 01 01 93 00 80 09 AD 8F 06 80 02 86 01 7D 03 AE 24
             0E 80 10 B3 8F 06 80 1F 92 04 FF 25 B3 AF 91 01 33 80 14 AD D3 5A
             1C 80 0E B2 8F 06 80 09 92 03 FF 19 B2 AE 33 01 32 14 64 40 02 19
             0C 9F 5C 5B 1B 80 0C A0 5C 5C 5B 1B 80 0C 9F 5C 1C 6F D3 14 A0 5C
             5C 1C 6E D3 14 AF 25 1C 80 0F 02 14 02 14 40 02 19 05 63 64 40 02
             1B 80 09 AD 24 0E 75 AD 63 28 FB B2 42 02 93 01 80 A7 93 00 80 A3
             64 02 14 40 02 19 07 63 64 40 02 1B 80 9F 02 1B 80 8C A4 5C 5B 1B
             80 29 A5 5C 5C 5B 1B 80 29 64 64 40 02 1B 32 02 1B 80 29 63 64 40
             02 19 0D 64 64 40 02 1B 3D 02 1B 35 00 1B 80 55 A4 5C 1C 52 D3 14
             A5 5C 5C 1C 51 D3 14 AD 24 0E 52 B3 24 0E 54 A4 14 AE 28 FB 51 42
             02 93 00 80 07 92 01 80 03 92 04 45 AE 24 0E 47 B4 24 0E 49 A5 14
             AF 28 FB 36 42 02 93 00 80 08 92 01 80 04 92 08 FF B8 93 03 80 12
             93 02 80 0E 93 01 80 0A 93 00 80 06 02 14 02 1B 80 02 63 00 14 40
             02 19 0F 00 14 02 1B 80 27 AE 24 0E FF 5F AE 63 28 FA FB 42 02 93
             01 80 04 92 00 FF 57 A4 20 80 06 94 07 24 1C FF 7B 93 02 80 03 92
             00 55 63 00 14 40 02 19 09 00 1B 80 43 02 1B 80 3F AD 24 1D 78 00
             1B 80 37 02 1B 80 33 AD 24 1E 78 AD 24 1D 74 00 1B 80 27 02 1B 80
             23 AD 24 1F 78 00 1B 80 1B 02 1B 80 17 02 1B 80 13 94 02 AE 8A 22
             76 00 1B 80 09 AD 24 21 6A AD 88 20 6E 00 14 02 1B 80 07 94 02 88
             20 6D 63 00 14 40 02 19 03)
      SYSTEM::CANONICALIZE-TYPE (COMMON-LISP::OR) (COMMON-LISP::OR)
      COMMON-LISP::MEMBER COMMON-LISP::TYPEP COMMON-LISP::NOT 2.
      COMMON-LISP::OR COMMON-LISP::AND SYSTEM::DEFSTRUCT-DESCRIPTION 0.
      CLOS::CLASS-P CLOS::SUBCLASSP
      #S(COMMON-LISP::HASH-TABLE COMMON-LISP::EQ
         (COMMON-LISP::LOGICAL-PATHNAME . 954.)
         (CLOS::STANDARD-GENERIC-FUNCTION . 938.)
         (FFI::FOREIGN-FUNCTION . 926.) (COMMON-LISP::COMPILED-FUNCTION . 926.)
         (CLOS::GENERIC-FUNCTION . 926.) (COMMON-LISP::SYMBOL . 918.)
         (COMMON-LISP::READTABLE . 918.) (COMMON-LISP::RANDOM-STATE . 918.)
         (COMMON-LISP::PATHNAME . 918.) (COMMON-LISP::PACKAGE . 918.)
         (COMMON-LISP::HASH-TABLE . 918.) (COMMON-LISP::FUNCTION . 918.)
         (EXT::ENCODING . 918.) (COMMON-LISP::CHARACTER . 918.)
         (COMMON-LISP::CONS . 659.) (COMMON-LISP::LONG-FLOAT . 312.)
         (COMMON-LISP::DOUBLE-FLOAT . 312.) (COMMON-LISP::SINGLE-FLOAT . 312.)
         (COMMON-LISP::SHORT-FLOAT . 312.) (COMMON-LISP::FLOAT . 312.)
         (COMMON-LISP::RATIONAL . 312.) (COMMON-LISP::INTEGER . 312.)
         (COMMON-LISP::REAL . 312.) (COMMON-LISP::COMPLEX . 274.)
         (COMMON-LISP::SIMPLE-ARRAY . 73.) (COMMON-LISP::ARRAY . 73.))
      COMMON-LISP::* COMMON-LISP::ARRAY
      COMMON-LISP::UPGRADED-ARRAY-ELEMENT-TYPE
      #Y(COMMON-LISP::SUBTYPEP-1
         #23Y(00 00 00 00 02 00 00 00 00 03 AD C5 5A 1E 06 AE AE 31 FF 19 03 19
              03)
         COMMON-LISP::*)
      #Y(COMMON-LISP::SUBTYPEP-2
         #15Y(00 00 00 00 01 00 00 00 00 02 AD C5 5A 19 02) COMMON-LISP::*)
      COMMON-LISP::COMPLEX COMMON-LISP::NUMBER
      #S(COMMON-LISP::HASH-TABLE COMMON-LISP::EQ
         (COMMON-LISP::LONG-FLOAT . 17.) (COMMON-LISP::DOUBLE-FLOAT . 17.)
         (COMMON-LISP::SINGLE-FLOAT . 17.) (COMMON-LISP::SHORT-FLOAT . 17.)
         (COMMON-LISP::FLOAT . 12.) (COMMON-LISP::RATIONAL . 12.)
         (COMMON-LISP::INTEGER . 7.) (COMMON-LISP::REAL . 2.))
      (COMMON-LISP::NUMBER)
      (COMMON-LISP::RATIONAL COMMON-LISP::REAL COMMON-LISP::NUMBER)
      (COMMON-LISP::REAL COMMON-LISP::NUMBER)
      (COMMON-LISP::FLOAT COMMON-LISP::REAL COMMON-LISP::NUMBER)
      COMMON-LISP::INTEGER
      (COMMON-LISP::COMPLEX COMMON-LISP::REAL COMMON-LISP::INTEGER
       COMMON-LISP::RATIONAL COMMON-LISP::FLOAT COMMON-LISP::SHORT-FLOAT
       COMMON-LISP::SINGLE-FLOAT COMMON-LISP::DOUBLE-FLOAT
       COMMON-LISP::LONG-FLOAT)
      COMMON-LISP::CONS COMMON-LISP::FUNCTION CLOS::GENERIC-FUNCTION
      COMMON-LISP::PATHNAME SYSTEM::ENCODINGP COMMON-LISP::CHARACTER
      SYSTEM::CHARSET-SUBTYPEP))
#Y(#:TOP-LEVEL-FORM-113
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::UPGRADED-COMPLEX-PART-TYPE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::UPGRADED-COMPLEX-PART-TYPE
      #13Y(00 00 00 00 01 00 00 00 00 02 02 19 02)))
#Y(#:TOP-LEVEL-FORM-114
   #54Y(00 00 00 00 00 00 00 00 00 01 00 2B 01 38 06 C5 FB 31 61 0B 00 00 DB 2F
        02 DB AD 6D 03 01 32 80 DE 71 CA AD 6D 05 01 AD 31 E0 16 01 E0 2F 02 E0
        E1 32 80 CB 19 02)
   #.#'COMMON-LISP::EQUAL SYSTEM::GET-CHARSET-RANGE
   SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::GET-CHARSET-RANGE
      #41Y(00 00 00 00 01 00 00 00 00 02 AD 69 00 01 38 01 31 62 1E 13 69 00 01
           DB AF 70 02 DD DE 6E 03 05 AF AE AE 31 63 19 04 19 02)
      COMMON-LISP::NIL :CHARSET EXT::MAKE-ENCODING #\Null #\UFFFF
      SYSTEM::CHARSET-RANGE)
   "CHARSET"
   #Y(#:TOP-LEVEL-FORM-114-1
      #42Y(00 00 00 00 01 00 00 00 00 02 AD 71 4D 6F 01 AC 6F 02 DD AD 72 45 73
           02 38 AC DE 33 01 33 1F 08 AE 69 00 01 31 64 19 05 19 05)
      COMMON-LISP::NIL SYSTEM::ENCODING-CHARSET SYSTEM::GET-CHARSET-RANGE
      #10r1/2 100.)
   SYSTEM::CHARSET-SUBTYPEP
   #Y(SYSTEM::CHARSET-SUBTYPEP
      #103Y(00 00 00 00 02 00 00 00 00 03 AE 6F 00 6F 01 AE 6F 00 6F 01 AD 72
            45 AD 72 45 DC DC AD B0 8C FF 0D B1 AE 71 31 B2 96 03 71 31 01 02
            1B 09 02 19 09 DD B1 82 02 36 04 B0 B3 8C FF 1D B4 B1 80 31 01 B4
            96 05 80 31 00 14 B0 91 01 0C 64 AF AE 90 01 09 06 AC AF 91 01 09
            03 00 19 0D DD B2 82 02 36 05 16 04 1B FF B5)
      SYSTEM::ENCODING-CHARSET SYSTEM::GET-CHARSET-RANGE 0. 2.))
#Y(#:TOP-LEVEL-FORM-115
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::SUBTYPE-INTEGER SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::SUBTYPE-INTEGER
      #526Y(00 00 00 00 01 00 00 00 00 02 AD 2F 00 F9 14 8E 04 15 9E 20 05 94
            01 8E 04 28 AD 88 0A 81 D0 AD 89 0E 81 E4 00 19 02 9E 26 01 79 DC
            C8 1B 0E DE CA 1B 0A E0 CB 1B 06 DC CB 1B 02 DC C7 14 40 02 19 02
            9E 5B 26 07 5D 00 19 06 DC DC 95 03 63 AD 8C 91 80 6F 87 01 00 14
            8F 0A 6C AF AD 82 01 35 03 AE AD 82 01 34 02 83 01 1B 64 DC AD 73
            01 35 DC AE 73 01 34 9E 1B 81 70 9E 5C 78 AC 8E 0A 6B 00 19 03 DC
            DC 95 03 63 1B 35 00 19 08 CB 1B 1C CB 1B 27 87 01 00 14 28 FF 70
            42 02 93 01 6B B1 24 06 6A AD 24 06 66 B1 AE 33 01 35 FD B0 24 06
            5F AC 24 06 5B B0 AD 33 01 34 FC 16 02 83 01 AD 8D 91 50 AF A0 1B
            80 F5 9E 1B 14 A2 1B 11 A1 FC 1B 3A 14 24 06 72 AD 24 06 71 B1 AE
            33 01 34 FD B0 24 06 26 AC 24 06 66 B0 AD 82 01 35 04 1B 1C 01 02
            95 03 63 AD 8C 91 2F 87 01 00 14 28 FF 0A 42 02 93 01 07 92 05 4A
            9E FD 9D FC 16 02 83 01 1B 63 C7 1B 80 59 14 8F 06 0A AC 8F 06 06
            AD AD 91 01 32 6E 9E 1B 80 67 16 02 92 01 69 00 19 04 9E 5C 5B 1B
            0B 9F 5C 5C 5B 1B 0C 9E 5C 1C 71 CB 14 9F 5C 5C 1C 6F CB 14 9E 20
            09 87 01 01 14 8F 06 02 85 01 9D 20 09 87 00 00 14 8F 06 02 86 00
            AD 8F 06 10 AC 8F 06 0C AD AD 90 01 32 06 C7 F9 F8 9E 1B 1B 9E 1B
            18 9E 5C 78 AC 8F 0A 06 AC DC 90 01 33 04 E2 AF 30 09 DC 97 01 73
            01 34 C7 14 AD 40 02 19 04 E0 CB 1B 2B 9E 5C 5B 1C 01 CB 14 AC 24
            06 71 AC 8F 0A 04 AC 8E 91 04 E2 AF 30 09 DD 97 01 72 D0 AC 73 00
            37 97 01 AD 9E 14 40 02 19 06 DC CB 14 40 02 19 03 9E 5C 5B 1C 01
            CB 14 AC 24 06 6E AC 8F 0A 06 AC DC 90 01 33 04 E2 AF 30 09 DD AD
            72 D0 97 00 C7 14 AD 40 02 19 05 AD 89 0B FE 30 AD 6F 0C E7 38 01
            72 82 9F 23 FE 24 AD 6F 0C 29 01 03 FE 02 E2 AE 30 09 19 02)
      SYSTEM::EXPAND-DEFTYPE
      #S(COMMON-LISP::HASH-TABLE COMMON-LISP::EQ (COMMON-LISP::NIL . 17.)
         (COMMON-LISP::UNSIGNED-BYTE . 13.) (COMMON-LISP::SIGNED-BYTE . 9.)
         (COMMON-LISP::BIGNUM . 9.) (COMMON-LISP::INTEGER . 9.)
         (COMMON-LISP::FIXNUM . 5.) (COMMON-LISP::BIT . 1.))
      0. 1. #.COMMON-LISP::MOST-NEGATIVE-FIXNUM
      #.COMMON-LISP::MOST-POSITIVE-FIXNUM COMMON-LISP::*
      #S(COMMON-LISP::HASH-TABLE COMMON-LISP::EQ
         (COMMON-LISP::UNSIGNED-BYTE . 387.) (COMMON-LISP::SIGNED-BYTE . 339.)
         (COMMON-LISP::MOD . 305.) (COMMON-LISP::INTEGER . 245.)
         (COMMON-LISP::AND . 170.) (COMMON-LISP::OR . 61.)
         (COMMON-LISP::EQL . 51.) (COMMON-LISP::MEMBER . 4.))
      COMMON-LISP::SUBTYPEP SYSTEM::TYPESPEC-ERROR CLOS::CLASS-P
      CLOS::BUILT-IN-CLASS-P CLOS::CLASS-NAME CLOS::CLOSCLASS
      SYSTEM::ENCODINGP))
#Y(#:TOP-LEVEL-FORM-116
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   EXT::TYPE-EXPAND SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(EXT::TYPE-EXPAND
      #99Y(00 00 00 00 01 00 01 00 00 08 3D 01 AE AE 30 00 42 02 92 00 17 B0 8E
           04 17 A1 20 05 94 04 8E 04 2B B0 89 08 37 B0 00 14 40 02 19 05 AD 9E
           1B 77 B0 DB 38 01 8E 82 6E B0 DC 38 01 8E 82 67 B0 DD 38 01 8E 82 60
           B0 88 04 5C CA 1B 11 A1 5B 26 07 00 94 04 DC 38 01 8E 82 4C CA 1B 01
           CA 14 B1 30 06 19 05)
      SYSTEM::EXPAND-DEFTYPE SYSTEM::TYPE-SYMBOL SYSTEM::TYPE-LIST
      SYSTEM::DEFSTRUCT-DESCRIPTION SYSTEM::CLOS-CLASS EXT::TYPE-EXPAND
      SYSTEM::TYPESPEC-ERROR
      #S(COMMON-LISP::HASH-TABLE COMMON-LISP::EQ (COMMON-LISP::OR . -43.)
         (COMMON-LISP::AND . -43.) (COMMON-LISP::NOT . -43.)
         (COMMON-LISP::EQL . -43.) (COMMON-LISP::MEMBER . -43.)
         (COMMON-LISP::SATISFIES . -43.))
      CLOS::CLASS-P))
