(SYSTEM::VERSION '(SYSTEM::CLISP2 6. LISP:NIL 101293.))
#Y(#:TOP-LEVEL-FORM-1 #13Y(00 00 00 00 00 01 D8 37 02 30 E1 19 01) "LISP")
#Y(#:TOP-LEVEL-FORM-2 #13Y(00 00 00 00 00 01 D8 37 01 30 D8 19 01)
   (DOSEQ DOHASH DEFAULT-DIRECTORY DIR)
  )
#Y(#:TOP-LEVEL-FORM-3 #13Y(00 00 00 00 00 01 D8 37 02 30 E1 19 01) "SYSTEM")
#Y(#:TOP-LEVEL-FORM-4 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   COPY-SYMBOL REMOVE-OLD-DEFINITIONS
   #Y(COPY-SYMBOL
      #47Y(01 00 01 00 00 08 3C 01 AC 71 82 70 CC 92 02 1C AD 8C 50 06 AA AE 70
           4F 30 53 AD 8C 51 06 AA 9F 5D 14 31 78 AA AE 71 81 70 A0 31 7D 15 19
           03
  )  )    )
#Y(#:TOP-LEVEL-FORM-5
   #26Y(00 00 00 00 00 01 00 2A 01 C3 0B 00 00 D9 2E 02 D9 AB 6C 03 01 31 78 C4
        19 02
       )
   0. GENTEMP REMOVE-OLD-DEFINITIONS
   #Y(GENTEMP
      #56Y(00 00 02 00 00 0C 3A 02 02 C4 F8 3A 01 07 0E 02 F7 1A 02 16 02 68 00
           01 31 8D 0C 00 01 AC 68 00 01 37 0B C6 FA 7C 05 14 70 87 72 02 13 AC
           30 D5 41 02 91 00 5E 9C 19 05
          )
      NIL "T" *PACKAGE* 10.
  )  )
#Y(#:TOP-LEVEL-FORM-6
   #18Y(00 00 00 00 00 01 D8 2E 01 D8 DA C6 79 31 78 C3 19 01) DO-SYMBOLS
   REMOVE-OLD-DEFINITIONS MACRO
   #Y(DO-SYMBOLS
      #137Y(01 00 01 00 00 08 3C 01 AC 71 45 D8 8F 01 2F 80 5B 9D 5B 5A 77 9E
            5B 5A 5B 1B 80 55 C5 14 9F 5B 5A 5B 5B 1B 80 53 00 14 A0 5B 78 AA
            62 B1 30 60 41 02 37 01 71 86 DB 62 DC AD B3 7A 02 7A 01 DC B5 C8
            79 7A 01 DE DF B8 7A 02 A4 7B 02 E0 E1 E2 BA 7A 01 91 0C 2C 00 14
            B8 32 02 23 7B 02 7A 02 B3 7A 03 B6 7A 05 7A 03 60 03 19 0A AC 2E
            01 19 03 9E 5B 5A 5B 5A 1A FF A4 9F 5B 5A 5B 5B 5A 1A FF A5 DE A8
            79 60 01 1A 4E
           )
      2. MACRO-CALL-ERROR *PACKAGE* BLOCK LET (NIL) DECLARE IGNORABLE
      MAP-SYMBOLS FUNCTION LAMBDA
  )  )
#Y(#:TOP-LEVEL-FORM-7
   #18Y(00 00 00 00 00 01 D8 2E 01 D8 DA C6 79 31 78 C3 19 01)
   DO-EXTERNAL-SYMBOLS REMOVE-OLD-DEFINITIONS MACRO
   #Y(DO-EXTERNAL-SYMBOLS
      #137Y(01 00 01 00 00 08 3C 01 AC 71 45 D8 8F 01 2F 80 5B 9D 5B 5A 77 9E
            5B 5A 5B 1B 80 55 C5 14 9F 5B 5A 5B 5B 1B 80 53 00 14 A0 5B 78 AA
            62 B1 30 60 41 02 37 01 71 86 DB 62 DC AD B3 7A 02 7A 01 DC B5 C8
            79 7A 01 DE DF B8 7A 02 A4 7B 02 E0 E1 E2 BA 7A 01 91 0C 2C 00 14
            B8 32 02 23 7B 02 7A 02 B3 7A 03 B6 7A 05 7A 03 60 03 19 0A AC 2E
            01 19 03 9E 5B 5A 5B 5A 1A FF A4 9F 5B 5A 5B 5B 5A 1A FF A5 DE A8
            79 60 01 1A 4E
           )
      2. MACRO-CALL-ERROR *PACKAGE* BLOCK LET (NIL) DECLARE IGNORABLE
      MAP-EXTERNAL-SYMBOLS FUNCTION LAMBDA
  )  )
