(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::DOSEQ EXT::DOHASH EXT::WITHOUT-PACKAGE-LOCK))
#Y(#:TOP-LEVEL-FORM-3 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 D5 19 01)
   (CUSTOM::*SYSTEM-PACKAGE-LIST*) "CUSTOM")
#Y(#:TOP-LEVEL-FORM-4 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 E3 19 01)
   "CUSTOM" "EXT")
#Y(#:TOP-LEVEL-FORM-5 #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-6
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::COPY-SYMBOL SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::COPY-SYMBOL
      #51Y(00 00 00 00 01 00 01 00 00 08 3D 01 AE 72 8A 71 C9 93 02 1C AF 8D 4E
           06 AC B0 6F 00 31 51 AF 8D 4F 06 AC A1 5E 14 32 80 AC B0 72 89 71 9D
           32 85 15 19 03)
      SYSTEM::%SYMBOL-VALUE))
#Y(#:TOP-LEVEL-FORM-7
   #30Y(00 00 00 00 00 00 00 00 00 01 00 2B 01 C5 0B 00 00 DB 2F 02 DB AD 6D 03
        01 32 80 C6 19 02)
   0. COMMON-LISP::GENTEMP SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::GENTEMP
      #61Y(00 00 00 00 00 00 02 00 00 0C 3B 02 02 C6 FA 3B 01 07 0E 02 F9 1B 02
           16 02 69 00 01 32 95 0C 00 01 AE 69 00 01 38 10 C8 09 09 7D 0A FC 71
           84 73 02 13 AE 31 D2 42 02 92 00 5D 9E 19 05)
      COMMON-LISP::NIL "T" COMMON-LISP::*PACKAGE* 10.))
#Y(#:TOP-LEVEL-FORM-8
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   COMMON-LISP::DO-SYMBOLS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::DO-SYMBOLS
      #136Y(00 00 00 00 01 00 01 00 00 08 3D 01 AE 72 45 DA 90 01 30 80 5F 9F
            5C 5B 78 A0 5C 5B 5C 1C 80 59 C7 14 A1 5C 5B 5C 5C 1D 06 A1 5C 5B
            5C 5C 5B 14 A2 5C 79 AC 63 B3 31 5E 42 02 38 01 72 8E DD 63 DE AF
            B5 7B 02 7B 01 DE B7 CA 7A 7B 01 E0 E1 BA 7B 02 A6 7C 02 E2 E3 E4
            BC 7B 01 92 0C 23 00 14 BA 33 02 23 7C 02 7B 02 B5 7B 03 B8 7B 05
            7B 03 61 03 19 0A AE 2F 01 19 03 A0 5C 5B 5C 5B 1B FF A0 E0 AA 7A
            61 01 1B 57)
      2. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::*PACKAGE* COMMON-LISP::BLOCK
      COMMON-LISP::LET (COMMON-LISP::NIL) COMMON-LISP::DECLARE
      COMMON-LISP::IGNORABLE SYSTEM::MAP-SYMBOLS COMMON-LISP::FUNCTION
      COMMON-LISP::LAMBDA)
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-9
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   COMMON-LISP::DO-EXTERNAL-SYMBOLS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::DO-EXTERNAL-SYMBOLS
      #136Y(00 00 00 00 01 00 01 00 00 08 3D 01 AE 72 45 DA 90 01 30 80 5F 9F
            5C 5B 78 A0 5C 5B 5C 1C 80 59 C7 14 A1 5C 5B 5C 5C 1D 06 A1 5C 5B
            5C 5C 5B 14 A2 5C 79 AC 63 B3 31 5E 42 02 38 01 72 8E DD 63 DE AF
            B5 7B 02 7B 01 DE B7 CA 7A 7B 01 E0 E1 BA 7B 02 A6 7C 02 E2 E3 E4
            BC 7B 01 92 0C 23 00 14 BA 33 02 23 7C 02 7B 02 B5 7B 03 B8 7B 05
            7B 03 61 03 19 0A AE 2F 01 19 03 A0 5C 5B 5C 5B 1B FF A0 E0 AA 7A
            61 01 1B 57)
      2. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::*PACKAGE* COMMON-LISP::BLOCK
      COMMON-LISP::LET (COMMON-LISP::NIL) COMMON-LISP::DECLARE
      COMMON-LISP::IGNORABLE SYSTEM::MAP-EXTERNAL-SYMBOLS COMMON-LISP::FUNCTION
      COMMON-LISP::LAMBDA)
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-10
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   COMMON-LISP::DO-ALL-SYMBOLS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::DO-ALL-SYMBOLS
      #103Y(00 00 00 00 01 00 01 00 00 08 3D 01 AE 72 45 DA 90 01 30 80 46 9F
            5C 5B 78 A0 5C 5B 5C 1D 05 A0 5C 5B 5C 5B 14 A1 5C 79 AC 63 B2 31
            5E 42 02 DC 63 DD B3 C9 7A 7B 01 DF E0 B6 7B 02 A3 7C 02 E1 E2 E3
            B8 7B 01 92 09 18 00 14 B7 33 02 23 7C 02 7B 02 7B 02 B5 7B 05 61
            03 19 08 AE 2F 01 19 03 DF A7 7A 61 01 1B 62)
      2. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::BLOCK COMMON-LISP::LET
      (COMMON-LISP::NIL) COMMON-LISP::DECLARE COMMON-LISP::IGNORABLE
      SYSTEM::MAP-ALL-SYMBOLS COMMON-LISP::FUNCTION COMMON-LISP::LAMBDA)
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-11
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   COMMON-LISP::WITH-PACKAGE-ITERATOR SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::WITH-PACKAGE-ITERATOR
      #126Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 30 18 9F 5C 5B 78
            A0 5C 5B 5C 78 A1 5C 5B 5C 79 A2 5C 79 93 01 09 AD 63 1B 24 AE 2F
            01 19 03 DC DD 6F 04 DF E0 E1 E2 33 04 1F 87 01 00 26 09 00 DC E4
            6F 04 E2 DF E0 E1 B2 33 05 1F 83 01 AD 8D 91 68 16 02 E5 72 8E E6
            AD E7 B2 E8 B3 38 06 72 52 7B 02 7B 03 7B 02 7B 01 E9 B3 63 E8 EA
            B3 7B 02 7B 02 7B 03 7B 01 A2 7C 02 61 03 19 08)
      2. SYSTEM::MACRO-CALL-ERROR SYSTEM::SOURCE-PROGRAM-ERROR
      "missing symbol types (~S/~S/~S) in ~S" SYSTEM::TEXT :INTERNAL :EXTERNAL
      :INHERITED COMMON-LISP::WITH-PACKAGE-ITERATOR
      #S(COMMON-LISP::HASH-TABLE COMMON-LISP::EQ (:INHERITED . 13.)
         (:EXTERNAL . 13.) (:INTERNAL . 13.))
      "~S: flag must be one of the symbols ~S, ~S, ~S, not ~S" "WPI"
      COMMON-LISP::LET SYSTEM::PACKAGE-ITERATOR-FUNCTION COMMON-LISP::QUOTE
      COMMON-LISP::MACROLET COMMON-LISP::FUNCALL)
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-12
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::PACKAGE-ITERATOR-FUNCTION SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::PACKAGE-ITERATOR-FUNCTION
      #57Y(00 00 00 00 02 00 00 00 00 03 00 2B 01 63 B0 8E 09 05 B0 7B 01 1B 0F
           B0 1B 0C 94 00 AC B2 70 00 84 02 16 01 83 00 9D 21 71 16 01 AC 31 A2
           16 01 0B 00 00 AC 2C 01 01 19 04)
      SYSTEM::PACKAGE-ITERATOR
      #Y(SYSTEM::PACKAGE-ITERATOR-FUNCTION-1
         #54Y(00 00 00 00 00 00 00 00 00 01 07 00 01 1D 16 78 2F 01 42 03 92 02
              11 07 00 01 5C 0C 00 01 16 03 07 00 01 1C 6A 00 19 01 14 AE AE 07
              00 01 78 C7 5F 14 40 04 19 04)
         COMMON-LISP::NIL SYSTEM::PACKAGE-ITERATE 4.)))
