(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) "SYSTEM")
#Y(#:TOP-LEVEL-FORM-2 #11Y(00 00 00 00 00 01 D8 30 5B 19 01)
   (SPECIAL *BACKQUOTE-LEVEL*)
  )
#Y(#:TOP-LEVEL-FORM-3 #11Y(00 00 00 00 00 01 D8 30 5B 19 01)
   (SPECIAL *NSPLICE-FUN*)
  )
#Y(#:TOP-LEVEL-FORM-4 #11Y(00 00 00 00 00 01 C3 0F 01 19 01) NCONC
   *NSPLICE-FUN*
  )
#Y(#:TOP-LEVEL-FORM-5 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   |`-READER| REMOVE-OLD-DEFINITIONS
   #Y(|`-READER|
      #50Y(02 00 00 00 00 03 0E 00 1B 01 C4 14 31 8D 10 00 AF 63 62 63 70 76 DA
           AB 6E 03 AC 6E 04 6E 05 7A 03 6A 00 DE 90 01 2D 04 AA 2E 07 F6 15 16
           01 11 19 03
          )
      *BACKQUOTE-LEVEL* 0. BACKQUOTE REMOVE-BACKQUOTE-THIRD UNQUOTE-LEVEL
      BACKQUOTE-1 1. ELIM-UNQUOTE-DUMMY
  )  )
#Y(#:TOP-LEVEL-FORM-6 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   |,-READER| REMOVE-OLD-DEFINITIONS
   #Y(|,-READER|
      #92Y(02 00 00 00 00 03 62 AD 37 03 70 7C 0E 00 1C 11 6A 00 8E 88 1A D9 DF
           E0 CC 14 6D 03 05 DE 32 01 1F D9 DA DB C7 1A 72 B0 37 03 30 7A CE 1A
           14 6A 00 31 8E 10 00 AD 23 0A 6E AD 24 0D 12 B0 37 03 30 7A D1 14 E4
           B2 63 62 63 70 76 60 02 1A 07 E4 B1 63 62 63 30 76 14 60 02 11 19 04
          )
      *BACKQUOTE-LEVEL* ERROR "~S: comma is illegal outside of backquote"
      "~S: Komma darf nur innerhalb von Backquote auftreten."
      "~S : Une virgule ne peut apparaître qu'à l'intérieur d'un «backquote»."
      LANGUAGE READ "~S: more commas out than backquotes in, is illegal"
      "~S: Es dürfen nicht mehr Kommata als Backquotes auftreten."
      "~S : Il ne peut y avoir plus de virgules que de «backquote»." #\@ SPLICE
      UNQUOTE #\. NSPLICE
  )  )
#Y(#:TOP-LEVEL-FORM-7 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   REMOVE-BACKQUOTE-THIRD REMOVE-OLD-DEFINITIONS
   #Y(REMOVE-BACKQUOTE-THIRD
      #53Y(01 00 00 00 00 02 9C 1F 1D 93 01 24 02 04 9C 5B 20 1B 93 01 6B 70 94
           02 27 6C 5C 19 02 D8 98 01 AD 32 00 26 19 02 AB 8D 23 73 9C 19 02 DA
           9D 5B 77 60 02 19 02
          )
      VECTOR REMOVE-BACKQUOTE-THIRD BACKQUOTE
  )  )
#Y(#:TOP-LEVEL-FORM-8 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   ELIM-UNQUOTE-DUMMY REMOVE-OLD-DEFINITIONS
   #Y(ELIM-UNQUOTE-DUMMY
      #58Y(01 00 00 00 00 02 9C 1F 23 93 01 AA 6B 78 94 03 AA 6B 73 AD 9E 22 04
           AB 9C 21 1C AC 9C 5C 19 06 C4 19 02 DA 98 03 AD 32 00 26 19 02 AB 23
           00 70 AB 8D 23 6F 9C 19 02 A0 19 06
          )
      UNQUOTE-DUMMY UNQUOTE VECTOR ELIM-UNQUOTE-DUMMY
  )  )
#Y(#:TOP-LEVEL-FORM-9 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   UNQUOTE-LEVEL REMOVE-OLD-DEFINITIONS
   #Y(UNQUOTE-LEVEL
      #170Y(01 00 01 00 00 08 00 2A 01 3A 02 01 C3 0B 00 00 9E 1F 36 93 03 24
            03 05 9E 5B 20 80 40 93 03 24 06 80 74 9E 5B 1F 80 6F DE 9F 5B 77
            67 02 00 71 8D 6B 53 A0 5B 5B 20 80 4F 00 61 02 19 04 D9 AB 6C 02
            01 AF 32 00 26 19 04 AD 8D 23 71 9E 19 04 DC 9F 5B 77 60 02 19 04
            9B 5B 5A 19 05 67 00 00 8D 88 6D 9E 5B 77 67 01 00 71 8E 6B FF 98
            9B 1F 11 93 00 24 05 0C 9B 5B 5A 1F 07 9B 5B 5A 77 23 04 56 DB AB
            60 02 19 05 A0 5B 5B 77 67 03 00 6B FF 74 60 01 1A FF A3 93 03 67
            01 00 6B FF 67 94 04 67 02 00 27 FF 5F 5C 19 04
           )
      0. VECTOR
      #Y(UNQUOTE-LEVEL-1 #14Y(01 00 00 00 00 02 AB 68 00 01 2F 01 19 02) NIL
         UNQUOTE-LEVEL
        )
      UNQUOTE UNQUOTE-VALUE QUOTE BACKQUOTE
  )  )