#Y(#:TOP-LEVEL-FORM-8
   #18Y(00 00 00 00 00 01 D8 2E 01 D8 DA C6 79 31 78 C3 19 01) DO-ALL-SYMBOLS
   REMOVE-OLD-DEFINITIONS MACRO
   #Y(DO-ALL-SYMBOLS
      #103Y(01 00 01 00 00 08 3C 01 AC 71 45 D8 8F 01 2F 80 42 9D 5B 5A 77 9E
            5B 5A 5B 1B 3D 00 14 9F 5B 78 AA 62 B0 30 60 41 02 DA 62 DB B1 C7
            79 7A 01 DD DE B4 7A 02 A1 7B 02 DF E0 E1 B6 7A 01 91 09 20 00 14
            B5 32 02 23 7B 02 7A 02 7A 02 B3 7A 05 60 03 19 08 AC 2E 01 19 03
            9E 5B 5A 5B 5A 1A FF BC DD A5 79 60 01 1A 5A
           )
      2. MACRO-CALL-ERROR BLOCK LET (NIL) DECLARE IGNORABLE MAP-ALL-SYMBOLS
      FUNCTION LAMBDA
  )  )
#Y(#:TOP-LEVEL-FORM-9
   #20Y(00 00 00 00 00 01 D8 30 5B D9 8B 50 04 D9 62 30 53 C4 19 01)
   (SPECIAL *MODULES*) *MODULES*
  )
#Y(#:TOP-LEVEL-FORM-10 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   PROVIDE REMOVE-OLD-DEFINITIONS
   #Y(PROVIDE #20Y(01 00 00 00 00 02 AB 70 4C 6A 00 D9 37 02 30 B9 0F 00 19 02)
      *MODULES* #.#'STRING=
  )  )
#Y(#:TOP-LEVEL-FORM-11 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   REQUIRE REMOVE-OLD-DEFINITIONS
   #Y(REQUIRE
      #48Y(01 00 01 00 00 08 3B 01 14 3C 02 AD 70 4C 6A 00 D9 37 02 8B B5 12 91
           00 04 AD 7F E7 02 9D 1F 0B 98 02 AD 32 00 17 19 04 00 19 04 AC 2E 02
           19 04
          )
      *MODULES* #.#'STRING-EQUAL LOAD
  )  )
#Y(#:TOP-LEVEL-FORM-12
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-CLR 0. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-CLR 0.) WARN
  )
#Y(#:TOP-LEVEL-FORM-13
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-SET 15. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-SET 15.) WARN
  )
#Y(#:TOP-LEVEL-FORM-14
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-1 10. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-1 10.) WARN
  )
#Y(#:TOP-LEVEL-FORM-15
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-2 12. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-2 12.) WARN
  )
#Y(#:TOP-LEVEL-FORM-16
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-C1 5. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-C1 5.) WARN
  )
#Y(#:TOP-LEVEL-FORM-17
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-C2 3. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-C2 3.) WARN
  )
#Y(#:TOP-LEVEL-FORM-18
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-AND 8. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-AND 8.) WARN
  )
#Y(#:TOP-LEVEL-FORM-19
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-IOR 14. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-IOR 14.) WARN
  )
#Y(#:TOP-LEVEL-FORM-20
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-XOR 6. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-XOR 6.) WARN
  )
#Y(#:TOP-LEVEL-FORM-21
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-EQV 9. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-EQV 9.) WARN
  )
#Y(#:TOP-LEVEL-FORM-22
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-NAND 7. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-NAND 7.) WARN
  )