#Y(#:TOP-LEVEL-FORM-13
   #24Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 DB 8C 4E 04 DB DC 31 51 C6 19
        01)
   (COMMON-LISP::SPECIAL CUSTOM::*SYSTEM-PACKAGE-LIST*)
   CUSTOM::*SYSTEM-PACKAGE-LIST*
   ("SYSTEM" "LISP" "EXT" "CUSTOM" "I18N" "GRAY" "CHARSET" "CLOS" "SOCKET"
    "GSTREAM" "POSIX" "FFI" "SCREEN"))
#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)
   EXT::WITHOUT-PACKAGE-LOCK SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(EXT::WITHOUT-PACKAGE-LOCK
      #77Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 30 36 9F 5C 78 A0 5C
           79 DC 72 8E DD AD DE DF E0 E1 B4 7B 02 CD 7C 02 7B 03 7B 02 7B 01 E3
           E4 E5 E6 B2 7B 02 D2 7C 02 A3 7C 02 E5 E6 B2 7B 02 D3 7C 02 7B 03 61
           03 19 06 AE 2F 01 19 03)
      2. SYSTEM::MACRO-CALL-ERROR "WOPL-" COMMON-LISP::LET
      COMMON-LISP::REMOVE-IF-NOT #'EXT::PACKAGE-LOCK COMMON-LISP::OR
      COMMON-LISP::QUOTE (CUSTOM::*SYSTEM-PACKAGE-LIST*)
      COMMON-LISP::UNWIND-PROTECT COMMON-LISP::PROGN COMMON-LISP::SETF
      EXT::PACKAGE-LOCK (COMMON-LISP::NIL) (COMMON-LISP::T))
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-15
   #24Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 DB 8C 4E 04 DB 63 31 51 C6 19
        01)
   (COMMON-LISP::SPECIAL COMMON-LISP::*MODULES*) COMMON-LISP::*MODULES*)
#Y(#:TOP-LEVEL-FORM-16
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::PROVIDE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::PROVIDE
      #24Y(00 00 00 00 01 00 00 00 00 02 AD 71 4A 6B 00 DB 38 02 31 B6 0F 00 19
           02)
      COMMON-LISP::*MODULES* #.#'COMMON-LISP::STRING=))
