(SYMBOL-MACROLET ((#:ARG1095 X))
  (DECLARE)
  (SYMBOL-MACROLET ((#:WHAT11105 #:ARG1095))
    (DECLARE (IGNORABLE #:WHAT11105))
    (BLOCK TRIVIA.LEVEL1.IMPL::WHOLE
      (BLOCK TRIVIA.LEVEL1.IMPL::CLAUSE
        (LET ((#:CONS1096 X))
          (DECLARE (IGNORABLE #:CONS1096))
          (IF (CONSP #:CONS1096)
              (LOCALLY
               (DECLARE (TYPE CONS #:CONS1096))
               (LET ((#:CONS1097 (CDR #:CONS1096)))
                 (DECLARE (IGNORABLE #:CONS1097))
                 (IF (CONSP #:CONS1097)
                     (LOCALLY
                      (DECLARE (TYPE CONS #:CONS1097))
                      (SYMBOL-MACROLET ((TAIL (CDR #:CONS1097)))
                        (RETURN-FROM TRIVIA.LEVEL1.IMPL::WHOLE
                          (LOCALLY
                           (LET ((#:WHAT11110 NIL))
                             (DECLARE (IGNORABLE #:WHAT11110))
                             (BLOCK TRIVIA.LEVEL1.IMPL::WHOLE
                               (BLOCK TRIVIA.LEVEL1.IMPL::CLAUSE
                                 (LET ((#:IT1100 #:WHAT11110))
                                   (DECLARE (IGNORABLE #:IT1100))
                                   (RETURN-FROM TRIVIA.LEVEL1.IMPL::WHOLE
                                     (LOCALLY
                                      (SB-KERNEL:%RPLACD #:CONS1097
                                                         `(3 4 5 6))))))
                               (LET ((#:IT1101 #:WHAT11110))
                                 (DECLARE (IGNORABLE #:IT1101))
                                 (RETURN-FROM TRIVIA.LEVEL1.IMPL::WHOLE
                                   (LOCALLY
                                    (RETURN-FROM TRIVIA.LEVEL1.IMPL::CLAUSE
                                      NIL))))))))))))))))
      (BLOCK TRIVIA.LEVEL1.IMPL::CLAUSE
        (LET ((#:IT1098 X))
          (DECLARE (IGNORABLE #:IT1098))
          (IF (EQ #:IT1098 'T)
              (LOCALLY
               (DECLARE (TYPE (EQL (QUOTE T)) #:IT1098))
               (RETURN-FROM TRIVIA.LEVEL1.IMPL::WHOLE
                 (LOCALLY
                  (LET ((#:WHAT11113 NIL))
                    (DECLARE (IGNORABLE #:WHAT11113))
                    (BLOCK TRIVIA.LEVEL1.IMPL::WHOLE
                      (BLOCK TRIVIA.LEVEL1.IMPL::CLAUSE
                        (LET ((#:IT1102 #:WHAT11113))
                          (DECLARE (IGNORABLE #:IT1102))
                          (RETURN-FROM TRIVIA.LEVEL1.IMPL::WHOLE
                            (LOCALLY "LÖÖP"))))
                      (LET ((#:IT1103 #:WHAT11113))
                        (DECLARE (IGNORABLE #:IT1103))
                        (RETURN-FROM TRIVIA.LEVEL1.IMPL::WHOLE
                          (LOCALLY
                           (RETURN-FROM TRIVIA.LEVEL1.IMPL::CLAUSE
                             NIL))))))))))))
      (LET ((#:IT1099 X))
        (DECLARE (IGNORABLE #:IT1099))
        (RETURN-FROM TRIVIA.LEVEL1.IMPL::WHOLE
          (LOCALLY
           (LET ((#:WHAT11114 NIL))
             (DECLARE (IGNORABLE #:WHAT11114))
             (BLOCK TRIVIA.LEVEL1.IMPL::WHOLE
               (LET ((#:IT1104 #:WHAT11114))
                 (DECLARE (IGNORABLE #:IT1104))
                 (RETURN-FROM TRIVIA.LEVEL1.IMPL::WHOLE (LOCALLY NIL)))))))))))