#Y(#:TOP-LEVEL-FORM-23
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-NOR 1. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-NOR 1.) WARN
  )
#Y(#:TOP-LEVEL-FORM-24
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-ANDC1 4. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-ANDC1 4.) WARN
  )
#Y(#:TOP-LEVEL-FORM-25
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-ANDC2 2. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-ANDC2 2.) WARN
  )
#Y(#:TOP-LEVEL-FORM-26
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-ORC1 13. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-ORC1 13.) WARN
  )
#Y(#:TOP-LEVEL-FORM-27
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   BOOLE-ORC2 11. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT BOOLE-ORC2 11.) WARN
  )
#Y(#:TOP-LEVEL-FORM-28 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   MAKE-BYTE REMOVE-OLD-DEFINITIONS
   #Y(MAKE-BYTE
      #20Y(00 00 00 00 80 1B 02 00 00 00 3C 02 3C 01 AC AC 31 CB 19 03) :SIZE
      :POSITION
  )  )
#Y(#:TOP-LEVEL-FORM-29
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   LEAST-POSITIVE-NORMALIZED-SHORT-FLOAT #.LEAST-POSITIVE-SHORT-FLOAT
   "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT LEAST-POSITIVE-NORMALIZED-SHORT-FLOAT
    LEAST-POSITIVE-SHORT-FLOAT
   )
   WARN
  )
#Y(#:TOP-LEVEL-FORM-30
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   LEAST-NEGATIVE-NORMALIZED-SHORT-FLOAT #.LEAST-NEGATIVE-SHORT-FLOAT
   "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT LEAST-NEGATIVE-NORMALIZED-SHORT-FLOAT
    LEAST-NEGATIVE-SHORT-FLOAT
   )
   WARN
  )
#Y(#:TOP-LEVEL-FORM-31
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   LEAST-POSITIVE-NORMALIZED-SINGLE-FLOAT #.LEAST-POSITIVE-SINGLE-FLOAT
   "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT LEAST-POSITIVE-NORMALIZED-SINGLE-FLOAT
    LEAST-POSITIVE-SINGLE-FLOAT
   )
   WARN
  )
#Y(#:TOP-LEVEL-FORM-32
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   LEAST-NEGATIVE-NORMALIZED-SINGLE-FLOAT #.LEAST-NEGATIVE-SINGLE-FLOAT
   "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT LEAST-NEGATIVE-NORMALIZED-SINGLE-FLOAT
    LEAST-NEGATIVE-SINGLE-FLOAT
   )
   WARN
  )
#Y(#:TOP-LEVEL-FORM-33
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   LEAST-POSITIVE-NORMALIZED-DOUBLE-FLOAT #.LEAST-POSITIVE-DOUBLE-FLOAT
   "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT LEAST-POSITIVE-NORMALIZED-DOUBLE-FLOAT
    LEAST-POSITIVE-DOUBLE-FLOAT
   )
   WARN
  )
#Y(#:TOP-LEVEL-FORM-34
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   LEAST-NEGATIVE-NORMALIZED-DOUBLE-FLOAT #.LEAST-NEGATIVE-DOUBLE-FLOAT
   "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT LEAST-NEGATIVE-NORMALIZED-DOUBLE-FLOAT
    LEAST-NEGATIVE-DOUBLE-FLOAT
   )
   WARN
  )
#Y(#:TOP-LEVEL-FORM-35
   #40Y(00 00 00 00 00 01 6A 00 D9 8C 5F 15 AA D9 70 4F 8D 01 0E DA DB DC 6D 03
        05 DE D9 D9 70 4F 2C 04 07 D9 AB 31 79 C4 19 02
       )
   LEAST-POSITIVE-LONG-FLOAT LEAST-POSITIVE-NORMALIZED-LONG-FLOAT
   "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT LEAST-POSITIVE-NORMALIZED-LONG-FLOAT LEAST-POSITIVE-LONG-FLOAT)
   WARN
  )