#Y(#:TOP-LEVEL-FORM-17
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::REQUIRE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::REQUIRE
      #79Y(00 00 00 00 01 00 01 00 00 08 3C 01 14 3D 02 AF 71 4A 6B 00 DB 38 02
           8C B2 21 93 00 21 0E 02 1D 25 6B 02 38 07 7D 02 F9 71 F1 0E 03 5D 10
           03 A2 20 18 99 04 B2 33 00 17 11 19 04 00 19 04 AF 80 E5 02 0E 02 1C
           5B 0E 03 1B 63 B1 2F 04 1B 69)
      COMMON-LISP::*MODULES* #.#'COMMON-LISP::STRING-EQUAL
      COMMON-LISP::*LOAD-TRUENAME* CUSTOM::*LOAD-PATHS* COMMON-LISP::LOAD))
#Y(#:TOP-LEVEL-FORM-18
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-CLR 0.
   (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-CLR 0.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-19
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-SET 15.
   (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-SET 15.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-20
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-1 10. (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-1 10.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-21
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-2 12. (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-2 12.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-22
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-C1 5. (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-C1 5.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-23
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-C2 3. (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-C2 3.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-24
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-AND 8.
   (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-AND 8.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-25
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-IOR 14.
   (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-IOR 14.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-26
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-XOR 6.
   (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-XOR 6.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-27
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-EQV 9.
   (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-EQV 9.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-28
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-NAND 7.
   (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-NAND 7.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-29
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-NOR 1.
   (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-NOR 1.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-30
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-ANDC1 4.
   (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-ANDC1 4.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-31
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-ANDC2 2.
   (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-ANDC2 2.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-32
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-ORC1 13.
   (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-ORC1 13.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-33
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::BOOLE-ORC2 11.
   (COMMON-LISP::DEFCONSTANT COMMON-LISP::BOOLE-ORC2 11.)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-34
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::MAKE-BYTE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::MAKE-BYTE
      #24Y(00 00 00 00 00 00 00 00 80 1B 02 00 00 00 3D 02 3D 01 AE AE 32 D3 19
           03)
      :SIZE :POSITION))
#Y(#:TOP-LEVEL-FORM-35
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::LEAST-POSITIVE-NORMALIZED-SHORT-FLOAT
   #.COMMON-LISP::LEAST-POSITIVE-SHORT-FLOAT
   (COMMON-LISP::DEFCONSTANT COMMON-LISP::LEAST-POSITIVE-NORMALIZED-SHORT-FLOAT
    COMMON-LISP::LEAST-POSITIVE-SHORT-FLOAT)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-36
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::LEAST-NEGATIVE-NORMALIZED-SHORT-FLOAT
   #.COMMON-LISP::LEAST-NEGATIVE-SHORT-FLOAT
   (COMMON-LISP::DEFCONSTANT COMMON-LISP::LEAST-NEGATIVE-NORMALIZED-SHORT-FLOAT
    COMMON-LISP::LEAST-NEGATIVE-SHORT-FLOAT)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-37
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::LEAST-POSITIVE-NORMALIZED-SINGLE-FLOAT
   #.COMMON-LISP::LEAST-POSITIVE-SINGLE-FLOAT
   (COMMON-LISP::DEFCONSTANT
    COMMON-LISP::LEAST-POSITIVE-NORMALIZED-SINGLE-FLOAT
    COMMON-LISP::LEAST-POSITIVE-SINGLE-FLOAT)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-38
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::LEAST-NEGATIVE-NORMALIZED-SINGLE-FLOAT
   #.COMMON-LISP::LEAST-NEGATIVE-SINGLE-FLOAT
   (COMMON-LISP::DEFCONSTANT
    COMMON-LISP::LEAST-NEGATIVE-NORMALIZED-SINGLE-FLOAT
    COMMON-LISP::LEAST-NEGATIVE-SINGLE-FLOAT)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-39
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::LEAST-POSITIVE-NORMALIZED-DOUBLE-FLOAT
   #.COMMON-LISP::LEAST-POSITIVE-DOUBLE-FLOAT
   (COMMON-LISP::DEFCONSTANT
    COMMON-LISP::LEAST-POSITIVE-NORMALIZED-DOUBLE-FLOAT
    COMMON-LISP::LEAST-POSITIVE-DOUBLE-FLOAT)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-40
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   COMMON-LISP::LEAST-NEGATIVE-NORMALIZED-DOUBLE-FLOAT
   #.COMMON-LISP::LEAST-NEGATIVE-DOUBLE-FLOAT
   (COMMON-LISP::DEFCONSTANT
    COMMON-LISP::LEAST-NEGATIVE-NORMALIZED-DOUBLE-FLOAT
    COMMON-LISP::LEAST-NEGATIVE-DOUBLE-FLOAT)
   SYSTEM::CONSTANT-WARNING)
#Y(#:TOP-LEVEL-FORM-41 #15Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 19 01)
   (EXT::CONSTANT-NOTINLINE 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))
#Y(#:TOP-LEVEL-FORM-42
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   EXT::DOSEQ SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(EXT::DOSEQ
      #122Y(00 00 00 00 01 00 01 00 00 08 3D 01 AE 72 45 DA 90 01 30 80 59 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 DC 63 DD AF B5 7B 02 7B 01 DD B7 C9 7A 7B 01 DF
            E0 BA 7B 02 A6 7C 02 E1 63 E2 E3 BD 7B 01 92 0D 20 00 14 E4 04 10
            7A 7B 01 33 02 23 7C 02 7B 02 B6 7B 04 B8 7B 05 7B 03 61 03 19 0A
            AE 2F 01 19 03 DF AB 7A 61 01 1B 5A)
      2. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::BLOCK COMMON-LISP::LET
      (COMMON-LISP::NIL) COMMON-LISP::DECLARE COMMON-LISP::IGNORABLE
      COMMON-LISP::MAP COMMON-LISP::FUNCTION COMMON-LISP::LAMBDA
      COMMON-LISP::TAGBODY)
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-43
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::MEMBER1 SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::MEMBER1
      #39Y(00 00 00 00 02 00 00 00 81 00 03 00 00 00 3B 01 07 7D 01 93 01 05 1B
           05 92 01 02 C8 F9 DE AE B4 76 01 B3 A4 9B 02 07)
      :TEST :TEST-NOT :KEY #.#'COMMON-LISP::IDENTITY #.#'COMMON-LISP::MEMBER))
#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)
   COMMON-LISP::UNION SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::UNION
      #48Y(00 00 00 00 02 00 00 00 81 00 03 00 00 00 63 B3 63 1B 11 87 01 00 99
           03 AD B6 A7 37 02 1C 03 AC 84 02 83 01 AD 8D 91 6B 16 02 AC B3 31 A1
           19 08)
      :TEST :TEST-NOT :KEY SYSTEM::MEMBER1))
#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)
   COMMON-LISP::NUNION SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::NUNION
      #63Y(00 00 00 00 02 00 00 00 81 00 03 00 00 00 01 02 B4 1B 20 14 AD 31 A8
           1B 16 14 B4 31 A8 9E 19 09 99 03 94 01 B6 A7 37 02 1C 07 92 01 66 9D
           FA 9D F9 83 00 AC 8D 91 69 16 01 92 00 5D A4 19 09)
      :TEST :TEST-NOT :KEY SYSTEM::MEMBER1))
#Y(#:TOP-LEVEL-FORM-46
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::INTERSECTION SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::INTERSECTION
      #47Y(00 00 00 00 02 00 00 00 81 00 03 00 00 00 63 B3 63 1B 11 87 01 00 99
           03 AD B6 A7 37 02 1D 03 AC 84 02 83 01 AD 8D 91 6B 16 02 AC 31 A2 19
           08)
      :TEST :TEST-NOT :KEY SYSTEM::MEMBER1))