#Y(#:TOP-LEVEL-FORM-10 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   SPLICING-P REMOVE-OLD-DEFINITIONS
   #Y(SPLICING-P
      #27Y(01 00 00 00 00 02 AB 31 04 1E 0E 93 01 AA C3 59 1D 05 AA C4 59 19 03
           19 03 19 02
          )
      SPLICE NSPLICE
  )  )
#Y(#:TOP-LEVEL-FORM-11 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   BACKQUOTE-1 REMOVE-OLD-DEFINITIONS
   #Y(BACKQUOTE-1
      #342Y(01 00 00 00 00 02 9C 1F 80 50 93 01 23 0A 80 72 93 01 23 0B 80 71
            93 01 24 11 80 7D E4 EA EB D7 14 6D 03 10 32 00 1F 9C 19 02 D9 DA
            DB DC AF 32 00 26 61 02 19 02 DF E0 E1 AD 72 00 26 60 02 19 03 98
            00 AC 8F 00 27 62 DB 98 05 AD 72 00 26 DE AB 8F 00 28 61 E0 9C 5C
            19 03 AB 8E 06 0B AB 8C 5F 07 AB AC 30 4F 21 FF BE AB 8D 08 FF B9
            AB 8D 07 FF B4 AB 8D 21 FF AF AB 8D 23 45 DF AC 60 02 19 02 9C 5B
            5A 19 02 E4 E5 E6 D2 1A FF 92 9F 5B 5B 77 6B FF 71 60 01 1A 1F 93
            01 24 15 80 74 9C 5B 1F 80 6F DB EE 03 17 10 18 A1 5B 77 27 FF 56
            11 14 9F 5B 5B 20 57 00 61 03 19 02 9C 5A 5B 5A 1F 80 74 9C 5A 5B
            5A 77 24 0A 80 6B 9C 5A 5B 77 6B FF 33 94 02 6B FF 2E 2F 19 19 02
            6A 18 AC 60 02 19 04 AB 87 00 75 9C 19 04 6A 18 AC 9D 5B 61 02 19
            04 9C 5A 5B 77 6B FF 0C 94 02 6B FF 07 92 00 61 9B 1F 06 93 00 0E
            18 21 5F 6A 18 AC AC 60 03 19 04 9C 5A 1F 07 9C 5A 77 23 0B FF 9E
            9C 5A 1F 25 9C 5A 77 24 11 1F 9C 5A 5B 5A 1F 09 9C 5A 5B 5A 77 23
            0A FF BC 9C 5A 77 6B FE C9 9D 5A 78 6B FE C3 2F 1A 1A 05 93 01 27
            FE BA 14 94 02 6B FE B4 2F 1A 19 02
           )
      SPLICING-P MULTIPLE-VALUE-CALL #'VECTOR LIST
      #Y(BACKQUOTE-1-1
         #49Y(01 00 00 00 00 02 AB 87 00 0F DD 9D 14 6E 03 60 02 19 02 DA 9D 5B
              5A 1A 73 9C 5B 5A 1F 07 9C 5B 5A 77 23 01 6E 93 01 6E 03 94 02 6E
              03 2F 04 19 02
             )
         SPLICING-P UNQUOTE-VALUE VALUES-LIST BACKQUOTE-1 BACKQUOTE-CONS VALUES
        )
      BACKQUOTE-1 #.#'CONSTANTP QUOTE VECTOR #.#'EVAL UNQUOTE-VALUE SPLICE
      ERROR "The syntax ,@form is valid only in lists"
      "Die Syntax ,@form ist nur innerhalb von Listen erlaubt."
      "La syntaxe ,@form n'est permise qu'à l'intérieur d'une liste." LANGUAGE
      NSPLICE "The syntax ,.form is valid only in lists"
      "Die Syntax ,.form ist nur innerhalb von Listen erlaubt."
      "La syntaxe ,.form n'est permise qu'à l'intérieur d'une liste." BACKQUOTE
      'BACKQUOTE APPEND *NSPLICE-FUN* BACKQUOTE-APPEND BACKQUOTE-CONS
  )  )
#Y(#:TOP-LEVEL-FORM-12 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   BACKQUOTE-APPEND REMOVE-OLD-DEFINITIONS
   #Y(BACKQUOTE-APPEND
      #45Y(02 00 00 00 00 03 92 01 15 9C 1F 05 93 01 23 01 14 D9 AD AD 60 03 19
           03 D9 AD 60 02 19 03 AC 87 00 76 9D 19 03 D9 AD 9E 5B 61 02 19 03
          )
      SPLICING-P APPEND
  )  )
#Y(#:TOP-LEVEL-FORM-13 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01)
   BACKQUOTE-CONS REMOVE-OLD-DEFINITIONS
   #Y(BACKQUOTE-CONS
      #83Y(02 00 00 00 00 03 AC 8C 5F 04 AB 8B 5F 0D 91 01 29 DB 9E 14 60 02 19
           03 C5 1A 0E AC 7F 5C 02 AB 7F 5C 01 D8 AD 23 01 70 9E 14 9E 5C 1A 65
           C6 1A 01 C8 14 AD 9E 5B 61 02 19 03 9C 1F 0F 93 01 23 03 6C 93 01 23
           05 6A 93 01 23 04 65 DC AD AD 60 03 19 03
          )
      QUOTE UNQUOTE UNQUOTE-DUMMY LIST CONS LIST*
  )  )