#Y(#:TOP-LEVEL-FORM-36
   #40Y(00 00 00 00 00 01 6A 00 D9 8C 5F 15 AA D9 70 4F 8D 01 0E DA DB DC 6D 03
        05 DE D9 D9 70 4F 2C 04 07 D9 AB 31 79 C4 19 02
       )
   LEAST-NEGATIVE-LONG-FLOAT LEAST-NEGATIVE-NORMALIZED-LONG-FLOAT
   "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT LEAST-NEGATIVE-NORMALIZED-LONG-FLOAT LEAST-NEGATIVE-LONG-FLOAT)
   WARN
  )
#Y(#:TOP-LEVEL-FORM-37
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   CHAR-CODE-LIMIT 256. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT CHAR-CODE-LIMIT 256.) WARN
  )
#Y(#:TOP-LEVEL-FORM-38
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   CHAR-FONT-LIMIT 16. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT CHAR-FONT-LIMIT 16.) WARN
  )
#Y(#:TOP-LEVEL-FORM-39
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   CHAR-BITS-LIMIT 16. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT CHAR-BITS-LIMIT 16.) WARN
  )
#Y(#:TOP-LEVEL-FORM-40
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   CHAR-CONTROL-BIT 1. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT CHAR-CONTROL-BIT 1.) WARN
  )
#Y(#:TOP-LEVEL-FORM-41
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   CHAR-META-BIT 2. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT CHAR-META-BIT 2.) WARN
  )
#Y(#:TOP-LEVEL-FORM-42
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   CHAR-SUPER-BIT 4. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT CHAR-SUPER-BIT 4.) WARN
  )
#Y(#:TOP-LEVEL-FORM-43
   #38Y(00 00 00 00 00 01 D8 8C 5F 15 D9 D8 70 4F 8D 01 0E DA DB DC 6D 03 05 DE
        D8 D8 70 4F 2C 04 07 D8 D9 31 79 C3 19 01
       )
   CHAR-HYPER-BIT 8. "~S redefines the constant ~S. Its old value was ~S."
   "In ~S wird die Konstante ~S umdefiniert. Ihr alter Wert war ~S."
   "~S redéfinit la constante ~S. Son ancienne valeur était ~S." LANGUAGE
   (DEFCONSTANT CHAR-HYPER-BIT 8.) WARN
  )
#Y(#:TOP-LEVEL-FORM-44
   #18Y(00 00 00 00 00 01 D8 2E 01 D8 DA C6 79 31 78 C3 19 01) DOSEQ
   REMOVE-OLD-DEFINITIONS MACRO
   #Y(DOSEQ
      #118Y(01 00 01 00 00 08 3C 01 AC 71 45 D8 8F 01 2F 80 59 9D 5B 5A 77 9E
            5B 5A 5B 77 9F 5B 5A 5B 5B 77 A0 5B 78 AA 62 B1 30 60 41 02 37 01
            71 86 DA 62 DB AD B3 7A 02 7A 01 DB B5 C7 79 7A 01 DD DE B8 7A 02
            A4 7B 02 DF 62 E0 E1 BB 7A 01 91 0D 20 00 14 E2 04 10 79 7A 01 32
            02 23 7B 02 7A 02 B4 7A 04 B6 7A 05 7A 03 60 03 19 0A AC 2E 01 19
            03 DD A9 79 60 01 1A 5A
           )
      2. MACRO-CALL-ERROR BLOCK LET (NIL) DECLARE IGNORABLE MAP FUNCTION LAMBDA
      TAGBODY
  )  )
#Y(#:TOP-LEVEL-FORM-45 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   MEMBER1 REMOVE-OLD-DEFINITIONS
   #Y(MEMBER1
      #35Y(02 00 00 00 81 00 03 00 00 00 3A 01 07 7C 01 92 01 05 1A 05 91 01 02
           C6 F7 DC AC B2 75 01 B1 A2 9A 02 07
          )
      :TEST :TEST-NOT :KEY #.#'IDENTITY #.#'MEMBER
  )  )
#Y(#:TOP-LEVEL-FORM-46 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   UNION REMOVE-OLD-DEFINITIONS
   #Y(UNION
      #49Y(02 00 00 00 81 00 03 00 00 00 B0 8B 94 17 98 03 93 07 B1 A2 36 02 1B
           10 93 06 98 04 94 08 B2 A3 36 02 5C 19 07 A0 19 07 98 04 94 07 B1 A2
           9A 02 07
          )
      :TEST :TEST-NOT :KEY MEMBER1 UNION
  )  )