#Y(#:TOP-LEVEL-FORM-47
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::NINTERSECTION SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::NINTERSECTION
      #62Y(00 00 00 00 02 00 00 00 81 00 03 00 00 00 01 02 B4 1B 19 14 AD 31 A8
           1B 0F 99 03 94 01 B6 A7 37 02 1D 07 92 01 6D 9D FA 9D F9 83 00 AC 8D
           91 69 16 01 9D 1F 07 14 63 31 A8 9E 19 09 19 09)
      :TEST :TEST-NOT :KEY SYSTEM::MEMBER1))
#Y(#:TOP-LEVEL-FORM-48
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::SET-DIFFERENCE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::SET-DIFFERENCE
      #47Y(00 00 00 00 02 00 00 00 81 00 03 00 00 00 63 B3 63 1B 11 87 01 00 99
           03 AD B6 A7 37 02 1C 03 AC 84 02 83 01 AD 8D 91 6B 16 02 AC 31 A2 19
           08)
      :TEST :TEST-NOT :KEY SYSTEM::MEMBER1))
#Y(#:TOP-LEVEL-FORM-49
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::NSET-DIFFERENCE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::NSET-DIFFERENCE
      #62Y(00 00 00 00 02 00 00 00 81 00 03 00 00 00 01 02 B4 1B 19 14 AD 31 A8
           1B 0F 99 03 94 01 B6 A7 37 02 1C 07 92 01 6D 9D FA 9D F9 83 00 AC 8D
           91 69 16 01 9D 1F 07 14 63 31 A8 9E 19 09 19 09)
      :TEST :TEST-NOT :KEY SYSTEM::MEMBER1))
#Y(#:TOP-LEVEL-FORM-50
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::SET-EXCLUSIVE-OR SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::SET-EXCLUSIVE-OR
      #33Y(00 00 00 00 02 00 00 00 81 00 03 00 00 00 99 03 B3 B3 A4 77 02 99 03
           B3 B5 A5 77 02 33 02 23 19 07)
      :TEST :TEST-NOT :KEY COMMON-LISP::SET-DIFFERENCE))
#Y(#:TOP-LEVEL-FORM-51
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::NSET-EXCLUSIVE-OR SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::NSET-EXCLUSIVE-OR
      #33Y(00 00 00 00 02 00 00 00 81 00 03 00 00 00 99 03 B3 B3 A4 77 02 99 04
           B3 B5 A5 77 02 33 02 24 19 07)
      :TEST :TEST-NOT :KEY COMMON-LISP::SET-DIFFERENCE
      COMMON-LISP::NSET-DIFFERENCE))
#Y(#:TOP-LEVEL-FORM-52
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::SUBSETP SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::SUBSETP
      #39Y(00 00 00 00 02 00 00 00 81 00 03 00 00 00 B2 1B 0F 00 19 08 99 03 94
           01 B4 A5 37 02 1D 73 83 00 AC 8D 91 70 02 19 08)
      :TEST :TEST-NOT :KEY SYSTEM::MEMBER1))
#Y(#:TOP-LEVEL-FORM-53
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::SUBST-IF-THEN SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::SUBST-IF-THEN
      #41Y(00 00 00 00 03 00 00 00 80 1E 01 00 00 00 00 2B 03 7F 05 00 00 7F 04
           00 01 3B 02 01 C6 0B 00 02 AC 6D 02 01 B0 9E 34 19 07)
      :KEY #.#'COMMON-LISP::IDENTITY
      #Y(SYSTEM::SUBST-IF-THEN-SUBST
         #63Y(00 00 00 00 01 00 00 00 00 02 69 00 02 69 00 03 AF 76 01 36 01 1C
              06 9E 21 0E 9E 19 02 69 00 01 AE 36 01 19 02 A2 19 06 94 01 95 02
              AD 6C 5B AD 6C 58 AF 9F 23 04 AE 9E 22 6B AD 9E 5D 19 06)
         COMMON-LISP::NIL)))
#Y(#:TOP-LEVEL-FORM-54
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   EXT::DOHASH SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(EXT::DOHASH
      #133Y(00 00 00 00 01 00 01 00 00 08 3D 01 AE 72 45 DA 90 01 30 80 64 9F
            5C 5B 78 A0 5C 5B 5C 78 A1 5C 5B 5C 5C 78 A2 5C 5B 5C 5C 5C 78 A3
            5C 79 AC 63 B4 31 5E 42 02 38 01 72 8E DC 63 DD AF B5 7B 02 7B 01
            DD B8 C9 7A B8 CA 7A 7B 02 E0 E1 BB BB 7B 03 A6 7C 02 E2 E3 E4 BD
            BD 7B 02 92 0C 20 00 14 E5 04 0F 7A 7B 01 33 02 23 7C 02 7B 02 B5
            7B 03 B8 7B 05 7B 03 61 03 19 0B AE 2F 01 19 03 E0 AA 7A 61 01 1B
            5A)
      2. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::BLOCK COMMON-LISP::LET
      (COMMON-LISP::NIL) (COMMON-LISP::NIL) COMMON-LISP::DECLARE
      COMMON-LISP::IGNORABLE COMMON-LISP::MAPHASH COMMON-LISP::FUNCTION
      COMMON-LISP::LAMBDA COMMON-LISP::TAGBODY)
   SYSTEM::MAKE-MACRO)
#Y(#:TOP-LEVEL-FORM-55
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::STRING-TRIM SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::STRING-TRIM
      #17Y(00 00 00 00 02 00 00 00 00 03 AE AF AF 31 43 19 03)))
#Y(#:TOP-LEVEL-FORM-56
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::STRING-LEFT-TRIM SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::STRING-LEFT-TRIM
      #17Y(00 00 00 00 02 00 00 00 00 03 AE 63 AF 31 43 19 03)))
#Y(#:TOP-LEVEL-FORM-57
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::STRING-RIGHT-TRIM SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::STRING-RIGHT-TRIM
      #17Y(00 00 00 00 02 00 00 00 00 03 63 AF AF 31 43 19 03)))
#Y(#:TOP-LEVEL-FORM-58 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 D5 19 01)
   (CUSTOM::*LOAD-LOGICAL-PATHNAME-TRANSLATIONS-DATABASE*) "CUSTOM")
#Y(#:TOP-LEVEL-FORM-59 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 E3 19 01)
   "CUSTOM" "EXT")
#Y(#:TOP-LEVEL-FORM-60-1
   #24Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 DB 8C 4E 04 DB DC 31 51 3E 19
        01)
   (COMMON-LISP::SPECIAL CUSTOM::*LOAD-LOGICAL-PATHNAME-TRANSLATIONS-DATABASE*)
   CUSTOM::*LOAD-LOGICAL-PATHNAME-TRANSLATIONS-DATABASE*
   (#-CLISP #P"loghosts"
    #+CLISP
    #S(COMMON-LISP::PATHNAME :HOST COMMON-LISP::NIL :DEVICE COMMON-LISP::NIL
       :DIRECTORY (:RELATIVE) :NAME "loghosts" :TYPE COMMON-LISP::NIL
       :VERSION COMMON-LISP::NIL)
    #-CLISP #P"loghosts/"
    #+CLISP
    #S(COMMON-LISP::PATHNAME :HOST COMMON-LISP::NIL :DEVICE COMMON-LISP::NIL
       :DIRECTORY (:RELATIVE "loghosts") :NAME COMMON-LISP::NIL
       :TYPE COMMON-LISP::NIL :VERSION COMMON-LISP::NIL)))