#Y(#:TOP-LEVEL-FORM-47 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   NUNION REMOVE-OLD-DEFINITIONS
   #Y(NUNION
      #49Y(02 00 00 00 81 00 03 00 00 00 B0 8B 94 17 98 03 93 07 B1 A2 36 02 1B
           10 B0 98 04 94 08 B2 A3 76 02 30 AB 19 07 A0 19 07 98 04 94 07 B1 A2
           9A 02 07
          )
      :TEST :TEST-NOT :KEY MEMBER1 NUNION
  )  )
#Y(#:TOP-LEVEL-FORM-48 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   INTERSECTION REMOVE-OLD-DEFINITIONS
   #Y(INTERSECTION
      #49Y(02 00 00 00 81 00 03 00 00 00 B0 8B 94 13 98 03 93 07 B1 A2 36 02 1B
           0C 98 04 94 07 B1 A2 9A 02 07 00 19 07 93 06 98 04 94 08 B2 A3 36 02
           5C 19 07
          )
      :TEST :TEST-NOT :KEY MEMBER1 INTERSECTION
  )  )
#Y(#:TOP-LEVEL-FORM-49 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   NINTERSECTION REMOVE-OLD-DEFINITIONS
   #Y(NINTERSECTION
      #49Y(02 00 00 00 81 00 03 00 00 00 B0 8B 94 13 98 03 93 07 B1 A2 36 02 1B
           0C 98 04 94 07 B1 A2 9A 02 07 00 19 07 B0 98 04 94 08 B2 A3 76 02 30
           AB 19 07
          )
      :TEST :TEST-NOT :KEY MEMBER1 NINTERSECTION
  )  )
#Y(#:TOP-LEVEL-FORM-50 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   SET-DIFFERENCE REMOVE-OLD-DEFINITIONS
   #Y(SET-DIFFERENCE
      #49Y(02 00 00 00 81 00 03 00 00 00 B0 8B 94 13 98 03 93 07 B1 A2 36 02 1C
           0C 98 04 94 07 B1 A2 9A 02 07 00 19 07 93 06 98 04 94 08 B2 A3 36 02
           5C 19 07
          )
      :TEST :TEST-NOT :KEY MEMBER1 SET-DIFFERENCE
  )  )
#Y(#:TOP-LEVEL-FORM-51 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   NSET-DIFFERENCE REMOVE-OLD-DEFINITIONS
   #Y(NSET-DIFFERENCE
      #49Y(02 00 00 00 81 00 03 00 00 00 B0 8B 94 13 98 03 93 07 B1 A2 36 02 1C
           0C 98 04 94 07 B1 A2 9A 02 07 00 19 07 B0 98 04 94 08 B2 A3 76 02 30
           AB 19 07
          )
      :TEST :TEST-NOT :KEY MEMBER1 NSET-DIFFERENCE
  )  )
#Y(#:TOP-LEVEL-FORM-52 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   SET-EXCLUSIVE-OR REMOVE-OLD-DEFINITIONS
   #Y(SET-EXCLUSIVE-OR
      #29Y(02 00 00 00 81 00 03 00 00 00 98 03 B1 B1 A2 76 02 98 03 B1 B3 A3 76
           02 32 02 23 19 07
          )
      :TEST :TEST-NOT :KEY SET-DIFFERENCE
  )  )
#Y(#:TOP-LEVEL-FORM-53 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   NSET-EXCLUSIVE-OR REMOVE-OLD-DEFINITIONS
   #Y(NSET-EXCLUSIVE-OR
      #29Y(02 00 00 00 81 00 03 00 00 00 98 03 B1 B1 A2 76 02 98 04 B1 B3 A3 76
           02 32 02 24 19 07
          )
      :TEST :TEST-NOT :KEY SET-DIFFERENCE NSET-DIFFERENCE
  )  )
#Y(#:TOP-LEVEL-FORM-54 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   SUBSETP REMOVE-OLD-DEFINITIONS
   #Y(SUBSETP
      #35Y(02 00 00 00 81 00 03 00 00 00 B0 1A 0F 00 19 08 98 03 93 01 B2 A3 36
           02 1C 73 82 00 AA 8C 94 70 02 19 08
          )
      :TEST :TEST-NOT :KEY MEMBER1
  )  )
#Y(#:TOP-LEVEL-FORM-55
   #18Y(00 00 00 00 00 01 D8 2E 01 D8 DA C6 79 31 78 C3 19 01) DOHASH
   REMOVE-OLD-DEFINITIONS MACRO
   #Y(DOHASH
      #129Y(01 00 01 00 00 08 3C 01 AC 71 45 D8 8F 01 2F 80 64 9D 5B 5A 77 9E
            5B 5A 5B 77 9F 5B 5A 5B 5B 77 A0 5B 5A 5B 5B 5B 77 A1 5B 78 AA 62
            B2 30 60 41 02 37 01 71 86 DA 62 DB AD B3 7A 02 7A 01 DB B6 C7 79
            B6 C8 79 7A 02 DE DF B9 B9 7A 03 A4 7B 02 E0 E1 E2 BB BB 7A 02 91
            0C 20 00 14 E3 04 0F 79 7A 01 32 02 23 7B 02 7A 02 B3 7A 03 B6 7A
            05 7A 03 60 03 19 0B AC 2E 01 19 03 DE A8 79 60 01 1A 5A
           )
      2. MACRO-CALL-ERROR BLOCK LET (NIL) (NIL) DECLARE IGNORABLE MAPHASH
      FUNCTION LAMBDA TAGBODY
  )  )
#Y(#:TOP-LEVEL-FORM-56 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   STRING-TRIM REMOVE-OLD-DEFINITIONS
   #Y(STRING-TRIM #13Y(02 00 00 00 00 03 AC AD AD 30 45 19 03))
  )
#Y(#:TOP-LEVEL-FORM-57 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   STRING-LEFT-TRIM REMOVE-OLD-DEFINITIONS
   #Y(STRING-LEFT-TRIM #13Y(02 00 00 00 00 03 AC 62 AD 30 45 19 03))
  )
#Y(#:TOP-LEVEL-FORM-58 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   STRING-RIGHT-TRIM REMOVE-OLD-DEFINITIONS
   #Y(STRING-RIGHT-TRIM #13Y(02 00 00 00 00 03 62 AD AD 30 45 19 03))
  )
#Y(#:TOP-LEVEL-FORM-59 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   %TIME REMOVE-OLD-DEFINITIONS
   #Y(%TIME
      #216Y(12 00 00 00 00 00 BC D8 72 02 37 BC 72 02 35 B4 D8 72 02 37 B4 72
            02 35 72 01 36 BB D8 72 02 37 BB 72 02 35 B3 D8 72 02 37 B3 72 02
            35 72 01 36 BA D8 72 02 37 BA 72 02 35 B2 D8 72 02 37 B2 72 02 35
            72 01 36 B9 D9 D9 71 CB BA 71 D1 B1 D9 D9 71 CB B2 71 D1 72 01 36
            B8 B0 72 01 36 37 01 30 8D DA 37 03 30 8B AE D8 72 01 38 37 01 71
            A5 37 0D 30 82 DB 37 03 30 8B 37 01 30 8D DC 37 03 30 8B AD D8 72
            01 38 37 01 71 A5 37 0D 30 82 DD 37 03 30 8B 37 01 30 8D DE 37 03
            30 8B AB 37 0D 30 82 DF 37 03 30 8B AA 8D 89 07 AC 8D 89 03 00 19
            18 37 01 30 8D E0 37 03 30 8B AA 37 0D 30 82 E1 37 03 30 8B AC D8
            72 01 38 37 01 71 A5 37 0D 30 82 E2 37 03 30 8B 19 18
           )
      #.INTERNAL-TIME-UNITS-PER-SECOND 24. "Real time: " " sec." "Run time: "
      " sec." "Space: " " Bytes" "GC: " ", GC time: " " sec."
  )  )