#Y(#:TOP-LEVEL-FORM-60-2
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   COMMON-LISP::LOGICAL-PATHNAME-TRANSLATIONS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::LOGICAL-PATHNAME-TRANSLATIONS
      #35Y(00 00 00 00 01 00 00 00 00 02 AD 38 02 80 45 01 14 6B 00 38 01 31 62
           1E 08 DB 6F 02 DD AF 33 02 1E 19 02)
      SYSTEM::*LOGICAL-PATHNAME-TRANSLATIONS*
      "~S: ~S does not name a logical host" SYSTEM::TEXT
      COMMON-LISP::LOGICAL-PATHNAME-TRANSLATIONS))
#Y(#:TOP-LEVEL-FORM-60-3
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::SET-LOGICAL-PATHNAME-TRANSLATIONS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::SET-LOGICAL-PATHNAME-TRANSLATIONS
      #63Y(00 00 00 00 02 00 00 00 00 03 AE 38 02 80 45 02 14 6B 00 DB B1 70 02
           63 B1 1B 15 94 00 94 00 6F 03 B0 63 38 01 71 EF 9E 5C 7A 84 02 16 01
           83 00 9D 21 68 16 01 AC 31 A2 16 01 F8 31 63 19 03)
      SYSTEM::*LOGICAL-PATHNAME-TRANSLATIONS* :HOST
      SYSTEM::MAKE-LOGICAL-PATHNAME COMMON-LISP::LOGICAL-PATHNAME))
#Y(#:TOP-LEVEL-FORM-60-4
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::LOAD-LPT-MANY SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::LOAD-LPT-MANY
      #201Y(03 00 01 00 02 00 00 00 00 03 AE 38 06 7D 02 71 F7 53 80 9D 93 02
            2F 0E 00 1D 1E 38 01 31 8B DB 38 03 31 88 DC 6F 03 38 03 31 88 B1
            38 01 31 83 DE 38 03 31 88 38 01 31 8A 38 01 72 8E AF 63 AE 38 01
            71 73 1B 39 00 56 19 04 AC 38 02 80 45 00 14 B1 38 03 71 73 71 5A
            30 05 0E 00 1D 19 38 01 31 8B E0 38 03 31 88 E1 6F 03 38 03 31 88
            AC 38 03 31 88 38 01 31 8A B0 63 AF 38 01 80 73 00 AC 9F 23 47 E2
            38 03 31 88 E3 6F 03 38 03 31 88 B3 38 01 31 83 E4 6F 03 38 03 31
            88 38 01 31 8A 16 02 93 02 03 14 2F 0B 3E 54 05 00 00 00 1D 0E 1B
            06 05 00 00 00 1D 06 14 E6 64 2D 03 0B 55 16 01 AD 6B 0D 38 01 31
            62 19 03)
      COMMON-LISP::*LOAD-VERBOSE* ";; " "Loading logical hosts from file "
      SYSTEM::TEXT " ..." SYSTEM::SET-LOGICAL-PATHNAME-TRANSLATIONS ";; "
      "Defined logical host " ";; " "Loading of file " " is finished."
      COMMON-LISP::CLOSE :ABORT SYSTEM::*LOGICAL-PATHNAME-TRANSLATIONS*))
#Y(#:TOP-LEVEL-FORM-60-5
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   SYSTEM::LOAD-LPT-ONE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::LOAD-LPT-ONE
      #138Y(03 00 01 00 02 00 00 00 00 03 AE 38 06 7D 02 71 F7 53 80 5E 93 02
            80 46 0E 00 1D 26 38 01 31 8B DB 38 03 31 88 DC 6F 03 38 03 31 88
            B0 38 03 31 88 DE 6F 03 38 03 31 88 B1 38 01 31 83 DF 38 03 31 88
            B0 AF 38 03 71 73 30 06 0E 00 1C 14 93 02 03 14 2F 08 3E 54 05 00
            00 00 1D 22 1B 1A 00 56 19 04 E1 6F 03 38 03 31 88 38 01 31 8A 93
            02 64 1B 5F 05 00 00 00 1D 06 14 E3 64 2D 03 08 55 16 01 AD 6B 0A
            38 01 31 62 19 03)
      COMMON-LISP::*LOAD-VERBOSE* ";; " "Loading logical host " SYSTEM::TEXT
      " from file " " ..." SYSTEM::SET-LOGICAL-PATHNAME-TRANSLATIONS " done"
      COMMON-LISP::CLOSE :ABORT SYSTEM::*LOGICAL-PATHNAME-TRANSLATIONS*))