#Y(#:TOP-LEVEL-FORM-60 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   SLEEP REMOVE-OLD-DEFINITIONS
   #Y(SLEEP
      #67Y(01 00 00 00 00 02 AB 8E 08 29 AB 8D 15 25 AB 8D 8A 21 AB D8 8F 01 30
           15 AB 37 01 31 AA 41 02 AB AB DB 72 02 37 37 01 71 AD 30 CA 19 04 D9
           DA 30 CA 1A 7A DC DD AD DE DF E0 E1 E2 6D 03 0B E4 B2 32 06 1F
          )
      16700000. 86400. 0. 1000000. TYPE-ERROR :DATUM :EXPECTED-TYPE (REAL 0. *)
      "~S: argument ~S should be a nonnegative number"
      "~S: Argument muß eine Zahl >=0 sein, nicht ~S"
      "~S : L'argument doit être un nombre positif ou zéro et non ~S" LANGUAGE
      SLEEP
  )  )
#Y(#:TOP-LEVEL-FORM-61 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   UTAG REMOVE-OLD-DEFINITIONS
   #Y(UTAG
      #32Y(01 00 00 00 00 02 D8 D9 AD 72 02 37 AD DA 71 AA AE DB 71 AA 72 00 36
           AF DC 71 AA 32 05 35 19 02
          )
      -693901. 365. 4. 100. 400.
  )  )
#Y(#:TOP-LEVEL-FORM-62 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   JAHR&TAG REMOVE-OLD-DEFINITIONS
   #Y(JAHR&TAG
      #43Y(01 00 00 00 00 02 D8 D9 AD 72 02 35 DA 71 AA 72 02 35 AA 6E 03 AD AB
           90 01 2F 06 85 01 14 2E 03 F6 AB AE AC 72 01 36 3F 02 19 04
          )
      1900. -58. #10r146097/400 UTAG
  )  )
#Y(#:TOP-LEVEL-FORM-63-1 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 3D 19 01)
   ENCODE-UNIVERSAL-TIME REMOVE-OLD-DEFINITIONS
   #Y(ENCODE-UNIVERSAL-TIME
      #266Y(06 00 01 00 00 00 3C 01 01 04 B0 8E 0C 80 EA D8 B1 D9 90 02 31 18
            2D 02 41 06 B6 DB AC DC BA 72 02 36 DB 71 AB 72 02 37 81 02 35 0C
            16 06 DD B1 90 01 31 80 C4 B1 8E 0C 80 BF DE B2 DF 90 02 31 80 B7
            B1 E0 8F 01 2F 80 9F A1 F8 CD 14 B2 81 02 35 03 B2 8E 0C 80 A2 DE
            B3 90 01 31 80 9B 96 08 E3 A0 5E 14 81 02 35 01 14 AD 6E 0C 81 02
            35 00 AD 24 0D 80 7B AA 95 03 2E 0C 14 90 01 2F 80 79 B3 8E 0C 80
            74 D8 B4 E6 90 02 31 80 6C B4 8E 0C 80 67 D8 B5 E7 90 02 31 80 5F
            B5 8E 0C 80 5A D8 B6 E7 90 02 31 80 52 91 05 03 2D 10 FB AF 8E 0F
            04 AF 80 A6 05 AF 8D 0C 0C AF 8E 0E 3C E9 B0 72 02 37 8E 0C 34 EA
            B0 DF 90 02 31 2D B5 F0 B6 F0 B7 B4 F1 B1 72 02 37 72 03 35 72 02
            37 72 02 35 72 02 37 32 02 35 19 0C B0 80 8E 02 CC 1A FF 5C AB E3
            AF 31 8D 5E 1A FF 81 EB EC ED EE 6D 03 17 B4 B4 B4 B8 BA BC B7 32
            07 1F
           )
      0. 99. GET-DECODED-TIME 100. 50. 1900. 1. 12. 3. 9. -3.
      #(0. 31. 61. 92. 122. 153. 184. 214. 245. 275. 306. 337.) UTAG 11. 23.
      59. DEFAULT-TIME-ZONE 3600. -12. ERROR
      "incorrect date: ~S.~S.~S, ~Sh~Sm~Ss, time zone ~S"
      "Inkorrektes Datum: ~S.~S.~S, ~Sh~Sm~Ss, Zeitzone ~S"
      "Date incorrecte : ~S/~S/~S, ~Sh~Sm~Ss, heure ~S" LANGUAGE 60. 24.
  )  )
#Y(#:TOP-LEVEL-FORM-63-2 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   DECODE-UNIVERSAL-TIME REMOVE-OLD-DEFINITIONS
   #Y(DECODE-UNIVERSAL-TIME
      #116Y(01 00 01 00 00 08 3C 01 01 02 91 03 03 2D 00 F9 7C 01 9E F6 AE D9
            AC 72 02 37 37 01 71 AD 72 01 36 AA DA 31 AA 41 02 AB DA 31 AA 41
            02 AB DB 31 AA 41 02 AB 2E 04 41 02 DD DE AC 72 02 37 72 02 35 DF
            71 AA AB E0 9D 5E 14 72 01 36 71 8D AB E1 8F 01 2F 18 E3 AC 81 02
            35 01 84 03 B2 B1 B0 AD AF B2 B5 E4 71 AE BD C0 3F 09 19 10 E2 AC
            81 02 35 01 1A 68
           )
      DEFAULT-TIME-ZONE 3600. 60. 24. 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-64 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   GET-DECODED-TIME REMOVE-OLD-DEFINITIONS
   #Y(GET-DECODED-TIME #12Y(00 00 00 00 00 01 70 C7 2E 00 19 01)
      DECODE-UNIVERSAL-TIME
  )  )
#Y(#:TOP-LEVEL-FORM-65 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   CONCAT-PNAMES REMOVE-OLD-DEFINITIONS
   #Y(CONCAT-PNAMES
      #45Y(02 00 00 00 00 03 AC 70 4C AC 70 4C 72 02 13 AA 71 45 8E 89 07 AA D8
           70 32 23 01 07 AA 37 01 30 D5 19 04 AA DA 37 01 71 43 6A 03 1A 72
          )
      0. #\: 1. *KEYWORD-PACKAGE*
  )  )
#Y(#:TOP-LEVEL-FORM-66 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   DEFAULT-DIRECTORY REMOVE-OLD-DEFINITIONS
   #Y(DEFAULT-DIRECTORY #12Y(00 00 00 00 00 01 37 01 30 FB 19 01))
  )
#Y(#:TOP-LEVEL-FORM-67 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   DATE-FORMAT REMOVE-OLD-DEFINITIONS
   #Y(DATE-FORMAT #14Y(00 00 00 00 00 01 D8 D9 DA 2C 03 03 19 01)
      "~1{~5@*~D/~4@*~D/~3@*~D ~2@*~2,'0D.~1@*~2,'0D.~0@*~2,'0D~:}"
      "~1{~3@*~D.~4@*~D.~5@*~D ~2@*~2,'0D:~1@*~2,'0D:~0@*~2,'0D~:}"
      "~1{~3@*~D/~4@*~D/~5@*~D ~2@*~2,'0D:~1@*~2,'0D:~0@*~2,'0D~:}" LANGUAGE
  )  )
#Y(#:TOP-LEVEL-FORM-68 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   DIR REMOVE-OLD-DEFINITIONS
   #Y(DIR
      #28Y(00 00 01 00 00 07 3A 01 02 C3 F7 AB 8D 0B 06 AB C4 33 3D 19 02 D9 AC
           32 00 19 1A 76
          )
      ("*/" "*")
      #Y(LISP::DIR-ONEDIR
         #47Y(01 00 00 00 00 02 AB 63 63 70 FA D8 AB 8F 00 28 17 63 DD DE 2D 07
              14 E0 72 03 25 AC DA CC 14 37 02 71 65 2C 03 04 19 03 63 D9 AC DA
              C6 1A 6F
             )
         #.#'ATOM "~{~%~A~}" #.#'STRING< #.#'NAMESTRING FORMAT STRING
         "~:{~%~0@*~A~40T~3@*~7D~52T~2@*~21<" DATE-FORMAT "~>~}"
         #Y(LISP::DIR-ONEDIR-1 #12Y(01 00 00 00 00 02 93 01 30 F4 19 02))
  )  )  )