#Y(#:TOP-LEVEL-FORM-60-6
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   COMMON-LISP::LOAD-LOGICAL-PATHNAME-TRANSLATIONS
   SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::LOAD-LOGICAL-PATHNAME-TRANSLATIONS
      #211Y(00 00 00 00 01 00 00 00 00 02 AD 38 02 80 45 01 14 6B 00 38 01 8C
            62 34 DB AE DC 73 03 13 DD AF DE 73 03 13 DF B0 73 02 13 E0 8D 4F
            08 AE 89 06 04 AD 88 06 1A E0 8D 4F 80 42 AC 89 06 3E B0 AD 6F 06
            38 05 31 7D 14 30 07 1B 80 7E 00 19 02 B0 AF 6F 06 AF 6F 06 7B 02
            61 01 1B 6A AC B3 8A 09 3A AC E4 70 0B 63 1B 0B 87 01 00 14 B5 8A
            09 80 49 83 01 AD 8D 91 71 16 02 1B 80 47 6B 08 63 AD 8C 91 80 44
            87 01 00 14 38 01 8C E9 4F B2 38 02 71 47 AD 38 02 71 EF B3 8B 0C
            03 02 19 07 AC 63 70 0B 63 AD 8C 91 1A 87 01 00 B4 AD 38 01 71 E9
            38 04 8D 3A 08 AC B5 8B 0C 03 02 19 09 83 01 1B 62 16 02 83 01 1B
            FF B7 16 02 16 03 E7 6F 0E AE 33 01 1E)
      SYSTEM::*LOGICAL-PATHNAME-TRANSLATIONS* "LOGICAL_HOST_" "_FROM"
      "LOGICAL_HOST_" "_TO" "LOGICAL_HOST_" EXT::GETENV
      SYSTEM::SET-LOGICAL-PATHNAME-TRANSLATIONS
      CUSTOM::*LOAD-LOGICAL-PATHNAME-TRANSLATIONS-DATABASE*
      SYSTEM::LOAD-LPT-MANY ("" ".host") SYSTEM::SEARCH-FILE
      SYSTEM::LOAD-LPT-ONE "No translations for logical host ~S found"
      SYSTEM::TEXT))
#Y(#:TOP-LEVEL-FORM-60-7 #16Y(00 00 00 00 00 00 00 00 00 01 DA DB 30 02 19 01)
   "SYS" ((";*.LISP" "*.lisp") ("*.*" "*.*") ("*" "*"))
   SYSTEM::SET-LOGICAL-PATHNAME-TRANSLATIONS)
#Y(#:TOP-LEVEL-FORM-61
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::%TIME SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::%TIME
      #226Y(00 00 00 00 12 00 00 00 00 00 BE DA 73 02 38 BE 73 02 36 B6 DA 73
            02 38 B6 73 02 36 73 01 37 BD DA 73 02 38 BD 73 02 36 B5 DA 73 02
            38 B5 73 02 36 73 01 37 BC DA 73 02 38 BC 73 02 36 B4 DA 73 02 38
            B4 73 02 36 73 01 37 BB DB BC 72 D9 B3 DC B4 72 D9 73 01 37 BA B2
            73 01 37 6B 03 AC 31 8A DE AD 38 02 31 88 B1 DA 73 01 39 38 01 72
            AD 38 10 BD 31 7F DF AD 38 02 31 88 AC 31 8A E0 AD 38 02 31 88 B0
            DA 73 01 39 38 01 72 AD 38 10 BD 31 7F E1 AD 38 02 31 88 AC 31 8A
            E2 AD 38 02 31 88 AE 38 10 BD 31 7F E3 AD 38 02 31 88 AD 8E 91 05
            AF 32 91 1F 2B AC 31 8A E4 AD 38 02 31 88 AD 38 10 BD 31 7F E5 AD
            38 02 31 88 AF DA 73 01 39 38 01 72 AD 38 10 BD 31 7F E6 AD 38 02
            31 88 19 19 19 19)
      #.COMMON-LISP::INTERNAL-TIME-UNITS-PER-SECOND
      #S(COMMON-LISP::BYTE :SIZE 24. :POSITION 24.)
      #S(COMMON-LISP::BYTE :SIZE 24. :POSITION 24.) COMMON-LISP::*TRACE-OUTPUT*
      "Real time: " " sec." "Run time: " " sec." "Space: " " Bytes" "GC: "
      ", GC time: " " sec."))
#Y(#:TOP-LEVEL-FORM-62
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::SLEEP SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::SLEEP
      #64Y(00 00 00 00 01 00 00 00 00 02 AD 8F 12 25 AD 8E 92 21 AD DA 90 01 31
           15 AD 38 01 32 B2 42 02 AD DD AE 73 02 38 38 01 72 B5 31 C7 19 04 DB
           DC 31 C7 1B 7A DE DF AF E0 E1 E2 6F 09 E4 B4 33 06 1F)
      16700000. 86400. 0. 1000000. COMMON-LISP::TYPE-ERROR :DATUM
      :EXPECTED-TYPE (COMMON-LISP::REAL 0. COMMON-LISP::*)
      "~S: argument ~S should be a nonnegative number" SYSTEM::TEXT
      COMMON-LISP::SLEEP))
#Y(#:TOP-LEVEL-FORM-63
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::UTAG SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::UTAG
      #36Y(00 00 00 00 01 00 00 00 00 02 DA DB AF 73 02 38 AF DC 72 B2 B0 DD 72
           B2 73 00 37 B1 DE 72 B2 33 05 36 19 02)
      -693901. 365. 4. 100. 400.))
#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)
   SYSTEM::JAHR&TAG SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::JAHR&TAG
      #47Y(00 00 00 00 01 00 00 00 00 02 DA DB AF 73 02 36 DC 72 B2 73 02 36 AC
           6F 03 AF AD 91 01 30 06 86 01 14 2F 03 F8 AD B0 AE 73 01 37 40 02 19
           04)
      1900. -58. #10r146097/400 SYSTEM::UTAG))
#Y(#:TOP-LEVEL-FORM-65-1
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 3E 19 01)
   COMMON-LISP::ENCODE-UNIVERSAL-TIME SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::ENCODE-UNIVERSAL-TIME
      #276Y(00 00 00 00 06 00 01 00 00 00 3D 01 01 04 B2 8F 0A 80 F3 DA B3 DB
            91 02 32 18 2E 02 42 06 B8 DD AE DE BC 73 02 37 DD 72 B3 73 02 38
            82 02 36 0C 16 06 DF B3 91 01 32 80 CD B3 8F 0A 80 C8 E0 B4 E1 91
            02 32 80 C0 B3 E2 90 01 30 80 A8 A3 FA CF 14 B4 82 02 36 03 B4 8F
            0A 80 AB E0 B5 91 01 32 80 A4 97 08 E5 A2 5F 14 82 02 36 01 14 AF
            6F 0C 82 02 36 00 AF 25 0D 80 84 AC 96 03 2F 0C 14 91 01 30 80 82
            B5 8F 0A 80 7D DA B6 E8 91 02 32 80 75 B6 8F 0A 80 70 DA B7 E9 91
            02 32 80 68 B7 8F 0A 80 63 DA B8 E9 91 02 32 80 5B 92 05 0C EA AD
            73 02 38 B6 73 02 36 2F 11 FD B1 8F 0D 04 B1 81 AE 05 B1 8E 0A 0C
            B1 8F 0C 3C EC B2 73 02 38 8F 0A 34 ED B2 E1 91 02 32 2D B7 F1 B8
            F1 B9 B6 EA B3 73 02 38 73 03 36 73 02 38 73 02 36 73 02 38 33 02
            36 19 0C B2 81 96 02 CE 1B FF 53 AD E5 B1 32 95 5F 1B FF 78 EE EF
            6F 16 B6 B6 B6 BA BC BE B9 33 07 1F)
      0. 99. COMMON-LISP::GET-DECODED-TIME 100. 50. 1900. 1. 12. 3. 9. -3.
      #(0. 31. 61. 92. 122. 153. 184. 214. 245. 275. 306. 337.) SYSTEM::UTAG
      11. 23. 59. 24. SYSTEM::DEFAULT-TIME-ZONE 3600. -13. COMMON-LISP::ERROR
      "incorrect date: ~S.~S.~S, ~Sh~Sm~Ss, time zone ~S" SYSTEM::TEXT 60.))
#Y(#:TOP-LEVEL-FORM-65-2
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::DECODE-UNIVERSAL-TIME SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::DECODE-UNIVERSAL-TIME
      #148Y(00 00 00 00 01 00 01 00 00 08 3D 01 01 02 92 03 80 6F B0 DA 72 B2
            2F 01 42 02 6A 02 6A 00 14 92 02 80 65 C8 14 82 02 36 03 B0 DA AE
            73 02 38 38 01 72 B5 73 01 37 AC DE 32 B2 42 02 AD DE 32 B2 42 02
            AD DF 32 B2 42 02 AD 2F 06 42 02 E1 E2 AE 73 02 38 73 02 36 E3 72
            B2 AD E4 9F 5F 14 73 01 37 72 95 AD E5 90 01 30 23 E7 AE 82 02 36
            01 85 03 B4 B3 B2 AF B1 B4 B7 E8 72 B6 BF C2 40 09 19 10 7D 01 A0
            F8 1B FF A1 C7 1B FF 98 E6 AE 82 02 36 01 1B 5D)
      3600. SYSTEM::DEFAULT-TIME-ZONE 1. 0. 60. 24. SYSTEM::JAHR&TAG 2. 5. 153.
      #(0. 31. 61. 92. 122. 153. 184. 214. 245. 275. 306. 337.) 10. 3. -9. 7.))
#Y(#:TOP-LEVEL-FORM-66
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::GET-DECODED-TIME SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::GET-DECODED-TIME
      #16Y(00 00 00 00 00 00 00 00 00 01 71 C4 2F 00 19 01)
      COMMON-LISP::DECODE-UNIVERSAL-TIME))
#Y(#:TOP-LEVEL-FORM-67
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::CONCAT-PNAMES SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::CONCAT-PNAMES
      #49Y(00 00 00 00 02 00 00 00 00 03 AE 71 4A AE 71 4A 73 02 13 AC 72 45 8F
           91 07 AC DA 71 30 24 01 07 AC 38 01 31 D2 19 04 AC DC 38 01 72 43 6B
           03 1B 72)
      0. #\: 1. SYSTEM::*KEYWORD-PACKAGE*))
#Y(#:TOP-LEVEL-FORM-68
   #24Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 DB 8C 4E 04 DB 63 31 51 C6 19
        01)
   (COMMON-LISP::SPECIAL CUSTOM::*ERROR-HANDLER*) CUSTOM::*ERROR-HANDLER*)
