(define *input* #f)
(define *error-status* #f)
(define *attribute-value* #f)
(define (parse x-1)
  (set! *input* x-1)
  (set! *error-status* 0)
  (let ((x-5 (lambda ()
               (error "unhandled parse error"))))
    (f-2 x-5)))
(define (f-2 x-1)
  (let* ((x-4 (lambda ()
                (f-3)
                (f-4 x-1)))
         (x-7 (lambda (x-5) (f-5 x-1 x-5))))
    (if (stream-empty? *input*)
        (x-4)
        (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
          (case x-9
            ((108) (f-7) (f-105 x-7 *attribute-value* x-4))
            ((82) (f-7) (f-107 x-7 *attribute-value* x-4))
            ((106) (f-7) (f-109 x-7 *attribute-value* x-4))
            ((99) (f-7) (f-111 x-7 *attribute-value* x-4))
            ((95) (f-7) (f-113 x-7 *attribute-value* x-4))
            ((98) (f-7) (f-115 x-7 *attribute-value* x-4))
            ((88) (f-7) (f-117 x-7 *attribute-value* x-4))
            ((105) (f-7) (f-269 x-7 *attribute-value* x-4))
            ((102) (f-7) (f-271 x-7 *attribute-value* x-4))
            ((157) (f-7) (f-273 x-7 *attribute-value* x-4))
            ((86) (f-7) (f-275 x-7 *attribute-value* x-4))
            ((90) (f-7) (f-277 x-7 *attribute-value* x-4))
            ((94) (f-7) (f-279 x-7 *attribute-value* x-4))
            ((81) (f-7) (f-281 x-7 *attribute-value* x-4))
            ((107) (f-7) (f-283 x-7 *attribute-value* x-4))
            ((96) (f-7) (f-312 x-7 *attribute-value* x-4))
            ((78) (f-7) (f-314 x-7 *attribute-value* x-4))
            ((101) (f-7) (f-316 x-7 *attribute-value* x-4))
            ((89) (f-7) (f-318 x-7 *attribute-value* x-4))
            ((104) (f-7) (f-320 x-7 *attribute-value* x-4))
            ((132) (f-7) (f-404 x-7 *attribute-value* x-4))
            ((110) (f-7) (f-428 x-7 *attribute-value* x-4))
            ((156) (f-7) (f-418 x-7 *attribute-value* x-4))
            (else (x-4)))))))
(define (f-4 x-1)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-4 (stream-car *input*))
             (x-3 (car x-4))
             (x-8 (stream-car *input*))
             (x-7 (car x-8)))
        (case x-7
          ((151)
           (let* ((x-10 (lambda ($1)
                          (declaration-meat-1 $1)))
                  (x-9 (x-10 #f)))
             (set! *error-status* 3)
             (let* ((x-14 (lambda (x-12)
                            (f-5 x-1 x-12)))
                    (x-17 (lambda ()
                            (f-3)
                            (f-4 x-1))))
               (f-736 x-14 x-9 x-17))))
          (else (begin (set! *input* (stream-cdr *input*)) (f-4 x-1)))))))
(define (f-5 x-2 x-1)
  (let* ((x-5 (lambda ()
                (f-3)
                (f-4 x-2)))
         (x-8 (lambda (x-6) (f-5 x-2 x-6))))
    (if (equal? 0 x-1)
        (if (stream-empty? *input*)
            *attribute-value*
            (x-5))
        (case x-1
          ((28) (f-6 x-8 *attribute-value* x-5))
          ((20) (f-536 x-8 *attribute-value* x-5))
          ((19) (f-538 x-8 *attribute-value* x-5))
          ((7) (f-545 x-8 *attribute-value* x-5))
          ((17) (f-87 x-8 *attribute-value* x-5))
          ((25) (f-91 x-8 *attribute-value* x-5))
          ((16) (f-93 x-8 *attribute-value* x-5))
          ((14) (f-95 x-8 *attribute-value* x-5))
          ((13) (f-97 x-8 *attribute-value* x-5))
          ((15) (f-304 x-8 *attribute-value* x-5))
          ((12) (f-306 x-8 *attribute-value* x-5))
          ((11) (f-308 x-8 *attribute-value* x-5))
          ((29) (f-548 x-8 *attribute-value* x-5))
          ((32) (f-565 x-8 *attribute-value* x-5))
          ((31) (f-582 x-8 *attribute-value* x-5))
          ((10) (f-584 x-8 *attribute-value* x-5))
          ((30) (f-742 x-8 *attribute-value* x-5))
          ((8) (f-754 x-8 *attribute-value* x-5))
          ((6) (f-756 x-8 *attribute-value* x-5))
          ((5) (f-758 x-8 *attribute-value* x-5))
          ((4) (f-760 x-8 *attribute-value* x-5))
          ((3) (f-762 x-8 *attribute-value* x-5))
          (else (f-768 x-8 *attribute-value* x-5))))))
(define (f-768 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (begin (f-769 x-1) (x-2 0))
      (let* ((x-7 (stream-car *input*))
             (x-6 (car x-7))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (x-3))))
(define (f-769 x-1)
  (let* ((x-4 (lambda (x) x)) (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-762 x-2 x-1 x-3)
  (let* ((x-6 (lambda ()
                (f-3)
                (f-763 x-2 x-1 x-3)))
         (x-9 (lambda (x-7)
                (f-764 x-2 x-1 x-3 x-7))))
    (if (stream-empty? *input*)
        (begin (f-767 x-1)
               (let ((x-14 (lambda (x-12)
                             (f-764 x-2 x-1 x-3 x-12))))
                 (x-2 2)))
        (let* ((x-16 (stream-car *input*)) (x-15 (car x-16)))
          (case x-15
            ((108) (f-7) (f-105 x-9 *attribute-value* x-6))
            ((82) (f-7) (f-107 x-9 *attribute-value* x-6))
            ((106) (f-7) (f-109 x-9 *attribute-value* x-6))
            ((99) (f-7) (f-111 x-9 *attribute-value* x-6))
            ((95) (f-7) (f-113 x-9 *attribute-value* x-6))
            ((98) (f-7) (f-115 x-9 *attribute-value* x-6))
            ((88) (f-7) (f-117 x-9 *attribute-value* x-6))
            ((105) (f-7) (f-269 x-9 *attribute-value* x-6))
            ((102) (f-7) (f-271 x-9 *attribute-value* x-6))
            ((157) (f-7) (f-273 x-9 *attribute-value* x-6))
            ((86) (f-7) (f-275 x-9 *attribute-value* x-6))
            ((90) (f-7) (f-277 x-9 *attribute-value* x-6))
            ((94) (f-7) (f-279 x-9 *attribute-value* x-6))
            ((81) (f-7) (f-281 x-9 *attribute-value* x-6))
            ((107) (f-7) (f-283 x-9 *attribute-value* x-6))
            ((96) (f-7) (f-312 x-9 *attribute-value* x-6))
            ((78) (f-7) (f-314 x-9 *attribute-value* x-6))
            ((101) (f-7) (f-316 x-9 *attribute-value* x-6))
            ((89) (f-7) (f-318 x-9 *attribute-value* x-6))
            ((104) (f-7) (f-320 x-9 *attribute-value* x-6))
            ((132) (f-7) (f-404 x-9 *attribute-value* x-6))
            ((110) (f-7) (f-428 x-9 *attribute-value* x-6))
            ((156) (f-7) (f-418 x-9 *attribute-value* x-6))
            (else
             (let* ((x-69 (stream-car *input*)) (x-68 (car x-69)))
               (x-6))))))))
(define (f-767 x-1)
  (let* ((x-4 (lambda ($1) (program-1 $1))) (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-763 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-10 (stream-car *input*))
             (x-9 (car x-10)))
        (case x-9
          ((151)
           (let* ((x-12 (lambda ($1)
                          (declaration-meat-1 $1)))
                  (x-11 (x-12 #f)))
             (set! *error-status* 3)
             (let* ((x-16 (lambda (x-14)
                            (f-764 x-2 x-1 x-3 x-14)))
                    (x-19 (lambda ()
                            (f-3)
                            (f-763 x-2 x-1 x-3))))
               (f-736 x-16 x-11 x-19))))
          (else
           (begin (set! *input* (stream-cdr *input*)) (f-763 x-2 x-1 x-3)))))))
(define (f-764 x-3 x-2 x-4 x-1)
  (let* ((x-7 (lambda ()
                (f-3)
                (f-763 x-3 x-2 x-4)))
         (x-10 (lambda (x-8)
                 (f-764 x-3 x-2 x-4 x-8))))
    (case x-1
      ((28) (f-6 x-10 *attribute-value* x-7))
      ((20) (f-536 x-10 *attribute-value* x-7))
      ((19) (f-538 x-10 *attribute-value* x-7))
      ((7) (f-545 x-10 *attribute-value* x-7))
      ((17) (f-87 x-10 *attribute-value* x-7))
      ((25) (f-91 x-10 *attribute-value* x-7))
      ((16) (f-93 x-10 *attribute-value* x-7))
      ((14) (f-95 x-10 *attribute-value* x-7))
      ((13) (f-97 x-10 *attribute-value* x-7))
      ((15) (f-304 x-10 *attribute-value* x-7))
      ((12) (f-306 x-10 *attribute-value* x-7))
      ((11) (f-308 x-10 *attribute-value* x-7))
      ((29) (f-548 x-10 *attribute-value* x-7))
      ((32) (f-565 x-10 *attribute-value* x-7))
      ((31) (f-582 x-10 *attribute-value* x-7))
      ((10) (f-584 x-10 *attribute-value* x-7))
      ((30) (f-742 x-10 *attribute-value* x-7))
      ((8) (f-754 x-10 *attribute-value* x-7))
      ((6) (f-756 x-10 *attribute-value* x-7))
      ((5) (f-758 x-10 *attribute-value* x-7))
      (else (f-765 x-3 x-10 x-2 *attribute-value* x-7)))))
(define (f-765 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (begin (f-766 x-1 x-2) (x-3 3))
      (let* ((x-9 (stream-car *input*))
             (x-8 (car x-9))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((157
            156
            132
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78
            75)
           (f-766 x-1 x-2)
           (x-3 3))
          (else (x-5))))))
(define (f-766 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (translation-unit-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-760 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (begin (f-761 x-1) (x-2 3))
      (let* ((x-7 (stream-car *input*))
             (x-6 (car x-7))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((157
            156
            132
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78
            75)
           (f-761 x-1)
           (x-2 3))
          (else (x-3))))))
(define (f-761 x-1)
  (let* ((x-4 (lambda ($1)
                (translation-unit-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-758 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (begin (f-759 x-1) (x-2 4))
      (let* ((x-7 (stream-car *input*))
             (x-6 (car x-7))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((157
            156
            132
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78
            75)
           (f-759 x-1)
           (x-2 4))
          (else (x-3))))))
(define (f-759 x-1)
  (let* ((x-4 (lambda ($1)
                (external-declaration-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-756 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (begin (f-757 x-1) (x-2 4))
      (let* ((x-7 (stream-car *input*))
             (x-6 (car x-7))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((157
            156
            132
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78
            75)
           (f-757 x-1)
           (x-2 4))
          (else (x-3))))))
(define (f-757 x-1)
  (let* ((x-4 (lambda ($1)
                (external-declaration-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-754 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (begin (f-755 x-1) (x-2 4))
      (let* ((x-7 (stream-car *input*))
             (x-6 (car x-7))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((157
            156
            132
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78
            75)
           (f-755 x-1)
           (x-2 4))
          (else (x-3))))))
(define (f-755 x-1)
  (let* ((x-4 (lambda ($1)
                (external-declaration-3 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-742 x-2 x-1 x-3)
  (let* ((x-6 (lambda ()
                (f-3)
                (f-743 x-2 x-1 x-3)))
         (x-9 (lambda (x-7)
                (f-744 x-2 x-1 x-3 x-7))))
    (if (stream-empty? *input*)
        (x-6)
        (let* ((x-12 (stream-car *input*)) (x-11 (car x-12)))
          (case x-11
            ((152) (f-7) (f-611 x-9 *attribute-value* x-6))
            ((108) (f-7) (f-105 x-9 *attribute-value* x-6))
            ((82) (f-7) (f-107 x-9 *attribute-value* x-6))
            ((106) (f-7) (f-109 x-9 *attribute-value* x-6))
            ((99) (f-7) (f-111 x-9 *attribute-value* x-6))
            ((95) (f-7) (f-113 x-9 *attribute-value* x-6))
            ((98) (f-7) (f-115 x-9 *attribute-value* x-6))
            ((88) (f-7) (f-117 x-9 *attribute-value* x-6))
            ((105) (f-7) (f-269 x-9 *attribute-value* x-6))
            ((102) (f-7) (f-271 x-9 *attribute-value* x-6))
            ((157) (f-7) (f-273 x-9 *attribute-value* x-6))
            ((86) (f-7) (f-275 x-9 *attribute-value* x-6))
            ((90) (f-7) (f-277 x-9 *attribute-value* x-6))
            ((94) (f-7) (f-279 x-9 *attribute-value* x-6))
            ((81) (f-7) (f-281 x-9 *attribute-value* x-6))
            ((107) (f-7) (f-283 x-9 *attribute-value* x-6))
            ((96) (f-7) (f-312 x-9 *attribute-value* x-6))
            ((78) (f-7) (f-314 x-9 *attribute-value* x-6))
            ((101) (f-7) (f-316 x-9 *attribute-value* x-6))
            ((89) (f-7) (f-318 x-9 *attribute-value* x-6))
            ((104) (f-7) (f-320 x-9 *attribute-value* x-6))
            (else (x-6)))))))
(define (f-743 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((152)
           (let ((x-7 (stream-car *input*)))
             (set! *error-status* 3)
             (let* ((x-11 (lambda (x-9)
                            (f-744 x-2 x-1 x-3 x-9)))
                    (x-14 (lambda ()
                            (f-3)
                            (f-743 x-2 x-1 x-3))))
               (f-607 x-11 (cdr x-7) x-14))))
          (else
           (let* ((x-19 (stream-car *input*)) (x-18 (car x-19)))
             (case x-18
               ((151)
                (let* ((x-21 (lambda ($1)
                               (declaration-meat-1 $1)))
                       (x-20 (x-21 #f)))
                  (set! *error-status* 3)
                  (let* ((x-25 (lambda (x-23)
                                 (f-744 x-2 x-1 x-3 x-23)))
                         (x-28 (lambda ()
                                 (f-3)
                                 (f-743 x-2 x-1 x-3))))
                    (f-607 x-25 x-20 x-28))))
               (else
                (begin (set! *input* (stream-cdr *input*))
                       (f-743 x-2 x-1 x-3))))))))))
(define (f-744 x-3 x-2 x-4 x-1)
  (let* ((x-7 (lambda ()
                (f-3)
                (f-743 x-3 x-2 x-4)))
         (x-10 (lambda (x-8)
                 (f-744 x-3 x-2 x-4 x-8))))
    (case x-1
      ((46) (f-591 x-10 *attribute-value* x-7))
      ((17) (f-87 x-10 *attribute-value* x-7))
      ((25) (f-91 x-10 *attribute-value* x-7))
      ((16) (f-93 x-10 *attribute-value* x-7))
      ((14) (f-95 x-10 *attribute-value* x-7))
      ((13) (f-97 x-10 *attribute-value* x-7))
      ((15) (f-304 x-10 *attribute-value* x-7))
      ((12) (f-306 x-10 *attribute-value* x-7))
      ((11) (f-308 x-10 *attribute-value* x-7))
      ((10) (f-593 x-10 *attribute-value* x-7))
      ((7) (f-545 x-10 *attribute-value* x-7))
      ((6) (f-596 x-10 *attribute-value* x-7))
      ((51) (f-745 x-3 x-10 x-2 *attribute-value* x-7))
      (else (f-747 x-3 x-10 x-2 *attribute-value* x-7)))))
(define (f-747 x-3 x-4 x-1 x-2 x-5)
  (let* ((x-8 (lambda ()
                (f-3)
                (f-748 x-3 x-4 x-1 x-2 x-5)))
         (x-11 (lambda (x-9)
                 (f-749 x-3 x-4 x-1 x-2 x-5 x-9))))
    (if (stream-empty? *input*)
        (x-8)
        (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
          (case x-13
            ((108) (f-7) (f-105 x-11 *attribute-value* x-8))
            ((82) (f-7) (f-107 x-11 *attribute-value* x-8))
            ((106) (f-7) (f-109 x-11 *attribute-value* x-8))
            ((99) (f-7) (f-111 x-11 *attribute-value* x-8))
            ((95) (f-7) (f-113 x-11 *attribute-value* x-8))
            ((98) (f-7) (f-115 x-11 *attribute-value* x-8))
            ((88) (f-7) (f-117 x-11 *attribute-value* x-8))
            ((105) (f-7) (f-269 x-11 *attribute-value* x-8))
            ((102) (f-7) (f-271 x-11 *attribute-value* x-8))
            ((157) (f-7) (f-273 x-11 *attribute-value* x-8))
            ((86) (f-7) (f-275 x-11 *attribute-value* x-8))
            ((90) (f-7) (f-277 x-11 *attribute-value* x-8))
            ((94) (f-7) (f-279 x-11 *attribute-value* x-8))
            ((81) (f-7) (f-281 x-11 *attribute-value* x-8))
            ((107) (f-7) (f-283 x-11 *attribute-value* x-8))
            ((96) (f-7) (f-312 x-11 *attribute-value* x-8))
            ((78) (f-7) (f-314 x-11 *attribute-value* x-8))
            ((101) (f-7) (f-316 x-11 *attribute-value* x-8))
            ((89) (f-7) (f-318 x-11 *attribute-value* x-8))
            ((104) (f-7) (f-320 x-11 *attribute-value* x-8))
            ((152) (f-7) (f-611 x-11 *attribute-value* x-8))
            (else (x-8)))))))
(define (f-748 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((152)
           (let ((x-9 (stream-car *input*)))
             (set! *error-status* 3)
             (let* ((x-13 (lambda (x-11)
                            (f-749 x-3 x-4 x-1 x-2 x-5 x-11)))
                    (x-16 (lambda ()
                            (f-3)
                            (f-748 x-3 x-4 x-1 x-2 x-5))))
               (f-752 x-13 (cdr x-9) x-16))))
          (else
           (let* ((x-21 (stream-car *input*)) (x-20 (car x-21)))
             (case x-20
               ((151)
                (let* ((x-23 (lambda ($1)
                               (declaration-meat-1 $1)))
                       (x-22 (x-23 #f)))
                  (set! *error-status* 3)
                  (let* ((x-27 (lambda (x-25)
                                 (f-749 x-3 x-4 x-1 x-2 x-5 x-25)))
                         (x-30 (lambda ()
                                 (f-3)
                                 (f-748 x-3 x-4 x-1 x-2 x-5))))
                    (f-752 x-27 x-22 x-30))))
               (else
                (begin (set! *input* (stream-cdr *input*))
                       (f-748 x-3 x-4 x-1 x-2 x-5))))))))))
(define (f-752 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-753 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((152) (f-7) (f-611 x-6 *attribute-value* x-3))
            (else
             (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
               (case x-13
                 ((151)
                  (f-737 x-1)
                  (let ((x-19 (lambda (x-17)
                                (f-753 x-2 x-1 x-3 x-17))))
                    (x-2 7)))
                 (else (x-3))))))))))
(define (f-753 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-753 x-3 x-2 x-4 x-5))))
    (f-609 x-3 x-7 x-2 *attribute-value* x-4)))
(define (f-749 x-4 x-5 x-2 x-3 x-6 x-1)
  (let* ((x-9 (lambda ()
                (f-3)
                (f-748 x-4 x-5 x-2 x-3 x-6)))
         (x-12 (lambda (x-10)
                 (f-749 x-4 x-5 x-2 x-3 x-6 x-10))))
    (case x-1
      ((17) (f-87 x-12 *attribute-value* x-9))
      ((25) (f-91 x-12 *attribute-value* x-9))
      ((16) (f-93 x-12 *attribute-value* x-9))
      ((14) (f-95 x-12 *attribute-value* x-9))
      ((13) (f-97 x-12 *attribute-value* x-9))
      ((15) (f-304 x-12 *attribute-value* x-9))
      ((12) (f-306 x-12 *attribute-value* x-9))
      ((11) (f-308 x-12 *attribute-value* x-9))
      ((10) (f-593 x-12 *attribute-value* x-9))
      ((7) (f-545 x-12 *attribute-value* x-9))
      ((46) (f-591 x-12 *attribute-value* x-9))
      ((6) (f-605 x-5 x-12 x-3 *attribute-value* x-9))
      (else (f-750 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9)))))
(define (f-750 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (begin (f-751 x-1 x-2 x-3) (x-4 5))
      (let* ((x-11 (stream-car *input*))
             (x-10 (car x-11))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((157
            156
            132
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78
            75)
           (f-751 x-1 x-2 x-3)
           (x-4 5))
          (else (x-7))))))
(define (f-751 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (function-definition-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-745 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (begin (f-746 x-1 x-2) (x-3 5))
      (let* ((x-9 (stream-car *input*))
             (x-8 (car x-9))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((157
            156
            132
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78
            75)
           (f-746 x-1 x-2)
           (x-3 5))
          (else (x-5))))))
(define (f-746 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (function-definition-1 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-584 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-585 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((132) (f-7) (f-404 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-428 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-418 x-6 *attribute-value* x-3))
            (else
             (let* ((x-18 (stream-car *input*)) (x-17 (car x-18)))
               (case x-17
                 ((151)
                  (f-595 x-1)
                  (let ((x-23 (lambda (x-21)
                                (f-585 x-2 x-1 x-3 x-21))))
                    (x-2 7)))
                 (else (x-3))))))))))
(define (f-585 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-585 x-3 x-2 x-4 x-5))))
    (case x-1
      ((28) (f-6 x-7 *attribute-value* x-4))
      ((20) (f-536 x-7 *attribute-value* x-4))
      ((29) (f-548 x-7 *attribute-value* x-4))
      ((32) (f-565 x-7 *attribute-value* x-4))
      ((31) (f-582 x-7 *attribute-value* x-4))
      ((19) (f-586 x-3 x-7 x-2 *attribute-value* x-4))
      (else (f-588 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-588 x-3 x-4 x-1 x-2 x-5)
  (let* ((x-8 (lambda ()
                (f-3)
                (f-589 x-3 x-4 x-1 x-2 x-5)))
         (x-11 (lambda (x-9)
                 (f-590 x-3 x-4 x-1 x-2 x-5 x-9))))
    (if (stream-empty? *input*)
        (x-8)
        (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
          (case x-13
            ((152) (f-7) (f-611 x-11 *attribute-value* x-8))
            ((108) (f-7) (f-105 x-11 *attribute-value* x-8))
            ((82) (f-7) (f-107 x-11 *attribute-value* x-8))
            ((106) (f-7) (f-109 x-11 *attribute-value* x-8))
            ((99) (f-7) (f-111 x-11 *attribute-value* x-8))
            ((95) (f-7) (f-113 x-11 *attribute-value* x-8))
            ((98) (f-7) (f-115 x-11 *attribute-value* x-8))
            ((88) (f-7) (f-117 x-11 *attribute-value* x-8))
            ((105) (f-7) (f-269 x-11 *attribute-value* x-8))
            ((102) (f-7) (f-271 x-11 *attribute-value* x-8))
            ((157) (f-7) (f-273 x-11 *attribute-value* x-8))
            ((86) (f-7) (f-275 x-11 *attribute-value* x-8))
            ((90) (f-7) (f-277 x-11 *attribute-value* x-8))
            ((94) (f-7) (f-279 x-11 *attribute-value* x-8))
            ((81) (f-7) (f-281 x-11 *attribute-value* x-8))
            ((107) (f-7) (f-283 x-11 *attribute-value* x-8))
            ((96) (f-7) (f-312 x-11 *attribute-value* x-8))
            ((78) (f-7) (f-314 x-11 *attribute-value* x-8))
            ((101) (f-7) (f-316 x-11 *attribute-value* x-8))
            ((89) (f-7) (f-318 x-11 *attribute-value* x-8))
            ((104) (f-7) (f-320 x-11 *attribute-value* x-8))
            (else (x-8)))))))
(define (f-589 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((152)
           (let ((x-9 (stream-car *input*)))
             (set! *error-status* 3)
             (let* ((x-13 (lambda (x-11)
                            (f-590 x-3 x-4 x-1 x-2 x-5 x-11)))
                    (x-16 (lambda ()
                            (f-3)
                            (f-589 x-3 x-4 x-1 x-2 x-5))))
               (f-607 x-13 (cdr x-9) x-16))))
          (else
           (let* ((x-21 (stream-car *input*)) (x-20 (car x-21)))
             (case x-20
               ((151)
                (let* ((x-23 (lambda ($1)
                               (declaration-meat-1 $1)))
                       (x-22 (x-23 #f)))
                  (set! *error-status* 3)
                  (let* ((x-27 (lambda (x-25)
                                 (f-590 x-3 x-4 x-1 x-2 x-5 x-25)))
                         (x-30 (lambda ()
                                 (f-3)
                                 (f-589 x-3 x-4 x-1 x-2 x-5))))
                    (f-607 x-27 x-22 x-30))))
               (else
                (begin (set! *input* (stream-cdr *input*))
                       (f-589 x-3 x-4 x-1 x-2 x-5))))))))))
(define (f-590 x-4 x-5 x-2 x-3 x-6 x-1)
  (let* ((x-9 (lambda ()
                (f-3)
                (f-589 x-4 x-5 x-2 x-3 x-6)))
         (x-12 (lambda (x-10)
                 (f-590 x-4 x-5 x-2 x-3 x-6 x-10))))
    (case x-1
      ((46) (f-591 x-12 *attribute-value* x-9))
      ((17) (f-87 x-12 *attribute-value* x-9))
      ((25) (f-91 x-12 *attribute-value* x-9))
      ((16) (f-93 x-12 *attribute-value* x-9))
      ((14) (f-95 x-12 *attribute-value* x-9))
      ((13) (f-97 x-12 *attribute-value* x-9))
      ((15) (f-304 x-12 *attribute-value* x-9))
      ((12) (f-306 x-12 *attribute-value* x-9))
      ((11) (f-308 x-12 *attribute-value* x-9))
      ((10) (f-593 x-12 *attribute-value* x-9))
      ((7) (f-545 x-12 *attribute-value* x-9))
      ((6) (f-596 x-12 *attribute-value* x-9))
      ((51) (f-598 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9))
      (else (f-600 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9)))))
(define (f-600 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (let* ((x-10 (lambda ()
                 (f-3)
                 (f-601 x-4 x-5 x-6 x-1 x-2 x-3 x-7)))
         (x-13 (lambda (x-11)
                 (f-602 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-11))))
    (if (stream-empty? *input*)
        (x-10)
        (let* ((x-16 (stream-car *input*)) (x-15 (car x-16)))
          (case x-15
            ((152) (f-7) (f-611 x-13 *attribute-value* x-10))
            ((108) (f-7) (f-105 x-13 *attribute-value* x-10))
            ((82) (f-7) (f-107 x-13 *attribute-value* x-10))
            ((106) (f-7) (f-109 x-13 *attribute-value* x-10))
            ((99) (f-7) (f-111 x-13 *attribute-value* x-10))
            ((95) (f-7) (f-113 x-13 *attribute-value* x-10))
            ((98) (f-7) (f-115 x-13 *attribute-value* x-10))
            ((88) (f-7) (f-117 x-13 *attribute-value* x-10))
            ((105) (f-7) (f-269 x-13 *attribute-value* x-10))
            ((102) (f-7) (f-271 x-13 *attribute-value* x-10))
            ((157) (f-7) (f-273 x-13 *attribute-value* x-10))
            ((86) (f-7) (f-275 x-13 *attribute-value* x-10))
            ((90) (f-7) (f-277 x-13 *attribute-value* x-10))
            ((94) (f-7) (f-279 x-13 *attribute-value* x-10))
            ((81) (f-7) (f-281 x-13 *attribute-value* x-10))
            ((107) (f-7) (f-283 x-13 *attribute-value* x-10))
            ((96) (f-7) (f-312 x-13 *attribute-value* x-10))
            ((78) (f-7) (f-314 x-13 *attribute-value* x-10))
            ((101) (f-7) (f-316 x-13 *attribute-value* x-10))
            ((89) (f-7) (f-318 x-13 *attribute-value* x-10))
            ((104) (f-7) (f-320 x-13 *attribute-value* x-10))
            (else (x-10)))))))
(define (f-601 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((152)
           (let ((x-11 (stream-car *input*)))
             (set! *error-status* 3)
             (let* ((x-15 (lambda (x-13)
                            (f-602 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-13)))
                    (x-18 (lambda ()
                            (f-3)
                            (f-601 x-4 x-5 x-6 x-1 x-2 x-3 x-7))))
               (f-607 x-15 (cdr x-11) x-18))))
          (else
           (let* ((x-23 (stream-car *input*)) (x-22 (car x-23)))
             (case x-22
               ((151)
                (let* ((x-25 (lambda ($1)
                               (declaration-meat-1 $1)))
                       (x-24 (x-25 #f)))
                  (set! *error-status* 3)
                  (let* ((x-29 (lambda (x-27)
                                 (f-602 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-27)))
                         (x-32 (lambda ()
                                 (f-3)
                                 (f-601 x-4 x-5 x-6 x-1 x-2 x-3 x-7))))
                    (f-607 x-29 x-24 x-32))))
               (else
                (begin (set! *input* (stream-cdr *input*))
                       (f-601 x-4 x-5 x-6 x-1 x-2 x-3 x-7))))))))))
(define (f-607 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-608 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((152) (f-7) (f-611 x-6 *attribute-value* x-3))
            (else
             (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
               (case x-13
                 ((151)
                  (f-737 x-1)
                  (let ((x-19 (lambda (x-17)
                                (f-608 x-2 x-1 x-3 x-17))))
                    (x-2 7)))
                 (else (x-3))))))))))
(define (f-611 x-2 x-1 x-3)
  (let* ((x-6 (lambda ()
                (f-3)
                (f-612 x-2 x-1 x-3)))
         (x-9 (lambda (x-7)
                (f-613 x-2 x-1 x-3 x-7))))
    (if (stream-empty? *input*)
        (x-6)
        (let* ((x-12 (stream-car *input*)) (x-11 (car x-12)))
          (case x-11
            ((97) (f-7) (f-637 x-9 *attribute-value* x-6))
            ((79) (f-7) (f-643 x-9 *attribute-value* x-6))
            ((83) (f-7) (f-646 x-9 *attribute-value* x-6))
            ((92) (f-7) (f-649 x-9 *attribute-value* x-6))
            ((91) (f-7) (f-653 x-9 *attribute-value* x-6))
            ((85) (f-7) (f-667 x-9 *attribute-value* x-6))
            ((109) (f-7) (f-677 x-9 *attribute-value* x-6))
            ((103) (f-7) (f-685 x-9 *attribute-value* x-6))
            ((93) (f-7) (f-693 x-9 *attribute-value* x-6))
            ((144) (f-7) (f-39 x-9 *attribute-value* x-6))
            ((137) (f-7) (f-41 x-9 *attribute-value* x-6))
            ((130) (f-7) (f-43 x-9 *attribute-value* x-6))
            ((129) (f-7) (f-45 x-9 *attribute-value* x-6))
            ((132) (f-7) (f-47 x-9 *attribute-value* x-6))
            ((136) (f-7) (f-49 x-9 *attribute-value* x-6))
            ((159) (f-7) (f-51 x-9 *attribute-value* x-6))
            ((76) (f-7) (f-53 x-9 *attribute-value* x-6))
            ((158) (f-7) (f-55 x-9 *attribute-value* x-6))
            ((77) (f-7) (f-57 x-9 *attribute-value* x-6))
            ((100) (f-7) (f-61 x-9 *attribute-value* x-6))
            ((128) (f-7) (f-65 x-9 *attribute-value* x-6))
            ((127) (f-7) (f-80 x-9 *attribute-value* x-6))
            ((110) (f-7) (f-84 x-9 *attribute-value* x-6))
            ((152) (f-7) (f-611 x-9 *attribute-value* x-6))
            ((84) (f-7) (f-704 x-9 *attribute-value* x-6))
            ((80) (f-7) (f-709 x-9 *attribute-value* x-6))
            ((156) (f-7) (f-716 x-9 *attribute-value* x-6))
            ((108) (f-7) (f-105 x-9 *attribute-value* x-6))
            ((82) (f-7) (f-107 x-9 *attribute-value* x-6))
            ((106) (f-7) (f-109 x-9 *attribute-value* x-6))
            ((99) (f-7) (f-111 x-9 *attribute-value* x-6))
            ((95) (f-7) (f-113 x-9 *attribute-value* x-6))
            ((98) (f-7) (f-115 x-9 *attribute-value* x-6))
            ((88) (f-7) (f-117 x-9 *attribute-value* x-6))
            ((105) (f-7) (f-269 x-9 *attribute-value* x-6))
            ((102) (f-7) (f-271 x-9 *attribute-value* x-6))
            ((157) (f-7) (f-273 x-9 *attribute-value* x-6))
            ((86) (f-7) (f-275 x-9 *attribute-value* x-6))
            ((90) (f-7) (f-277 x-9 *attribute-value* x-6))
            ((94) (f-7) (f-279 x-9 *attribute-value* x-6))
            ((81) (f-7) (f-281 x-9 *attribute-value* x-6))
            ((107) (f-7) (f-283 x-9 *attribute-value* x-6))
            ((96) (f-7) (f-312 x-9 *attribute-value* x-6))
            ((78) (f-7) (f-314 x-9 *attribute-value* x-6))
            ((101) (f-7) (f-316 x-9 *attribute-value* x-6))
            ((89) (f-7) (f-318 x-9 *attribute-value* x-6))
            ((104) (f-7) (f-320 x-9 *attribute-value* x-6))
            ((153) (f-7) (f-740 x-2 x-9 x-1 *attribute-value* x-6))
            (else
             (let* ((x-111 (stream-car *input*)) (x-110 (car x-111)))
               (case x-110
                 ((111)
                  (f-642 x-1)
                  (let ((x-116 (lambda (x-114)
                                 (f-613 x-2 x-1 x-3 x-114))))
                    (x-116 54)))
                 ((151)
                  (f-642 x-1)
                  (let ((x-121 (lambda (x-119)
                                 (f-613 x-2 x-1 x-3 x-119))))
                    (x-121 54)))
                 (else (x-6))))))))))
(define (f-740 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (begin (f-741 x-1 x-2) (x-3 46))
      (let* ((x-9 (stream-car *input*))
             (x-8 (car x-9))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((159
            158
            157
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            108
            107
            106
            105
            104
            103
            102
            101
            100
            99
            98
            97
            96
            95
            94
            93
            92
            91
            90
            89
            88
            87
            86
            85
            84
            83
            82
            81
            80
            79
            78
            77
            76
            75)
           (f-741 x-1 x-2)
           (x-3 46))
          (else (x-5))))))
(define (f-741 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (compound-statement-1 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-612 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-10 (stream-car *input*))
             (x-9 (car x-10)))
        (case x-9
          ((151)
           (let* ((x-12 (lambda ($1)
                          (declaration-meat-1 $1)))
                  (x-11 (x-12 #f)))
             (set! *error-status* 3)
             (let* ((x-16 (lambda (x-14)
                            (f-613 x-2 x-1 x-3 x-14)))
                    (x-19 (lambda ()
                            (f-3)
                            (f-612 x-2 x-1 x-3))))
               (f-736 x-16 x-11 x-19))))
          (else
           (begin (set! *input* (stream-cdr *input*)) (f-612 x-2 x-1 x-3)))))))
(define (f-613 x-3 x-2 x-4 x-1)
  (let* ((x-7 (lambda ()
                (f-3)
                (f-612 x-3 x-2 x-4)))
         (x-10 (lambda (x-8)
                 (f-613 x-3 x-2 x-4 x-8))))
    (case x-1
      ((74) (f-11 x-10 *attribute-value* x-7))
      ((72) (f-13 x-10 *attribute-value* x-7))
      ((70) (f-15 x-10 *attribute-value* x-7))
      ((71) (f-17 x-10 *attribute-value* x-7))
      ((69) (f-30 x-10 *attribute-value* x-7))
      ((68) (f-32 x-10 *attribute-value* x-7))
      ((67) (f-34 x-10 *attribute-value* x-7))
      ((66) (f-72 x-10 *attribute-value* x-7))
      ((65) (f-137 x-10 *attribute-value* x-7))
      ((64) (f-155 x-10 *attribute-value* x-7))
      ((63) (f-173 x-10 *attribute-value* x-7))
      ((62) (f-183 x-10 *attribute-value* x-7))
      ((61) (f-189 x-10 *attribute-value* x-7))
      ((60) (f-195 x-10 *attribute-value* x-7))
      ((59) (f-201 x-10 *attribute-value* x-7))
      ((58) (f-207 x-10 *attribute-value* x-7))
      ((56) (f-214 x-10 *attribute-value* x-7))
      ((53) (f-245 x-10 *attribute-value* x-7))
      ((52) (f-614 x-10 *attribute-value* x-7))
      ((54) (f-616 x-10 *attribute-value* x-7))
      ((50) (f-619 x-10 *attribute-value* x-7))
      ((49) (f-621 x-10 *attribute-value* x-7))
      ((48) (f-623 x-10 *attribute-value* x-7))
      ((45) (f-625 x-10 *attribute-value* x-7))
      ((46) (f-627 x-10 *attribute-value* x-7))
      ((44) (f-629 x-10 *attribute-value* x-7))
      ((43) (f-631 x-10 *attribute-value* x-7))
      ((17) (f-87 x-10 *attribute-value* x-7))
      ((25) (f-91 x-10 *attribute-value* x-7))
      ((16) (f-93 x-10 *attribute-value* x-7))
      ((14) (f-95 x-10 *attribute-value* x-7))
      ((13) (f-97 x-10 *attribute-value* x-7))
      ((15) (f-304 x-10 *attribute-value* x-7))
      ((12) (f-306 x-10 *attribute-value* x-7))
      ((11) (f-308 x-10 *attribute-value* x-7))
      ((10) (f-593 x-10 *attribute-value* x-7))
      ((7) (f-545 x-10 *attribute-value* x-7))
      ((6) (f-596 x-10 *attribute-value* x-7))
      ((47) (f-633 x-3 x-10 x-2 *attribute-value* x-7))
      (else (f-729 x-3 x-10 x-2 *attribute-value* x-7)))))
(define (f-729 x-3 x-4 x-1 x-2 x-5)
  (let* ((x-8 (lambda ()
                (f-3)
                (f-730 x-3 x-4 x-1 x-2 x-5)))
         (x-11 (lambda (x-9)
                 (f-731 x-3 x-4 x-1 x-2 x-5 x-9))))
    (if (stream-empty? *input*)
        (x-8)
        (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
          (case x-13
            ((108) (f-7) (f-105 x-11 *attribute-value* x-8))
            ((82) (f-7) (f-107 x-11 *attribute-value* x-8))
            ((106) (f-7) (f-109 x-11 *attribute-value* x-8))
            ((99) (f-7) (f-111 x-11 *attribute-value* x-8))
            ((95) (f-7) (f-113 x-11 *attribute-value* x-8))
            ((98) (f-7) (f-115 x-11 *attribute-value* x-8))
            ((88) (f-7) (f-117 x-11 *attribute-value* x-8))
            ((105) (f-7) (f-269 x-11 *attribute-value* x-8))
            ((102) (f-7) (f-271 x-11 *attribute-value* x-8))
            ((157) (f-7) (f-273 x-11 *attribute-value* x-8))
            ((86) (f-7) (f-275 x-11 *attribute-value* x-8))
            ((90) (f-7) (f-277 x-11 *attribute-value* x-8))
            ((94) (f-7) (f-279 x-11 *attribute-value* x-8))
            ((81) (f-7) (f-281 x-11 *attribute-value* x-8))
            ((107) (f-7) (f-283 x-11 *attribute-value* x-8))
            ((96) (f-7) (f-312 x-11 *attribute-value* x-8))
            ((78) (f-7) (f-314 x-11 *attribute-value* x-8))
            ((101) (f-7) (f-316 x-11 *attribute-value* x-8))
            ((89) (f-7) (f-318 x-11 *attribute-value* x-8))
            ((104) (f-7) (f-320 x-11 *attribute-value* x-8))
            ((97) (f-7) (f-637 x-11 *attribute-value* x-8))
            ((79) (f-7) (f-643 x-11 *attribute-value* x-8))
            ((83) (f-7) (f-646 x-11 *attribute-value* x-8))
            ((92) (f-7) (f-649 x-11 *attribute-value* x-8))
            ((91) (f-7) (f-653 x-11 *attribute-value* x-8))
            ((85) (f-7) (f-667 x-11 *attribute-value* x-8))
            ((109) (f-7) (f-677 x-11 *attribute-value* x-8))
            ((103) (f-7) (f-685 x-11 *attribute-value* x-8))
            ((93) (f-7) (f-693 x-11 *attribute-value* x-8))
            ((144) (f-7) (f-39 x-11 *attribute-value* x-8))
            ((137) (f-7) (f-41 x-11 *attribute-value* x-8))
            ((130) (f-7) (f-43 x-11 *attribute-value* x-8))
            ((129) (f-7) (f-45 x-11 *attribute-value* x-8))
            ((132) (f-7) (f-47 x-11 *attribute-value* x-8))
            ((136) (f-7) (f-49 x-11 *attribute-value* x-8))
            ((159) (f-7) (f-51 x-11 *attribute-value* x-8))
            ((76) (f-7) (f-53 x-11 *attribute-value* x-8))
            ((158) (f-7) (f-55 x-11 *attribute-value* x-8))
            ((77) (f-7) (f-57 x-11 *attribute-value* x-8))
            ((100) (f-7) (f-61 x-11 *attribute-value* x-8))
            ((128) (f-7) (f-65 x-11 *attribute-value* x-8))
            ((127) (f-7) (f-80 x-11 *attribute-value* x-8))
            ((110) (f-7) (f-84 x-11 *attribute-value* x-8))
            ((152) (f-7) (f-611 x-11 *attribute-value* x-8))
            ((84) (f-7) (f-704 x-11 *attribute-value* x-8))
            ((80) (f-7) (f-709 x-11 *attribute-value* x-8))
            ((156) (f-7) (f-716 x-11 *attribute-value* x-8))
            ((153) (f-7) (f-738 x-3 x-4 x-11 x-1 x-2 *attribute-value* x-8))
            (else
             (let* ((x-113 (stream-car *input*)) (x-112 (car x-113)))
               (case x-112
                 ((111)
                  (f-721 x-1 x-2)
                  (let ((x-118 (lambda (x-116)
                                 (f-731 x-3 x-4 x-1 x-2 x-5 x-116))))
                    (x-118 54)))
                 ((151)
                  (f-721 x-1 x-2)
                  (let ((x-123 (lambda (x-121)
                                 (f-731 x-3 x-4 x-1 x-2 x-5 x-121))))
                    (x-123 54)))
                 (else (x-8))))))))))
(define (f-738 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (begin (f-739 x-1 x-2 x-3) (x-4 46))
      (let* ((x-11 (stream-car *input*))
             (x-10 (car x-11))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((159
            158
            157
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            108
            107
            106
            105
            104
            103
            102
            101
            100
            99
            98
            97
            96
            95
            94
            93
            92
            91
            90
            89
            88
            87
            86
            85
            84
            83
            82
            81
            80
            79
            78
            77
            76
            75)
           (f-739 x-1 x-2 x-3)
           (x-4 46))
          (else (x-7))))))
(define (f-739 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (compound-statement-3 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-730 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-12 (stream-car *input*))
             (x-11 (car x-12)))
        (case x-11
          ((151)
           (let* ((x-14 (lambda ($1)
                          (declaration-meat-1 $1)))
                  (x-13 (x-14 #f)))
             (set! *error-status* 3)
             (let* ((x-18 (lambda (x-16)
                            (f-731 x-3 x-4 x-1 x-2 x-5 x-16)))
                    (x-21 (lambda ()
                            (f-3)
                            (f-730 x-3 x-4 x-1 x-2 x-5))))
               (f-736 x-18 x-13 x-21))))
          (else
           (begin (set! *input* (stream-cdr *input*))
                  (f-730 x-3 x-4 x-1 x-2 x-5)))))))
(define (f-736 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((151) (f-737 x-1) (x-2 7))
          (else (x-3))))))
(define (f-737 x-1)
  (let* ((x-4 (lambda ($1)
                (declaration-meat-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-731 x-4 x-5 x-2 x-3 x-6 x-1)
  (let* ((x-9 (lambda ()
                (f-3)
                (f-730 x-4 x-5 x-2 x-3 x-6)))
         (x-12 (lambda (x-10)
                 (f-731 x-4 x-5 x-2 x-3 x-6 x-10))))
    (case x-1
      ((17) (f-87 x-12 *attribute-value* x-9))
      ((25) (f-91 x-12 *attribute-value* x-9))
      ((16) (f-93 x-12 *attribute-value* x-9))
      ((14) (f-95 x-12 *attribute-value* x-9))
      ((13) (f-97 x-12 *attribute-value* x-9))
      ((15) (f-304 x-12 *attribute-value* x-9))
      ((12) (f-306 x-12 *attribute-value* x-9))
      ((11) (f-308 x-12 *attribute-value* x-9))
      ((10) (f-593 x-12 *attribute-value* x-9))
      ((7) (f-545 x-12 *attribute-value* x-9))
      ((74) (f-11 x-12 *attribute-value* x-9))
      ((72) (f-13 x-12 *attribute-value* x-9))
      ((70) (f-15 x-12 *attribute-value* x-9))
      ((71) (f-17 x-12 *attribute-value* x-9))
      ((69) (f-30 x-12 *attribute-value* x-9))
      ((68) (f-32 x-12 *attribute-value* x-9))
      ((67) (f-34 x-12 *attribute-value* x-9))
      ((66) (f-72 x-12 *attribute-value* x-9))
      ((65) (f-137 x-12 *attribute-value* x-9))
      ((64) (f-155 x-12 *attribute-value* x-9))
      ((63) (f-173 x-12 *attribute-value* x-9))
      ((62) (f-183 x-12 *attribute-value* x-9))
      ((61) (f-189 x-12 *attribute-value* x-9))
      ((60) (f-195 x-12 *attribute-value* x-9))
      ((59) (f-201 x-12 *attribute-value* x-9))
      ((58) (f-207 x-12 *attribute-value* x-9))
      ((56) (f-214 x-12 *attribute-value* x-9))
      ((53) (f-245 x-12 *attribute-value* x-9))
      ((52) (f-614 x-12 *attribute-value* x-9))
      ((54) (f-616 x-12 *attribute-value* x-9))
      ((50) (f-619 x-12 *attribute-value* x-9))
      ((49) (f-621 x-12 *attribute-value* x-9))
      ((48) (f-623 x-12 *attribute-value* x-9))
      ((45) (f-625 x-12 *attribute-value* x-9))
      ((46) (f-627 x-12 *attribute-value* x-9))
      ((44) (f-629 x-12 *attribute-value* x-9))
      ((43) (f-631 x-12 *attribute-value* x-9))
      ((6) (f-605 x-5 x-12 x-3 *attribute-value* x-9))
      (else (f-732 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9)))))
(define (f-732 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (let ((x-10 (lambda (x-8)
                (f-733 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-8))))
    (if (stream-empty? *input*)
        (x-7)
        (let* ((x-13 (stream-car *input*)) (x-12 (car x-13)))
          (case x-12
            ((97) (f-7) (f-637 x-10 *attribute-value* x-7))
            ((79) (f-7) (f-643 x-10 *attribute-value* x-7))
            ((83) (f-7) (f-646 x-10 *attribute-value* x-7))
            ((92) (f-7) (f-649 x-10 *attribute-value* x-7))
            ((91) (f-7) (f-653 x-10 *attribute-value* x-7))
            ((85) (f-7) (f-667 x-10 *attribute-value* x-7))
            ((109) (f-7) (f-677 x-10 *attribute-value* x-7))
            ((103) (f-7) (f-685 x-10 *attribute-value* x-7))
            ((93) (f-7) (f-693 x-10 *attribute-value* x-7))
            ((144) (f-7) (f-39 x-10 *attribute-value* x-7))
            ((137) (f-7) (f-41 x-10 *attribute-value* x-7))
            ((130) (f-7) (f-43 x-10 *attribute-value* x-7))
            ((129) (f-7) (f-45 x-10 *attribute-value* x-7))
            ((132) (f-7) (f-47 x-10 *attribute-value* x-7))
            ((136) (f-7) (f-49 x-10 *attribute-value* x-7))
            ((159) (f-7) (f-51 x-10 *attribute-value* x-7))
            ((76) (f-7) (f-53 x-10 *attribute-value* x-7))
            ((158) (f-7) (f-55 x-10 *attribute-value* x-7))
            ((77) (f-7) (f-57 x-10 *attribute-value* x-7))
            ((100) (f-7) (f-61 x-10 *attribute-value* x-7))
            ((128) (f-7) (f-65 x-10 *attribute-value* x-7))
            ((127) (f-7) (f-80 x-10 *attribute-value* x-7))
            ((110) (f-7) (f-84 x-10 *attribute-value* x-7))
            ((152) (f-7) (f-611 x-10 *attribute-value* x-7))
            ((84) (f-7) (f-704 x-10 *attribute-value* x-7))
            ((80) (f-7) (f-709 x-10 *attribute-value* x-7))
            ((156) (f-7) (f-716 x-10 *attribute-value* x-7))
            ((153)
             (f-7)
             (f-734 x-4 x-5 x-6 x-10 x-1 x-2 x-3 *attribute-value* x-7))
            (else
             (let* ((x-72 (stream-car *input*)) (x-71 (car x-72)))
               (case x-71
                 ((111)
                  (f-722 x-1 x-2 x-3)
                  (let ((x-77 (lambda (x-75)
                                (f-733 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-75))))
                    (x-77 54)))
                 ((151)
                  (f-722 x-1 x-2 x-3)
                  (let ((x-82 (lambda (x-80)
                                (f-733 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-80))))
                    (x-82 54)))
                 (else (x-7))))))))))
(define (f-734 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (begin (f-735 x-1 x-2 x-3 x-4) (x-5 46))
      (let* ((x-13 (stream-car *input*))
             (x-12 (car x-13))
             (x-17 (stream-car *input*))
             (x-16 (car x-17)))
        (case x-16
          ((159
            158
            157
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            108
            107
            106
            105
            104
            103
            102
            101
            100
            99
            98
            97
            96
            95
            94
            93
            92
            91
            90
            89
            88
            87
            86
            85
            84
            83
            82
            81
            80
            79
            78
            77
            76
            75)
           (f-735 x-1 x-2 x-3 x-4)
           (x-5 46))
          (else (x-9))))))
(define (f-735 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (compound-statement-4 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-733 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-1)
  (let ((x-11 (lambda (x-9)
                (f-733 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-9))))
    (case x-1
      ((74) (f-11 x-11 *attribute-value* x-8))
      ((72) (f-13 x-11 *attribute-value* x-8))
      ((70) (f-15 x-11 *attribute-value* x-8))
      ((71) (f-17 x-11 *attribute-value* x-8))
      ((69) (f-30 x-11 *attribute-value* x-8))
      ((68) (f-32 x-11 *attribute-value* x-8))
      ((67) (f-34 x-11 *attribute-value* x-8))
      ((66) (f-72 x-11 *attribute-value* x-8))
      ((65) (f-137 x-11 *attribute-value* x-8))
      ((64) (f-155 x-11 *attribute-value* x-8))
      ((63) (f-173 x-11 *attribute-value* x-8))
      ((62) (f-183 x-11 *attribute-value* x-8))
      ((61) (f-189 x-11 *attribute-value* x-8))
      ((60) (f-195 x-11 *attribute-value* x-8))
      ((59) (f-201 x-11 *attribute-value* x-8))
      ((58) (f-207 x-11 *attribute-value* x-8))
      ((56) (f-214 x-11 *attribute-value* x-8))
      ((53) (f-245 x-11 *attribute-value* x-8))
      ((52) (f-614 x-11 *attribute-value* x-8))
      ((54) (f-616 x-11 *attribute-value* x-8))
      ((50) (f-619 x-11 *attribute-value* x-8))
      ((49) (f-621 x-11 *attribute-value* x-8))
      ((48) (f-623 x-11 *attribute-value* x-8))
      ((45) (f-625 x-11 *attribute-value* x-8))
      ((46) (f-627 x-11 *attribute-value* x-8))
      ((44) (f-629 x-11 *attribute-value* x-8))
      (else (f-635 x-7 x-11 x-4 *attribute-value* x-8)))))
(define (f-633 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-634 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((97) (f-7) (f-637 x-8 *attribute-value* x-5))
            ((79) (f-7) (f-643 x-8 *attribute-value* x-5))
            ((83) (f-7) (f-646 x-8 *attribute-value* x-5))
            ((92) (f-7) (f-649 x-8 *attribute-value* x-5))
            ((91) (f-7) (f-653 x-8 *attribute-value* x-5))
            ((85) (f-7) (f-667 x-8 *attribute-value* x-5))
            ((109) (f-7) (f-677 x-8 *attribute-value* x-5))
            ((103) (f-7) (f-685 x-8 *attribute-value* x-5))
            ((93) (f-7) (f-693 x-8 *attribute-value* x-5))
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            ((152) (f-7) (f-611 x-8 *attribute-value* x-5))
            ((84) (f-7) (f-704 x-8 *attribute-value* x-5))
            ((80) (f-7) (f-709 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-716 x-8 *attribute-value* x-5))
            ((153) (f-7) (f-727 x-3 x-4 x-8 x-1 x-2 *attribute-value* x-5))
            (else
             (let* ((x-70 (stream-car *input*)) (x-69 (car x-70)))
               (case x-69
                 ((111)
                  (f-721 x-1 x-2)
                  (let ((x-75 (lambda (x-73)
                                (f-634 x-3 x-4 x-1 x-2 x-5 x-73))))
                    (x-75 54)))
                 ((151)
                  (f-721 x-1 x-2)
                  (let ((x-80 (lambda (x-78)
                                (f-634 x-3 x-4 x-1 x-2 x-5 x-78))))
                    (x-80 54)))
                 (else (x-5))))))))))
(define (f-727 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (begin (f-728 x-1 x-2 x-3) (x-4 46))
      (let* ((x-11 (stream-car *input*))
             (x-10 (car x-11))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((159
            158
            157
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            108
            107
            106
            105
            104
            103
            102
            101
            100
            99
            98
            97
            96
            95
            94
            93
            92
            91
            90
            89
            88
            87
            86
            85
            84
            83
            82
            81
            80
            79
            78
            77
            76
            75)
           (f-728 x-1 x-2 x-3)
           (x-4 46))
          (else (x-7))))))
(define (f-728 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (compound-statement-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-653 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((110) (f-7) (f-654 x-2 #f x-1 *attribute-value* x-3))
          (else (x-3))))))
(define (f-654 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-655 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else
             (let* ((x-44 (stream-car *input*)) (x-43 (car x-44)))
               (case x-43
                 ((111)
                  (f-721 x-1 x-2)
                  (let ((x-49 (lambda (x-47)
                                (f-655 x-3 x-4 x-1 x-2 x-5 x-47))))
                    (x-49 54)))
                 ((151)
                  (f-721 x-1 x-2)
                  (let ((x-54 (lambda (x-52)
                                (f-655 x-3 x-4 x-1 x-2 x-5 x-52))))
                    (x-54 54)))
                 (else (x-5))))))))))
(define (f-655 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-655 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-214 x-9 *attribute-value* x-6))
      ((53) (f-245 x-9 *attribute-value* x-6))
      ((52) (f-614 x-9 *attribute-value* x-6))
      (else (f-656 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-656 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((151) (f-7) (f-657 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-657 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (let ((x-12 (lambda (x-10)
                (f-658 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9 x-10))))
    (if (stream-empty? *input*)
        (x-9)
        (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
          (case x-14
            ((144) (f-7) (f-39 x-12 *attribute-value* x-9))
            ((137) (f-7) (f-41 x-12 *attribute-value* x-9))
            ((130) (f-7) (f-43 x-12 *attribute-value* x-9))
            ((129) (f-7) (f-45 x-12 *attribute-value* x-9))
            ((132) (f-7) (f-47 x-12 *attribute-value* x-9))
            ((136) (f-7) (f-49 x-12 *attribute-value* x-9))
            ((159) (f-7) (f-51 x-12 *attribute-value* x-9))
            ((76) (f-7) (f-53 x-12 *attribute-value* x-9))
            ((158) (f-7) (f-55 x-12 *attribute-value* x-9))
            ((77) (f-7) (f-57 x-12 *attribute-value* x-9))
            ((156) (f-7) (f-59 x-12 *attribute-value* x-9))
            ((100) (f-7) (f-61 x-12 *attribute-value* x-9))
            ((128) (f-7) (f-65 x-12 *attribute-value* x-9))
            ((127) (f-7) (f-80 x-12 *attribute-value* x-9))
            ((110) (f-7) (f-84 x-12 *attribute-value* x-9))
            (else
             (let* ((x-48 (stream-car *input*)) (x-47 (car x-48)))
               (case x-47
                 ((111)
                  (f-725 x-1 x-2 x-3 x-4)
                  (let ((x-53 (lambda (x-51)
                                (f-658 x-5
                                       x-6
                                       x-7
                                       x-8
                                       x-1
                                       x-2
                                       x-3
                                       x-4
                                       x-9
                                       x-51))))
                    (x-53 54)))
                 ((151)
                  (f-725 x-1 x-2 x-3 x-4)
                  (let ((x-58 (lambda (x-56)
                                (f-658 x-5
                                       x-6
                                       x-7
                                       x-8
                                       x-1
                                       x-2
                                       x-3
                                       x-4
                                       x-9
                                       x-56))))
                    (x-58 54)))
                 (else (x-9))))))))))
(define (f-658 x-6 x-7 x-8 x-9 x-2 x-3 x-4 x-5 x-10 x-1)
  (let ((x-13 (lambda (x-11)
                (f-658 x-6 x-7 x-8 x-9 x-2 x-3 x-4 x-5 x-10 x-11))))
    (case x-1
      ((74) (f-11 x-13 *attribute-value* x-10))
      ((72) (f-13 x-13 *attribute-value* x-10))
      ((70) (f-15 x-13 *attribute-value* x-10))
      ((71) (f-17 x-13 *attribute-value* x-10))
      ((69) (f-30 x-13 *attribute-value* x-10))
      ((68) (f-32 x-13 *attribute-value* x-10))
      ((67) (f-34 x-13 *attribute-value* x-10))
      ((66) (f-72 x-13 *attribute-value* x-10))
      ((65) (f-137 x-13 *attribute-value* x-10))
      ((64) (f-155 x-13 *attribute-value* x-10))
      ((63) (f-173 x-13 *attribute-value* x-10))
      ((62) (f-183 x-13 *attribute-value* x-10))
      ((61) (f-189 x-13 *attribute-value* x-10))
      ((60) (f-195 x-13 *attribute-value* x-10))
      ((59) (f-201 x-13 *attribute-value* x-10))
      ((58) (f-207 x-13 *attribute-value* x-10))
      ((56) (f-214 x-13 *attribute-value* x-10))
      ((53) (f-245 x-13 *attribute-value* x-10))
      ((52) (f-614 x-13 *attribute-value* x-10))
      (else
       (f-659 x-6 x-7 x-8 x-9 x-13 x-2 x-3 x-4 x-5 *attribute-value* x-10)))))
(define (f-659 x-6 x-7 x-8 x-9 x-10 x-1 x-2 x-3 x-4 x-5 x-11)
  (if (stream-empty? *input*)
      (x-11)
      (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
        (case x-13
          ((151)
           (f-7)
           (f-660 x-6
                  x-7
                  x-8
                  x-9
                  x-10
                  #f
                  x-1
                  x-2
                  x-3
                  x-4
                  x-5
                  *attribute-value*
                  x-11))
          (else (x-11))))))
(define (f-660 x-7 x-8 x-9 x-10 x-11 x-12 x-1 x-2 x-3 x-4 x-5 x-6 x-13)
  (let ((x-16 (lambda (x-14)
                (f-661 x-7
                       x-8
                       x-9
                       x-10
                       x-11
                       x-12
                       x-1
                       x-2
                       x-3
                       x-4
                       x-5
                       x-6
                       x-13
                       x-14))))
    (if (stream-empty? *input*)
        (x-13)
        (let* ((x-19 (stream-car *input*)) (x-18 (car x-19)))
          (case x-18
            ((144) (f-7) (f-39 x-16 *attribute-value* x-13))
            ((137) (f-7) (f-41 x-16 *attribute-value* x-13))
            ((130) (f-7) (f-43 x-16 *attribute-value* x-13))
            ((129) (f-7) (f-45 x-16 *attribute-value* x-13))
            ((132) (f-7) (f-47 x-16 *attribute-value* x-13))
            ((136) (f-7) (f-49 x-16 *attribute-value* x-13))
            ((159) (f-7) (f-51 x-16 *attribute-value* x-13))
            ((76) (f-7) (f-53 x-16 *attribute-value* x-13))
            ((158) (f-7) (f-55 x-16 *attribute-value* x-13))
            ((77) (f-7) (f-57 x-16 *attribute-value* x-13))
            ((156) (f-7) (f-59 x-16 *attribute-value* x-13))
            ((100) (f-7) (f-61 x-16 *attribute-value* x-13))
            ((128) (f-7) (f-65 x-16 *attribute-value* x-13))
            ((127) (f-7) (f-80 x-16 *attribute-value* x-13))
            ((110) (f-7) (f-84 x-16 *attribute-value* x-13))
            (else
             (let* ((x-52 (stream-car *input*)) (x-51 (car x-52)))
               (case x-51
                 ((111)
                  (f-723 x-1 x-2 x-3 x-4 x-5 x-6)
                  (let ((x-57 (lambda (x-55)
                                (f-661 x-7
                                       x-8
                                       x-9
                                       x-10
                                       x-11
                                       x-12
                                       x-1
                                       x-2
                                       x-3
                                       x-4
                                       x-5
                                       x-6
                                       x-13
                                       x-55))))
                    (x-57 54)))
                 ((151)
                  (f-723 x-1 x-2 x-3 x-4 x-5 x-6)
                  (let ((x-62 (lambda (x-60)
                                (f-661 x-7
                                       x-8
                                       x-9
                                       x-10
                                       x-11
                                       x-12
                                       x-1
                                       x-2
                                       x-3
                                       x-4
                                       x-5
                                       x-6
                                       x-13
                                       x-60))))
                    (x-62 54)))
                 (else (x-13))))))))))
(define (f-661 x-8 x-9 x-10 x-11 x-12 x-13 x-2 x-3 x-4 x-5 x-6 x-7 x-14 x-1)
  (let ((x-17 (lambda (x-15)
                (f-661 x-8
                       x-9
                       x-10
                       x-11
                       x-12
                       x-13
                       x-2
                       x-3
                       x-4
                       x-5
                       x-6
                       x-7
                       x-14
                       x-15))))
    (case x-1
      ((74) (f-11 x-17 *attribute-value* x-14))
      ((72) (f-13 x-17 *attribute-value* x-14))
      ((70) (f-15 x-17 *attribute-value* x-14))
      ((71) (f-17 x-17 *attribute-value* x-14))
      ((69) (f-30 x-17 *attribute-value* x-14))
      ((68) (f-32 x-17 *attribute-value* x-14))
      ((67) (f-34 x-17 *attribute-value* x-14))
      ((66) (f-72 x-17 *attribute-value* x-14))
      ((65) (f-137 x-17 *attribute-value* x-14))
      ((64) (f-155 x-17 *attribute-value* x-14))
      ((63) (f-173 x-17 *attribute-value* x-14))
      ((62) (f-183 x-17 *attribute-value* x-14))
      ((61) (f-189 x-17 *attribute-value* x-14))
      ((60) (f-195 x-17 *attribute-value* x-14))
      ((59) (f-201 x-17 *attribute-value* x-14))
      ((58) (f-207 x-17 *attribute-value* x-14))
      ((56) (f-214 x-17 *attribute-value* x-14))
      ((53) (f-245 x-17 *attribute-value* x-14))
      ((52) (f-614 x-17 *attribute-value* x-14))
      (else
       (f-662 x-8
              x-9
              x-10
              x-11
              x-12
              x-13
              x-17
              x-2
              x-3
              x-4
              x-5
              x-6
              x-7
              *attribute-value*
              x-14)))))
(define (f-662 x-8
               x-9
               x-10
               x-11
               x-12
               x-13
               x-14
               x-1
               x-2
               x-3
               x-4
               x-5
               x-6
               x-7
               x-15)
  (if (stream-empty? *input*)
      (x-15)
      (let* ((x-18 (stream-car *input*)) (x-17 (car x-18)))
        (case x-17
          ((111)
           (f-7)
           (f-663 x-8
                  x-9
                  x-10
                  x-11
                  x-12
                  x-13
                  x-14
                  #f
                  x-1
                  x-2
                  x-3
                  x-4
                  x-5
                  x-6
                  x-7
                  *attribute-value*
                  x-15))
          (else (x-15))))))
(define (f-663 x-9
               x-10
               x-11
               x-12
               x-13
               x-14
               x-15
               x-16
               x-1
               x-2
               x-3
               x-4
               x-5
               x-6
               x-7
               x-8
               x-17)
  (let ((x-20 (lambda (x-18)
                (f-664 x-9
                       x-10
                       x-11
                       x-12
                       x-13
                       x-14
                       x-15
                       x-16
                       x-1
                       x-2
                       x-3
                       x-4
                       x-5
                       x-6
                       x-7
                       x-8
                       x-17
                       x-18))))
    (if (stream-empty? *input*)
        (x-17)
        (let* ((x-23 (stream-car *input*)) (x-22 (car x-23)))
          (case x-22
            ((97) (f-7) (f-637 x-20 *attribute-value* x-17))
            ((79) (f-7) (f-643 x-20 *attribute-value* x-17))
            ((83) (f-7) (f-646 x-20 *attribute-value* x-17))
            ((92) (f-7) (f-649 x-20 *attribute-value* x-17))
            ((91) (f-7) (f-653 x-20 *attribute-value* x-17))
            ((85) (f-7) (f-667 x-20 *attribute-value* x-17))
            ((109) (f-7) (f-677 x-20 *attribute-value* x-17))
            ((103) (f-7) (f-685 x-20 *attribute-value* x-17))
            ((93) (f-7) (f-693 x-20 *attribute-value* x-17))
            ((144) (f-7) (f-39 x-20 *attribute-value* x-17))
            ((137) (f-7) (f-41 x-20 *attribute-value* x-17))
            ((130) (f-7) (f-43 x-20 *attribute-value* x-17))
            ((129) (f-7) (f-45 x-20 *attribute-value* x-17))
            ((132) (f-7) (f-47 x-20 *attribute-value* x-17))
            ((136) (f-7) (f-49 x-20 *attribute-value* x-17))
            ((159) (f-7) (f-51 x-20 *attribute-value* x-17))
            ((76) (f-7) (f-53 x-20 *attribute-value* x-17))
            ((158) (f-7) (f-55 x-20 *attribute-value* x-17))
            ((77) (f-7) (f-57 x-20 *attribute-value* x-17))
            ((100) (f-7) (f-61 x-20 *attribute-value* x-17))
            ((128) (f-7) (f-65 x-20 *attribute-value* x-17))
            ((127) (f-7) (f-80 x-20 *attribute-value* x-17))
            ((110) (f-7) (f-84 x-20 *attribute-value* x-17))
            ((152) (f-7) (f-611 x-20 *attribute-value* x-17))
            ((84) (f-7) (f-704 x-20 *attribute-value* x-17))
            ((80) (f-7) (f-709 x-20 *attribute-value* x-17))
            ((156) (f-7) (f-716 x-20 *attribute-value* x-17))
            (else
             (let* ((x-80 (stream-car *input*)) (x-79 (car x-80)))
               (case x-79
                 ((111)
                  (f-726 x-1 x-2 x-3 x-4 x-5 x-6 x-7 x-8)
                  (let ((x-85 (lambda (x-83)
                                (f-664 x-9
                                       x-10
                                       x-11
                                       x-12
                                       x-13
                                       x-14
                                       x-15
                                       x-16
                                       x-1
                                       x-2
                                       x-3
                                       x-4
                                       x-5
                                       x-6
                                       x-7
                                       x-8
                                       x-17
                                       x-83))))
                    (x-85 54)))
                 ((151)
                  (f-726 x-1 x-2 x-3 x-4 x-5 x-6 x-7 x-8)
                  (let ((x-90 (lambda (x-88)
                                (f-664 x-9
                                       x-10
                                       x-11
                                       x-12
                                       x-13
                                       x-14
                                       x-15
                                       x-16
                                       x-1
                                       x-2
                                       x-3
                                       x-4
                                       x-5
                                       x-6
                                       x-7
                                       x-8
                                       x-17
                                       x-88))))
                    (x-90 54)))
                 (else (x-17))))))))))
(define (f-726 x-1 x-2 x-3 x-4 x-5 x-6 x-7 x-8)
  (let* ((x-11 (lambda ()
                 (opt-expression-2)))
         (x-10 (x-11)))
    (set! *attribute-value* x-10)))
(define (f-667 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-668 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((97) (f-7) (f-637 x-6 *attribute-value* x-3))
            ((79) (f-7) (f-643 x-6 *attribute-value* x-3))
            ((83) (f-7) (f-646 x-6 *attribute-value* x-3))
            ((92) (f-7) (f-649 x-6 *attribute-value* x-3))
            ((91) (f-7) (f-653 x-6 *attribute-value* x-3))
            ((85) (f-7) (f-667 x-6 *attribute-value* x-3))
            ((109) (f-7) (f-677 x-6 *attribute-value* x-3))
            ((103) (f-7) (f-685 x-6 *attribute-value* x-3))
            ((93) (f-7) (f-693 x-6 *attribute-value* x-3))
            ((144) (f-7) (f-39 x-6 *attribute-value* x-3))
            ((137) (f-7) (f-41 x-6 *attribute-value* x-3))
            ((130) (f-7) (f-43 x-6 *attribute-value* x-3))
            ((129) (f-7) (f-45 x-6 *attribute-value* x-3))
            ((132) (f-7) (f-47 x-6 *attribute-value* x-3))
            ((136) (f-7) (f-49 x-6 *attribute-value* x-3))
            ((159) (f-7) (f-51 x-6 *attribute-value* x-3))
            ((76) (f-7) (f-53 x-6 *attribute-value* x-3))
            ((158) (f-7) (f-55 x-6 *attribute-value* x-3))
            ((77) (f-7) (f-57 x-6 *attribute-value* x-3))
            ((100) (f-7) (f-61 x-6 *attribute-value* x-3))
            ((128) (f-7) (f-65 x-6 *attribute-value* x-3))
            ((127) (f-7) (f-80 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-84 x-6 *attribute-value* x-3))
            ((152) (f-7) (f-611 x-6 *attribute-value* x-3))
            ((84) (f-7) (f-704 x-6 *attribute-value* x-3))
            ((80) (f-7) (f-709 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-716 x-6 *attribute-value* x-3))
            (else
             (let* ((x-66 (stream-car *input*)) (x-65 (car x-66)))
               (case x-65
                 ((111)
                  (f-642 x-1)
                  (let ((x-71 (lambda (x-69)
                                (f-668 x-2 x-1 x-3 x-69))))
                    (x-71 54)))
                 ((151)
                  (f-642 x-1)
                  (let ((x-76 (lambda (x-74)
                                (f-668 x-2 x-1 x-3 x-74))))
                    (x-76 54)))
                 (else (x-3))))))))))
(define (f-677 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((110) (f-7) (f-678 x-2 #f x-1 *attribute-value* x-3))
          (else (x-3))))))
(define (f-678 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-679 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-679 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-679 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-214 x-9 *attribute-value* x-6))
      ((53) (f-245 x-9 *attribute-value* x-6))
      (else (f-680 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-680 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((114) (f-7) (f-252 x-6 #f x-3 *attribute-value* x-7))
          ((111) (f-7) (f-681 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-681 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (let ((x-12 (lambda (x-10)
                (f-682 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9 x-10))))
    (if (stream-empty? *input*)
        (x-9)
        (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
          (case x-14
            ((97) (f-7) (f-637 x-12 *attribute-value* x-9))
            ((79) (f-7) (f-643 x-12 *attribute-value* x-9))
            ((83) (f-7) (f-646 x-12 *attribute-value* x-9))
            ((92) (f-7) (f-649 x-12 *attribute-value* x-9))
            ((91) (f-7) (f-653 x-12 *attribute-value* x-9))
            ((85) (f-7) (f-667 x-12 *attribute-value* x-9))
            ((109) (f-7) (f-677 x-12 *attribute-value* x-9))
            ((103) (f-7) (f-685 x-12 *attribute-value* x-9))
            ((93) (f-7) (f-693 x-12 *attribute-value* x-9))
            ((144) (f-7) (f-39 x-12 *attribute-value* x-9))
            ((137) (f-7) (f-41 x-12 *attribute-value* x-9))
            ((130) (f-7) (f-43 x-12 *attribute-value* x-9))
            ((129) (f-7) (f-45 x-12 *attribute-value* x-9))
            ((132) (f-7) (f-47 x-12 *attribute-value* x-9))
            ((136) (f-7) (f-49 x-12 *attribute-value* x-9))
            ((159) (f-7) (f-51 x-12 *attribute-value* x-9))
            ((76) (f-7) (f-53 x-12 *attribute-value* x-9))
            ((158) (f-7) (f-55 x-12 *attribute-value* x-9))
            ((77) (f-7) (f-57 x-12 *attribute-value* x-9))
            ((100) (f-7) (f-61 x-12 *attribute-value* x-9))
            ((128) (f-7) (f-65 x-12 *attribute-value* x-9))
            ((127) (f-7) (f-80 x-12 *attribute-value* x-9))
            ((110) (f-7) (f-84 x-12 *attribute-value* x-9))
            ((152) (f-7) (f-611 x-12 *attribute-value* x-9))
            ((84) (f-7) (f-704 x-12 *attribute-value* x-9))
            ((80) (f-7) (f-709 x-12 *attribute-value* x-9))
            ((156) (f-7) (f-716 x-12 *attribute-value* x-9))
            (else
             (let* ((x-72 (stream-car *input*)) (x-71 (car x-72)))
               (case x-71
                 ((111)
                  (f-725 x-1 x-2 x-3 x-4)
                  (let ((x-77 (lambda (x-75)
                                (f-682 x-5
                                       x-6
                                       x-7
                                       x-8
                                       x-1
                                       x-2
                                       x-3
                                       x-4
                                       x-9
                                       x-75))))
                    (x-77 54)))
                 ((151)
                  (f-725 x-1 x-2 x-3 x-4)
                  (let ((x-82 (lambda (x-80)
                                (f-682 x-5
                                       x-6
                                       x-7
                                       x-8
                                       x-1
                                       x-2
                                       x-3
                                       x-4
                                       x-9
                                       x-80))))
                    (x-82 54)))
                 (else (x-9))))))))))
(define (f-685 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((110) (f-7) (f-686 x-2 #f x-1 *attribute-value* x-3))
          (else (x-3))))))
(define (f-686 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-687 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-687 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-687 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-214 x-9 *attribute-value* x-6))
      ((53) (f-245 x-9 *attribute-value* x-6))
      (else (f-688 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-688 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((114) (f-7) (f-252 x-6 #f x-3 *attribute-value* x-7))
          ((111) (f-7) (f-689 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-689 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (let ((x-12 (lambda (x-10)
                (f-690 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9 x-10))))
    (if (stream-empty? *input*)
        (x-9)
        (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
          (case x-14
            ((97) (f-7) (f-637 x-12 *attribute-value* x-9))
            ((79) (f-7) (f-643 x-12 *attribute-value* x-9))
            ((83) (f-7) (f-646 x-12 *attribute-value* x-9))
            ((92) (f-7) (f-649 x-12 *attribute-value* x-9))
            ((91) (f-7) (f-653 x-12 *attribute-value* x-9))
            ((85) (f-7) (f-667 x-12 *attribute-value* x-9))
            ((109) (f-7) (f-677 x-12 *attribute-value* x-9))
            ((103) (f-7) (f-685 x-12 *attribute-value* x-9))
            ((93) (f-7) (f-693 x-12 *attribute-value* x-9))
            ((144) (f-7) (f-39 x-12 *attribute-value* x-9))
            ((137) (f-7) (f-41 x-12 *attribute-value* x-9))
            ((130) (f-7) (f-43 x-12 *attribute-value* x-9))
            ((129) (f-7) (f-45 x-12 *attribute-value* x-9))
            ((132) (f-7) (f-47 x-12 *attribute-value* x-9))
            ((136) (f-7) (f-49 x-12 *attribute-value* x-9))
            ((159) (f-7) (f-51 x-12 *attribute-value* x-9))
            ((76) (f-7) (f-53 x-12 *attribute-value* x-9))
            ((158) (f-7) (f-55 x-12 *attribute-value* x-9))
            ((77) (f-7) (f-57 x-12 *attribute-value* x-9))
            ((100) (f-7) (f-61 x-12 *attribute-value* x-9))
            ((128) (f-7) (f-65 x-12 *attribute-value* x-9))
            ((127) (f-7) (f-80 x-12 *attribute-value* x-9))
            ((110) (f-7) (f-84 x-12 *attribute-value* x-9))
            ((152) (f-7) (f-611 x-12 *attribute-value* x-9))
            ((84) (f-7) (f-704 x-12 *attribute-value* x-9))
            ((80) (f-7) (f-709 x-12 *attribute-value* x-9))
            ((156) (f-7) (f-716 x-12 *attribute-value* x-9))
            (else
             (let* ((x-72 (stream-car *input*)) (x-71 (car x-72)))
               (case x-71
                 ((111)
                  (f-725 x-1 x-2 x-3 x-4)
                  (let ((x-77 (lambda (x-75)
                                (f-690 x-5
                                       x-6
                                       x-7
                                       x-8
                                       x-1
                                       x-2
                                       x-3
                                       x-4
                                       x-9
                                       x-75))))
                    (x-77 54)))
                 ((151)
                  (f-725 x-1 x-2 x-3 x-4)
                  (let ((x-82 (lambda (x-80)
                                (f-690 x-5
                                       x-6
                                       x-7
                                       x-8
                                       x-1
                                       x-2
                                       x-3
                                       x-4
                                       x-9
                                       x-80))))
                    (x-82 54)))
                 (else (x-9))))))))))
(define (f-693 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((110) (f-7) (f-694 x-2 #f x-1 *attribute-value* x-3))
          (else (x-3))))))
(define (f-694 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-695 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-695 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-695 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-214 x-9 *attribute-value* x-6))
      ((53) (f-245 x-9 *attribute-value* x-6))
      (else (f-696 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-696 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((114) (f-7) (f-252 x-6 #f x-3 *attribute-value* x-7))
          ((111) (f-7) (f-697 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-697 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (let ((x-12 (lambda (x-10)
                (f-698 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9 x-10))))
    (if (stream-empty? *input*)
        (x-9)
        (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
          (case x-14
            ((97) (f-7) (f-637 x-12 *attribute-value* x-9))
            ((79) (f-7) (f-643 x-12 *attribute-value* x-9))
            ((83) (f-7) (f-646 x-12 *attribute-value* x-9))
            ((92) (f-7) (f-649 x-12 *attribute-value* x-9))
            ((91) (f-7) (f-653 x-12 *attribute-value* x-9))
            ((85) (f-7) (f-667 x-12 *attribute-value* x-9))
            ((109) (f-7) (f-677 x-12 *attribute-value* x-9))
            ((103) (f-7) (f-685 x-12 *attribute-value* x-9))
            ((93) (f-7) (f-693 x-12 *attribute-value* x-9))
            ((144) (f-7) (f-39 x-12 *attribute-value* x-9))
            ((137) (f-7) (f-41 x-12 *attribute-value* x-9))
            ((130) (f-7) (f-43 x-12 *attribute-value* x-9))
            ((129) (f-7) (f-45 x-12 *attribute-value* x-9))
            ((132) (f-7) (f-47 x-12 *attribute-value* x-9))
            ((136) (f-7) (f-49 x-12 *attribute-value* x-9))
            ((159) (f-7) (f-51 x-12 *attribute-value* x-9))
            ((76) (f-7) (f-53 x-12 *attribute-value* x-9))
            ((158) (f-7) (f-55 x-12 *attribute-value* x-9))
            ((77) (f-7) (f-57 x-12 *attribute-value* x-9))
            ((100) (f-7) (f-61 x-12 *attribute-value* x-9))
            ((128) (f-7) (f-65 x-12 *attribute-value* x-9))
            ((127) (f-7) (f-80 x-12 *attribute-value* x-9))
            ((110) (f-7) (f-84 x-12 *attribute-value* x-9))
            ((152) (f-7) (f-611 x-12 *attribute-value* x-9))
            ((84) (f-7) (f-704 x-12 *attribute-value* x-9))
            ((80) (f-7) (f-709 x-12 *attribute-value* x-9))
            ((156) (f-7) (f-716 x-12 *attribute-value* x-9))
            (else
             (let* ((x-72 (stream-car *input*)) (x-71 (car x-72)))
               (case x-71
                 ((111)
                  (f-725 x-1 x-2 x-3 x-4)
                  (let ((x-77 (lambda (x-75)
                                (f-698 x-5
                                       x-6
                                       x-7
                                       x-8
                                       x-1
                                       x-2
                                       x-3
                                       x-4
                                       x-9
                                       x-75))))
                    (x-77 54)))
                 ((151)
                  (f-725 x-1 x-2 x-3 x-4)
                  (let ((x-82 (lambda (x-80)
                                (f-698 x-5
                                       x-6
                                       x-7
                                       x-8
                                       x-1
                                       x-2
                                       x-3
                                       x-4
                                       x-9
                                       x-80))))
                    (x-82 54)))
                 (else (x-9))))))))))
(define (f-725 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ()
                (opt-expression-2)))
         (x-6 (x-7)))
    (set! *attribute-value* x-6)))
(define (f-698 x-6 x-7 x-8 x-9 x-2 x-3 x-4 x-5 x-10 x-1)
  (let ((x-13 (lambda (x-11)
                (f-698 x-6 x-7 x-8 x-9 x-2 x-3 x-4 x-5 x-10 x-11))))
    (case x-1
      ((74) (f-11 x-13 *attribute-value* x-10))
      ((72) (f-13 x-13 *attribute-value* x-10))
      ((70) (f-15 x-13 *attribute-value* x-10))
      ((71) (f-17 x-13 *attribute-value* x-10))
      ((69) (f-30 x-13 *attribute-value* x-10))
      ((68) (f-32 x-13 *attribute-value* x-10))
      ((67) (f-34 x-13 *attribute-value* x-10))
      ((66) (f-72 x-13 *attribute-value* x-10))
      ((65) (f-137 x-13 *attribute-value* x-10))
      ((64) (f-155 x-13 *attribute-value* x-10))
      ((63) (f-173 x-13 *attribute-value* x-10))
      ((62) (f-183 x-13 *attribute-value* x-10))
      ((61) (f-189 x-13 *attribute-value* x-10))
      ((60) (f-195 x-13 *attribute-value* x-10))
      ((59) (f-201 x-13 *attribute-value* x-10))
      ((58) (f-207 x-13 *attribute-value* x-10))
      ((56) (f-214 x-13 *attribute-value* x-10))
      ((53) (f-245 x-13 *attribute-value* x-10))
      ((52) (f-614 x-13 *attribute-value* x-10))
      ((54) (f-616 x-13 *attribute-value* x-10))
      ((50) (f-619 x-13 *attribute-value* x-10))
      ((49) (f-621 x-13 *attribute-value* x-10))
      ((48) (f-623 x-13 *attribute-value* x-10))
      ((45) (f-625 x-13 *attribute-value* x-10))
      ((46) (f-627 x-13 *attribute-value* x-10))
      ((44) (f-629 x-13 *attribute-value* x-10))
      (else
       (f-699 x-6 x-7 x-8 x-9 x-13 x-2 x-3 x-4 x-5 *attribute-value* x-10)))))
(define (f-699 x-6 x-7 x-8 x-9 x-10 x-1 x-2 x-3 x-4 x-5 x-11)
  (if (stream-empty? *input*)
      (x-11)
      (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
        (case x-13
          ((87)
           (f-7)
           (f-700 x-6
                  x-7
                  x-8
                  x-9
                  x-10
                  #f
                  x-1
                  x-2
                  x-3
                  x-4
                  x-5
                  *attribute-value*
                  x-11))
          (else
           (let* ((x-19 (stream-car *input*)) (x-18 (car x-19)))
             (case x-18
               ((159
                 158
                 156
                 153
                 152
                 151
                 144
                 137
                 136
                 132
                 130
                 129
                 128
                 127
                 110
                 109
                 103
                 100
                 97
                 92
                 91
                 93
                 87
                 85
                 84
                 83
                 80
                 79
                 77
                 76)
                (f-724 x-1 x-2 x-3 x-4 x-5)
                (x-6 48))
               (else (x-11)))))))))
(define (f-724 x-1 x-2 x-3 x-4 x-5)
  (let* ((x-8 (lambda ($1 $2 $3 $4 $5)
                (selection-statement-1 $1 $2 $3 $4 $5)))
         (x-7 (x-8 x-1 x-2 x-3 x-4 x-5)))
    (set! *attribute-value* x-7)))
(define (f-700 x-7 x-8 x-9 x-10 x-11 x-12 x-1 x-2 x-3 x-4 x-5 x-6 x-13)
  (let ((x-16 (lambda (x-14)
                (f-701 x-7
                       x-8
                       x-9
                       x-10
                       x-11
                       x-12
                       x-1
                       x-2
                       x-3
                       x-4
                       x-5
                       x-6
                       x-13
                       x-14))))
    (if (stream-empty? *input*)
        (x-13)
        (let* ((x-19 (stream-car *input*)) (x-18 (car x-19)))
          (case x-18
            ((97) (f-7) (f-637 x-16 *attribute-value* x-13))
            ((79) (f-7) (f-643 x-16 *attribute-value* x-13))
            ((83) (f-7) (f-646 x-16 *attribute-value* x-13))
            ((92) (f-7) (f-649 x-16 *attribute-value* x-13))
            ((91) (f-7) (f-653 x-16 *attribute-value* x-13))
            ((85) (f-7) (f-667 x-16 *attribute-value* x-13))
            ((109) (f-7) (f-677 x-16 *attribute-value* x-13))
            ((103) (f-7) (f-685 x-16 *attribute-value* x-13))
            ((93) (f-7) (f-693 x-16 *attribute-value* x-13))
            ((144) (f-7) (f-39 x-16 *attribute-value* x-13))
            ((137) (f-7) (f-41 x-16 *attribute-value* x-13))
            ((130) (f-7) (f-43 x-16 *attribute-value* x-13))
            ((129) (f-7) (f-45 x-16 *attribute-value* x-13))
            ((132) (f-7) (f-47 x-16 *attribute-value* x-13))
            ((136) (f-7) (f-49 x-16 *attribute-value* x-13))
            ((159) (f-7) (f-51 x-16 *attribute-value* x-13))
            ((76) (f-7) (f-53 x-16 *attribute-value* x-13))
            ((158) (f-7) (f-55 x-16 *attribute-value* x-13))
            ((77) (f-7) (f-57 x-16 *attribute-value* x-13))
            ((100) (f-7) (f-61 x-16 *attribute-value* x-13))
            ((128) (f-7) (f-65 x-16 *attribute-value* x-13))
            ((127) (f-7) (f-80 x-16 *attribute-value* x-13))
            ((110) (f-7) (f-84 x-16 *attribute-value* x-13))
            ((152) (f-7) (f-611 x-16 *attribute-value* x-13))
            ((84) (f-7) (f-704 x-16 *attribute-value* x-13))
            ((80) (f-7) (f-709 x-16 *attribute-value* x-13))
            ((156) (f-7) (f-716 x-16 *attribute-value* x-13))
            (else
             (let* ((x-76 (stream-car *input*)) (x-75 (car x-76)))
               (case x-75
                 ((111)
                  (f-723 x-1 x-2 x-3 x-4 x-5 x-6)
                  (let ((x-81 (lambda (x-79)
                                (f-701 x-7
                                       x-8
                                       x-9
                                       x-10
                                       x-11
                                       x-12
                                       x-1
                                       x-2
                                       x-3
                                       x-4
                                       x-5
                                       x-6
                                       x-13
                                       x-79))))
                    (x-81 54)))
                 ((151)
                  (f-723 x-1 x-2 x-3 x-4 x-5 x-6)
                  (let ((x-86 (lambda (x-84)
                                (f-701 x-7
                                       x-8
                                       x-9
                                       x-10
                                       x-11
                                       x-12
                                       x-1
                                       x-2
                                       x-3
                                       x-4
                                       x-5
                                       x-6
                                       x-13
                                       x-84))))
                    (x-86 54)))
                 (else (x-13))))))))))
(define (f-723 x-1 x-2 x-3 x-4 x-5 x-6)
  (let* ((x-9 (lambda ()
                (opt-expression-2)))
         (x-8 (x-9)))
    (set! *attribute-value* x-8)))
(define (f-704 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((141) (f-7) (f-705 x-2 #f x-1 *attribute-value* x-3))
          (else (x-3))))))
(define (f-705 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-706 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((97) (f-7) (f-637 x-8 *attribute-value* x-5))
            ((79) (f-7) (f-643 x-8 *attribute-value* x-5))
            ((83) (f-7) (f-646 x-8 *attribute-value* x-5))
            ((92) (f-7) (f-649 x-8 *attribute-value* x-5))
            ((91) (f-7) (f-653 x-8 *attribute-value* x-5))
            ((85) (f-7) (f-667 x-8 *attribute-value* x-5))
            ((109) (f-7) (f-677 x-8 *attribute-value* x-5))
            ((103) (f-7) (f-685 x-8 *attribute-value* x-5))
            ((93) (f-7) (f-693 x-8 *attribute-value* x-5))
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            ((152) (f-7) (f-611 x-8 *attribute-value* x-5))
            ((84) (f-7) (f-704 x-8 *attribute-value* x-5))
            ((80) (f-7) (f-709 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-716 x-8 *attribute-value* x-5))
            (else
             (let* ((x-68 (stream-car *input*)) (x-67 (car x-68)))
               (case x-67
                 ((111)
                  (f-721 x-1 x-2)
                  (let ((x-73 (lambda (x-71)
                                (f-706 x-3 x-4 x-1 x-2 x-5 x-71))))
                    (x-73 54)))
                 ((151)
                  (f-721 x-1 x-2)
                  (let ((x-78 (lambda (x-76)
                                (f-706 x-3 x-4 x-1 x-2 x-5 x-76))))
                    (x-78 54)))
                 (else (x-5))))))))))
(define (f-709 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-710 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((144) (f-7) (f-39 x-6 *attribute-value* x-3))
            ((137) (f-7) (f-41 x-6 *attribute-value* x-3))
            ((130) (f-7) (f-43 x-6 *attribute-value* x-3))
            ((129) (f-7) (f-45 x-6 *attribute-value* x-3))
            ((132) (f-7) (f-47 x-6 *attribute-value* x-3))
            ((136) (f-7) (f-49 x-6 *attribute-value* x-3))
            ((159) (f-7) (f-51 x-6 *attribute-value* x-3))
            ((76) (f-7) (f-53 x-6 *attribute-value* x-3))
            ((158) (f-7) (f-55 x-6 *attribute-value* x-3))
            ((77) (f-7) (f-57 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-59 x-6 *attribute-value* x-3))
            ((100) (f-7) (f-61 x-6 *attribute-value* x-3))
            ((128) (f-7) (f-65 x-6 *attribute-value* x-3))
            ((127) (f-7) (f-80 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-84 x-6 *attribute-value* x-3))
            (else (x-3)))))))
(define (f-710 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-710 x-3 x-2 x-4 x-5))))
    (case x-1
      ((74) (f-11 x-7 *attribute-value* x-4))
      ((72) (f-13 x-7 *attribute-value* x-4))
      ((70) (f-15 x-7 *attribute-value* x-4))
      ((71) (f-17 x-7 *attribute-value* x-4))
      ((69) (f-30 x-7 *attribute-value* x-4))
      ((68) (f-32 x-7 *attribute-value* x-4))
      ((67) (f-34 x-7 *attribute-value* x-4))
      ((66) (f-72 x-7 *attribute-value* x-4))
      ((65) (f-137 x-7 *attribute-value* x-4))
      ((64) (f-155 x-7 *attribute-value* x-4))
      ((63) (f-173 x-7 *attribute-value* x-4))
      ((62) (f-183 x-7 *attribute-value* x-4))
      ((61) (f-189 x-7 *attribute-value* x-4))
      ((60) (f-195 x-7 *attribute-value* x-4))
      ((59) (f-201 x-7 *attribute-value* x-4))
      ((58) (f-207 x-7 *attribute-value* x-4))
      ((56) (f-257 x-7 *attribute-value* x-4))
      (else (f-711 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-711 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((141) (f-7) (f-712 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-712 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (let ((x-10 (lambda (x-8)
                (f-713 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-8))))
    (if (stream-empty? *input*)
        (x-7)
        (let* ((x-13 (stream-car *input*)) (x-12 (car x-13)))
          (case x-12
            ((97) (f-7) (f-637 x-10 *attribute-value* x-7))
            ((79) (f-7) (f-643 x-10 *attribute-value* x-7))
            ((83) (f-7) (f-646 x-10 *attribute-value* x-7))
            ((92) (f-7) (f-649 x-10 *attribute-value* x-7))
            ((91) (f-7) (f-653 x-10 *attribute-value* x-7))
            ((85) (f-7) (f-667 x-10 *attribute-value* x-7))
            ((109) (f-7) (f-677 x-10 *attribute-value* x-7))
            ((103) (f-7) (f-685 x-10 *attribute-value* x-7))
            ((93) (f-7) (f-693 x-10 *attribute-value* x-7))
            ((144) (f-7) (f-39 x-10 *attribute-value* x-7))
            ((137) (f-7) (f-41 x-10 *attribute-value* x-7))
            ((130) (f-7) (f-43 x-10 *attribute-value* x-7))
            ((129) (f-7) (f-45 x-10 *attribute-value* x-7))
            ((132) (f-7) (f-47 x-10 *attribute-value* x-7))
            ((136) (f-7) (f-49 x-10 *attribute-value* x-7))
            ((159) (f-7) (f-51 x-10 *attribute-value* x-7))
            ((76) (f-7) (f-53 x-10 *attribute-value* x-7))
            ((158) (f-7) (f-55 x-10 *attribute-value* x-7))
            ((77) (f-7) (f-57 x-10 *attribute-value* x-7))
            ((100) (f-7) (f-61 x-10 *attribute-value* x-7))
            ((128) (f-7) (f-65 x-10 *attribute-value* x-7))
            ((127) (f-7) (f-80 x-10 *attribute-value* x-7))
            ((110) (f-7) (f-84 x-10 *attribute-value* x-7))
            ((152) (f-7) (f-611 x-10 *attribute-value* x-7))
            ((84) (f-7) (f-704 x-10 *attribute-value* x-7))
            ((80) (f-7) (f-709 x-10 *attribute-value* x-7))
            ((156) (f-7) (f-716 x-10 *attribute-value* x-7))
            (else
             (let* ((x-70 (stream-car *input*)) (x-69 (car x-70)))
               (case x-69
                 ((111)
                  (f-722 x-1 x-2 x-3)
                  (let ((x-75 (lambda (x-73)
                                (f-713 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-73))))
                    (x-75 54)))
                 ((151)
                  (f-722 x-1 x-2 x-3)
                  (let ((x-80 (lambda (x-78)
                                (f-713 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-78))))
                    (x-80 54)))
                 (else (x-7))))))))))
(define (f-722 x-1 x-2 x-3)
  (let* ((x-6 (lambda ()
                (opt-expression-2)))
         (x-5 (x-6)))
    (set! *attribute-value* x-5)))
(define (f-716 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((141) (f-7) (f-717 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
             (case x-10
               ((155
                 154
                 153
                 151
                 150
                 149
                 146
                 145
                 143
                 142
                 141
                 140
                 139
                 138
                 136
                 133
                 132
                 131
                 130
                 127
                 118
                 117
                 148
                 147
                 135
                 134
                 129
                 128
                 126
                 125
                 124
                 123
                 122
                 121
                 120
                 119
                 116
                 114
                 113
                 112
                 111
                 110)
                (f-60 x-1)
                (x-2 72))
               (else (x-3)))))))))
(define (f-717 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-718 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((97) (f-7) (f-637 x-8 *attribute-value* x-5))
            ((79) (f-7) (f-643 x-8 *attribute-value* x-5))
            ((83) (f-7) (f-646 x-8 *attribute-value* x-5))
            ((92) (f-7) (f-649 x-8 *attribute-value* x-5))
            ((91) (f-7) (f-653 x-8 *attribute-value* x-5))
            ((85) (f-7) (f-667 x-8 *attribute-value* x-5))
            ((109) (f-7) (f-677 x-8 *attribute-value* x-5))
            ((103) (f-7) (f-685 x-8 *attribute-value* x-5))
            ((93) (f-7) (f-693 x-8 *attribute-value* x-5))
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            ((152) (f-7) (f-611 x-8 *attribute-value* x-5))
            ((84) (f-7) (f-704 x-8 *attribute-value* x-5))
            ((80) (f-7) (f-709 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-716 x-8 *attribute-value* x-5))
            (else
             (let* ((x-68 (stream-car *input*)) (x-67 (car x-68)))
               (case x-67
                 ((111)
                  (f-721 x-1 x-2)
                  (let ((x-73 (lambda (x-71)
                                (f-718 x-3 x-4 x-1 x-2 x-5 x-71))))
                    (x-73 54)))
                 ((151)
                  (f-721 x-1 x-2)
                  (let ((x-78 (lambda (x-76)
                                (f-718 x-3 x-4 x-1 x-2 x-5 x-76))))
                    (x-78 54)))
                 (else (x-5))))))))))
(define (f-721 x-1 x-2)
  (let* ((x-5 (lambda ()
                (opt-expression-2)))
         (x-4 (x-5)))
    (set! *attribute-value* x-4)))
(define (f-718 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-718 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-214 x-9 *attribute-value* x-6))
      ((53) (f-245 x-9 *attribute-value* x-6))
      ((52) (f-614 x-9 *attribute-value* x-6))
      ((54) (f-616 x-9 *attribute-value* x-6))
      ((50) (f-619 x-9 *attribute-value* x-6))
      ((49) (f-621 x-9 *attribute-value* x-6))
      ((48) (f-623 x-9 *attribute-value* x-6))
      ((45) (f-625 x-9 *attribute-value* x-6))
      ((46) (f-627 x-9 *attribute-value* x-6))
      ((44) (f-629 x-9 *attribute-value* x-6))
      (else (f-719 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-719 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-720 x-1 x-2 x-3)
           (x-4 44))
          (else (x-7))))))
(define (f-720 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (labeled-statement-1 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-713 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-1)
  (let ((x-11 (lambda (x-9)
                (f-713 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-9))))
    (case x-1
      ((74) (f-11 x-11 *attribute-value* x-8))
      ((72) (f-13 x-11 *attribute-value* x-8))
      ((70) (f-15 x-11 *attribute-value* x-8))
      ((71) (f-17 x-11 *attribute-value* x-8))
      ((69) (f-30 x-11 *attribute-value* x-8))
      ((68) (f-32 x-11 *attribute-value* x-8))
      ((67) (f-34 x-11 *attribute-value* x-8))
      ((66) (f-72 x-11 *attribute-value* x-8))
      ((65) (f-137 x-11 *attribute-value* x-8))
      ((64) (f-155 x-11 *attribute-value* x-8))
      ((63) (f-173 x-11 *attribute-value* x-8))
      ((62) (f-183 x-11 *attribute-value* x-8))
      ((61) (f-189 x-11 *attribute-value* x-8))
      ((60) (f-195 x-11 *attribute-value* x-8))
      ((59) (f-201 x-11 *attribute-value* x-8))
      ((58) (f-207 x-11 *attribute-value* x-8))
      ((56) (f-214 x-11 *attribute-value* x-8))
      ((53) (f-245 x-11 *attribute-value* x-8))
      ((52) (f-614 x-11 *attribute-value* x-8))
      ((54) (f-616 x-11 *attribute-value* x-8))
      ((50) (f-619 x-11 *attribute-value* x-8))
      ((49) (f-621 x-11 *attribute-value* x-8))
      ((48) (f-623 x-11 *attribute-value* x-8))
      ((45) (f-625 x-11 *attribute-value* x-8))
      ((46) (f-627 x-11 *attribute-value* x-8))
      ((44) (f-629 x-11 *attribute-value* x-8))
      (else (f-714 x-5 x-6 x-7 x-11 x-2 x-3 x-4 *attribute-value* x-8)))))
(define (f-714 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-715 x-1 x-2 x-3 x-4)
           (x-5 44))
          (else (x-9))))))
(define (f-715 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (labeled-statement-2 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-706 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-706 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-214 x-9 *attribute-value* x-6))
      ((53) (f-245 x-9 *attribute-value* x-6))
      ((52) (f-614 x-9 *attribute-value* x-6))
      ((54) (f-616 x-9 *attribute-value* x-6))
      ((50) (f-619 x-9 *attribute-value* x-6))
      ((49) (f-621 x-9 *attribute-value* x-6))
      ((48) (f-623 x-9 *attribute-value* x-6))
      ((45) (f-625 x-9 *attribute-value* x-6))
      ((46) (f-627 x-9 *attribute-value* x-6))
      ((44) (f-629 x-9 *attribute-value* x-6))
      (else (f-707 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-707 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-708 x-1 x-2 x-3)
           (x-4 44))
          (else (x-7))))))
(define (f-708 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (labeled-statement-3 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-701 x-8 x-9 x-10 x-11 x-12 x-13 x-2 x-3 x-4 x-5 x-6 x-7 x-14 x-1)
  (let ((x-17 (lambda (x-15)
                (f-701 x-8
                       x-9
                       x-10
                       x-11
                       x-12
                       x-13
                       x-2
                       x-3
                       x-4
                       x-5
                       x-6
                       x-7
                       x-14
                       x-15))))
    (case x-1
      ((74) (f-11 x-17 *attribute-value* x-14))
      ((72) (f-13 x-17 *attribute-value* x-14))
      ((70) (f-15 x-17 *attribute-value* x-14))
      ((71) (f-17 x-17 *attribute-value* x-14))
      ((69) (f-30 x-17 *attribute-value* x-14))
      ((68) (f-32 x-17 *attribute-value* x-14))
      ((67) (f-34 x-17 *attribute-value* x-14))
      ((66) (f-72 x-17 *attribute-value* x-14))
      ((65) (f-137 x-17 *attribute-value* x-14))
      ((64) (f-155 x-17 *attribute-value* x-14))
      ((63) (f-173 x-17 *attribute-value* x-14))
      ((62) (f-183 x-17 *attribute-value* x-14))
      ((61) (f-189 x-17 *attribute-value* x-14))
      ((60) (f-195 x-17 *attribute-value* x-14))
      ((59) (f-201 x-17 *attribute-value* x-14))
      ((58) (f-207 x-17 *attribute-value* x-14))
      ((56) (f-214 x-17 *attribute-value* x-14))
      ((53) (f-245 x-17 *attribute-value* x-14))
      ((52) (f-614 x-17 *attribute-value* x-14))
      ((54) (f-616 x-17 *attribute-value* x-14))
      ((50) (f-619 x-17 *attribute-value* x-14))
      ((49) (f-621 x-17 *attribute-value* x-14))
      ((48) (f-623 x-17 *attribute-value* x-14))
      ((45) (f-625 x-17 *attribute-value* x-14))
      ((46) (f-627 x-17 *attribute-value* x-14))
      ((44) (f-629 x-17 *attribute-value* x-14))
      (else
       (f-702 x-8
              x-9
              x-10
              x-11
              x-12
              x-13
              x-17
              x-2
              x-3
              x-4
              x-5
              x-6
              x-7
              *attribute-value*
              x-14)))))
(define (f-702 x-8
               x-9
               x-10
               x-11
               x-12
               x-13
               x-14
               x-1
               x-2
               x-3
               x-4
               x-5
               x-6
               x-7
               x-15)
  (if (stream-empty? *input*)
      (x-15)
      (let* ((x-18 (stream-car *input*))
             (x-17 (car x-18))
             (x-21 (stream-car *input*))
             (x-20 (car x-21)))
        (case x-20
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-703 x-1 x-2 x-3 x-4 x-5 x-6 x-7)
           (x-8 48))
          (else (x-15))))))
(define (f-703 x-1 x-2 x-3 x-4 x-5 x-6 x-7)
  (let* ((x-10 (lambda ($1 $2 $3 $4 $5 $6 $7)
                 (selection-statement-2 $1 $2 $3 $4 $5 $6 $7)))
         (x-9 (x-10 x-1 x-2 x-3 x-4 x-5 x-6 x-7)))
    (set! *attribute-value* x-9)))
(define (f-690 x-6 x-7 x-8 x-9 x-2 x-3 x-4 x-5 x-10 x-1)
  (let ((x-13 (lambda (x-11)
                (f-690 x-6 x-7 x-8 x-9 x-2 x-3 x-4 x-5 x-10 x-11))))
    (case x-1
      ((74) (f-11 x-13 *attribute-value* x-10))
      ((72) (f-13 x-13 *attribute-value* x-10))
      ((70) (f-15 x-13 *attribute-value* x-10))
      ((71) (f-17 x-13 *attribute-value* x-10))
      ((69) (f-30 x-13 *attribute-value* x-10))
      ((68) (f-32 x-13 *attribute-value* x-10))
      ((67) (f-34 x-13 *attribute-value* x-10))
      ((66) (f-72 x-13 *attribute-value* x-10))
      ((65) (f-137 x-13 *attribute-value* x-10))
      ((64) (f-155 x-13 *attribute-value* x-10))
      ((63) (f-173 x-13 *attribute-value* x-10))
      ((62) (f-183 x-13 *attribute-value* x-10))
      ((61) (f-189 x-13 *attribute-value* x-10))
      ((60) (f-195 x-13 *attribute-value* x-10))
      ((59) (f-201 x-13 *attribute-value* x-10))
      ((58) (f-207 x-13 *attribute-value* x-10))
      ((56) (f-214 x-13 *attribute-value* x-10))
      ((53) (f-245 x-13 *attribute-value* x-10))
      ((52) (f-614 x-13 *attribute-value* x-10))
      ((54) (f-616 x-13 *attribute-value* x-10))
      ((50) (f-619 x-13 *attribute-value* x-10))
      ((49) (f-621 x-13 *attribute-value* x-10))
      ((48) (f-623 x-13 *attribute-value* x-10))
      ((45) (f-625 x-13 *attribute-value* x-10))
      ((46) (f-627 x-13 *attribute-value* x-10))
      ((44) (f-629 x-13 *attribute-value* x-10))
      (else
       (f-691 x-6 x-7 x-8 x-9 x-13 x-2 x-3 x-4 x-5 *attribute-value* x-10)))))
(define (f-691 x-6 x-7 x-8 x-9 x-10 x-1 x-2 x-3 x-4 x-5 x-11)
  (if (stream-empty? *input*)
      (x-11)
      (let* ((x-14 (stream-car *input*))
             (x-13 (car x-14))
             (x-17 (stream-car *input*))
             (x-16 (car x-17)))
        (case x-16
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-692 x-1 x-2 x-3 x-4 x-5)
           (x-6 48))
          (else (x-11))))))
(define (f-692 x-1 x-2 x-3 x-4 x-5)
  (let* ((x-8 (lambda ($1 $2 $3 $4 $5)
                (selection-statement-3 $1 $2 $3 $4 $5)))
         (x-7 (x-8 x-1 x-2 x-3 x-4 x-5)))
    (set! *attribute-value* x-7)))
(define (f-682 x-6 x-7 x-8 x-9 x-2 x-3 x-4 x-5 x-10 x-1)
  (let ((x-13 (lambda (x-11)
                (f-682 x-6 x-7 x-8 x-9 x-2 x-3 x-4 x-5 x-10 x-11))))
    (case x-1
      ((74) (f-11 x-13 *attribute-value* x-10))
      ((72) (f-13 x-13 *attribute-value* x-10))
      ((70) (f-15 x-13 *attribute-value* x-10))
      ((71) (f-17 x-13 *attribute-value* x-10))
      ((69) (f-30 x-13 *attribute-value* x-10))
      ((68) (f-32 x-13 *attribute-value* x-10))
      ((67) (f-34 x-13 *attribute-value* x-10))
      ((66) (f-72 x-13 *attribute-value* x-10))
      ((65) (f-137 x-13 *attribute-value* x-10))
      ((64) (f-155 x-13 *attribute-value* x-10))
      ((63) (f-173 x-13 *attribute-value* x-10))
      ((62) (f-183 x-13 *attribute-value* x-10))
      ((61) (f-189 x-13 *attribute-value* x-10))
      ((60) (f-195 x-13 *attribute-value* x-10))
      ((59) (f-201 x-13 *attribute-value* x-10))
      ((58) (f-207 x-13 *attribute-value* x-10))
      ((56) (f-214 x-13 *attribute-value* x-10))
      ((53) (f-245 x-13 *attribute-value* x-10))
      ((52) (f-614 x-13 *attribute-value* x-10))
      ((54) (f-616 x-13 *attribute-value* x-10))
      ((50) (f-619 x-13 *attribute-value* x-10))
      ((49) (f-621 x-13 *attribute-value* x-10))
      ((48) (f-623 x-13 *attribute-value* x-10))
      ((45) (f-625 x-13 *attribute-value* x-10))
      ((46) (f-627 x-13 *attribute-value* x-10))
      ((44) (f-629 x-13 *attribute-value* x-10))
      (else
       (f-683 x-6 x-7 x-8 x-9 x-13 x-2 x-3 x-4 x-5 *attribute-value* x-10)))))
(define (f-683 x-6 x-7 x-8 x-9 x-10 x-1 x-2 x-3 x-4 x-5 x-11)
  (if (stream-empty? *input*)
      (x-11)
      (let* ((x-14 (stream-car *input*))
             (x-13 (car x-14))
             (x-17 (stream-car *input*))
             (x-16 (car x-17)))
        (case x-16
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-684 x-1 x-2 x-3 x-4 x-5)
           (x-6 49))
          (else (x-11))))))
(define (f-684 x-1 x-2 x-3 x-4 x-5)
  (let* ((x-8 (lambda ($1 $2 $3 $4 $5)
                (iteration-statement-1 $1 $2 $3 $4 $5)))
         (x-7 (x-8 x-1 x-2 x-3 x-4 x-5)))
    (set! *attribute-value* x-7)))
(define (f-668 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-668 x-3 x-2 x-4 x-5))))
    (case x-1
      ((74) (f-11 x-7 *attribute-value* x-4))
      ((72) (f-13 x-7 *attribute-value* x-4))
      ((70) (f-15 x-7 *attribute-value* x-4))
      ((71) (f-17 x-7 *attribute-value* x-4))
      ((69) (f-30 x-7 *attribute-value* x-4))
      ((68) (f-32 x-7 *attribute-value* x-4))
      ((67) (f-34 x-7 *attribute-value* x-4))
      ((66) (f-72 x-7 *attribute-value* x-4))
      ((65) (f-137 x-7 *attribute-value* x-4))
      ((64) (f-155 x-7 *attribute-value* x-4))
      ((63) (f-173 x-7 *attribute-value* x-4))
      ((62) (f-183 x-7 *attribute-value* x-4))
      ((61) (f-189 x-7 *attribute-value* x-4))
      ((60) (f-195 x-7 *attribute-value* x-4))
      ((59) (f-201 x-7 *attribute-value* x-4))
      ((58) (f-207 x-7 *attribute-value* x-4))
      ((56) (f-214 x-7 *attribute-value* x-4))
      ((53) (f-245 x-7 *attribute-value* x-4))
      ((52) (f-614 x-7 *attribute-value* x-4))
      ((54) (f-616 x-7 *attribute-value* x-4))
      ((50) (f-619 x-7 *attribute-value* x-4))
      ((49) (f-621 x-7 *attribute-value* x-4))
      ((48) (f-623 x-7 *attribute-value* x-4))
      ((45) (f-625 x-7 *attribute-value* x-4))
      ((46) (f-627 x-7 *attribute-value* x-4))
      ((44) (f-629 x-7 *attribute-value* x-4))
      (else (f-669 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-669 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((109) (f-7) (f-670 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-670 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((110) (f-7) (f-671 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-671 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (let ((x-12 (lambda (x-10)
                (f-672 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9 x-10))))
    (if (stream-empty? *input*)
        (x-9)
        (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
          (case x-14
            ((144) (f-7) (f-39 x-12 *attribute-value* x-9))
            ((137) (f-7) (f-41 x-12 *attribute-value* x-9))
            ((130) (f-7) (f-43 x-12 *attribute-value* x-9))
            ((129) (f-7) (f-45 x-12 *attribute-value* x-9))
            ((132) (f-7) (f-47 x-12 *attribute-value* x-9))
            ((136) (f-7) (f-49 x-12 *attribute-value* x-9))
            ((159) (f-7) (f-51 x-12 *attribute-value* x-9))
            ((76) (f-7) (f-53 x-12 *attribute-value* x-9))
            ((158) (f-7) (f-55 x-12 *attribute-value* x-9))
            ((77) (f-7) (f-57 x-12 *attribute-value* x-9))
            ((156) (f-7) (f-59 x-12 *attribute-value* x-9))
            ((100) (f-7) (f-61 x-12 *attribute-value* x-9))
            ((128) (f-7) (f-65 x-12 *attribute-value* x-9))
            ((127) (f-7) (f-80 x-12 *attribute-value* x-9))
            ((110) (f-7) (f-84 x-12 *attribute-value* x-9))
            (else (x-9)))))))
(define (f-672 x-6 x-7 x-8 x-9 x-2 x-3 x-4 x-5 x-10 x-1)
  (let ((x-13 (lambda (x-11)
                (f-672 x-6 x-7 x-8 x-9 x-2 x-3 x-4 x-5 x-10 x-11))))
    (case x-1
      ((74) (f-11 x-13 *attribute-value* x-10))
      ((72) (f-13 x-13 *attribute-value* x-10))
      ((70) (f-15 x-13 *attribute-value* x-10))
      ((71) (f-17 x-13 *attribute-value* x-10))
      ((69) (f-30 x-13 *attribute-value* x-10))
      ((68) (f-32 x-13 *attribute-value* x-10))
      ((67) (f-34 x-13 *attribute-value* x-10))
      ((66) (f-72 x-13 *attribute-value* x-10))
      ((65) (f-137 x-13 *attribute-value* x-10))
      ((64) (f-155 x-13 *attribute-value* x-10))
      ((63) (f-173 x-13 *attribute-value* x-10))
      ((62) (f-183 x-13 *attribute-value* x-10))
      ((61) (f-189 x-13 *attribute-value* x-10))
      ((60) (f-195 x-13 *attribute-value* x-10))
      ((59) (f-201 x-13 *attribute-value* x-10))
      ((58) (f-207 x-13 *attribute-value* x-10))
      ((56) (f-214 x-13 *attribute-value* x-10))
      ((53) (f-245 x-13 *attribute-value* x-10))
      (else
       (f-673 x-6 x-7 x-8 x-9 x-13 x-2 x-3 x-4 x-5 *attribute-value* x-10)))))
(define (f-673 x-6 x-7 x-8 x-9 x-10 x-1 x-2 x-3 x-4 x-5 x-11)
  (if (stream-empty? *input*)
      (x-11)
      (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
        (case x-13
          ((114) (f-7) (f-252 x-10 #f x-5 *attribute-value* x-11))
          ((111)
           (f-7)
           (f-674 x-6
                  x-7
                  x-8
                  x-9
                  x-10
                  #f
                  x-1
                  x-2
                  x-3
                  x-4
                  x-5
                  *attribute-value*
                  x-11))
          (else (x-11))))))
(define (f-674 x-7 x-8 x-9 x-10 x-11 x-12 x-1 x-2 x-3 x-4 x-5 x-6 x-13)
  (if (stream-empty? *input*)
      (x-13)
      (let* ((x-16 (stream-car *input*)) (x-15 (car x-16)))
        (case x-15
          ((151)
           (f-7)
           (f-675 x-7
                  x-8
                  x-9
                  x-10
                  x-11
                  x-12
                  #f
                  x-1
                  x-2
                  x-3
                  x-4
                  x-5
                  x-6
                  *attribute-value*
                  x-13))
          (else (x-13))))))
(define (f-675 x-8
               x-9
               x-10
               x-11
               x-12
               x-13
               x-14
               x-1
               x-2
               x-3
               x-4
               x-5
               x-6
               x-7
               x-15)
  (if (stream-empty? *input*)
      (x-15)
      (let* ((x-18 (stream-car *input*))
             (x-17 (car x-18))
             (x-21 (stream-car *input*))
             (x-20 (car x-21)))
        (case x-20
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-676 x-1 x-2 x-3 x-4 x-5 x-6 x-7)
           (x-8 49))
          (else (x-15))))))
(define (f-676 x-1 x-2 x-3 x-4 x-5 x-6 x-7)
  (let* ((x-10 (lambda ($1 $2 $3 $4 $5 $6 $7)
                 (iteration-statement-2 $1 $2 $3 $4 $5 $6 $7)))
         (x-9 (x-10 x-1 x-2 x-3 x-4 x-5 x-6 x-7)))
    (set! *attribute-value* x-9)))
(define (f-664 x-10
               x-11
               x-12
               x-13
               x-14
               x-15
               x-16
               x-17
               x-2
               x-3
               x-4
               x-5
               x-6
               x-7
               x-8
               x-9
               x-18
               x-1)
  (let ((x-21 (lambda (x-19)
                (f-664 x-10
                       x-11
                       x-12
                       x-13
                       x-14
                       x-15
                       x-16
                       x-17
                       x-2
                       x-3
                       x-4
                       x-5
                       x-6
                       x-7
                       x-8
                       x-9
                       x-18
                       x-19))))
    (case x-1
      ((74) (f-11 x-21 *attribute-value* x-18))
      ((72) (f-13 x-21 *attribute-value* x-18))
      ((70) (f-15 x-21 *attribute-value* x-18))
      ((71) (f-17 x-21 *attribute-value* x-18))
      ((69) (f-30 x-21 *attribute-value* x-18))
      ((68) (f-32 x-21 *attribute-value* x-18))
      ((67) (f-34 x-21 *attribute-value* x-18))
      ((66) (f-72 x-21 *attribute-value* x-18))
      ((65) (f-137 x-21 *attribute-value* x-18))
      ((64) (f-155 x-21 *attribute-value* x-18))
      ((63) (f-173 x-21 *attribute-value* x-18))
      ((62) (f-183 x-21 *attribute-value* x-18))
      ((61) (f-189 x-21 *attribute-value* x-18))
      ((60) (f-195 x-21 *attribute-value* x-18))
      ((59) (f-201 x-21 *attribute-value* x-18))
      ((58) (f-207 x-21 *attribute-value* x-18))
      ((56) (f-214 x-21 *attribute-value* x-18))
      ((53) (f-245 x-21 *attribute-value* x-18))
      ((52) (f-614 x-21 *attribute-value* x-18))
      ((54) (f-616 x-21 *attribute-value* x-18))
      ((50) (f-619 x-21 *attribute-value* x-18))
      ((49) (f-621 x-21 *attribute-value* x-18))
      ((48) (f-623 x-21 *attribute-value* x-18))
      ((45) (f-625 x-21 *attribute-value* x-18))
      ((46) (f-627 x-21 *attribute-value* x-18))
      ((44) (f-629 x-21 *attribute-value* x-18))
      (else
       (f-665 x-10
              x-11
              x-12
              x-13
              x-14
              x-15
              x-16
              x-17
              x-21
              x-2
              x-3
              x-4
              x-5
              x-6
              x-7
              x-8
              x-9
              *attribute-value*
              x-18)))))
(define (f-665 x-10
               x-11
               x-12
               x-13
               x-14
               x-15
               x-16
               x-17
               x-18
               x-1
               x-2
               x-3
               x-4
               x-5
               x-6
               x-7
               x-8
               x-9
               x-19)
  (if (stream-empty? *input*)
      (x-19)
      (let* ((x-22 (stream-car *input*))
             (x-21 (car x-22))
             (x-25 (stream-car *input*))
             (x-24 (car x-25)))
        (case x-24
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-666 x-1 x-2 x-3 x-4 x-5 x-6 x-7 x-8 x-9)
           (x-10 49))
          (else (x-19))))))
(define (f-666 x-1 x-2 x-3 x-4 x-5 x-6 x-7 x-8 x-9)
  (let* ((x-12 (lambda ($1 $2 $3 $4 $5 $6 $7 $8 $9)
                 (iteration-statement-3 $1 $2 $3 $4 $5 $6 $7 $8 $9)))
         (x-11 (x-12 x-1 x-2 x-3 x-4 x-5 x-6 x-7 x-8 x-9)))
    (set! *attribute-value* x-11)))
(define (f-649 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((156) (f-7) (f-650 x-2 #f x-1 *attribute-value* x-3))
          (else (x-3))))))
(define (f-650 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((151) (f-7) (f-651 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-651 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-652 x-1 x-2 x-3)
           (x-4 50))
          (else (x-7))))))
(define (f-652 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (jump-statement-1 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-646 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((151) (f-7) (f-647 x-2 #f x-1 *attribute-value* x-3))
          (else (x-3))))))
(define (f-647 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-648 x-1 x-2)
           (x-3 50))
          (else (x-5))))))
(define (f-648 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (jump-statement-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-643 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((151) (f-7) (f-644 x-2 #f x-1 *attribute-value* x-3))
          (else (x-3))))))
(define (f-644 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-645 x-1 x-2)
           (x-3 50))
          (else (x-5))))))
(define (f-645 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (jump-statement-3 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-637 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-638 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((144) (f-7) (f-39 x-6 *attribute-value* x-3))
            ((137) (f-7) (f-41 x-6 *attribute-value* x-3))
            ((130) (f-7) (f-43 x-6 *attribute-value* x-3))
            ((129) (f-7) (f-45 x-6 *attribute-value* x-3))
            ((132) (f-7) (f-47 x-6 *attribute-value* x-3))
            ((136) (f-7) (f-49 x-6 *attribute-value* x-3))
            ((159) (f-7) (f-51 x-6 *attribute-value* x-3))
            ((76) (f-7) (f-53 x-6 *attribute-value* x-3))
            ((158) (f-7) (f-55 x-6 *attribute-value* x-3))
            ((77) (f-7) (f-57 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-59 x-6 *attribute-value* x-3))
            ((100) (f-7) (f-61 x-6 *attribute-value* x-3))
            ((128) (f-7) (f-65 x-6 *attribute-value* x-3))
            ((127) (f-7) (f-80 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-84 x-6 *attribute-value* x-3))
            (else
             (let* ((x-42 (stream-car *input*)) (x-41 (car x-42)))
               (case x-41
                 ((111)
                  (f-642 x-1)
                  (let ((x-47 (lambda (x-45)
                                (f-638 x-2 x-1 x-3 x-45))))
                    (x-47 54)))
                 ((151)
                  (f-642 x-1)
                  (let ((x-52 (lambda (x-50)
                                (f-638 x-2 x-1 x-3 x-50))))
                    (x-52 54)))
                 (else (x-3))))))))))
(define (f-642 x-1)
  (let* ((x-4 (lambda ()
                (opt-expression-2)))
         (x-3 (x-4)))
    (set! *attribute-value* x-3)))
(define (f-638 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-638 x-3 x-2 x-4 x-5))))
    (case x-1
      ((74) (f-11 x-7 *attribute-value* x-4))
      ((72) (f-13 x-7 *attribute-value* x-4))
      ((70) (f-15 x-7 *attribute-value* x-4))
      ((71) (f-17 x-7 *attribute-value* x-4))
      ((69) (f-30 x-7 *attribute-value* x-4))
      ((68) (f-32 x-7 *attribute-value* x-4))
      ((67) (f-34 x-7 *attribute-value* x-4))
      ((66) (f-72 x-7 *attribute-value* x-4))
      ((65) (f-137 x-7 *attribute-value* x-4))
      ((64) (f-155 x-7 *attribute-value* x-4))
      ((63) (f-173 x-7 *attribute-value* x-4))
      ((62) (f-183 x-7 *attribute-value* x-4))
      ((61) (f-189 x-7 *attribute-value* x-4))
      ((60) (f-195 x-7 *attribute-value* x-4))
      ((59) (f-201 x-7 *attribute-value* x-4))
      ((58) (f-207 x-7 *attribute-value* x-4))
      ((56) (f-214 x-7 *attribute-value* x-4))
      ((53) (f-245 x-7 *attribute-value* x-4))
      ((52) (f-614 x-7 *attribute-value* x-4))
      (else (f-639 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-639 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((151) (f-7) (f-640 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-640 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-641 x-1 x-2 x-3)
           (x-4 50))
          (else (x-7))))))
(define (f-641 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (jump-statement-4 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-634 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-634 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-214 x-9 *attribute-value* x-6))
      ((53) (f-245 x-9 *attribute-value* x-6))
      ((52) (f-614 x-9 *attribute-value* x-6))
      ((54) (f-616 x-9 *attribute-value* x-6))
      ((50) (f-619 x-9 *attribute-value* x-6))
      ((49) (f-621 x-9 *attribute-value* x-6))
      ((48) (f-623 x-9 *attribute-value* x-6))
      ((45) (f-625 x-9 *attribute-value* x-6))
      ((46) (f-627 x-9 *attribute-value* x-6))
      ((44) (f-629 x-9 *attribute-value* x-6))
      (else (f-635 x-5 x-9 x-3 *attribute-value* x-6)))))
(define (f-635 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            85
            84
            83
            80
            79
            77
            76)
           (f-636 x-1 x-2)
           (x-3 47))
          (else (x-5))))))
(define (f-636 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (statement-list-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-631 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            85
            84
            83
            80
            79
            77
            76)
           (f-632 x-1)
           (x-2 47))
          (else (x-3))))))
(define (f-632 x-1)
  (let* ((x-4 (lambda ($1)
                (statement-list-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-629 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-630 x-1)
           (x-2 43))
          (else (x-3))))))
(define (f-630 x-1)
  (let* ((x-4 (lambda ($1)
                (statement-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-627 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-628 x-1)
           (x-2 43))
          (else (x-3))))))
(define (f-628 x-1)
  (let* ((x-4 (lambda ($1)
                (statement-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-625 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-626 x-1)
           (x-2 43))
          (else (x-3))))))
(define (f-626 x-1)
  (let* ((x-4 (lambda ($1)
                (statement-3 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-623 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-624 x-1)
           (x-2 43))
          (else (x-3))))))
(define (f-624 x-1)
  (let* ((x-4 (lambda ($1)
                (statement-4 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-621 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-622 x-1)
           (x-2 43))
          (else (x-3))))))
(define (f-622 x-1)
  (let* ((x-4 (lambda ($1)
                (statement-5 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-619 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-620 x-1)
           (x-2 43))
          (else (x-3))))))
(define (f-620 x-1)
  (let* ((x-4 (lambda ($1)
                (statement-6 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-616 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((151) (f-7) (f-617 x-2 #f x-1 *attribute-value* x-3))
          (else (x-3))))))
(define (f-617 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((159
            158
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            103
            100
            97
            93
            92
            91
            87
            85
            84
            83
            80
            79
            77
            76)
           (f-618 x-1 x-2)
           (x-3 45))
          (else (x-5))))))
(define (f-618 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (expression-statement-1 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-614 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((114) (f-7) (f-252 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
             (case x-10
               ((151 111) (f-615 x-1) (x-2 54))
               (else (x-3)))))))))
(define (f-615 x-1)
  (let* ((x-4 (lambda ($1)
                (opt-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-608 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-608 x-3 x-2 x-4 x-5))))
    (f-609 x-3 x-7 x-2 *attribute-value* x-4)))
(define (f-609 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (begin (f-610 x-1 x-2) (x-3 51))
      (let* ((x-9 (stream-car *input*))
             (x-8 (car x-9))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((157
            156
            132
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78
            75)
           (f-610 x-1 x-2)
           (x-3 51))
          (else (x-5))))))
(define (f-610 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (compound-statement-or-error-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-602 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-1)
  (let* ((x-11 (lambda ()
                 (f-3)
                 (f-601 x-5 x-6 x-7 x-2 x-3 x-4 x-8)))
         (x-14 (lambda (x-12)
                 (f-602 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-12))))
    (case x-1
      ((46) (f-591 x-14 *attribute-value* x-11))
      ((17) (f-87 x-14 *attribute-value* x-11))
      ((25) (f-91 x-14 *attribute-value* x-11))
      ((16) (f-93 x-14 *attribute-value* x-11))
      ((14) (f-95 x-14 *attribute-value* x-11))
      ((13) (f-97 x-14 *attribute-value* x-11))
      ((15) (f-304 x-14 *attribute-value* x-11))
      ((12) (f-306 x-14 *attribute-value* x-11))
      ((11) (f-308 x-14 *attribute-value* x-11))
      ((10) (f-593 x-14 *attribute-value* x-11))
      ((7) (f-545 x-14 *attribute-value* x-11))
      ((51) (f-603 x-5 x-6 x-7 x-14 x-2 x-3 x-4 *attribute-value* x-11))
      (else (f-605 x-7 x-14 x-4 *attribute-value* x-11)))))
(define (f-605 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((159
            158
            157
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            108
            107
            106
            105
            104
            103
            102
            101
            100
            99
            98
            97
            96
            95
            94
            93
            92
            91
            90
            89
            88
            86
            85
            84
            83
            82
            81
            80
            79
            78
            77
            76
            75)
           (f-606 x-1 x-2)
           (x-3 9))
          (else (x-5))))))
(define (f-606 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (declaration-list-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-603 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (begin (f-604 x-1 x-2 x-3 x-4) (x-5 5))
      (let* ((x-13 (stream-car *input*))
             (x-12 (car x-13))
             (x-17 (stream-car *input*))
             (x-16 (car x-17)))
        (case x-16
          ((157
            156
            132
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78
            75)
           (f-604 x-1 x-2 x-3 x-4)
           (x-5 5))
          (else (x-9))))))
(define (f-604 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (function-definition-4 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-598 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (begin (f-599 x-1 x-2 x-3) (x-4 5))
      (let* ((x-11 (stream-car *input*))
             (x-10 (car x-11))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((157
            156
            132
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78
            75)
           (f-599 x-1 x-2 x-3)
           (x-4 5))
          (else (x-7))))))
(define (f-599 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (function-definition-3 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-596 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159
            158
            157
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            108
            107
            106
            105
            104
            103
            102
            101
            100
            99
            98
            97
            96
            95
            94
            93
            92
            91
            90
            89
            88
            86
            85
            84
            83
            82
            81
            80
            79
            78
            77
            76
            75)
           (f-597 x-1)
           (x-2 9))
          (else (x-3))))))
(define (f-597 x-1)
  (let* ((x-4 (lambda ($1)
                (declaration-list-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-593 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-594 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((132) (f-7) (f-404 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-428 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-418 x-6 *attribute-value* x-3))
            (else
             (let* ((x-18 (stream-car *input*)) (x-17 (car x-18)))
               (case x-17
                 ((151)
                  (f-595 x-1)
                  (let ((x-23 (lambda (x-21)
                                (f-594 x-2 x-1 x-3 x-21))))
                    (x-2 7)))
                 (else (x-3))))))))))
(define (f-595 x-1)
  (let* ((x-4 (lambda ($1)
                (declaration-meat-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-594 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-594 x-3 x-2 x-4 x-5))))
    (case x-1
      ((32) (f-291 x-7 *attribute-value* x-4))
      ((29) (f-372 x-7 *attribute-value* x-4))
      ((28) (f-6 x-7 *attribute-value* x-4))
      ((20) (f-536 x-7 *attribute-value* x-4))
      (else (f-586 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-591 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (begin (f-592 x-1) (x-2 51))
      (let* ((x-7 (stream-car *input*))
             (x-6 (car x-7))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((157
            156
            132
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78
            75)
           (f-592 x-1)
           (x-2 51))
          (else (x-3))))))
(define (f-592 x-1)
  (let* ((x-4 (lambda ($1)
                (compound-statement-or-error-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-586 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((114) (f-7) (f-539 x-4 #f x-2 *attribute-value* x-5))
          (else
           (let* ((x-13 (stream-car *input*)) (x-12 (car x-13)))
             (case x-12
               ((151) (f-587 x-1 x-2) (x-3 7))
               (else (x-5)))))))))
(define (f-587 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (declaration-meat-3 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-582 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            152
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78
            75)
           (f-583 x-1)
           (x-2 30))
          (else (x-3))))))
(define (f-583 x-1)
  (let* ((x-4 (lambda ($1)
                (function-declarator-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-565 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-566 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((110) (f-7) (f-428 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-418 x-6 *attribute-value* x-3))
            (else (x-3)))))))
(define (f-566 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-566 x-3 x-2 x-4 x-5))))
    (case x-1
      ((29) (f-567 x-3 x-7 x-2 *attribute-value* x-4))
      (else (f-580 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-580 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((157
            152
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78
            75)
           (f-581 x-1 x-2)
           (x-3 30))
          (else (x-5))))))
(define (f-581 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (function-declarator-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-567 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((112) (f-7) (f-568 x-4 #f x-2 *attribute-value* x-5))
          ((110) (f-7) (f-570 x-4 #f x-2 *attribute-value* x-5))
          (else
           (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
             (case x-14
               ((141 111 151 116 114) (f-362 x-1 x-2) (x-3 28))
               (else (x-5)))))))))
(define (f-570 x-3 x-4 x-1 x-2 x-5)
  (let* ((x-8 (lambda ()
                (f-3)
                (f-571 x-3 x-4 x-1 x-2 x-5)))
         (x-11 (lambda (x-9)
                 (f-572 x-3 x-4 x-1 x-2 x-5 x-9))))
    (if (stream-empty? *input*)
        (x-8)
        (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
          (case x-13
            ((156) (f-7) (f-390 x-11 *attribute-value* x-8))
            ((108) (f-7) (f-105 x-11 *attribute-value* x-8))
            ((82) (f-7) (f-107 x-11 *attribute-value* x-8))
            ((106) (f-7) (f-109 x-11 *attribute-value* x-8))
            ((99) (f-7) (f-111 x-11 *attribute-value* x-8))
            ((95) (f-7) (f-113 x-11 *attribute-value* x-8))
            ((98) (f-7) (f-115 x-11 *attribute-value* x-8))
            ((88) (f-7) (f-117 x-11 *attribute-value* x-8))
            ((105) (f-7) (f-269 x-11 *attribute-value* x-8))
            ((102) (f-7) (f-271 x-11 *attribute-value* x-8))
            ((157) (f-7) (f-273 x-11 *attribute-value* x-8))
            ((86) (f-7) (f-275 x-11 *attribute-value* x-8))
            ((90) (f-7) (f-277 x-11 *attribute-value* x-8))
            ((94) (f-7) (f-279 x-11 *attribute-value* x-8))
            ((81) (f-7) (f-281 x-11 *attribute-value* x-8))
            ((107) (f-7) (f-283 x-11 *attribute-value* x-8))
            ((96) (f-7) (f-312 x-11 *attribute-value* x-8))
            ((78) (f-7) (f-314 x-11 *attribute-value* x-8))
            ((101) (f-7) (f-316 x-11 *attribute-value* x-8))
            ((89) (f-7) (f-318 x-11 *attribute-value* x-8))
            ((104) (f-7) (f-320 x-11 *attribute-value* x-8))
            ((111) (f-7) (f-579 x-3 x-4 x-11 x-1 x-2 *attribute-value* x-8))
            (else (x-8)))))))
(define (f-579 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((111 110) (f-393 x-1 x-2 x-3) (x-4 29))
          ((82) (f-564 x-1 x-2 x-3) (x-4 31))
          ((141 114 112) (f-393 x-1 x-2 x-3) (x-4 29))
          ((105 89 88 86 81 78 75) (f-564 x-1 x-2 x-3) (x-4 31))
          ((151 116) (f-393 x-1 x-2 x-3) (x-4 29))
          ((157 152 108 107 106 104 102 101 99 98 96 95 94 90)
           (f-564 x-1 x-2 x-3)
           (x-4 31))
          (else (x-7))))))
(define (f-571 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((111)
           (let ((x-9 (stream-car *input*)))
             (set! *error-status* 3)
             (let* ((x-13 (lambda (x-11)
                            (f-572 x-3 x-4 x-1 x-2 x-5 x-11)))
                    (x-16 (lambda ()
                            (f-3)
                            (f-571 x-3 x-4 x-1 x-2 x-5))))
               (f-577 x-3 x-4 x-13 x-1 x-2 (cdr x-9) x-16))))
          (else
           (begin (set! *input* (stream-cdr *input*))
                  (f-571 x-3 x-4 x-1 x-2 x-5)))))))
(define (f-577 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((111) (f-7) (f-578 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-578 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((112 110) (f-389 x-1 x-2 x-3 x-4) (x-5 29))
          ((82 81 78 75) (f-562 x-1 x-2 x-3 x-4) (x-5 31))
          ((151 114 111) (f-389 x-1 x-2 x-3 x-4) (x-5 29))
          ((88 86) (f-562 x-1 x-2 x-3 x-4) (x-5 31))
          ((141 116) (f-389 x-1 x-2 x-3 x-4) (x-5 29))
          ((157 152 108 107 106 105 104 102 101 99 98 96 95 94 90 89)
           (f-562 x-1 x-2 x-3 x-4)
           (x-5 31))
          (else (x-9))))))
(define (f-572 x-4 x-5 x-2 x-3 x-6 x-1)
  (let* ((x-9 (lambda ()
                (f-3)
                (f-571 x-4 x-5 x-2 x-3 x-6)))
         (x-12 (lambda (x-10)
                 (f-572 x-4 x-5 x-2 x-3 x-6 x-10))))
    (case x-1
      ((17) (f-87 x-12 *attribute-value* x-9))
      ((25) (f-91 x-12 *attribute-value* x-9))
      ((16) (f-93 x-12 *attribute-value* x-9))
      ((14) (f-95 x-12 *attribute-value* x-9))
      ((13) (f-97 x-12 *attribute-value* x-9))
      ((15) (f-304 x-12 *attribute-value* x-9))
      ((12) (f-306 x-12 *attribute-value* x-9))
      ((11) (f-308 x-12 *attribute-value* x-9))
      ((10) (f-329 x-12 *attribute-value* x-9))
      ((36) (f-341 x-12 *attribute-value* x-9))
      ((34) (f-343 x-12 *attribute-value* x-9))
      ((37) (f-573 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9))
      (else (f-575 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9)))))
(define (f-575 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((111) (f-7) (f-576 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-576 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((90 89 88 86 82 81 78 75) (f-556 x-1 x-2 x-3 x-4) (x-5 31))
          ((116 114 141 112 151 111 110) (f-386 x-1 x-2 x-3 x-4) (x-5 29))
          ((157 152 108 107 106 105 104 102 101 99 98 96 95 94)
           (f-556 x-1 x-2 x-3 x-4)
           (x-5 31))
          (else (x-9))))))
(define (f-573 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((111) (f-7) (f-574 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          ((114) (f-7) (f-381 x-6 #f x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-574 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((112 110) (f-380 x-1 x-2 x-3 x-4) (x-5 29))
          ((102 81 78 75) (f-559 x-1 x-2 x-3 x-4) (x-5 31))
          ((151 141 116 114 111) (f-380 x-1 x-2 x-3 x-4) (x-5 29))
          ((157 152 108 107 106 104 99 98 101 96 105 95 94 90 89 88 86 82)
           (f-559 x-1 x-2 x-3 x-4)
           (x-5 31))
          (else (x-9))))))
(define (f-568 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-569 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            ((113) (f-7) (f-299 x-3 x-4 x-8 x-1 x-2 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-569 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-569 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-257 x-9 *attribute-value* x-6))
      (else (f-296 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-548 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((112) (f-7) (f-549 x-2 #f x-1 *attribute-value* x-3))
          ((110) (f-7) (f-551 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-13 (stream-car *input*)) (x-12 (car x-13)))
             (case x-12
               ((151 141 116 114 111) (f-394 x-1) (x-2 28))
               (else (x-3)))))))))
(define (f-551 x-3 x-4 x-1 x-2 x-5)
  (let* ((x-8 (lambda ()
                (f-3)
                (f-552 x-3 x-4 x-1 x-2 x-5)))
         (x-11 (lambda (x-9)
                 (f-553 x-3 x-4 x-1 x-2 x-5 x-9))))
    (if (stream-empty? *input*)
        (x-8)
        (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
          (case x-13
            ((108) (f-7) (f-105 x-11 *attribute-value* x-8))
            ((82) (f-7) (f-107 x-11 *attribute-value* x-8))
            ((106) (f-7) (f-109 x-11 *attribute-value* x-8))
            ((99) (f-7) (f-111 x-11 *attribute-value* x-8))
            ((95) (f-7) (f-113 x-11 *attribute-value* x-8))
            ((98) (f-7) (f-115 x-11 *attribute-value* x-8))
            ((88) (f-7) (f-117 x-11 *attribute-value* x-8))
            ((105) (f-7) (f-269 x-11 *attribute-value* x-8))
            ((102) (f-7) (f-271 x-11 *attribute-value* x-8))
            ((157) (f-7) (f-273 x-11 *attribute-value* x-8))
            ((86) (f-7) (f-275 x-11 *attribute-value* x-8))
            ((90) (f-7) (f-277 x-11 *attribute-value* x-8))
            ((94) (f-7) (f-279 x-11 *attribute-value* x-8))
            ((81) (f-7) (f-281 x-11 *attribute-value* x-8))
            ((107) (f-7) (f-283 x-11 *attribute-value* x-8))
            ((96) (f-7) (f-312 x-11 *attribute-value* x-8))
            ((78) (f-7) (f-314 x-11 *attribute-value* x-8))
            ((101) (f-7) (f-316 x-11 *attribute-value* x-8))
            ((89) (f-7) (f-318 x-11 *attribute-value* x-8))
            ((104) (f-7) (f-320 x-11 *attribute-value* x-8))
            ((156) (f-7) (f-390 x-11 *attribute-value* x-8))
            ((111) (f-7) (f-563 x-3 x-4 x-11 x-1 x-2 *attribute-value* x-8))
            (else (x-8)))))))
(define (f-563 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((110) (f-393 x-1 x-2 x-3) (x-4 29))
          ((86) (f-564 x-1 x-2 x-3) (x-4 31))
          ((141 116 114 112 111) (f-393 x-1 x-2 x-3) (x-4 29))
          ((108 107 106 105 104 102 101 99 98 96 95 94 90 89 88 82 81 78 75)
           (f-564 x-1 x-2 x-3)
           (x-4 31))
          ((151) (f-393 x-1 x-2 x-3) (x-4 29))
          ((157 152) (f-564 x-1 x-2 x-3) (x-4 31))
          (else (x-7))))))
(define (f-564 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (direct-function-declarator-3 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-552 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((111)
           (let ((x-9 (stream-car *input*)))
             (set! *error-status* 3)
             (let* ((x-13 (lambda (x-11)
                            (f-553 x-3 x-4 x-1 x-2 x-5 x-11)))
                    (x-16 (lambda ()
                            (f-3)
                            (f-552 x-3 x-4 x-1 x-2 x-5))))
               (f-560 x-3 x-4 x-13 x-1 x-2 (cdr x-9) x-16))))
          (else
           (begin (set! *input* (stream-cdr *input*))
                  (f-552 x-3 x-4 x-1 x-2 x-5)))))))
(define (f-560 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((111) (f-7) (f-561 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-561 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((110) (f-389 x-1 x-2 x-3 x-4) (x-5 29))
          ((81 78 75) (f-562 x-1 x-2 x-3 x-4) (x-5 31))
          ((151 141 116 114 112 111) (f-389 x-1 x-2 x-3 x-4) (x-5 29))
          ((157 152 108 107 106 105 104 102 101 99 98 96 95 90 88 94 86 89 82)
           (f-562 x-1 x-2 x-3 x-4)
           (x-5 31))
          (else (x-9))))))
(define (f-562 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (direct-function-declarator-1 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-553 x-4 x-5 x-2 x-3 x-6 x-1)
  (let* ((x-9 (lambda ()
                (f-3)
                (f-552 x-4 x-5 x-2 x-3 x-6)))
         (x-12 (lambda (x-10)
                 (f-553 x-4 x-5 x-2 x-3 x-6 x-10))))
    (case x-1
      ((17) (f-87 x-12 *attribute-value* x-9))
      ((25) (f-91 x-12 *attribute-value* x-9))
      ((16) (f-93 x-12 *attribute-value* x-9))
      ((14) (f-95 x-12 *attribute-value* x-9))
      ((13) (f-97 x-12 *attribute-value* x-9))
      ((15) (f-304 x-12 *attribute-value* x-9))
      ((12) (f-306 x-12 *attribute-value* x-9))
      ((11) (f-308 x-12 *attribute-value* x-9))
      ((10) (f-329 x-12 *attribute-value* x-9))
      ((36) (f-341 x-12 *attribute-value* x-9))
      ((34) (f-343 x-12 *attribute-value* x-9))
      ((35) (f-554 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9))
      (else (f-557 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9)))))
(define (f-557 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((114) (f-7) (f-381 x-6 #f x-3 *attribute-value* x-7))
          ((111) (f-7) (f-558 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-558 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((151 141 116 114 112 111 110) (f-380 x-1 x-2 x-3 x-4) (x-5 29))
          ((157
            152
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            86
            88
            82
            78
            81
            75)
           (f-559 x-1 x-2 x-3 x-4)
           (x-5 31))
          (else (x-9))))))
(define (f-559 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (direct-function-declarator-4 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-554 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((111) (f-7) (f-555 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-555 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((112 111 110) (f-386 x-1 x-2 x-3 x-4) (x-5 29))
          ((88 82 78 89 86 75) (f-556 x-1 x-2 x-3 x-4) (x-5 31))
          ((151 116 114) (f-386 x-1 x-2 x-3 x-4) (x-5 29))
          ((108 107 106 105 104 102 101 99 98 96 95 94 90 81)
           (f-556 x-1 x-2 x-3 x-4)
           (x-5 31))
          ((141) (f-386 x-1 x-2 x-3 x-4) (x-5 29))
          ((157 152) (f-556 x-1 x-2 x-3 x-4) (x-5 31))
          (else (x-9))))))
(define (f-556 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (direct-function-declarator-2 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-549 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-550 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            ((113) (f-7) (f-299 x-3 x-4 x-8 x-1 x-2 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-550 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-550 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-257 x-9 *attribute-value* x-6))
      (else (f-296 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-545 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((151) (f-7) (f-546 x-2 #f x-1 *attribute-value* x-3))
          (else (x-3))))))
(define (f-546 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (begin (f-547 x-1 x-2) (x-3 6))
      (let* ((x-9 (stream-car *input*))
             (x-8 (car x-9))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((159
            158
            157
            156
            153
            152
            151
            144
            137
            136
            132
            130
            129
            128
            127
            110
            109
            108
            107
            106
            105
            104
            103
            102
            101
            100
            99
            98
            97
            96
            95
            94
            93
            92
            91
            90
            89
            88
            86
            85
            84
            83
            82
            81
            80
            79
            78
            77
            76
            75)
           (f-547 x-1 x-2)
           (x-3 6))
          (else (x-5))))))
(define (f-547 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (declaration-1 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-538 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((114) (f-7) (f-539 x-2 #f x-1 *attribute-value* x-3))
          ((151) (f-7) (f-543 x-2 #f x-1 *attribute-value* x-3))
          (else (x-3))))))
(define (f-543 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (begin (f-544 x-1 x-2) (x-3 8))
      (let* ((x-9 (stream-car *input*))
             (x-8 (car x-9))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((157
            156
            132
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78
            75)
           (f-544 x-1 x-2)
           (x-3 8))
          (else (x-5))))))
(define (f-544 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (untyped-declaration-1 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-539 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-540 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((132) (f-7) (f-404 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-428 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-418 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-540 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-540 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((32) (f-291 x-9 *attribute-value* x-6))
      ((29) (f-372 x-9 *attribute-value* x-6))
      ((28) (f-6 x-9 *attribute-value* x-6))
      (else (f-541 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-541 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((151 114) (f-542 x-1 x-2 x-3) (x-4 19))
          (else (x-7))))))
(define (f-542 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (init-declarator-list-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-536 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((151 114) (f-537 x-1) (x-2 19))
          (else (x-3))))))
(define (f-537 x-1)
  (let* ((x-4 (lambda ($1)
                (init-declarator-list-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-6 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((116) (f-7) (f-8 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
             (case x-10
               ((151 114) (f-535 x-1) (x-2 20))
               (else (x-3)))))))))
(define (f-535 x-1)
  (let* ((x-4 (lambda ($1)
                (init-declarator-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-8 x-3 x-4 x-1 x-2 x-5)
  (let* ((x-8 (lambda ()
                (f-3)
                (f-9 x-3 x-4 x-1 x-2 x-5)))
         (x-11 (lambda (x-9)
                 (f-10 x-3 x-4 x-1 x-2 x-5 x-9))))
    (if (stream-empty? *input*)
        (x-8)
        (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
          (case x-13
            ((144) (f-7) (f-39 x-11 *attribute-value* x-8))
            ((137) (f-7) (f-41 x-11 *attribute-value* x-8))
            ((130) (f-7) (f-43 x-11 *attribute-value* x-8))
            ((129) (f-7) (f-45 x-11 *attribute-value* x-8))
            ((132) (f-7) (f-47 x-11 *attribute-value* x-8))
            ((136) (f-7) (f-49 x-11 *attribute-value* x-8))
            ((159) (f-7) (f-51 x-11 *attribute-value* x-8))
            ((76) (f-7) (f-53 x-11 *attribute-value* x-8))
            ((158) (f-7) (f-55 x-11 *attribute-value* x-8))
            ((77) (f-7) (f-57 x-11 *attribute-value* x-8))
            ((156) (f-7) (f-59 x-11 *attribute-value* x-8))
            ((100) (f-7) (f-61 x-11 *attribute-value* x-8))
            ((128) (f-7) (f-65 x-11 *attribute-value* x-8))
            ((127) (f-7) (f-80 x-11 *attribute-value* x-8))
            ((110) (f-7) (f-84 x-11 *attribute-value* x-8))
            ((152) (f-7) (f-520 x-11 *attribute-value* x-8))
            (else (x-8)))))))
(define (f-520 x-2 x-1 x-3)
  (let* ((x-6 (lambda ()
                (f-3)
                (f-521 x-2 x-1 x-3)))
         (x-9 (lambda (x-7)
                (f-522 x-2 x-1 x-3 x-7))))
    (if (stream-empty? *input*)
        (x-6)
        (let* ((x-12 (stream-car *input*)) (x-11 (car x-12)))
          (case x-11
            ((144) (f-7) (f-39 x-9 *attribute-value* x-6))
            ((137) (f-7) (f-41 x-9 *attribute-value* x-6))
            ((130) (f-7) (f-43 x-9 *attribute-value* x-6))
            ((129) (f-7) (f-45 x-9 *attribute-value* x-6))
            ((132) (f-7) (f-47 x-9 *attribute-value* x-6))
            ((136) (f-7) (f-49 x-9 *attribute-value* x-6))
            ((159) (f-7) (f-51 x-9 *attribute-value* x-6))
            ((76) (f-7) (f-53 x-9 *attribute-value* x-6))
            ((158) (f-7) (f-55 x-9 *attribute-value* x-6))
            ((77) (f-7) (f-57 x-9 *attribute-value* x-6))
            ((156) (f-7) (f-59 x-9 *attribute-value* x-6))
            ((100) (f-7) (f-61 x-9 *attribute-value* x-6))
            ((128) (f-7) (f-65 x-9 *attribute-value* x-6))
            ((127) (f-7) (f-80 x-9 *attribute-value* x-6))
            ((110) (f-7) (f-84 x-9 *attribute-value* x-6))
            ((152) (f-7) (f-520 x-9 *attribute-value* x-6))
            (else (x-6)))))))
(define (f-521 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-10 (stream-car *input*))
             (x-9 (car x-10)))
        (case x-9
          ((114)
           (let* ((x-12 (lambda ($1)
                          (initializer-1 $1)))
                  (x-11 (x-12 #f)))
             (set! *error-status* 3)
             (let* ((x-16 (lambda (x-14)
                            (f-522 x-2 x-1 x-3 x-14)))
                    (x-19 (lambda ()
                            (f-3)
                            (f-521 x-2 x-1 x-3))))
               (f-518 x-16 x-11 x-19))))
          ((151)
           (let* ((x-22 (lambda ($1)
                          (initializer-1 $1)))
                  (x-21 (x-22 #f)))
             (set! *error-status* 3)
             (let* ((x-26 (lambda (x-24)
                            (f-522 x-2 x-1 x-3 x-24)))
                    (x-29 (lambda ()
                            (f-3)
                            (f-521 x-2 x-1 x-3))))
               (f-518 x-26 x-21 x-29))))
          ((153)
           (let* ((x-32 (lambda ($1)
                          (initializer-1 $1)))
                  (x-31 (x-32 #f)))
             (set! *error-status* 3)
             (let* ((x-36 (lambda (x-34)
                            (f-522 x-2 x-1 x-3 x-34)))
                    (x-39 (lambda ()
                            (f-3)
                            (f-521 x-2 x-1 x-3))))
               (f-518 x-36 x-31 x-39))))
          (else
           (begin (set! *input* (stream-cdr *input*)) (f-521 x-2 x-1 x-3)))))))
(define (f-522 x-3 x-2 x-4 x-1)
  (let* ((x-7 (lambda ()
                (f-3)
                (f-521 x-3 x-2 x-4)))
         (x-10 (lambda (x-8)
                 (f-522 x-3 x-2 x-4 x-8))))
    (case x-1
      ((74) (f-11 x-10 *attribute-value* x-7))
      ((72) (f-13 x-10 *attribute-value* x-7))
      ((70) (f-15 x-10 *attribute-value* x-7))
      ((71) (f-17 x-10 *attribute-value* x-7))
      ((69) (f-30 x-10 *attribute-value* x-7))
      ((68) (f-32 x-10 *attribute-value* x-7))
      ((67) (f-34 x-10 *attribute-value* x-7))
      ((66) (f-72 x-10 *attribute-value* x-7))
      ((65) (f-137 x-10 *attribute-value* x-7))
      ((64) (f-155 x-10 *attribute-value* x-7))
      ((63) (f-173 x-10 *attribute-value* x-7))
      ((62) (f-183 x-10 *attribute-value* x-7))
      ((61) (f-189 x-10 *attribute-value* x-7))
      ((60) (f-195 x-10 *attribute-value* x-7))
      ((59) (f-201 x-10 *attribute-value* x-7))
      ((58) (f-207 x-10 *attribute-value* x-7))
      ((56) (f-214 x-10 *attribute-value* x-7))
      ((53) (f-514 x-10 *attribute-value* x-7))
      ((38) (f-523 x-10 *attribute-value* x-7))
      (else (f-525 x-3 x-10 x-2 *attribute-value* x-7)))))
(define (f-525 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((153) (f-7) (f-526 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          ((114) (f-7) (f-528 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-528 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (let* ((x-10 (lambda ()
                 (f-3)
                 (f-529 x-4 x-5 x-6 x-1 x-2 x-3 x-7)))
         (x-13 (lambda (x-11)
                 (f-530 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-11))))
    (if (stream-empty? *input*)
        (x-10)
        (let* ((x-16 (stream-car *input*)) (x-15 (car x-16)))
          (case x-15
            ((144) (f-7) (f-39 x-13 *attribute-value* x-10))
            ((137) (f-7) (f-41 x-13 *attribute-value* x-10))
            ((130) (f-7) (f-43 x-13 *attribute-value* x-10))
            ((129) (f-7) (f-45 x-13 *attribute-value* x-10))
            ((132) (f-7) (f-47 x-13 *attribute-value* x-10))
            ((136) (f-7) (f-49 x-13 *attribute-value* x-10))
            ((159) (f-7) (f-51 x-13 *attribute-value* x-10))
            ((76) (f-7) (f-53 x-13 *attribute-value* x-10))
            ((158) (f-7) (f-55 x-13 *attribute-value* x-10))
            ((77) (f-7) (f-57 x-13 *attribute-value* x-10))
            ((156) (f-7) (f-59 x-13 *attribute-value* x-10))
            ((100) (f-7) (f-61 x-13 *attribute-value* x-10))
            ((128) (f-7) (f-65 x-13 *attribute-value* x-10))
            ((127) (f-7) (f-80 x-13 *attribute-value* x-10))
            ((110) (f-7) (f-84 x-13 *attribute-value* x-10))
            ((152) (f-7) (f-520 x-13 *attribute-value* x-10))
            ((153)
             (f-7)
             (f-533 x-4 x-5 x-6 x-13 x-1 x-2 x-3 *attribute-value* x-10))
            (else (x-10)))))))
(define (f-533 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((153 151 114) (f-534 x-1 x-2 x-3 x-4) (x-5 38))
          (else (x-9))))))
(define (f-534 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (initializer-4 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-529 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-14 (stream-car *input*))
             (x-13 (car x-14)))
        (case x-13
          ((114)
           (let* ((x-16 (lambda ($1)
                          (initializer-1 $1)))
                  (x-15 (x-16 #f)))
             (set! *error-status* 3)
             (let* ((x-20 (lambda (x-18)
                            (f-530 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-18)))
                    (x-23 (lambda ()
                            (f-3)
                            (f-529 x-4 x-5 x-6 x-1 x-2 x-3 x-7))))
               (f-518 x-20 x-15 x-23))))
          ((151)
           (let* ((x-26 (lambda ($1)
                          (initializer-1 $1)))
                  (x-25 (x-26 #f)))
             (set! *error-status* 3)
             (let* ((x-30 (lambda (x-28)
                            (f-530 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-28)))
                    (x-33 (lambda ()
                            (f-3)
                            (f-529 x-4 x-5 x-6 x-1 x-2 x-3 x-7))))
               (f-518 x-30 x-25 x-33))))
          ((153)
           (let* ((x-36 (lambda ($1)
                          (initializer-1 $1)))
                  (x-35 (x-36 #f)))
             (set! *error-status* 3)
             (let* ((x-40 (lambda (x-38)
                            (f-530 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-38)))
                    (x-43 (lambda ()
                            (f-3)
                            (f-529 x-4 x-5 x-6 x-1 x-2 x-3 x-7))))
               (f-518 x-40 x-35 x-43))))
          (else
           (begin (set! *input* (stream-cdr *input*))
                  (f-529 x-4 x-5 x-6 x-1 x-2 x-3 x-7)))))))
(define (f-530 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-1)
  (let* ((x-11 (lambda ()
                 (f-3)
                 (f-529 x-5 x-6 x-7 x-2 x-3 x-4 x-8)))
         (x-14 (lambda (x-12)
                 (f-530 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-12))))
    (case x-1
      ((74) (f-11 x-14 *attribute-value* x-11))
      ((72) (f-13 x-14 *attribute-value* x-11))
      ((70) (f-15 x-14 *attribute-value* x-11))
      ((71) (f-17 x-14 *attribute-value* x-11))
      ((69) (f-30 x-14 *attribute-value* x-11))
      ((68) (f-32 x-14 *attribute-value* x-11))
      ((67) (f-34 x-14 *attribute-value* x-11))
      ((66) (f-72 x-14 *attribute-value* x-11))
      ((65) (f-137 x-14 *attribute-value* x-11))
      ((64) (f-155 x-14 *attribute-value* x-11))
      ((63) (f-173 x-14 *attribute-value* x-11))
      ((62) (f-183 x-14 *attribute-value* x-11))
      ((61) (f-189 x-14 *attribute-value* x-11))
      ((60) (f-195 x-14 *attribute-value* x-11))
      ((59) (f-201 x-14 *attribute-value* x-11))
      ((58) (f-207 x-14 *attribute-value* x-11))
      ((56) (f-214 x-14 *attribute-value* x-11))
      ((53) (f-514 x-14 *attribute-value* x-11))
      (else (f-531 x-6 x-7 x-14 x-3 x-4 *attribute-value* x-11)))))
(define (f-531 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((153 114) (f-532 x-1 x-2 x-3) (x-4 39))
          (else (x-7))))))
(define (f-532 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (initializer-list-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-526 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((153 151 114) (f-527 x-1 x-2 x-3) (x-4 38))
          (else (x-7))))))
(define (f-527 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (initializer-3 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-523 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((153 114) (f-524 x-1) (x-2 39))
          (else (x-3))))))
(define (f-524 x-1)
  (let* ((x-4 (lambda ($1)
                (initializer-list-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-9 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-12 (stream-car *input*))
             (x-11 (car x-12)))
        (case x-11
          ((114)
           (let* ((x-14 (lambda ($1)
                          (initializer-1 $1)))
                  (x-13 (x-14 #f)))
             (set! *error-status* 3)
             (let* ((x-18 (lambda (x-16)
                            (f-10 x-3 x-4 x-1 x-2 x-5 x-16)))
                    (x-21 (lambda ()
                            (f-3)
                            (f-9 x-3 x-4 x-1 x-2 x-5))))
               (f-518 x-18 x-13 x-21))))
          ((151)
           (let* ((x-24 (lambda ($1)
                          (initializer-1 $1)))
                  (x-23 (x-24 #f)))
             (set! *error-status* 3)
             (let* ((x-28 (lambda (x-26)
                            (f-10 x-3 x-4 x-1 x-2 x-5 x-26)))
                    (x-31 (lambda ()
                            (f-3)
                            (f-9 x-3 x-4 x-1 x-2 x-5))))
               (f-518 x-28 x-23 x-31))))
          ((153)
           (let* ((x-34 (lambda ($1)
                          (initializer-1 $1)))
                  (x-33 (x-34 #f)))
             (set! *error-status* 3)
             (let* ((x-38 (lambda (x-36)
                            (f-10 x-3 x-4 x-1 x-2 x-5 x-36)))
                    (x-41 (lambda ()
                            (f-3)
                            (f-9 x-3 x-4 x-1 x-2 x-5))))
               (f-518 x-38 x-33 x-41))))
          (else
           (begin (set! *input* (stream-cdr *input*))
                  (f-9 x-3 x-4 x-1 x-2 x-5)))))))
(define (f-518 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((153 151 114) (f-519 x-1) (x-2 38))
          (else (x-3))))))
(define (f-519 x-1)
  (let* ((x-4 (lambda ($1)
                (initializer-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-10 x-4 x-5 x-2 x-3 x-6 x-1)
  (let* ((x-9 (lambda ()
                (f-3)
                (f-9 x-4 x-5 x-2 x-3 x-6)))
         (x-12 (lambda (x-10)
                 (f-10 x-4 x-5 x-2 x-3 x-6 x-10))))
    (case x-1
      ((74) (f-11 x-12 *attribute-value* x-9))
      ((72) (f-13 x-12 *attribute-value* x-9))
      ((70) (f-15 x-12 *attribute-value* x-9))
      ((71) (f-17 x-12 *attribute-value* x-9))
      ((69) (f-30 x-12 *attribute-value* x-9))
      ((68) (f-32 x-12 *attribute-value* x-9))
      ((67) (f-34 x-12 *attribute-value* x-9))
      ((66) (f-72 x-12 *attribute-value* x-9))
      ((65) (f-137 x-12 *attribute-value* x-9))
      ((64) (f-155 x-12 *attribute-value* x-9))
      ((63) (f-173 x-12 *attribute-value* x-9))
      ((62) (f-183 x-12 *attribute-value* x-9))
      ((61) (f-189 x-12 *attribute-value* x-9))
      ((60) (f-195 x-12 *attribute-value* x-9))
      ((59) (f-201 x-12 *attribute-value* x-9))
      ((58) (f-207 x-12 *attribute-value* x-9))
      ((56) (f-214 x-12 *attribute-value* x-9))
      ((53) (f-514 x-12 *attribute-value* x-9))
      (else (f-516 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9)))))
(define (f-516 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((151 114) (f-517 x-1 x-2 x-3) (x-4 20))
          (else (x-7))))))
(define (f-517 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (init-declarator-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-514 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((153 151 114) (f-515 x-1) (x-2 38))
          (else (x-3))))))
(define (f-515 x-1)
  (let* ((x-4 (lambda ($1)
                (initializer-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-15 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-16 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((144) (f-7) (f-39 x-6 *attribute-value* x-3))
            ((137) (f-7) (f-41 x-6 *attribute-value* x-3))
            ((130) (f-7) (f-43 x-6 *attribute-value* x-3))
            ((129) (f-7) (f-45 x-6 *attribute-value* x-3))
            ((132) (f-7) (f-47 x-6 *attribute-value* x-3))
            ((136) (f-7) (f-49 x-6 *attribute-value* x-3))
            ((159) (f-7) (f-51 x-6 *attribute-value* x-3))
            ((76) (f-7) (f-53 x-6 *attribute-value* x-3))
            ((158) (f-7) (f-55 x-6 *attribute-value* x-3))
            ((77) (f-7) (f-57 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-59 x-6 *attribute-value* x-3))
            ((100) (f-7) (f-61 x-6 *attribute-value* x-3))
            ((128) (f-7) (f-65 x-6 *attribute-value* x-3))
            ((127) (f-7) (f-80 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-84 x-6 *attribute-value* x-3))
            (else (x-3)))))))
(define (f-16 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-16 x-3 x-2 x-4 x-5))))
    (case x-1
      ((74) (f-11 x-7 *attribute-value* x-4))
      ((72) (f-13 x-7 *attribute-value* x-4))
      ((70) (f-15 x-7 *attribute-value* x-4))
      ((71) (f-17 x-7 *attribute-value* x-4))
      ((69) (f-30 x-7 *attribute-value* x-4))
      (else (f-512 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-512 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            111)
           (f-513 x-1 x-2)
           (x-3 69))
          (else (x-5))))))
(define (f-513 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (unary-expression-4 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-17 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((128) (f-7) (f-18 x-2 #f x-1 *attribute-value* x-3))
          ((155) (f-7) (f-20 x-2 #f x-1 *attribute-value* x-3))
          ((154) (f-7) (f-23 x-2 #f x-1 *attribute-value* x-3))
          ((127) (f-7) (f-26 x-2 #f x-1 *attribute-value* x-3))
          ((112) (f-7) (f-28 x-2 #f x-1 *attribute-value* x-3))
          ((110) (f-7) (f-498 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-21 (stream-car *input*)) (x-20 (car x-21)))
             (case x-20
               ((149
                 150
                 143
                 142
                 151
                 140
                 141
                 135
                 130
                 129
                 153
                 136
                 134
                 146
                 147
                 126
                 139
                 124
                 145
                 122
                 138
                 123
                 119
                 131
                 125
                 133
                 116
                 148
                 132
                 118
                 117
                 114
                 113
                 120
                 111
                 121)
                (f-511 x-1)
                (x-2 69))
               (else (x-3)))))))))
(define (f-511 x-1)
  (let* ((x-4 (lambda ($1)
                (unary-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-498 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-499 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            ((111) (f-7) (f-509 x-3 x-4 x-8 x-1 x-2 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-509 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-510 x-1 x-2 x-3)
           (x-4 71))
          (else (x-7))))))
(define (f-510 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (postfix-expression-3 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-499 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-499 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-214 x-9 *attribute-value* x-6))
      ((53) (f-500 x-9 *attribute-value* x-6))
      (else (f-502 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-502 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((114) (f-7) (f-503 x-6 #f x-3 *attribute-value* x-7))
          ((111) (f-7) (f-507 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-507 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-508 x-1 x-2 x-3 x-4)
           (x-5 71))
          (else (x-9))))))
(define (f-508 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (postfix-expression-4 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-503 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-504 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-504 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-504 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-214 x-9 *attribute-value* x-6))
      (else (f-505 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-505 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((114 111) (f-506 x-1 x-2 x-3) (x-4 73))
          (else (x-7))))))
(define (f-506 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (argument-expression-list-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-500 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((114 111) (f-501 x-1) (x-2 73))
          (else (x-3))))))
(define (f-501 x-1)
  (let* ((x-4 (lambda ($1)
                (argument-expression-list-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-28 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-29 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-29 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-29 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-214 x-9 *attribute-value* x-6))
      ((53) (f-245 x-9 *attribute-value* x-6))
      (else (f-495 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-495 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((113) (f-7) (f-496 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          ((114) (f-7) (f-252 x-6 #f x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-496 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-497 x-1 x-2 x-3 x-4)
           (x-5 71))
          (else (x-9))))))
(define (f-497 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (postfix-expression-2 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-34 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((133) (f-7) (f-35 x-2 #f x-1 *attribute-value* x-3))
          ((132) (f-7) (f-76 x-2 #f x-1 *attribute-value* x-3))
          ((131) (f-7) (f-144 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
             (case x-14
               ((151
                 149
                 143
                 142
                 150
                 145
                 139
                 148
                 134
                 146
                 135
                 130
                 141
                 129
                 126
                 125
                 123
                 122
                 121
                 120
                 153
                 147
                 138
                 136
                 119
                 124
                 118
                 140
                 117
                 116
                 114
                 113
                 111)
                (f-494 x-1)
                (x-2 66))
               (else (x-3)))))))))
(define (f-494 x-1)
  (let* ((x-4 (lambda ($1)
                (additive-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-35 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-36 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-61 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-62 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((144) (f-7) (f-39 x-6 *attribute-value* x-3))
            ((137) (f-7) (f-41 x-6 *attribute-value* x-3))
            ((130) (f-7) (f-43 x-6 *attribute-value* x-3))
            ((129) (f-7) (f-45 x-6 *attribute-value* x-3))
            ((132) (f-7) (f-47 x-6 *attribute-value* x-3))
            ((136) (f-7) (f-49 x-6 *attribute-value* x-3))
            ((159) (f-7) (f-51 x-6 *attribute-value* x-3))
            ((76) (f-7) (f-53 x-6 *attribute-value* x-3))
            ((158) (f-7) (f-55 x-6 *attribute-value* x-3))
            ((77) (f-7) (f-57 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-59 x-6 *attribute-value* x-3))
            ((100) (f-7) (f-61 x-6 *attribute-value* x-3))
            ((128) (f-7) (f-65 x-6 *attribute-value* x-3))
            ((127) (f-7) (f-80 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-487 x-2 x-6 x-1 *attribute-value* x-3))
            (else (x-3)))))))
(define (f-487 x-3 x-4 x-1 x-2 x-5)
  (let* ((x-8 (lambda ()
                (f-3)
                (f-488 x-3 x-4 x-1 x-2 x-5)))
         (x-11 (lambda (x-9)
                 (f-489 x-3 x-4 x-1 x-2 x-5 x-9))))
    (if (stream-empty? *input*)
        (x-8)
        (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
          (case x-13
            ((144) (f-7) (f-39 x-11 *attribute-value* x-8))
            ((137) (f-7) (f-41 x-11 *attribute-value* x-8))
            ((130) (f-7) (f-43 x-11 *attribute-value* x-8))
            ((129) (f-7) (f-45 x-11 *attribute-value* x-8))
            ((132) (f-7) (f-47 x-11 *attribute-value* x-8))
            ((136) (f-7) (f-49 x-11 *attribute-value* x-8))
            ((159) (f-7) (f-51 x-11 *attribute-value* x-8))
            ((76) (f-7) (f-53 x-11 *attribute-value* x-8))
            ((158) (f-7) (f-55 x-11 *attribute-value* x-8))
            ((77) (f-7) (f-57 x-11 *attribute-value* x-8))
            ((156) (f-7) (f-59 x-11 *attribute-value* x-8))
            ((100) (f-7) (f-61 x-11 *attribute-value* x-8))
            ((128) (f-7) (f-65 x-11 *attribute-value* x-8))
            ((127) (f-7) (f-80 x-11 *attribute-value* x-8))
            ((110) (f-7) (f-84 x-11 *attribute-value* x-8))
            ((108) (f-7) (f-105 x-11 *attribute-value* x-8))
            ((82) (f-7) (f-107 x-11 *attribute-value* x-8))
            ((106) (f-7) (f-109 x-11 *attribute-value* x-8))
            ((99) (f-7) (f-111 x-11 *attribute-value* x-8))
            ((95) (f-7) (f-113 x-11 *attribute-value* x-8))
            ((98) (f-7) (f-115 x-11 *attribute-value* x-8))
            ((88) (f-7) (f-117 x-11 *attribute-value* x-8))
            ((105) (f-7) (f-269 x-11 *attribute-value* x-8))
            ((102) (f-7) (f-271 x-11 *attribute-value* x-8))
            ((157) (f-7) (f-273 x-11 *attribute-value* x-8))
            ((86) (f-7) (f-275 x-11 *attribute-value* x-8))
            ((90) (f-7) (f-277 x-11 *attribute-value* x-8))
            ((94) (f-7) (f-279 x-11 *attribute-value* x-8))
            ((81) (f-7) (f-281 x-11 *attribute-value* x-8))
            ((107) (f-7) (f-283 x-11 *attribute-value* x-8))
            (else (x-8)))))))
(define (f-488 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((111)
           (let ((x-9 (stream-car *input*)))
             (set! *error-status* 3)
             (let* ((x-13 (lambda (x-11)
                            (f-489 x-3 x-4 x-1 x-2 x-5 x-11)))
                    (x-16 (lambda ()
                            (f-3)
                            (f-488 x-3 x-4 x-1 x-2 x-5))))
               (f-481 x-4 x-13 x-2 (cdr x-9) x-16))))
          (else
           (begin (set! *input* (stream-cdr *input*))
                  (f-488 x-3 x-4 x-1 x-2 x-5)))))))
(define (f-489 x-4 x-5 x-2 x-3 x-6 x-1)
  (let* ((x-9 (lambda ()
                (f-3)
                (f-488 x-4 x-5 x-2 x-3 x-6)))
         (x-12 (lambda (x-10)
                 (f-489 x-4 x-5 x-2 x-3 x-6 x-10))))
    (case x-1
      ((74) (f-11 x-12 *attribute-value* x-9))
      ((72) (f-13 x-12 *attribute-value* x-9))
      ((70) (f-15 x-12 *attribute-value* x-9))
      ((71) (f-17 x-12 *attribute-value* x-9))
      ((69) (f-30 x-12 *attribute-value* x-9))
      ((68) (f-32 x-12 *attribute-value* x-9))
      ((67) (f-34 x-12 *attribute-value* x-9))
      ((66) (f-72 x-12 *attribute-value* x-9))
      ((65) (f-137 x-12 *attribute-value* x-9))
      ((64) (f-155 x-12 *attribute-value* x-9))
      ((63) (f-173 x-12 *attribute-value* x-9))
      ((62) (f-183 x-12 *attribute-value* x-9))
      ((61) (f-189 x-12 *attribute-value* x-9))
      ((60) (f-195 x-12 *attribute-value* x-9))
      ((59) (f-201 x-12 *attribute-value* x-9))
      ((58) (f-207 x-12 *attribute-value* x-9))
      ((56) (f-214 x-12 *attribute-value* x-9))
      ((53) (f-245 x-12 *attribute-value* x-9))
      ((17) (f-87 x-12 *attribute-value* x-9))
      ((25) (f-91 x-12 *attribute-value* x-9))
      ((16) (f-93 x-12 *attribute-value* x-9))
      ((14) (f-95 x-12 *attribute-value* x-9))
      ((13) (f-97 x-12 *attribute-value* x-9))
      ((15) (f-99 x-12 *attribute-value* x-9))
      ((12) (f-101 x-12 *attribute-value* x-9))
      ((22) (f-464 x-12 *attribute-value* x-9))
      ((52) (f-490 x-5 x-12 x-3 *attribute-value* x-9))
      (else (f-491 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9)))))
(define (f-491 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((111) (f-7) (f-492 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-492 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            111)
           (f-493 x-1 x-2 x-3 x-4)
           (x-5 69))
          (else (x-9))))))
(define (f-493 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (unary-expression-6 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-490 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((111) (f-7) (f-479 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          ((114) (f-7) (f-252 x-4 #f x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-65 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-66 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((144) (f-7) (f-39 x-6 *attribute-value* x-3))
            ((137) (f-7) (f-41 x-6 *attribute-value* x-3))
            ((130) (f-7) (f-43 x-6 *attribute-value* x-3))
            ((129) (f-7) (f-45 x-6 *attribute-value* x-3))
            ((132) (f-7) (f-47 x-6 *attribute-value* x-3))
            ((136) (f-7) (f-49 x-6 *attribute-value* x-3))
            ((159) (f-7) (f-51 x-6 *attribute-value* x-3))
            ((76) (f-7) (f-53 x-6 *attribute-value* x-3))
            ((158) (f-7) (f-55 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-69 x-6 *attribute-value* x-3))
            ((77) (f-7) (f-57 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-59 x-6 *attribute-value* x-3))
            ((100) (f-7) (f-61 x-6 *attribute-value* x-3))
            ((128) (f-7) (f-65 x-6 *attribute-value* x-3))
            ((127) (f-7) (f-80 x-6 *attribute-value* x-3))
            (else (x-3)))))))
(define (f-69 x-2 x-1 x-3)
  (let* ((x-6 (lambda ()
                (f-3)
                (f-70 x-2 x-1 x-3)))
         (x-9 (lambda (x-7)
                (f-71 x-2 x-1 x-3 x-7))))
    (if (stream-empty? *input*)
        (x-6)
        (let* ((x-12 (stream-car *input*)) (x-11 (car x-12)))
          (case x-11
            ((144) (f-7) (f-39 x-9 *attribute-value* x-6))
            ((137) (f-7) (f-41 x-9 *attribute-value* x-6))
            ((130) (f-7) (f-43 x-9 *attribute-value* x-6))
            ((129) (f-7) (f-45 x-9 *attribute-value* x-6))
            ((132) (f-7) (f-47 x-9 *attribute-value* x-6))
            ((136) (f-7) (f-49 x-9 *attribute-value* x-6))
            ((159) (f-7) (f-51 x-9 *attribute-value* x-6))
            ((76) (f-7) (f-53 x-9 *attribute-value* x-6))
            ((158) (f-7) (f-55 x-9 *attribute-value* x-6))
            ((77) (f-7) (f-57 x-9 *attribute-value* x-6))
            ((156) (f-7) (f-59 x-9 *attribute-value* x-6))
            ((100) (f-7) (f-61 x-9 *attribute-value* x-6))
            ((128) (f-7) (f-65 x-9 *attribute-value* x-6))
            ((127) (f-7) (f-80 x-9 *attribute-value* x-6))
            ((110) (f-7) (f-84 x-9 *attribute-value* x-6))
            (else (x-6)))))))
(define (f-70 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((111)
           (let ((x-7 (stream-car *input*)))
             (set! *error-status* 3)
             (let* ((x-11 (lambda (x-9)
                            (f-71 x-2 x-1 x-3 x-9)))
                    (x-14 (lambda ()
                            (f-3)
                            (f-70 x-2 x-1 x-3))))
               (f-481 x-2 x-11 x-1 (cdr x-7) x-14))))
          (else
           (begin (set! *input* (stream-cdr *input*)) (f-70 x-2 x-1 x-3)))))))
(define (f-71 x-3 x-2 x-4 x-1)
  (let* ((x-7 (lambda ()
                (f-3)
                (f-70 x-3 x-2 x-4)))
         (x-10 (lambda (x-8)
                 (f-71 x-3 x-2 x-4 x-8))))
    (case x-1
      ((74) (f-11 x-10 *attribute-value* x-7))
      ((72) (f-13 x-10 *attribute-value* x-7))
      ((70) (f-15 x-10 *attribute-value* x-7))
      ((71) (f-17 x-10 *attribute-value* x-7))
      ((69) (f-30 x-10 *attribute-value* x-7))
      ((68) (f-32 x-10 *attribute-value* x-7))
      ((67) (f-34 x-10 *attribute-value* x-7))
      ((66) (f-72 x-10 *attribute-value* x-7))
      ((65) (f-137 x-10 *attribute-value* x-7))
      ((64) (f-155 x-10 *attribute-value* x-7))
      ((63) (f-173 x-10 *attribute-value* x-7))
      ((62) (f-183 x-10 *attribute-value* x-7))
      ((61) (f-189 x-10 *attribute-value* x-7))
      ((60) (f-195 x-10 *attribute-value* x-7))
      ((59) (f-201 x-10 *attribute-value* x-7))
      ((58) (f-207 x-10 *attribute-value* x-7))
      ((56) (f-214 x-10 *attribute-value* x-7))
      ((53) (f-245 x-10 *attribute-value* x-7))
      (else (f-486 x-3 x-10 x-2 *attribute-value* x-7)))))
(define (f-486 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((114) (f-7) (f-252 x-4 #f x-2 *attribute-value* x-5))
          ((111) (f-7) (f-479 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-72 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((130) (f-7) (f-73 x-2 #f x-1 *attribute-value* x-3))
          ((129) (f-7) (f-141 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-13 (stream-car *input*)) (x-12 (car x-13)))
             (case x-12
               ((149
                 148
                 145
                 139
                 136
                 151
                 140
                 135
                 141
                 143
                 134
                 125
                 142
                 124
                 138
                 123
                 126
                 122
                 121
                 120
                 153
                 146
                 119
                 147
                 118
                 116
                 150
                 117
                 114
                 113
                 111)
                (f-485 x-1)
                (x-2 65))
               (else (x-3)))))))))
(define (f-485 x-1)
  (let* ((x-4 (lambda ($1)
                (shift-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-73 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-74 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-74 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-74 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      (else (f-75 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-75 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((133) (f-7) (f-35 x-6 #f x-3 *attribute-value* x-7))
          ((132) (f-7) (f-76 x-6 #f x-3 *attribute-value* x-7))
          ((131) (f-7) (f-144 x-6 #f x-3 *attribute-value* x-7))
          (else
           (let* ((x-19 (stream-car *input*)) (x-18 (car x-19)))
             (case x-18
               ((148
                 146
                 145
                 143
                 142
                 126
                 125
                 124
                 119
                 141
                 118
                 123
                 116
                 153
                 151
                 150
                 149
                 139
                 138
                 136
                 135
                 134
                 130
                 122
                 140
                 121
                 120
                 117
                 114
                 113
                 111
                 147
                 129)
                (f-484 x-1 x-2 x-3)
                (x-4 66))
               (else (x-7)))))))))
(define (f-484 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (additive-expression-3 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-76 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-77 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-84 x-2 x-1 x-3)
  (let* ((x-6 (lambda ()
                (f-3)
                (f-85 x-2 x-1 x-3)))
         (x-9 (lambda (x-7)
                (f-86 x-2 x-1 x-3 x-7))))
    (if (stream-empty? *input*)
        (x-6)
        (let* ((x-12 (stream-car *input*)) (x-11 (car x-12)))
          (case x-11
            ((108) (f-7) (f-105 x-9 *attribute-value* x-6))
            ((82) (f-7) (f-107 x-9 *attribute-value* x-6))
            ((106) (f-7) (f-109 x-9 *attribute-value* x-6))
            ((99) (f-7) (f-111 x-9 *attribute-value* x-6))
            ((95) (f-7) (f-113 x-9 *attribute-value* x-6))
            ((98) (f-7) (f-115 x-9 *attribute-value* x-6))
            ((88) (f-7) (f-117 x-9 *attribute-value* x-6))
            ((105) (f-7) (f-269 x-9 *attribute-value* x-6))
            ((102) (f-7) (f-271 x-9 *attribute-value* x-6))
            ((157) (f-7) (f-273 x-9 *attribute-value* x-6))
            ((86) (f-7) (f-275 x-9 *attribute-value* x-6))
            ((90) (f-7) (f-277 x-9 *attribute-value* x-6))
            ((94) (f-7) (f-279 x-9 *attribute-value* x-6))
            ((81) (f-7) (f-281 x-9 *attribute-value* x-6))
            ((107) (f-7) (f-283 x-9 *attribute-value* x-6))
            ((144) (f-7) (f-39 x-9 *attribute-value* x-6))
            ((137) (f-7) (f-41 x-9 *attribute-value* x-6))
            ((130) (f-7) (f-43 x-9 *attribute-value* x-6))
            ((129) (f-7) (f-45 x-9 *attribute-value* x-6))
            ((132) (f-7) (f-47 x-9 *attribute-value* x-6))
            ((136) (f-7) (f-49 x-9 *attribute-value* x-6))
            ((159) (f-7) (f-51 x-9 *attribute-value* x-6))
            ((76) (f-7) (f-53 x-9 *attribute-value* x-6))
            ((158) (f-7) (f-55 x-9 *attribute-value* x-6))
            ((77) (f-7) (f-57 x-9 *attribute-value* x-6))
            ((156) (f-7) (f-59 x-9 *attribute-value* x-6))
            ((100) (f-7) (f-61 x-9 *attribute-value* x-6))
            ((128) (f-7) (f-65 x-9 *attribute-value* x-6))
            ((127) (f-7) (f-80 x-9 *attribute-value* x-6))
            ((110) (f-7) (f-84 x-9 *attribute-value* x-6))
            (else (x-6)))))))
(define (f-85 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((111)
           (let ((x-7 (stream-car *input*)))
             (set! *error-status* 3)
             (let* ((x-11 (lambda (x-9)
                            (f-86 x-2 x-1 x-3 x-9)))
                    (x-14 (lambda ()
                            (f-3)
                            (f-85 x-2 x-1 x-3))))
               (f-481 x-2 x-11 x-1 (cdr x-7) x-14))))
          (else
           (begin (set! *input* (stream-cdr *input*)) (f-85 x-2 x-1 x-3)))))))
(define (f-481 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((111) (f-7) (f-482 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-482 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-483 x-1 x-2 x-3)
           (x-4 72))
          (else (x-7))))))
(define (f-483 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (primary-expression-5 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-86 x-3 x-2 x-4 x-1)
  (let* ((x-7 (lambda ()
                (f-3)
                (f-85 x-3 x-2 x-4)))
         (x-10 (lambda (x-8)
                 (f-86 x-3 x-2 x-4 x-8))))
    (case x-1
      ((17) (f-87 x-10 *attribute-value* x-7))
      ((25) (f-91 x-10 *attribute-value* x-7))
      ((16) (f-93 x-10 *attribute-value* x-7))
      ((14) (f-95 x-10 *attribute-value* x-7))
      ((13) (f-97 x-10 *attribute-value* x-7))
      ((15) (f-99 x-10 *attribute-value* x-7))
      ((12) (f-101 x-10 *attribute-value* x-7))
      ((22) (f-464 x-10 *attribute-value* x-7))
      ((74) (f-11 x-10 *attribute-value* x-7))
      ((72) (f-13 x-10 *attribute-value* x-7))
      ((70) (f-15 x-10 *attribute-value* x-7))
      ((71) (f-17 x-10 *attribute-value* x-7))
      ((69) (f-30 x-10 *attribute-value* x-7))
      ((68) (f-32 x-10 *attribute-value* x-7))
      ((67) (f-34 x-10 *attribute-value* x-7))
      ((66) (f-72 x-10 *attribute-value* x-7))
      ((65) (f-137 x-10 *attribute-value* x-7))
      ((64) (f-155 x-10 *attribute-value* x-7))
      ((63) (f-173 x-10 *attribute-value* x-7))
      ((62) (f-183 x-10 *attribute-value* x-7))
      ((61) (f-189 x-10 *attribute-value* x-7))
      ((60) (f-195 x-10 *attribute-value* x-7))
      ((59) (f-201 x-10 *attribute-value* x-7))
      ((58) (f-207 x-10 *attribute-value* x-7))
      ((56) (f-214 x-10 *attribute-value* x-7))
      ((53) (f-245 x-10 *attribute-value* x-7))
      ((40) (f-473 x-3 x-10 x-2 *attribute-value* x-7))
      (else (f-478 x-3 x-10 x-2 *attribute-value* x-7)))))
(define (f-478 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((114) (f-7) (f-252 x-4 #f x-2 *attribute-value* x-5))
          ((111) (f-7) (f-479 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-479 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-480 x-1 x-2 x-3)
           (x-4 72))
          (else (x-7))))))
(define (f-480 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (primary-expression-4 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-473 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((111) (f-7) (f-474 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-474 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (let ((x-10 (lambda (x-8)
                (f-475 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-8))))
    (if (stream-empty? *input*)
        (x-7)
        (let* ((x-13 (stream-car *input*)) (x-12 (car x-13)))
          (case x-12
            ((144) (f-7) (f-39 x-10 *attribute-value* x-7))
            ((137) (f-7) (f-41 x-10 *attribute-value* x-7))
            ((130) (f-7) (f-43 x-10 *attribute-value* x-7))
            ((129) (f-7) (f-45 x-10 *attribute-value* x-7))
            ((132) (f-7) (f-47 x-10 *attribute-value* x-7))
            ((136) (f-7) (f-49 x-10 *attribute-value* x-7))
            ((159) (f-7) (f-51 x-10 *attribute-value* x-7))
            ((76) (f-7) (f-53 x-10 *attribute-value* x-7))
            ((158) (f-7) (f-55 x-10 *attribute-value* x-7))
            ((77) (f-7) (f-57 x-10 *attribute-value* x-7))
            ((156) (f-7) (f-59 x-10 *attribute-value* x-7))
            ((100) (f-7) (f-61 x-10 *attribute-value* x-7))
            ((128) (f-7) (f-65 x-10 *attribute-value* x-7))
            ((127) (f-7) (f-80 x-10 *attribute-value* x-7))
            ((110) (f-7) (f-84 x-10 *attribute-value* x-7))
            (else (x-7)))))))
(define (f-475 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-1)
  (let ((x-11 (lambda (x-9)
                (f-475 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-9))))
    (case x-1
      ((74) (f-11 x-11 *attribute-value* x-8))
      ((72) (f-13 x-11 *attribute-value* x-8))
      ((70) (f-15 x-11 *attribute-value* x-8))
      ((71) (f-17 x-11 *attribute-value* x-8))
      ((69) (f-30 x-11 *attribute-value* x-8))
      (else (f-476 x-5 x-6 x-7 x-11 x-2 x-3 x-4 *attribute-value* x-8)))))
(define (f-476 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            111)
           (f-477 x-1 x-2 x-3 x-4)
           (x-5 68))
          (else (x-9))))))
(define (f-477 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (cast-expression-2 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-464 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-465 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((112) (f-7) (f-363 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-468 x-6 *attribute-value* x-3))
            ((132) (f-7) (f-404 x-6 *attribute-value* x-3))
            (else
             (let* ((x-18 (stream-car *input*)) (x-17 (car x-18)))
               (case x-17
                 ((111)
                  (f-472 x-1)
                  (let ((x-23 (lambda (x-21)
                                (f-465 x-2 x-1 x-3 x-21))))
                    (x-2 40)))
                 (else (x-3))))))))))
(define (f-472 x-1)
  (let* ((x-4 (lambda ($1)
                (type-name-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-465 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-465 x-3 x-2 x-4 x-5))))
    (case x-1
      ((42) (f-331 x-7 *attribute-value* x-4))
      ((32) (f-466 x-7 *attribute-value* x-4))
      (else (f-470 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-470 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((111) (f-471 x-1 x-2) (x-3 40))
          (else (x-5))))))
(define (f-471 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (type-name-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-466 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-467 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((112) (f-7) (f-363 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-468 x-6 *attribute-value* x-3))
            (else
             (let* ((x-16 (stream-car *input*)) (x-15 (car x-16)))
               (case x-15
                 ((111)
                  (f-422 x-1)
                  (let ((x-21 (lambda (x-19)
                                (f-467 x-2 x-1 x-3 x-19))))
                    (x-2 41)))
                 ((114)
                  (f-422 x-1)
                  (let ((x-26 (lambda (x-24)
                                (f-467 x-2 x-1 x-3 x-24))))
                    (x-2 41)))
                 (else (x-3))))))))))
(define (f-468 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-469 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((112) (f-7) (f-363 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-468 x-6 *attribute-value* x-3))
            ((132) (f-7) (f-404 x-6 *attribute-value* x-3))
            ((108) (f-7) (f-105 x-6 *attribute-value* x-3))
            ((82) (f-7) (f-107 x-6 *attribute-value* x-3))
            ((106) (f-7) (f-109 x-6 *attribute-value* x-3))
            ((99) (f-7) (f-111 x-6 *attribute-value* x-3))
            ((95) (f-7) (f-113 x-6 *attribute-value* x-3))
            ((98) (f-7) (f-115 x-6 *attribute-value* x-3))
            ((88) (f-7) (f-117 x-6 *attribute-value* x-3))
            ((105) (f-7) (f-269 x-6 *attribute-value* x-3))
            ((102) (f-7) (f-271 x-6 *attribute-value* x-3))
            ((157) (f-7) (f-273 x-6 *attribute-value* x-3))
            ((86) (f-7) (f-275 x-6 *attribute-value* x-3))
            ((90) (f-7) (f-277 x-6 *attribute-value* x-3))
            ((94) (f-7) (f-279 x-6 *attribute-value* x-3))
            ((81) (f-7) (f-281 x-6 *attribute-value* x-3))
            ((107) (f-7) (f-283 x-6 *attribute-value* x-3))
            ((96) (f-7) (f-312 x-6 *attribute-value* x-3))
            ((78) (f-7) (f-314 x-6 *attribute-value* x-3))
            ((101) (f-7) (f-316 x-6 *attribute-value* x-3))
            ((89) (f-7) (f-318 x-6 *attribute-value* x-3))
            ((104) (f-7) (f-320 x-6 *attribute-value* x-3))
            ((111) (f-7) (f-420 x-2 x-6 x-1 *attribute-value* x-3))
            (else (x-3)))))))
(define (f-469 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-469 x-3 x-2 x-4 x-5))))
    (case x-1
      ((42) (f-331 x-7 *attribute-value* x-4))
      ((32) (f-466 x-7 *attribute-value* x-4))
      ((17) (f-87 x-7 *attribute-value* x-4))
      ((25) (f-91 x-7 *attribute-value* x-4))
      ((16) (f-93 x-7 *attribute-value* x-4))
      ((14) (f-95 x-7 *attribute-value* x-4))
      ((13) (f-97 x-7 *attribute-value* x-4))
      ((15) (f-304 x-7 *attribute-value* x-4))
      ((12) (f-306 x-7 *attribute-value* x-4))
      ((11) (f-308 x-7 *attribute-value* x-4))
      ((10) (f-329 x-7 *attribute-value* x-4))
      ((36) (f-341 x-7 *attribute-value* x-4))
      ((34) (f-343 x-7 *attribute-value* x-4))
      ((41) (f-395 x-3 x-7 x-2 *attribute-value* x-4))
      (else (f-398 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-467 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-467 x-3 x-2 x-4 x-5))))
    (f-359 x-3 x-7 x-2 *attribute-value* x-4)))
(define (f-87 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((156) (f-7) (f-88 x-2 #f x-1 *attribute-value* x-3))
          ((152) (f-7) (f-458 x-2 #f x-1 *attribute-value* x-3))
          (else (x-3))))))
(define (f-458 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-459 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((108) (f-7) (f-105 x-8 *attribute-value* x-5))
            ((82) (f-7) (f-107 x-8 *attribute-value* x-5))
            ((106) (f-7) (f-109 x-8 *attribute-value* x-5))
            ((99) (f-7) (f-111 x-8 *attribute-value* x-5))
            ((95) (f-7) (f-113 x-8 *attribute-value* x-5))
            ((98) (f-7) (f-115 x-8 *attribute-value* x-5))
            ((88) (f-7) (f-117 x-8 *attribute-value* x-5))
            ((105) (f-7) (f-269 x-8 *attribute-value* x-5))
            ((102) (f-7) (f-271 x-8 *attribute-value* x-5))
            ((157) (f-7) (f-273 x-8 *attribute-value* x-5))
            ((86) (f-7) (f-275 x-8 *attribute-value* x-5))
            ((90) (f-7) (f-277 x-8 *attribute-value* x-5))
            ((94) (f-7) (f-279 x-8 *attribute-value* x-5))
            ((81) (f-7) (f-281 x-8 *attribute-value* x-5))
            ((107) (f-7) (f-283 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-459 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-459 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((17) (f-87 x-9 *attribute-value* x-6))
      ((25) (f-91 x-9 *attribute-value* x-6))
      ((16) (f-93 x-9 *attribute-value* x-6))
      ((14) (f-95 x-9 *attribute-value* x-6))
      ((13) (f-97 x-9 *attribute-value* x-6))
      ((15) (f-99 x-9 *attribute-value* x-6))
      ((12) (f-101 x-9 *attribute-value* x-6))
      ((22) (f-289 x-9 *attribute-value* x-6))
      ((21) (f-449 x-9 *attribute-value* x-6))
      (else (f-460 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-460 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (let ((x-10 (lambda (x-8)
                (f-461 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-8))))
    (if (stream-empty? *input*)
        (x-7)
        (let* ((x-13 (stream-car *input*)) (x-12 (car x-13)))
          (case x-12
            ((108) (f-7) (f-105 x-10 *attribute-value* x-7))
            ((82) (f-7) (f-107 x-10 *attribute-value* x-7))
            ((106) (f-7) (f-109 x-10 *attribute-value* x-7))
            ((99) (f-7) (f-111 x-10 *attribute-value* x-7))
            ((95) (f-7) (f-113 x-10 *attribute-value* x-7))
            ((98) (f-7) (f-115 x-10 *attribute-value* x-7))
            ((88) (f-7) (f-117 x-10 *attribute-value* x-7))
            ((105) (f-7) (f-269 x-10 *attribute-value* x-7))
            ((102) (f-7) (f-271 x-10 *attribute-value* x-7))
            ((157) (f-7) (f-273 x-10 *attribute-value* x-7))
            ((86) (f-7) (f-275 x-10 *attribute-value* x-7))
            ((90) (f-7) (f-277 x-10 *attribute-value* x-7))
            ((94) (f-7) (f-279 x-10 *attribute-value* x-7))
            ((81) (f-7) (f-281 x-10 *attribute-value* x-7))
            ((107) (f-7) (f-283 x-10 *attribute-value* x-7))
            ((153)
             (f-7)
             (f-462 x-4 x-5 x-6 x-10 x-1 x-2 x-3 *attribute-value* x-7))
            (else (x-7)))))))
(define (f-462 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-463 x-1 x-2 x-3 x-4)
           (x-5 16))
          (else (x-9))))))
(define (f-463 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (struct-or-union-specifier-1 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-461 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-1)
  (let ((x-11 (lambda (x-9)
                (f-461 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-9))))
    (case x-1
      ((17) (f-87 x-11 *attribute-value* x-8))
      ((25) (f-91 x-11 *attribute-value* x-8))
      ((16) (f-93 x-11 *attribute-value* x-8))
      ((14) (f-95 x-11 *attribute-value* x-8))
      ((13) (f-97 x-11 *attribute-value* x-8))
      ((15) (f-99 x-11 *attribute-value* x-8))
      ((12) (f-101 x-11 *attribute-value* x-8))
      ((22) (f-289 x-11 *attribute-value* x-8))
      (else (f-453 x-7 x-11 x-4 *attribute-value* x-8)))))
(define (f-88 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((152) (f-7) (f-89 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else
           (let* ((x-13 (stream-car *input*)) (x-12 (car x-13)))
             (case x-12
               ((157
                 156
                 151
                 141
                 132
                 106
                 111
                 110
                 108
                 107
                 105
                 112
                 102
                 98
                 101
                 99
                 96
                 95
                 104
                 90
                 89
                 94
                 114
                 88
                 86
                 82
                 81
                 78)
                (f-457 x-1 x-2)
                (x-3 16))
               (else (x-5)))))))))
(define (f-457 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (struct-or-union-specifier-3 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-89 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (let ((x-10 (lambda (x-8)
                (f-90 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-8))))
    (if (stream-empty? *input*)
        (x-7)
        (let* ((x-13 (stream-car *input*)) (x-12 (car x-13)))
          (case x-12
            ((108) (f-7) (f-105 x-10 *attribute-value* x-7))
            ((82) (f-7) (f-107 x-10 *attribute-value* x-7))
            ((106) (f-7) (f-109 x-10 *attribute-value* x-7))
            ((99) (f-7) (f-111 x-10 *attribute-value* x-7))
            ((95) (f-7) (f-113 x-10 *attribute-value* x-7))
            ((98) (f-7) (f-115 x-10 *attribute-value* x-7))
            ((88) (f-7) (f-117 x-10 *attribute-value* x-7))
            ((105) (f-7) (f-269 x-10 *attribute-value* x-7))
            ((102) (f-7) (f-271 x-10 *attribute-value* x-7))
            ((157) (f-7) (f-273 x-10 *attribute-value* x-7))
            ((86) (f-7) (f-275 x-10 *attribute-value* x-7))
            ((90) (f-7) (f-277 x-10 *attribute-value* x-7))
            ((94) (f-7) (f-279 x-10 *attribute-value* x-7))
            ((81) (f-7) (f-281 x-10 *attribute-value* x-7))
            ((107) (f-7) (f-283 x-10 *attribute-value* x-7))
            (else (x-7)))))))
(define (f-90 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-1)
  (let ((x-11 (lambda (x-9)
                (f-90 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-9))))
    (case x-1
      ((17) (f-87 x-11 *attribute-value* x-8))
      ((25) (f-91 x-11 *attribute-value* x-8))
      ((16) (f-93 x-11 *attribute-value* x-8))
      ((14) (f-95 x-11 *attribute-value* x-8))
      ((13) (f-97 x-11 *attribute-value* x-8))
      ((15) (f-99 x-11 *attribute-value* x-8))
      ((12) (f-101 x-11 *attribute-value* x-8))
      ((22) (f-289 x-11 *attribute-value* x-8))
      ((21) (f-449 x-11 *attribute-value* x-8))
      (else (f-451 x-5 x-6 x-7 x-11 x-2 x-3 x-4 *attribute-value* x-8)))))
(define (f-451 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (let ((x-12 (lambda (x-10)
                (f-452 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9 x-10))))
    (if (stream-empty? *input*)
        (x-9)
        (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
          (case x-14
            ((108) (f-7) (f-105 x-12 *attribute-value* x-9))
            ((82) (f-7) (f-107 x-12 *attribute-value* x-9))
            ((106) (f-7) (f-109 x-12 *attribute-value* x-9))
            ((99) (f-7) (f-111 x-12 *attribute-value* x-9))
            ((95) (f-7) (f-113 x-12 *attribute-value* x-9))
            ((98) (f-7) (f-115 x-12 *attribute-value* x-9))
            ((88) (f-7) (f-117 x-12 *attribute-value* x-9))
            ((105) (f-7) (f-269 x-12 *attribute-value* x-9))
            ((102) (f-7) (f-271 x-12 *attribute-value* x-9))
            ((157) (f-7) (f-273 x-12 *attribute-value* x-9))
            ((86) (f-7) (f-275 x-12 *attribute-value* x-9))
            ((90) (f-7) (f-277 x-12 *attribute-value* x-9))
            ((94) (f-7) (f-279 x-12 *attribute-value* x-9))
            ((81) (f-7) (f-281 x-12 *attribute-value* x-9))
            ((107) (f-7) (f-283 x-12 *attribute-value* x-9))
            ((153)
             (f-7)
             (f-455 x-5 x-6 x-7 x-8 x-12 x-1 x-2 x-3 x-4 *attribute-value* x-9))
            (else (x-9)))))))
(define (f-455 x-6 x-7 x-8 x-9 x-10 x-1 x-2 x-3 x-4 x-5 x-11)
  (if (stream-empty? *input*)
      (x-11)
      (let* ((x-14 (stream-car *input*))
             (x-13 (car x-14))
             (x-17 (stream-car *input*))
             (x-16 (car x-17)))
        (case x-16
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-456 x-1 x-2 x-3 x-4 x-5)
           (x-6 16))
          (else (x-11))))))
(define (f-456 x-1 x-2 x-3 x-4 x-5)
  (let* ((x-8 (lambda ($1 $2 $3 $4 $5)
                (struct-or-union-specifier-2 $1 $2 $3 $4 $5)))
         (x-7 (x-8 x-1 x-2 x-3 x-4 x-5)))
    (set! *attribute-value* x-7)))
(define (f-452 x-6 x-7 x-8 x-9 x-2 x-3 x-4 x-5 x-10 x-1)
  (let ((x-13 (lambda (x-11)
                (f-452 x-6 x-7 x-8 x-9 x-2 x-3 x-4 x-5 x-10 x-11))))
    (case x-1
      ((17) (f-87 x-13 *attribute-value* x-10))
      ((25) (f-91 x-13 *attribute-value* x-10))
      ((16) (f-93 x-13 *attribute-value* x-10))
      ((14) (f-95 x-13 *attribute-value* x-10))
      ((13) (f-97 x-13 *attribute-value* x-10))
      ((15) (f-99 x-13 *attribute-value* x-10))
      ((12) (f-101 x-13 *attribute-value* x-10))
      ((22) (f-289 x-13 *attribute-value* x-10))
      (else (f-453 x-9 x-13 x-5 *attribute-value* x-10)))))
(define (f-453 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((157 153 108 107 106 105 102 99 98 95 94 90 88 86 82 81)
           (f-454 x-1 x-2)
           (x-3 18))
          (else (x-5))))))
(define (f-454 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (struct-declaration-list-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-449 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157 153 108 107 106 105 102 99 98 95 94 90 88 86 82 81)
           (f-450 x-1)
           (x-2 18))
          (else (x-3))))))
(define (f-450 x-1)
  (let* ((x-4 (lambda ($1)
                (struct-declaration-list-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-289 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-290 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((132) (f-7) (f-404 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-428 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-418 x-6 *attribute-value* x-3))
            ((141) (f-7) (f-445 x-6 *attribute-value* x-3))
            (else (x-3)))))))
(define (f-290 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-290 x-3 x-2 x-4 x-5))))
    (case x-1
      ((32) (f-291 x-7 *attribute-value* x-4))
      ((29) (f-372 x-7 *attribute-value* x-4))
      ((28) (f-430 x-7 *attribute-value* x-4))
      ((24) (f-436 x-7 *attribute-value* x-4))
      (else (f-438 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-438 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((151) (f-7) (f-439 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          ((114) (f-7) (f-441 x-4 #f x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-441 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-442 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((132) (f-7) (f-404 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-428 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-418 x-8 *attribute-value* x-5))
            ((141) (f-7) (f-445 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-445 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-446 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((144) (f-7) (f-39 x-6 *attribute-value* x-3))
            ((137) (f-7) (f-41 x-6 *attribute-value* x-3))
            ((130) (f-7) (f-43 x-6 *attribute-value* x-3))
            ((129) (f-7) (f-45 x-6 *attribute-value* x-3))
            ((132) (f-7) (f-47 x-6 *attribute-value* x-3))
            ((136) (f-7) (f-49 x-6 *attribute-value* x-3))
            ((159) (f-7) (f-51 x-6 *attribute-value* x-3))
            ((76) (f-7) (f-53 x-6 *attribute-value* x-3))
            ((158) (f-7) (f-55 x-6 *attribute-value* x-3))
            ((77) (f-7) (f-57 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-59 x-6 *attribute-value* x-3))
            ((100) (f-7) (f-61 x-6 *attribute-value* x-3))
            ((128) (f-7) (f-65 x-6 *attribute-value* x-3))
            ((127) (f-7) (f-80 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-84 x-6 *attribute-value* x-3))
            (else (x-3)))))))
(define (f-446 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-446 x-3 x-2 x-4 x-5))))
    (case x-1
      ((74) (f-11 x-7 *attribute-value* x-4))
      ((72) (f-13 x-7 *attribute-value* x-4))
      ((70) (f-15 x-7 *attribute-value* x-4))
      ((71) (f-17 x-7 *attribute-value* x-4))
      ((69) (f-30 x-7 *attribute-value* x-4))
      ((68) (f-32 x-7 *attribute-value* x-4))
      ((67) (f-34 x-7 *attribute-value* x-4))
      ((66) (f-72 x-7 *attribute-value* x-4))
      ((65) (f-137 x-7 *attribute-value* x-4))
      ((64) (f-155 x-7 *attribute-value* x-4))
      ((63) (f-173 x-7 *attribute-value* x-4))
      ((62) (f-183 x-7 *attribute-value* x-4))
      ((61) (f-189 x-7 *attribute-value* x-4))
      ((60) (f-195 x-7 *attribute-value* x-4))
      ((59) (f-201 x-7 *attribute-value* x-4))
      ((58) (f-207 x-7 *attribute-value* x-4))
      ((56) (f-257 x-7 *attribute-value* x-4))
      (else (f-447 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-447 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((151 114) (f-448 x-1 x-2) (x-3 24))
          (else (x-5))))))
(define (f-448 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (struct-declarator-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-442 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-442 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((32) (f-291 x-9 *attribute-value* x-6))
      ((29) (f-372 x-9 *attribute-value* x-6))
      ((28) (f-430 x-9 *attribute-value* x-6))
      (else (f-443 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-443 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((151 114) (f-444 x-1 x-2 x-3) (x-4 23))
          (else (x-7))))))
(define (f-444 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (struct-declarator-list-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-439 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((157 153 108 107 106 105 102 99 98 95 94 90 88 86 82 81)
           (f-440 x-1 x-2 x-3)
           (x-4 21))
          (else (x-7))))))
(define (f-440 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (struct-declaration-1 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-436 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((151 114) (f-437 x-1) (x-2 23))
          (else (x-3))))))
(define (f-437 x-1)
  (let* ((x-4 (lambda ($1)
                (struct-declarator-list-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-430 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((141) (f-7) (f-431 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
             (case x-10
               ((151 114) (f-435 x-1) (x-2 24))
               (else (x-3)))))))))
(define (f-435 x-1)
  (let* ((x-4 (lambda ($1)
                (struct-declarator-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-431 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-432 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-432 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-432 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-257 x-9 *attribute-value* x-6))
      (else (f-433 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-433 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((151 114) (f-434 x-1 x-2 x-3) (x-4 24))
          (else (x-7))))))
(define (f-434 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (struct-declarator-3 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-291 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-292 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((110) (f-7) (f-428 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-418 x-6 *attribute-value* x-3))
            (else (x-3)))))))
(define (f-428 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-429 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((132) (f-7) (f-404 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-428 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-418 x-6 *attribute-value* x-3))
            (else (x-3)))))))
(define (f-429 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-429 x-3 x-2 x-4 x-5))))
    (case x-1
      ((32) (f-291 x-7 *attribute-value* x-4))
      ((29) (f-372 x-7 *attribute-value* x-4))
      (else (f-401 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-292 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-292 x-3 x-2 x-4 x-5))))
    (f-293 x-3 x-7 x-2 *attribute-value* x-4)))
(define (f-293 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((112) (f-7) (f-294 x-4 #f x-2 *attribute-value* x-5))
          ((110) (f-7) (f-301 x-4 #f x-2 *attribute-value* x-5))
          (else
           (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
             (case x-14
               ((114 151 111 141 116) (f-362 x-1 x-2) (x-3 28))
               (else (x-5)))))))))
(define (f-301 x-3 x-4 x-1 x-2 x-5)
  (let* ((x-8 (lambda ()
                (f-3)
                (f-302 x-3 x-4 x-1 x-2 x-5)))
         (x-11 (lambda (x-9)
                 (f-303 x-3 x-4 x-1 x-2 x-5 x-9))))
    (if (stream-empty? *input*)
        (x-8)
        (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
          (case x-13
            ((156) (f-7) (f-390 x-11 *attribute-value* x-8))
            ((108) (f-7) (f-105 x-11 *attribute-value* x-8))
            ((82) (f-7) (f-107 x-11 *attribute-value* x-8))
            ((106) (f-7) (f-109 x-11 *attribute-value* x-8))
            ((99) (f-7) (f-111 x-11 *attribute-value* x-8))
            ((95) (f-7) (f-113 x-11 *attribute-value* x-8))
            ((98) (f-7) (f-115 x-11 *attribute-value* x-8))
            ((88) (f-7) (f-117 x-11 *attribute-value* x-8))
            ((105) (f-7) (f-269 x-11 *attribute-value* x-8))
            ((102) (f-7) (f-271 x-11 *attribute-value* x-8))
            ((157) (f-7) (f-273 x-11 *attribute-value* x-8))
            ((86) (f-7) (f-275 x-11 *attribute-value* x-8))
            ((90) (f-7) (f-277 x-11 *attribute-value* x-8))
            ((94) (f-7) (f-279 x-11 *attribute-value* x-8))
            ((81) (f-7) (f-281 x-11 *attribute-value* x-8))
            ((107) (f-7) (f-283 x-11 *attribute-value* x-8))
            ((96) (f-7) (f-312 x-11 *attribute-value* x-8))
            ((78) (f-7) (f-314 x-11 *attribute-value* x-8))
            ((101) (f-7) (f-316 x-11 *attribute-value* x-8))
            ((89) (f-7) (f-318 x-11 *attribute-value* x-8))
            ((104) (f-7) (f-320 x-11 *attribute-value* x-8))
            ((111) (f-7) (f-392 x-3 x-4 x-11 x-1 x-2 *attribute-value* x-8))
            (else (x-8)))))))
(define (f-302 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((111)
           (let ((x-9 (stream-car *input*)))
             (set! *error-status* 3)
             (let* ((x-13 (lambda (x-11)
                            (f-303 x-3 x-4 x-1 x-2 x-5 x-11)))
                    (x-16 (lambda ()
                            (f-3)
                            (f-302 x-3 x-4 x-1 x-2 x-5))))
               (f-387 x-3 x-4 x-13 x-1 x-2 (cdr x-9) x-16))))
          (else
           (begin (set! *input* (stream-cdr *input*))
                  (f-302 x-3 x-4 x-1 x-2 x-5)))))))
(define (f-303 x-4 x-5 x-2 x-3 x-6 x-1)
  (let* ((x-9 (lambda ()
                (f-3)
                (f-302 x-4 x-5 x-2 x-3 x-6)))
         (x-12 (lambda (x-10)
                 (f-303 x-4 x-5 x-2 x-3 x-6 x-10))))
    (case x-1
      ((17) (f-87 x-12 *attribute-value* x-9))
      ((25) (f-91 x-12 *attribute-value* x-9))
      ((16) (f-93 x-12 *attribute-value* x-9))
      ((14) (f-95 x-12 *attribute-value* x-9))
      ((13) (f-97 x-12 *attribute-value* x-9))
      ((15) (f-304 x-12 *attribute-value* x-9))
      ((12) (f-306 x-12 *attribute-value* x-9))
      ((11) (f-308 x-12 *attribute-value* x-9))
      ((10) (f-329 x-12 *attribute-value* x-9))
      ((36) (f-341 x-12 *attribute-value* x-9))
      ((34) (f-343 x-12 *attribute-value* x-9))
      ((37) (f-378 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9))
      (else (f-384 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9)))))
(define (f-329 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-330 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((112) (f-7) (f-363 x-6 *attribute-value* x-3))
            ((132) (f-7) (f-404 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-370 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-418 x-6 *attribute-value* x-3))
            (else
             (let* ((x-20 (stream-car *input*)) (x-19 (car x-20)))
               (case x-19
                 ((111)
                  (f-427 x-1)
                  (let ((x-25 (lambda (x-23)
                                (f-330 x-2 x-1 x-3 x-23))))
                    (x-2 36)))
                 ((114)
                  (f-427 x-1)
                  (let ((x-30 (lambda (x-28)
                                (f-330 x-2 x-1 x-3 x-28))))
                    (x-2 36)))
                 (else (x-3))))))))))
(define (f-427 x-1)
  (let* ((x-4 (lambda ($1)
                (parameter-declaration-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-330 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-330 x-3 x-2 x-4 x-5))))
    (case x-1
      ((42) (f-331 x-7 *attribute-value* x-4))
      ((32) (f-357 x-7 *attribute-value* x-4))
      ((29) (f-372 x-7 *attribute-value* x-4))
      ((41) (f-423 x-3 x-7 x-2 *attribute-value* x-4))
      (else (f-425 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-425 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((114 111) (f-426 x-1 x-2) (x-3 36))
          (else (x-5))))))
(define (f-426 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (parameter-declaration-1 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-423 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((114 111) (f-424 x-1 x-2) (x-3 36))
          (else (x-5))))))
(define (f-424 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (parameter-declaration-3 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-357 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-358 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((112) (f-7) (f-363 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-370 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-418 x-6 *attribute-value* x-3))
            (else
             (let* ((x-18 (stream-car *input*)) (x-17 (car x-18)))
               (case x-17
                 ((111)
                  (f-422 x-1)
                  (let ((x-23 (lambda (x-21)
                                (f-358 x-2 x-1 x-3 x-21))))
                    (x-2 41)))
                 ((114)
                  (f-422 x-1)
                  (let ((x-28 (lambda (x-26)
                                (f-358 x-2 x-1 x-3 x-26))))
                    (x-2 41)))
                 (else (x-3))))))))))
(define (f-422 x-1)
  (let* ((x-4 (lambda ($1)
                (abstract-declarator-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-370 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-371 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((112) (f-7) (f-363 x-6 *attribute-value* x-3))
            ((108) (f-7) (f-105 x-6 *attribute-value* x-3))
            ((82) (f-7) (f-107 x-6 *attribute-value* x-3))
            ((106) (f-7) (f-109 x-6 *attribute-value* x-3))
            ((99) (f-7) (f-111 x-6 *attribute-value* x-3))
            ((95) (f-7) (f-113 x-6 *attribute-value* x-3))
            ((98) (f-7) (f-115 x-6 *attribute-value* x-3))
            ((88) (f-7) (f-117 x-6 *attribute-value* x-3))
            ((105) (f-7) (f-269 x-6 *attribute-value* x-3))
            ((102) (f-7) (f-271 x-6 *attribute-value* x-3))
            ((157) (f-7) (f-273 x-6 *attribute-value* x-3))
            ((86) (f-7) (f-275 x-6 *attribute-value* x-3))
            ((90) (f-7) (f-277 x-6 *attribute-value* x-3))
            ((94) (f-7) (f-279 x-6 *attribute-value* x-3))
            ((81) (f-7) (f-281 x-6 *attribute-value* x-3))
            ((107) (f-7) (f-283 x-6 *attribute-value* x-3))
            ((96) (f-7) (f-312 x-6 *attribute-value* x-3))
            ((78) (f-7) (f-314 x-6 *attribute-value* x-3))
            ((101) (f-7) (f-316 x-6 *attribute-value* x-3))
            ((89) (f-7) (f-318 x-6 *attribute-value* x-3))
            ((104) (f-7) (f-320 x-6 *attribute-value* x-3))
            ((132) (f-7) (f-404 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-370 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-418 x-6 *attribute-value* x-3))
            ((111) (f-7) (f-420 x-2 x-6 x-1 *attribute-value* x-3))
            (else (x-3)))))))
(define (f-420 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((114 112 111 110) (f-421 x-1 x-2) (x-3 42))
          (else (x-5))))))
(define (f-421 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (direct-abstract-declarator-6 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-418 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((151 141 116 114 112 111 110) (f-419 x-1) (x-2 29))
          (else (x-3))))))
(define (f-419 x-1)
  (let* ((x-4 (lambda ($1)
                (direct-declarator-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-404 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-405 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((108) (f-7) (f-105 x-6 *attribute-value* x-3))
            ((82) (f-7) (f-107 x-6 *attribute-value* x-3))
            ((132) (f-7) (f-404 x-6 *attribute-value* x-3))
            (else
             (let* ((x-18 (stream-car *input*)) (x-17 (car x-18)))
               (case x-17
                 ((110)
                  (f-417 x-1)
                  (let ((x-23 (lambda (x-21)
                                (f-405 x-2 x-1 x-3 x-21))))
                    (x-2 32)))
                 ((111)
                  (f-417 x-1)
                  (let ((x-28 (lambda (x-26)
                                (f-405 x-2 x-1 x-3 x-26))))
                    (x-2 32)))
                 ((112)
                  (f-417 x-1)
                  (let ((x-33 (lambda (x-31)
                                (f-405 x-2 x-1 x-3 x-31))))
                    (x-2 32)))
                 ((156)
                  (f-417 x-1)
                  (let ((x-38 (lambda (x-36)
                                (f-405 x-2 x-1 x-3 x-36))))
                    (x-2 32)))
                 ((114)
                  (f-417 x-1)
                  (let ((x-43 (lambda (x-41)
                                (f-405 x-2 x-1 x-3 x-41))))
                    (x-2 32)))
                 (else (x-3))))))))))
(define (f-417 x-1)
  (let* ((x-4 (lambda ($1) (pointer-1 $1))) (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-405 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-405 x-3 x-2 x-4 x-5))))
    (case x-1
      ((15) (f-406 x-7 *attribute-value* x-4))
      ((33) (f-408 x-3 x-7 x-2 *attribute-value* x-4))
      (else (f-415 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-415 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((156 114 112 111 110) (f-416 x-1 x-2) (x-3 32))
          (else (x-5))))))
(define (f-416 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (pointer-3 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-408 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-409 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((132) (f-7) (f-404 x-8 *attribute-value* x-5))
            ((108) (f-7) (f-105 x-8 *attribute-value* x-5))
            ((82) (f-7) (f-107 x-8 *attribute-value* x-5))
            (else
             (let* ((x-20 (stream-car *input*)) (x-19 (car x-20)))
               (case x-19
                 ((110)
                  (f-414 x-1 x-2)
                  (let ((x-25 (lambda (x-23)
                                (f-409 x-3 x-4 x-1 x-2 x-5 x-23))))
                    (x-3 32)))
                 ((111)
                  (f-414 x-1 x-2)
                  (let ((x-30 (lambda (x-28)
                                (f-409 x-3 x-4 x-1 x-2 x-5 x-28))))
                    (x-3 32)))
                 ((112)
                  (f-414 x-1 x-2)
                  (let ((x-35 (lambda (x-33)
                                (f-409 x-3 x-4 x-1 x-2 x-5 x-33))))
                    (x-3 32)))
                 ((114)
                  (f-414 x-1 x-2)
                  (let ((x-40 (lambda (x-38)
                                (f-409 x-3 x-4 x-1 x-2 x-5 x-38))))
                    (x-3 32)))
                 ((156)
                  (f-414 x-1 x-2)
                  (let ((x-45 (lambda (x-43)
                                (f-409 x-3 x-4 x-1 x-2 x-5 x-43))))
                    (x-3 32)))
                 (else (x-5))))))))))
(define (f-414 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (pointer-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-409 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-409 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((32) (f-410 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6))
      (else (f-412 x-5 x-9 x-3 *attribute-value* x-6)))))
(define (f-412 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((156 132 114 112 111 110 108 82) (f-413 x-1 x-2) (x-3 33))
          (else (x-5))))))
(define (f-413 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (type-qualifier-list-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-410 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((156 114 112 111 110) (f-411 x-1 x-2 x-3) (x-4 32))
          (else (x-7))))))
(define (f-411 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (pointer-4 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-406 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((156 132 114 112 111 110 108 82) (f-407 x-1) (x-2 33))
          (else (x-3))))))
(define (f-407 x-1)
  (let* ((x-4 (lambda ($1)
                (type-qualifier-list-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-371 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-371 x-3 x-2 x-4 x-5))))
    (case x-1
      ((42) (f-331 x-7 *attribute-value* x-4))
      ((17) (f-87 x-7 *attribute-value* x-4))
      ((25) (f-91 x-7 *attribute-value* x-4))
      ((16) (f-93 x-7 *attribute-value* x-4))
      ((14) (f-95 x-7 *attribute-value* x-4))
      ((13) (f-97 x-7 *attribute-value* x-4))
      ((15) (f-304 x-7 *attribute-value* x-4))
      ((12) (f-306 x-7 *attribute-value* x-4))
      ((11) (f-308 x-7 *attribute-value* x-4))
      ((10) (f-329 x-7 *attribute-value* x-4))
      ((36) (f-341 x-7 *attribute-value* x-4))
      ((34) (f-343 x-7 *attribute-value* x-4))
      ((32) (f-357 x-7 *attribute-value* x-4))
      ((29) (f-372 x-7 *attribute-value* x-4))
      ((41) (f-395 x-3 x-7 x-2 *attribute-value* x-4))
      ((35) (f-398 x-3 x-7 x-2 *attribute-value* x-4))
      (else (f-401 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-401 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((111) (f-7) (f-402 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-402 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((151 141 116 114 112 111 110) (f-403 x-1 x-2 x-3) (x-4 29))
          (else (x-7))))))
(define (f-403 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (direct-declarator-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-398 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((111) (f-7) (f-399 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-399 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((114 112 111 110) (f-400 x-1 x-2 x-3) (x-4 42))
          (else (x-7))))))
(define (f-400 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (direct-abstract-declarator-7 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-395 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((111) (f-7) (f-396 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-396 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((114 112 111 110) (f-397 x-1 x-2 x-3) (x-4 42))
          (else (x-7))))))
(define (f-397 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (direct-abstract-declarator-1 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-372 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((112) (f-7) (f-373 x-2 #f x-1 *attribute-value* x-3))
          ((110) (f-7) (f-375 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-13 (stream-car *input*)) (x-12 (car x-13)))
             (case x-12
               ((141 116 114 151 111) (f-394 x-1) (x-2 28))
               (else (x-3)))))))))
(define (f-394 x-1)
  (let* ((x-4 (lambda ($1)
                (declarator-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-375 x-3 x-4 x-1 x-2 x-5)
  (let* ((x-8 (lambda ()
                (f-3)
                (f-376 x-3 x-4 x-1 x-2 x-5)))
         (x-11 (lambda (x-9)
                 (f-377 x-3 x-4 x-1 x-2 x-5 x-9))))
    (if (stream-empty? *input*)
        (x-8)
        (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
          (case x-13
            ((156) (f-7) (f-390 x-11 *attribute-value* x-8))
            ((108) (f-7) (f-105 x-11 *attribute-value* x-8))
            ((82) (f-7) (f-107 x-11 *attribute-value* x-8))
            ((106) (f-7) (f-109 x-11 *attribute-value* x-8))
            ((99) (f-7) (f-111 x-11 *attribute-value* x-8))
            ((95) (f-7) (f-113 x-11 *attribute-value* x-8))
            ((98) (f-7) (f-115 x-11 *attribute-value* x-8))
            ((88) (f-7) (f-117 x-11 *attribute-value* x-8))
            ((105) (f-7) (f-269 x-11 *attribute-value* x-8))
            ((102) (f-7) (f-271 x-11 *attribute-value* x-8))
            ((157) (f-7) (f-273 x-11 *attribute-value* x-8))
            ((86) (f-7) (f-275 x-11 *attribute-value* x-8))
            ((90) (f-7) (f-277 x-11 *attribute-value* x-8))
            ((94) (f-7) (f-279 x-11 *attribute-value* x-8))
            ((81) (f-7) (f-281 x-11 *attribute-value* x-8))
            ((107) (f-7) (f-283 x-11 *attribute-value* x-8))
            ((96) (f-7) (f-312 x-11 *attribute-value* x-8))
            ((78) (f-7) (f-314 x-11 *attribute-value* x-8))
            ((101) (f-7) (f-316 x-11 *attribute-value* x-8))
            ((89) (f-7) (f-318 x-11 *attribute-value* x-8))
            ((104) (f-7) (f-320 x-11 *attribute-value* x-8))
            ((111) (f-7) (f-392 x-3 x-4 x-11 x-1 x-2 *attribute-value* x-8))
            (else (x-8)))))))
(define (f-392 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((151 141 116 114 112 111 110) (f-393 x-1 x-2 x-3) (x-4 29))
          (else (x-7))))))
(define (f-393 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (direct-declarator-6 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-390 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((114 111) (f-391 x-1) (x-2 37))
          (else (x-3))))))
(define (f-391 x-1)
  (let* ((x-4 (lambda ($1)
                (identifier-list-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-376 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((111)
           (let ((x-9 (stream-car *input*)))
             (set! *error-status* 3)
             (let* ((x-13 (lambda (x-11)
                            (f-377 x-3 x-4 x-1 x-2 x-5 x-11)))
                    (x-16 (lambda ()
                            (f-3)
                            (f-376 x-3 x-4 x-1 x-2 x-5))))
               (f-387 x-3 x-4 x-13 x-1 x-2 (cdr x-9) x-16))))
          (else
           (begin (set! *input* (stream-cdr *input*))
                  (f-376 x-3 x-4 x-1 x-2 x-5)))))))
(define (f-387 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((111) (f-7) (f-388 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-388 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((151 141 116 114 112 111 110) (f-389 x-1 x-2 x-3 x-4) (x-5 29))
          (else (x-9))))))
(define (f-389 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (direct-declarator-7 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-377 x-4 x-5 x-2 x-3 x-6 x-1)
  (let* ((x-9 (lambda ()
                (f-3)
                (f-376 x-4 x-5 x-2 x-3 x-6)))
         (x-12 (lambda (x-10)
                 (f-377 x-4 x-5 x-2 x-3 x-6 x-10))))
    (case x-1
      ((17) (f-87 x-12 *attribute-value* x-9))
      ((25) (f-91 x-12 *attribute-value* x-9))
      ((16) (f-93 x-12 *attribute-value* x-9))
      ((14) (f-95 x-12 *attribute-value* x-9))
      ((13) (f-97 x-12 *attribute-value* x-9))
      ((15) (f-304 x-12 *attribute-value* x-9))
      ((12) (f-306 x-12 *attribute-value* x-9))
      ((11) (f-308 x-12 *attribute-value* x-9))
      ((10) (f-329 x-12 *attribute-value* x-9))
      ((36) (f-341 x-12 *attribute-value* x-9))
      ((34) (f-343 x-12 *attribute-value* x-9))
      ((37) (f-378 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9))
      (else (f-384 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9)))))
(define (f-384 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((111) (f-7) (f-385 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-385 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((151 141 116 114 112 111 110) (f-386 x-1 x-2 x-3 x-4) (x-5 29))
          (else (x-9))))))
(define (f-386 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (direct-declarator-5 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-378 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((111) (f-7) (f-379 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          ((114) (f-7) (f-381 x-6 #f x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-381 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((156) (f-7) (f-382 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-382 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((114 111) (f-383 x-1 x-2 x-3) (x-4 37))
          (else (x-7))))))
(define (f-383 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (identifier-list-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-379 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((151 141 116 114 112 111 110) (f-380 x-1 x-2 x-3 x-4) (x-5 29))
          (else (x-9))))))
(define (f-380 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (direct-declarator-8 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-373 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-374 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            ((113) (f-7) (f-299 x-3 x-4 x-8 x-1 x-2 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-374 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-374 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-257 x-9 *attribute-value* x-6))
      (else (f-296 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-363 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-364 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((144) (f-7) (f-39 x-6 *attribute-value* x-3))
            ((137) (f-7) (f-41 x-6 *attribute-value* x-3))
            ((130) (f-7) (f-43 x-6 *attribute-value* x-3))
            ((129) (f-7) (f-45 x-6 *attribute-value* x-3))
            ((132) (f-7) (f-47 x-6 *attribute-value* x-3))
            ((136) (f-7) (f-49 x-6 *attribute-value* x-3))
            ((159) (f-7) (f-51 x-6 *attribute-value* x-3))
            ((76) (f-7) (f-53 x-6 *attribute-value* x-3))
            ((158) (f-7) (f-55 x-6 *attribute-value* x-3))
            ((77) (f-7) (f-57 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-59 x-6 *attribute-value* x-3))
            ((100) (f-7) (f-61 x-6 *attribute-value* x-3))
            ((128) (f-7) (f-65 x-6 *attribute-value* x-3))
            ((127) (f-7) (f-80 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-84 x-6 *attribute-value* x-3))
            ((113) (f-7) (f-368 x-2 x-6 x-1 *attribute-value* x-3))
            (else (x-3)))))))
(define (f-368 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((114 112 111 110) (f-369 x-1 x-2) (x-3 42))
          (else (x-5))))))
(define (f-369 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (direct-abstract-declarator-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-364 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-364 x-3 x-2 x-4 x-5))))
    (case x-1
      ((74) (f-11 x-7 *attribute-value* x-4))
      ((72) (f-13 x-7 *attribute-value* x-4))
      ((70) (f-15 x-7 *attribute-value* x-4))
      ((71) (f-17 x-7 *attribute-value* x-4))
      ((69) (f-30 x-7 *attribute-value* x-4))
      ((68) (f-32 x-7 *attribute-value* x-4))
      ((67) (f-34 x-7 *attribute-value* x-4))
      ((66) (f-72 x-7 *attribute-value* x-4))
      ((65) (f-137 x-7 *attribute-value* x-4))
      ((64) (f-155 x-7 *attribute-value* x-4))
      ((63) (f-173 x-7 *attribute-value* x-4))
      ((62) (f-183 x-7 *attribute-value* x-4))
      ((61) (f-189 x-7 *attribute-value* x-4))
      ((60) (f-195 x-7 *attribute-value* x-4))
      ((59) (f-201 x-7 *attribute-value* x-4))
      ((58) (f-207 x-7 *attribute-value* x-4))
      ((56) (f-257 x-7 *attribute-value* x-4))
      (else (f-365 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-365 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((113) (f-7) (f-366 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-366 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((114 112 111 110) (f-367 x-1 x-2 x-3) (x-4 42))
          (else (x-7))))))
(define (f-367 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (direct-abstract-declarator-3 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-358 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-358 x-3 x-2 x-4 x-5))))
    (case x-1
      ((42) (f-359 x-3 x-7 x-2 *attribute-value* x-4))
      (else (f-361 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-361 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((112) (f-7) (f-294 x-4 #f x-2 *attribute-value* x-5))
          ((110) (f-7) (f-301 x-4 #f x-2 *attribute-value* x-5))
          (else
           (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
             (case x-14
               ((114 141 111 151 116) (f-362 x-1 x-2) (x-3 28))
               (else (x-5)))))))))
(define (f-362 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (declarator-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-359 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((112) (f-7) (f-332 x-4 #f x-2 *attribute-value* x-5))
          ((110) (f-7) (f-339 x-4 #f x-2 *attribute-value* x-5))
          (else
           (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
             (case x-14
               ((114 111) (f-360 x-1 x-2) (x-3 41))
               (else (x-5)))))))))
(define (f-360 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (abstract-declarator-3 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-331 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((112) (f-7) (f-332 x-2 #f x-1 *attribute-value* x-3))
          ((110) (f-7) (f-339 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-13 (stream-car *input*)) (x-12 (car x-13)))
             (case x-12
               ((114 111) (f-356 x-1) (x-2 41))
               (else (x-3)))))))))
(define (f-356 x-1)
  (let* ((x-4 (lambda ($1)
                (abstract-declarator-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-339 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-340 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((108) (f-7) (f-105 x-8 *attribute-value* x-5))
            ((82) (f-7) (f-107 x-8 *attribute-value* x-5))
            ((106) (f-7) (f-109 x-8 *attribute-value* x-5))
            ((99) (f-7) (f-111 x-8 *attribute-value* x-5))
            ((95) (f-7) (f-113 x-8 *attribute-value* x-5))
            ((98) (f-7) (f-115 x-8 *attribute-value* x-5))
            ((88) (f-7) (f-117 x-8 *attribute-value* x-5))
            ((105) (f-7) (f-269 x-8 *attribute-value* x-5))
            ((102) (f-7) (f-271 x-8 *attribute-value* x-5))
            ((157) (f-7) (f-273 x-8 *attribute-value* x-5))
            ((86) (f-7) (f-275 x-8 *attribute-value* x-5))
            ((90) (f-7) (f-277 x-8 *attribute-value* x-5))
            ((94) (f-7) (f-279 x-8 *attribute-value* x-5))
            ((81) (f-7) (f-281 x-8 *attribute-value* x-5))
            ((107) (f-7) (f-283 x-8 *attribute-value* x-5))
            ((96) (f-7) (f-312 x-8 *attribute-value* x-5))
            ((78) (f-7) (f-314 x-8 *attribute-value* x-5))
            ((101) (f-7) (f-316 x-8 *attribute-value* x-5))
            ((89) (f-7) (f-318 x-8 *attribute-value* x-5))
            ((104) (f-7) (f-320 x-8 *attribute-value* x-5))
            ((111) (f-7) (f-354 x-3 x-4 x-8 x-1 x-2 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-354 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((114 112 111 110) (f-355 x-1 x-2 x-3) (x-4 42))
          (else (x-7))))))
(define (f-355 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (direct-abstract-declarator-8 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-340 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-340 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((17) (f-87 x-9 *attribute-value* x-6))
      ((25) (f-91 x-9 *attribute-value* x-6))
      ((16) (f-93 x-9 *attribute-value* x-6))
      ((14) (f-95 x-9 *attribute-value* x-6))
      ((13) (f-97 x-9 *attribute-value* x-6))
      ((15) (f-304 x-9 *attribute-value* x-6))
      ((12) (f-306 x-9 *attribute-value* x-6))
      ((11) (f-308 x-9 *attribute-value* x-6))
      ((10) (f-329 x-9 *attribute-value* x-6))
      ((36) (f-341 x-9 *attribute-value* x-6))
      ((34) (f-343 x-9 *attribute-value* x-6))
      (else (f-351 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-351 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((111) (f-7) (f-352 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-352 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((114 112 111 110) (f-353 x-1 x-2 x-3 x-4) (x-5 42))
          (else (x-9))))))
(define (f-353 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (direct-abstract-declarator-9 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-343 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((114) (f-7) (f-344 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
             (case x-10
               ((111) (f-350 x-1) (x-2 35))
               (else (x-3)))))))))
(define (f-350 x-1)
  (let* ((x-4 (lambda ($1)
                (parameter-type-list-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-344 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-345 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((108) (f-7) (f-105 x-8 *attribute-value* x-5))
            ((82) (f-7) (f-107 x-8 *attribute-value* x-5))
            ((106) (f-7) (f-109 x-8 *attribute-value* x-5))
            ((99) (f-7) (f-111 x-8 *attribute-value* x-5))
            ((95) (f-7) (f-113 x-8 *attribute-value* x-5))
            ((98) (f-7) (f-115 x-8 *attribute-value* x-5))
            ((88) (f-7) (f-117 x-8 *attribute-value* x-5))
            ((105) (f-7) (f-269 x-8 *attribute-value* x-5))
            ((102) (f-7) (f-271 x-8 *attribute-value* x-5))
            ((157) (f-7) (f-273 x-8 *attribute-value* x-5))
            ((86) (f-7) (f-275 x-8 *attribute-value* x-5))
            ((90) (f-7) (f-277 x-8 *attribute-value* x-5))
            ((94) (f-7) (f-279 x-8 *attribute-value* x-5))
            ((81) (f-7) (f-281 x-8 *attribute-value* x-5))
            ((107) (f-7) (f-283 x-8 *attribute-value* x-5))
            ((96) (f-7) (f-312 x-8 *attribute-value* x-5))
            ((78) (f-7) (f-314 x-8 *attribute-value* x-5))
            ((101) (f-7) (f-316 x-8 *attribute-value* x-5))
            ((89) (f-7) (f-318 x-8 *attribute-value* x-5))
            ((104) (f-7) (f-320 x-8 *attribute-value* x-5))
            ((115) (f-7) (f-348 x-3 x-4 x-8 x-1 x-2 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-348 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((111) (f-349 x-1 x-2 x-3) (x-4 35))
          (else (x-7))))))
(define (f-349 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (parameter-type-list-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-345 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-345 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((17) (f-87 x-9 *attribute-value* x-6))
      ((25) (f-91 x-9 *attribute-value* x-6))
      ((16) (f-93 x-9 *attribute-value* x-6))
      ((14) (f-95 x-9 *attribute-value* x-6))
      ((13) (f-97 x-9 *attribute-value* x-6))
      ((15) (f-304 x-9 *attribute-value* x-6))
      ((12) (f-306 x-9 *attribute-value* x-6))
      ((11) (f-308 x-9 *attribute-value* x-6))
      ((10) (f-329 x-9 *attribute-value* x-6))
      (else (f-346 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-346 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((114 111) (f-347 x-1 x-2 x-3) (x-4 34))
          (else (x-7))))))
(define (f-347 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (parameter-list-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-341 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((114 111) (f-342 x-1) (x-2 34))
          (else (x-3))))))
(define (f-342 x-1)
  (let* ((x-4 (lambda ($1)
                (parameter-list-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-332 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-333 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            ((113) (f-7) (f-337 x-3 x-4 x-8 x-1 x-2 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-337 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((114 112 111 110) (f-338 x-1 x-2 x-3) (x-4 42))
          (else (x-7))))))
(define (f-338 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (direct-abstract-declarator-4 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-333 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-333 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-257 x-9 *attribute-value* x-6))
      (else (f-334 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-334 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((113) (f-7) (f-335 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-335 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((114 112 111 110) (f-336 x-1 x-2 x-3 x-4) (x-5 42))
          (else (x-9))))))
(define (f-336 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (direct-abstract-declarator-5 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-304 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-305 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((108) (f-7) (f-105 x-6 *attribute-value* x-3))
            ((82) (f-7) (f-107 x-6 *attribute-value* x-3))
            ((106) (f-7) (f-109 x-6 *attribute-value* x-3))
            ((99) (f-7) (f-111 x-6 *attribute-value* x-3))
            ((95) (f-7) (f-113 x-6 *attribute-value* x-3))
            ((98) (f-7) (f-115 x-6 *attribute-value* x-3))
            ((88) (f-7) (f-117 x-6 *attribute-value* x-3))
            ((105) (f-7) (f-269 x-6 *attribute-value* x-3))
            ((102) (f-7) (f-271 x-6 *attribute-value* x-3))
            ((157) (f-7) (f-273 x-6 *attribute-value* x-3))
            ((86) (f-7) (f-275 x-6 *attribute-value* x-3))
            ((90) (f-7) (f-277 x-6 *attribute-value* x-3))
            ((94) (f-7) (f-279 x-6 *attribute-value* x-3))
            ((81) (f-7) (f-281 x-6 *attribute-value* x-3))
            ((107) (f-7) (f-283 x-6 *attribute-value* x-3))
            ((96) (f-7) (f-312 x-6 *attribute-value* x-3))
            ((78) (f-7) (f-314 x-6 *attribute-value* x-3))
            ((101) (f-7) (f-316 x-6 *attribute-value* x-3))
            ((89) (f-7) (f-318 x-6 *attribute-value* x-3))
            ((104) (f-7) (f-320 x-6 *attribute-value* x-3))
            (else
             (let* ((x-52 (stream-car *input*)) (x-51 (car x-52)))
               (case x-51
                 ((110)
                  (f-328 x-1)
                  (let ((x-57 (lambda (x-55)
                                (f-305 x-2 x-1 x-3 x-55))))
                    (x-2 10)))
                 ((111)
                  (f-328 x-1)
                  (let ((x-62 (lambda (x-60)
                                (f-305 x-2 x-1 x-3 x-60))))
                    (x-2 10)))
                 ((112)
                  (f-328 x-1)
                  (let ((x-67 (lambda (x-65)
                                (f-305 x-2 x-1 x-3 x-65))))
                    (x-2 10)))
                 ((114)
                  (f-328 x-1)
                  (let ((x-72 (lambda (x-70)
                                (f-305 x-2 x-1 x-3 x-70))))
                    (x-2 10)))
                 ((132)
                  (f-328 x-1)
                  (let ((x-77 (lambda (x-75)
                                (f-305 x-2 x-1 x-3 x-75))))
                    (x-2 10)))
                 ((151)
                  (f-328 x-1)
                  (let ((x-82 (lambda (x-80)
                                (f-305 x-2 x-1 x-3 x-80))))
                    (x-2 10)))
                 ((156)
                  (f-328 x-1)
                  (let ((x-87 (lambda (x-85)
                                (f-305 x-2 x-1 x-3 x-85))))
                    (x-2 10)))
                 (else (x-3))))))))))
(define (f-328 x-1)
  (let* ((x-4 (lambda ($1)
                (declaration-specifiers-5 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-305 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-305 x-3 x-2 x-4 x-5))))
    (case x-1
      ((17) (f-87 x-7 *attribute-value* x-4))
      ((25) (f-91 x-7 *attribute-value* x-4))
      ((16) (f-93 x-7 *attribute-value* x-4))
      ((14) (f-95 x-7 *attribute-value* x-4))
      ((13) (f-97 x-7 *attribute-value* x-4))
      ((15) (f-304 x-7 *attribute-value* x-4))
      ((12) (f-306 x-7 *attribute-value* x-4))
      ((11) (f-308 x-7 *attribute-value* x-4))
      (else (f-326 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-326 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((156 151 132 114 112 111 110) (f-327 x-1 x-2) (x-3 10))
          (else (x-5))))))
(define (f-327 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (declaration-specifiers-6 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-306 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-307 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((108) (f-7) (f-105 x-6 *attribute-value* x-3))
            ((82) (f-7) (f-107 x-6 *attribute-value* x-3))
            ((106) (f-7) (f-109 x-6 *attribute-value* x-3))
            ((99) (f-7) (f-111 x-6 *attribute-value* x-3))
            ((95) (f-7) (f-113 x-6 *attribute-value* x-3))
            ((98) (f-7) (f-115 x-6 *attribute-value* x-3))
            ((88) (f-7) (f-117 x-6 *attribute-value* x-3))
            ((105) (f-7) (f-269 x-6 *attribute-value* x-3))
            ((102) (f-7) (f-271 x-6 *attribute-value* x-3))
            ((157) (f-7) (f-273 x-6 *attribute-value* x-3))
            ((86) (f-7) (f-275 x-6 *attribute-value* x-3))
            ((90) (f-7) (f-277 x-6 *attribute-value* x-3))
            ((94) (f-7) (f-279 x-6 *attribute-value* x-3))
            ((81) (f-7) (f-281 x-6 *attribute-value* x-3))
            ((107) (f-7) (f-283 x-6 *attribute-value* x-3))
            ((96) (f-7) (f-312 x-6 *attribute-value* x-3))
            ((78) (f-7) (f-314 x-6 *attribute-value* x-3))
            ((101) (f-7) (f-316 x-6 *attribute-value* x-3))
            ((89) (f-7) (f-318 x-6 *attribute-value* x-3))
            ((104) (f-7) (f-320 x-6 *attribute-value* x-3))
            (else
             (let* ((x-52 (stream-car *input*)) (x-51 (car x-52)))
               (case x-51
                 ((110)
                  (f-325 x-1)
                  (let ((x-57 (lambda (x-55)
                                (f-307 x-2 x-1 x-3 x-55))))
                    (x-2 10)))
                 ((111)
                  (f-325 x-1)
                  (let ((x-62 (lambda (x-60)
                                (f-307 x-2 x-1 x-3 x-60))))
                    (x-2 10)))
                 ((112)
                  (f-325 x-1)
                  (let ((x-67 (lambda (x-65)
                                (f-307 x-2 x-1 x-3 x-65))))
                    (x-2 10)))
                 ((114)
                  (f-325 x-1)
                  (let ((x-72 (lambda (x-70)
                                (f-307 x-2 x-1 x-3 x-70))))
                    (x-2 10)))
                 ((132)
                  (f-325 x-1)
                  (let ((x-77 (lambda (x-75)
                                (f-307 x-2 x-1 x-3 x-75))))
                    (x-2 10)))
                 ((151)
                  (f-325 x-1)
                  (let ((x-82 (lambda (x-80)
                                (f-307 x-2 x-1 x-3 x-80))))
                    (x-2 10)))
                 ((156)
                  (f-325 x-1)
                  (let ((x-87 (lambda (x-85)
                                (f-307 x-2 x-1 x-3 x-85))))
                    (x-2 10)))
                 (else (x-3))))))))))
(define (f-325 x-1)
  (let* ((x-4 (lambda ($1)
                (declaration-specifiers-3 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-307 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-307 x-3 x-2 x-4 x-5))))
    (case x-1
      ((17) (f-87 x-7 *attribute-value* x-4))
      ((25) (f-91 x-7 *attribute-value* x-4))
      ((16) (f-93 x-7 *attribute-value* x-4))
      ((14) (f-95 x-7 *attribute-value* x-4))
      ((13) (f-97 x-7 *attribute-value* x-4))
      ((15) (f-304 x-7 *attribute-value* x-4))
      ((12) (f-306 x-7 *attribute-value* x-4))
      ((11) (f-308 x-7 *attribute-value* x-4))
      (else (f-323 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-323 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((156 151 132 114 112 111 110) (f-324 x-1 x-2) (x-3 10))
          (else (x-5))))))
(define (f-324 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (declaration-specifiers-4 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-308 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-309 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((108) (f-7) (f-105 x-6 *attribute-value* x-3))
            ((82) (f-7) (f-107 x-6 *attribute-value* x-3))
            ((106) (f-7) (f-109 x-6 *attribute-value* x-3))
            ((99) (f-7) (f-111 x-6 *attribute-value* x-3))
            ((95) (f-7) (f-113 x-6 *attribute-value* x-3))
            ((98) (f-7) (f-115 x-6 *attribute-value* x-3))
            ((88) (f-7) (f-117 x-6 *attribute-value* x-3))
            ((105) (f-7) (f-269 x-6 *attribute-value* x-3))
            ((102) (f-7) (f-271 x-6 *attribute-value* x-3))
            ((157) (f-7) (f-273 x-6 *attribute-value* x-3))
            ((86) (f-7) (f-275 x-6 *attribute-value* x-3))
            ((90) (f-7) (f-277 x-6 *attribute-value* x-3))
            ((94) (f-7) (f-279 x-6 *attribute-value* x-3))
            ((81) (f-7) (f-281 x-6 *attribute-value* x-3))
            ((107) (f-7) (f-283 x-6 *attribute-value* x-3))
            ((96) (f-7) (f-312 x-6 *attribute-value* x-3))
            ((78) (f-7) (f-314 x-6 *attribute-value* x-3))
            ((101) (f-7) (f-316 x-6 *attribute-value* x-3))
            ((89) (f-7) (f-318 x-6 *attribute-value* x-3))
            ((104) (f-7) (f-320 x-6 *attribute-value* x-3))
            (else
             (let* ((x-52 (stream-car *input*)) (x-51 (car x-52)))
               (case x-51
                 ((110)
                  (f-322 x-1)
                  (let ((x-57 (lambda (x-55)
                                (f-309 x-2 x-1 x-3 x-55))))
                    (x-2 10)))
                 ((111)
                  (f-322 x-1)
                  (let ((x-62 (lambda (x-60)
                                (f-309 x-2 x-1 x-3 x-60))))
                    (x-2 10)))
                 ((112)
                  (f-322 x-1)
                  (let ((x-67 (lambda (x-65)
                                (f-309 x-2 x-1 x-3 x-65))))
                    (x-2 10)))
                 ((114)
                  (f-322 x-1)
                  (let ((x-72 (lambda (x-70)
                                (f-309 x-2 x-1 x-3 x-70))))
                    (x-2 10)))
                 ((132)
                  (f-322 x-1)
                  (let ((x-77 (lambda (x-75)
                                (f-309 x-2 x-1 x-3 x-75))))
                    (x-2 10)))
                 ((151)
                  (f-322 x-1)
                  (let ((x-82 (lambda (x-80)
                                (f-309 x-2 x-1 x-3 x-80))))
                    (x-2 10)))
                 ((156)
                  (f-322 x-1)
                  (let ((x-87 (lambda (x-85)
                                (f-309 x-2 x-1 x-3 x-85))))
                    (x-2 10)))
                 (else (x-3))))))))))
(define (f-322 x-1)
  (let* ((x-4 (lambda ($1)
                (declaration-specifiers-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-320 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-321 x-1)
           (x-2 11))
          (else (x-3))))))
(define (f-321 x-1)
  (let* ((x-4 (lambda ($1)
                (storage-class-specifier-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-318 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-319 x-1)
           (x-2 11))
          (else (x-3))))))
(define (f-319 x-1)
  (let* ((x-4 (lambda ($1)
                (storage-class-specifier-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-316 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-317 x-1)
           (x-2 11))
          (else (x-3))))))
(define (f-317 x-1)
  (let* ((x-4 (lambda ($1)
                (storage-class-specifier-3 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-314 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-315 x-1)
           (x-2 11))
          (else (x-3))))))
(define (f-315 x-1)
  (let* ((x-4 (lambda ($1)
                (storage-class-specifier-4 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-312 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-313 x-1)
           (x-2 11))
          (else (x-3))))))
(define (f-313 x-1)
  (let* ((x-4 (lambda ($1)
                (storage-class-specifier-5 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-309 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-309 x-3 x-2 x-4 x-5))))
    (case x-1
      ((17) (f-87 x-7 *attribute-value* x-4))
      ((25) (f-91 x-7 *attribute-value* x-4))
      ((16) (f-93 x-7 *attribute-value* x-4))
      ((14) (f-95 x-7 *attribute-value* x-4))
      ((13) (f-97 x-7 *attribute-value* x-4))
      ((15) (f-304 x-7 *attribute-value* x-4))
      ((12) (f-306 x-7 *attribute-value* x-4))
      ((11) (f-308 x-7 *attribute-value* x-4))
      (else (f-310 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-310 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((156 151 132 114 112 111 110) (f-311 x-1 x-2) (x-3 10))
          (else (x-5))))))
(define (f-311 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (declaration-specifiers-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-294 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-295 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            ((113) (f-7) (f-299 x-3 x-4 x-8 x-1 x-2 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-299 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((151 141 116 114 112 111 110) (f-300 x-1 x-2 x-3) (x-4 29))
          (else (x-7))))))
(define (f-300 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (direct-declarator-3 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-295 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-295 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-257 x-9 *attribute-value* x-6))
      (else (f-296 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-296 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((113) (f-7) (f-297 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-297 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((151 141 116 114 112 111 110) (f-298 x-1 x-2 x-3 x-4) (x-5 29))
          (else (x-9))))))
(define (f-298 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (direct-declarator-4 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-99 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-100 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((108) (f-7) (f-105 x-6 *attribute-value* x-3))
            ((82) (f-7) (f-107 x-6 *attribute-value* x-3))
            ((106) (f-7) (f-109 x-6 *attribute-value* x-3))
            ((99) (f-7) (f-111 x-6 *attribute-value* x-3))
            ((95) (f-7) (f-113 x-6 *attribute-value* x-3))
            ((98) (f-7) (f-115 x-6 *attribute-value* x-3))
            ((88) (f-7) (f-117 x-6 *attribute-value* x-3))
            ((105) (f-7) (f-269 x-6 *attribute-value* x-3))
            ((102) (f-7) (f-271 x-6 *attribute-value* x-3))
            ((157) (f-7) (f-273 x-6 *attribute-value* x-3))
            ((86) (f-7) (f-275 x-6 *attribute-value* x-3))
            ((90) (f-7) (f-277 x-6 *attribute-value* x-3))
            ((94) (f-7) (f-279 x-6 *attribute-value* x-3))
            ((81) (f-7) (f-281 x-6 *attribute-value* x-3))
            ((107) (f-7) (f-283 x-6 *attribute-value* x-3))
            (else
             (let* ((x-42 (stream-car *input*)) (x-41 (car x-42)))
               (case x-41
                 ((110)
                  (f-288 x-1)
                  (let ((x-47 (lambda (x-45)
                                (f-100 x-2 x-1 x-3 x-45))))
                    (x-2 22)))
                 ((111)
                  (f-288 x-1)
                  (let ((x-52 (lambda (x-50)
                                (f-100 x-2 x-1 x-3 x-50))))
                    (x-2 22)))
                 ((112)
                  (f-288 x-1)
                  (let ((x-57 (lambda (x-55)
                                (f-100 x-2 x-1 x-3 x-55))))
                    (x-2 22)))
                 ((132)
                  (f-288 x-1)
                  (let ((x-62 (lambda (x-60)
                                (f-100 x-2 x-1 x-3 x-60))))
                    (x-2 22)))
                 ((141)
                  (f-288 x-1)
                  (let ((x-67 (lambda (x-65)
                                (f-100 x-2 x-1 x-3 x-65))))
                    (x-2 22)))
                 ((156)
                  (f-288 x-1)
                  (let ((x-72 (lambda (x-70)
                                (f-100 x-2 x-1 x-3 x-70))))
                    (x-2 22)))
                 (else (x-3))))))))))
(define (f-288 x-1)
  (let* ((x-4 (lambda ($1)
                (specifier-qualifier-list-3 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-100 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-100 x-3 x-2 x-4 x-5))))
    (case x-1
      ((17) (f-87 x-7 *attribute-value* x-4))
      ((25) (f-91 x-7 *attribute-value* x-4))
      ((16) (f-93 x-7 *attribute-value* x-4))
      ((14) (f-95 x-7 *attribute-value* x-4))
      ((13) (f-97 x-7 *attribute-value* x-4))
      ((15) (f-99 x-7 *attribute-value* x-4))
      ((12) (f-101 x-7 *attribute-value* x-4))
      (else (f-286 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-286 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((156 141 132 112 111 110) (f-287 x-1 x-2) (x-3 22))
          (else (x-5))))))
(define (f-287 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (specifier-qualifier-list-4 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-101 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-102 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((108) (f-7) (f-105 x-6 *attribute-value* x-3))
            ((82) (f-7) (f-107 x-6 *attribute-value* x-3))
            ((106) (f-7) (f-109 x-6 *attribute-value* x-3))
            ((99) (f-7) (f-111 x-6 *attribute-value* x-3))
            ((95) (f-7) (f-113 x-6 *attribute-value* x-3))
            ((98) (f-7) (f-115 x-6 *attribute-value* x-3))
            ((88) (f-7) (f-117 x-6 *attribute-value* x-3))
            ((105) (f-7) (f-269 x-6 *attribute-value* x-3))
            ((102) (f-7) (f-271 x-6 *attribute-value* x-3))
            ((157) (f-7) (f-273 x-6 *attribute-value* x-3))
            ((86) (f-7) (f-275 x-6 *attribute-value* x-3))
            ((90) (f-7) (f-277 x-6 *attribute-value* x-3))
            ((94) (f-7) (f-279 x-6 *attribute-value* x-3))
            ((81) (f-7) (f-281 x-6 *attribute-value* x-3))
            ((107) (f-7) (f-283 x-6 *attribute-value* x-3))
            (else
             (let* ((x-42 (stream-car *input*)) (x-41 (car x-42)))
               (case x-41
                 ((110)
                  (f-285 x-1)
                  (let ((x-47 (lambda (x-45)
                                (f-102 x-2 x-1 x-3 x-45))))
                    (x-2 22)))
                 ((111)
                  (f-285 x-1)
                  (let ((x-52 (lambda (x-50)
                                (f-102 x-2 x-1 x-3 x-50))))
                    (x-2 22)))
                 ((112)
                  (f-285 x-1)
                  (let ((x-57 (lambda (x-55)
                                (f-102 x-2 x-1 x-3 x-55))))
                    (x-2 22)))
                 ((132)
                  (f-285 x-1)
                  (let ((x-62 (lambda (x-60)
                                (f-102 x-2 x-1 x-3 x-60))))
                    (x-2 22)))
                 ((141)
                  (f-285 x-1)
                  (let ((x-67 (lambda (x-65)
                                (f-102 x-2 x-1 x-3 x-65))))
                    (x-2 22)))
                 ((156)
                  (f-285 x-1)
                  (let ((x-72 (lambda (x-70)
                                (f-102 x-2 x-1 x-3 x-70))))
                    (x-2 22)))
                 (else (x-3))))))))))
(define (f-285 x-1)
  (let* ((x-4 (lambda ($1)
                (specifier-qualifier-list-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-283 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-284 x-1)
           (x-2 13))
          (else (x-3))))))
(define (f-284 x-1)
  (let* ((x-4 (lambda ($1)
                (actual-type-specifier-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-281 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-282 x-1)
           (x-2 13))
          (else (x-3))))))
(define (f-282 x-1)
  (let* ((x-4 (lambda ($1)
                (actual-type-specifier-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-279 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-280 x-1)
           (x-2 13))
          (else (x-3))))))
(define (f-280 x-1)
  (let* ((x-4 (lambda ($1)
                (actual-type-specifier-3 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-277 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-278 x-1)
           (x-2 13))
          (else (x-3))))))
(define (f-278 x-1)
  (let* ((x-4 (lambda ($1)
                (actual-type-specifier-4 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-275 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-276 x-1)
           (x-2 13))
          (else (x-3))))))
(define (f-276 x-1)
  (let* ((x-4 (lambda ($1)
                (actual-type-specifier-5 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-273 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-274 x-1)
           (x-2 13))
          (else (x-3))))))
(define (f-274 x-1)
  (let* ((x-4 (lambda ($1)
                (actual-type-specifier-8 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-271 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((156 152) (f-272 x-1) (x-2 17))
          (else (x-3))))))
(define (f-272 x-1)
  (let* ((x-4 (lambda ($1)
                (struct-or-union-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-269 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((156 152) (f-270 x-1) (x-2 17))
          (else (x-3))))))
(define (f-270 x-1)
  (let* ((x-4 (lambda ($1)
                (struct-or-union-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-117 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((156) (f-7) (f-118 x-2 #f x-1 *attribute-value* x-3))
          ((152) (f-7) (f-263 x-2 #f x-1 *attribute-value* x-3))
          (else (x-3))))))
(define (f-263 x-3 x-4 x-1 x-2 x-5)
  (let* ((x-8 (lambda ()
                (f-3)
                (f-264 x-3 x-4 x-1 x-2 x-5)))
         (x-11 (lambda (x-9)
                 (f-265 x-3 x-4 x-1 x-2 x-5 x-9))))
    (if (stream-empty? *input*)
        (x-8)
        (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
          (case x-13
            ((156) (f-7) (f-134 x-11 *attribute-value* x-8))
            (else (x-8)))))))
(define (f-264 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-12 (stream-car *input*))
             (x-11 (car x-12)))
        (case x-11
          ((114)
           (let* ((x-14 (lambda ($1)
                          (enumerator-1 $1)))
                  (x-13 (x-14 #f)))
             (set! *error-status* 3)
             (let* ((x-18 (lambda (x-16)
                            (f-265 x-3 x-4 x-1 x-2 x-5 x-16)))
                    (x-21 (lambda ()
                            (f-3)
                            (f-264 x-3 x-4 x-1 x-2 x-5))))
               (f-132 x-18 x-13 x-21))))
          ((153)
           (let* ((x-24 (lambda ($1)
                          (enumerator-1 $1)))
                  (x-23 (x-24 #f)))
             (set! *error-status* 3)
             (let* ((x-28 (lambda (x-26)
                            (f-265 x-3 x-4 x-1 x-2 x-5 x-26)))
                    (x-31 (lambda ()
                            (f-3)
                            (f-264 x-3 x-4 x-1 x-2 x-5))))
               (f-132 x-28 x-23 x-31))))
          (else
           (begin (set! *input* (stream-cdr *input*))
                  (f-264 x-3 x-4 x-1 x-2 x-5)))))))
(define (f-265 x-4 x-5 x-2 x-3 x-6 x-1)
  (let* ((x-9 (lambda ()
                (f-3)
                (f-264 x-4 x-5 x-2 x-3 x-6)))
         (x-12 (lambda (x-10)
                 (f-265 x-4 x-5 x-2 x-3 x-6 x-10))))
    (case x-1
      ((27) (f-122 x-12 *attribute-value* x-9))
      (else (f-266 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9)))))
(define (f-266 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((153) (f-7) (f-267 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          ((114) (f-7) (f-127 x-6 #f x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-267 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*))
             (x-11 (car x-12))
             (x-15 (stream-car *input*))
             (x-14 (car x-15)))
        (case x-14
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-268 x-1 x-2 x-3 x-4)
           (x-5 25))
          (else (x-9))))))
(define (f-268 x-1 x-2 x-3 x-4)
  (let* ((x-7 (lambda ($1 $2 $3 $4)
                (enum-specifier-1 $1 $2 $3 $4)))
         (x-6 (x-7 x-1 x-2 x-3 x-4)))
    (set! *attribute-value* x-6)))
(define (f-118 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((152) (f-7) (f-119 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else
           (let* ((x-13 (stream-car *input*)) (x-12 (car x-13)))
             (case x-12
               ((157
                 156
                 151
                 141
                 132
                 106
                 111
                 110
                 108
                 107
                 105
                 112
                 102
                 98
                 101
                 99
                 96
                 95
                 104
                 90
                 89
                 94
                 114
                 88
                 86
                 82
                 81
                 78)
                (f-262 x-1 x-2)
                (x-3 25))
               (else (x-5)))))))))
(define (f-262 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (enum-specifier-3 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-119 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (let* ((x-10 (lambda ()
                 (f-3)
                 (f-120 x-4 x-5 x-6 x-1 x-2 x-3 x-7)))
         (x-13 (lambda (x-11)
                 (f-121 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-11))))
    (if (stream-empty? *input*)
        (x-10)
        (let* ((x-16 (stream-car *input*)) (x-15 (car x-16)))
          (case x-15
            ((156) (f-7) (f-134 x-13 *attribute-value* x-10))
            (else (x-10)))))))
(define (f-120 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-14 (stream-car *input*))
             (x-13 (car x-14)))
        (case x-13
          ((114)
           (let* ((x-16 (lambda ($1)
                          (enumerator-1 $1)))
                  (x-15 (x-16 #f)))
             (set! *error-status* 3)
             (let* ((x-20 (lambda (x-18)
                            (f-121 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-18)))
                    (x-23 (lambda ()
                            (f-3)
                            (f-120 x-4 x-5 x-6 x-1 x-2 x-3 x-7))))
               (f-132 x-20 x-15 x-23))))
          ((153)
           (let* ((x-26 (lambda ($1)
                          (enumerator-1 $1)))
                  (x-25 (x-26 #f)))
             (set! *error-status* 3)
             (let* ((x-30 (lambda (x-28)
                            (f-121 x-4 x-5 x-6 x-1 x-2 x-3 x-7 x-28)))
                    (x-33 (lambda ()
                            (f-3)
                            (f-120 x-4 x-5 x-6 x-1 x-2 x-3 x-7))))
               (f-132 x-30 x-25 x-33))))
          (else
           (begin (set! *input* (stream-cdr *input*))
                  (f-120 x-4 x-5 x-6 x-1 x-2 x-3 x-7)))))))
(define (f-121 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-1)
  (let* ((x-11 (lambda ()
                 (f-3)
                 (f-120 x-5 x-6 x-7 x-2 x-3 x-4 x-8)))
         (x-14 (lambda (x-12)
                 (f-121 x-5 x-6 x-7 x-2 x-3 x-4 x-8 x-12))))
    (case x-1
      ((27) (f-122 x-14 *attribute-value* x-11))
      (else (f-124 x-5 x-6 x-7 x-14 x-2 x-3 x-4 *attribute-value* x-11)))))
(define (f-124 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (if (stream-empty? *input*)
      (x-9)
      (let* ((x-12 (stream-car *input*)) (x-11 (car x-12)))
        (case x-11
          ((153)
           (f-7)
           (f-125 x-5 x-6 x-7 x-8 #f x-1 x-2 x-3 x-4 *attribute-value* x-9))
          ((114) (f-7) (f-127 x-8 #f x-4 *attribute-value* x-9))
          (else (x-9))))))
(define (f-127 x-3 x-4 x-1 x-2 x-5)
  (let* ((x-8 (lambda ()
                (f-3)
                (f-128 x-3 x-4 x-1 x-2 x-5)))
         (x-11 (lambda (x-9)
                 (f-129 x-3 x-4 x-1 x-2 x-5 x-9))))
    (if (stream-empty? *input*)
        (x-8)
        (let* ((x-14 (stream-car *input*)) (x-13 (car x-14)))
          (case x-13
            ((156) (f-7) (f-134 x-11 *attribute-value* x-8))
            (else (x-8)))))))
(define (f-134 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((116) (f-7) (f-135 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
             (case x-10
               ((153 114) (f-261 x-1) (x-2 27))
               (else (x-3)))))))))
(define (f-261 x-1)
  (let* ((x-4 (lambda ($1)
                (enumerator-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-135 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-136 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-136 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-136 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-257 x-9 *attribute-value* x-6))
      (else (f-259 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-259 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((153 114) (f-260 x-1 x-2 x-3) (x-4 27))
          (else (x-7))))))
(define (f-260 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (enumerator-3 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-257 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((153 151 141 114 113) (f-258 x-1) (x-2 57))
          (else (x-3))))))
(define (f-258 x-1)
  (let* ((x-4 (lambda ($1)
                (constant-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-207 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((143) (f-7) (f-208 x-2 #f x-1 *attribute-value* x-3))
          ((140) (f-7) (f-212 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-13 (stream-car *input*)) (x-12 (car x-13)))
             (case x-12
               ((153
                 126
                 125
                 123
                 122
                 121
                 120
                 119
                 118
                 117
                 151
                 141
                 124
                 116
                 114
                 113
                 111)
                (f-256 x-1)
                (x-2 56))
               (else (x-3)))))))))
(define (f-256 x-1)
  (let* ((x-4 (lambda ($1)
                (conditional-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-212 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-213 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-213 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-213 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-214 x-9 *attribute-value* x-6))
      ((53) (f-245 x-9 *attribute-value* x-6))
      (else (f-247 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-247 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((141) (f-7) (f-248 x-4 x-5 x-6 #f x-1 x-2 x-3 *attribute-value* x-7))
          ((114) (f-7) (f-252 x-6 #f x-3 *attribute-value* x-7))
          (else (x-7))))))
(define (f-252 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-253 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-253 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-253 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      ((59) (f-201 x-9 *attribute-value* x-6))
      ((58) (f-207 x-9 *attribute-value* x-6))
      ((56) (f-214 x-9 *attribute-value* x-6))
      (else (f-254 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-254 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((151 141 114 113 111) (f-255 x-1 x-2 x-3) (x-4 52))
          (else (x-7))))))
(define (f-255 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (expression-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-248 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9)
  (let ((x-12 (lambda (x-10)
                (f-249 x-5 x-6 x-7 x-8 x-1 x-2 x-3 x-4 x-9 x-10))))
    (if (stream-empty? *input*)
        (x-9)
        (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
          (case x-14
            ((144) (f-7) (f-39 x-12 *attribute-value* x-9))
            ((137) (f-7) (f-41 x-12 *attribute-value* x-9))
            ((130) (f-7) (f-43 x-12 *attribute-value* x-9))
            ((129) (f-7) (f-45 x-12 *attribute-value* x-9))
            ((132) (f-7) (f-47 x-12 *attribute-value* x-9))
            ((136) (f-7) (f-49 x-12 *attribute-value* x-9))
            ((159) (f-7) (f-51 x-12 *attribute-value* x-9))
            ((76) (f-7) (f-53 x-12 *attribute-value* x-9))
            ((158) (f-7) (f-55 x-12 *attribute-value* x-9))
            ((77) (f-7) (f-57 x-12 *attribute-value* x-9))
            ((156) (f-7) (f-59 x-12 *attribute-value* x-9))
            ((100) (f-7) (f-61 x-12 *attribute-value* x-9))
            ((128) (f-7) (f-65 x-12 *attribute-value* x-9))
            ((127) (f-7) (f-80 x-12 *attribute-value* x-9))
            ((110) (f-7) (f-84 x-12 *attribute-value* x-9))
            (else (x-9)))))))
(define (f-249 x-6 x-7 x-8 x-9 x-2 x-3 x-4 x-5 x-10 x-1)
  (let ((x-13 (lambda (x-11)
                (f-249 x-6 x-7 x-8 x-9 x-2 x-3 x-4 x-5 x-10 x-11))))
    (case x-1
      ((74) (f-11 x-13 *attribute-value* x-10))
      ((72) (f-13 x-13 *attribute-value* x-10))
      ((70) (f-15 x-13 *attribute-value* x-10))
      ((71) (f-17 x-13 *attribute-value* x-10))
      ((69) (f-30 x-13 *attribute-value* x-10))
      ((68) (f-32 x-13 *attribute-value* x-10))
      ((67) (f-34 x-13 *attribute-value* x-10))
      ((66) (f-72 x-13 *attribute-value* x-10))
      ((65) (f-137 x-13 *attribute-value* x-10))
      ((64) (f-155 x-13 *attribute-value* x-10))
      ((63) (f-173 x-13 *attribute-value* x-10))
      ((62) (f-183 x-13 *attribute-value* x-10))
      ((61) (f-189 x-13 *attribute-value* x-10))
      ((60) (f-195 x-13 *attribute-value* x-10))
      ((59) (f-201 x-13 *attribute-value* x-10))
      ((58) (f-207 x-13 *attribute-value* x-10))
      (else
       (f-250 x-6 x-7 x-8 x-9 x-13 x-2 x-3 x-4 x-5 *attribute-value* x-10)))))
(define (f-250 x-6 x-7 x-8 x-9 x-10 x-1 x-2 x-3 x-4 x-5 x-11)
  (if (stream-empty? *input*)
      (x-11)
      (let* ((x-14 (stream-car *input*))
             (x-13 (car x-14))
             (x-17 (stream-car *input*))
             (x-16 (car x-17)))
        (case x-16
          ((153 151 141 126 125 124 123 122 121 120 119 118 117 116 114 113 111)
           (f-251 x-1 x-2 x-3 x-4 x-5)
           (x-6 56))
          (else (x-11))))))
(define (f-251 x-1 x-2 x-3 x-4 x-5)
  (let* ((x-8 (lambda ($1 $2 $3 $4 $5)
                (conditional-expression-2 $1 $2 $3 $4 $5)))
         (x-7 (x-8 x-1 x-2 x-3 x-4 x-5)))
    (set! *attribute-value* x-7)))
(define (f-245 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((151 141 114 113 111) (f-246 x-1) (x-2 52))
          (else (x-3))))))
(define (f-246 x-1)
  (let* ((x-4 (lambda ($1)
                (expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-214 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-215 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((126) (f-7) (f-222 x-6 *attribute-value* x-3))
            ((125) (f-7) (f-224 x-6 *attribute-value* x-3))
            ((124) (f-7) (f-226 x-6 *attribute-value* x-3))
            ((123) (f-7) (f-228 x-6 *attribute-value* x-3))
            ((122) (f-7) (f-230 x-6 *attribute-value* x-3))
            ((121) (f-7) (f-232 x-6 *attribute-value* x-3))
            ((120) (f-7) (f-234 x-6 *attribute-value* x-3))
            ((119) (f-7) (f-236 x-6 *attribute-value* x-3))
            ((118) (f-7) (f-238 x-6 *attribute-value* x-3))
            ((117) (f-7) (f-240 x-6 *attribute-value* x-3))
            ((116) (f-7) (f-242 x-6 *attribute-value* x-3))
            (else
             (let* ((x-34 (stream-car *input*)) (x-33 (car x-34)))
               (case x-33
                 ((153)
                  (f-244 x-1)
                  (let ((x-39 (lambda (x-37)
                                (f-215 x-2 x-1 x-3 x-37))))
                    (x-39 1)))
                 ((113)
                  (f-244 x-1)
                  (let ((x-44 (lambda (x-42)
                                (f-215 x-2 x-1 x-3 x-42))))
                    (x-44 1)))
                 ((141)
                  (f-244 x-1)
                  (let ((x-49 (lambda (x-47)
                                (f-215 x-2 x-1 x-3 x-47))))
                    (x-49 1)))
                 ((151)
                  (f-244 x-1)
                  (let ((x-54 (lambda (x-52)
                                (f-215 x-2 x-1 x-3 x-52))))
                    (x-54 1)))
                 ((114)
                  (f-244 x-1)
                  (let ((x-59 (lambda (x-57)
                                (f-215 x-2 x-1 x-3 x-57))))
                    (x-59 1)))
                 ((111)
                  (f-244 x-1)
                  (let ((x-64 (lambda (x-62)
                                (f-215 x-2 x-1 x-3 x-62))))
                    (x-64 1)))
                 (else (x-3))))))))))
(define (f-244 x-1)
  (let* ((x-4 (lambda ()
                (fact-assignment-expr-2)))
         (x-3 (x-4)))
    (set! *attribute-value* x-3)))
(define (f-242 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-243 x-1)
           (x-2 55))
          (else (x-3))))))
(define (f-243 x-1)
  (let* ((x-4 (lambda ($1)
                (assignment-operator-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-240 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-241 x-1)
           (x-2 55))
          (else (x-3))))))
(define (f-241 x-1)
  (let* ((x-4 (lambda ($1)
                (assignment-operator-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-238 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-239 x-1)
           (x-2 55))
          (else (x-3))))))
(define (f-239 x-1)
  (let* ((x-4 (lambda ($1)
                (assignment-operator-3 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-236 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-237 x-1)
           (x-2 55))
          (else (x-3))))))
(define (f-237 x-1)
  (let* ((x-4 (lambda ($1)
                (assignment-operator-4 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-234 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-235 x-1)
           (x-2 55))
          (else (x-3))))))
(define (f-235 x-1)
  (let* ((x-4 (lambda ($1)
                (assignment-operator-5 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-232 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-233 x-1)
           (x-2 55))
          (else (x-3))))))
(define (f-233 x-1)
  (let* ((x-4 (lambda ($1)
                (assignment-operator-6 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-230 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-231 x-1)
           (x-2 55))
          (else (x-3))))))
(define (f-231 x-1)
  (let* ((x-4 (lambda ($1)
                (assignment-operator-7 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-228 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-229 x-1)
           (x-2 55))
          (else (x-3))))))
(define (f-229 x-1)
  (let* ((x-4 (lambda ($1)
                (assignment-operator-8 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-226 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-227 x-1)
           (x-2 55))
          (else (x-3))))))
(define (f-227 x-1)
  (let* ((x-4 (lambda ($1)
                (assignment-operator-9 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-224 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-225 x-1)
           (x-2 55))
          (else (x-3))))))
(define (f-225 x-1)
  (let* ((x-4 (lambda ($1)
                (assignment-operator-10 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-222 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-223 x-1)
           (x-2 55))
          (else (x-3))))))
(define (f-223 x-1)
  (let* ((x-4 (lambda ($1)
                (assignment-operator-11 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-215 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-215 x-3 x-2 x-4 x-5))))
    (case x-1
      ((55) (f-216 x-7 *attribute-value* x-4))
      (else (f-220 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-220 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((153 151 141 114 113 111) (f-221 x-1 x-2) (x-3 53))
          (else (x-5))))))
(define (f-221 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (assignment-expression-1 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-216 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-217 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((144) (f-7) (f-39 x-6 *attribute-value* x-3))
            ((137) (f-7) (f-41 x-6 *attribute-value* x-3))
            ((130) (f-7) (f-43 x-6 *attribute-value* x-3))
            ((129) (f-7) (f-45 x-6 *attribute-value* x-3))
            ((132) (f-7) (f-47 x-6 *attribute-value* x-3))
            ((136) (f-7) (f-49 x-6 *attribute-value* x-3))
            ((159) (f-7) (f-51 x-6 *attribute-value* x-3))
            ((76) (f-7) (f-53 x-6 *attribute-value* x-3))
            ((158) (f-7) (f-55 x-6 *attribute-value* x-3))
            ((77) (f-7) (f-57 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-59 x-6 *attribute-value* x-3))
            ((100) (f-7) (f-61 x-6 *attribute-value* x-3))
            ((128) (f-7) (f-65 x-6 *attribute-value* x-3))
            ((127) (f-7) (f-80 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-84 x-6 *attribute-value* x-3))
            (else (x-3)))))))
(define (f-217 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-217 x-3 x-2 x-4 x-5))))
    (case x-1
      ((74) (f-11 x-7 *attribute-value* x-4))
      ((72) (f-13 x-7 *attribute-value* x-4))
      ((70) (f-15 x-7 *attribute-value* x-4))
      ((71) (f-17 x-7 *attribute-value* x-4))
      ((69) (f-30 x-7 *attribute-value* x-4))
      ((68) (f-32 x-7 *attribute-value* x-4))
      ((67) (f-34 x-7 *attribute-value* x-4))
      ((66) (f-72 x-7 *attribute-value* x-4))
      ((65) (f-137 x-7 *attribute-value* x-4))
      ((64) (f-155 x-7 *attribute-value* x-4))
      ((63) (f-173 x-7 *attribute-value* x-4))
      ((62) (f-183 x-7 *attribute-value* x-4))
      ((61) (f-189 x-7 *attribute-value* x-4))
      ((60) (f-195 x-7 *attribute-value* x-4))
      ((59) (f-201 x-7 *attribute-value* x-4))
      ((58) (f-207 x-7 *attribute-value* x-4))
      ((56) (f-214 x-7 *attribute-value* x-4))
      (else (f-218 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-218 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((153 151 141 114 113 111) (f-219 x-1 x-2) (x-3 1))
          (else (x-5))))))
(define (f-219 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (fact-assignment-expr-1 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-208 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-209 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-209 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-209 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      ((60) (f-195 x-9 *attribute-value* x-6))
      (else (f-210 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-210 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((142) (f-7) (f-202 x-6 #f x-3 *attribute-value* x-7))
          (else
           (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
             (case x-14
               ((151
                 143
                 141
                 140
                 124
                 122
                 121
                 125
                 120
                 119
                 118
                 117
                 116
                 114
                 153
                 113
                 111
                 126
                 123)
                (f-211 x-1 x-2 x-3)
                (x-4 58))
               (else (x-7)))))))))
(define (f-211 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (logical-or-expression-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-201 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((142) (f-7) (f-202 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
             (case x-10
               ((151
                 143
                 141
                 140
                 126
                 125
                 124
                 123
                 122
                 153
                 121
                 120
                 119
                 118
                 117
                 116
                 114
                 113
                 111)
                (f-206 x-1)
                (x-2 58))
               (else (x-3)))))))))
(define (f-206 x-1)
  (let* ((x-4 (lambda ($1)
                (logical-or-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-202 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-203 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-203 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-203 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      ((61) (f-189 x-9 *attribute-value* x-6))
      (else (f-204 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-204 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((135) (f-7) (f-196 x-6 #f x-3 *attribute-value* x-7))
          (else
           (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
             (case x-14
               ((143
                 142
                 141
                 124
                 140
                 120
                 119
                 118
                 125
                 116
                 114
                 123
                 113
                 117
                 121
                 151
                 111
                 153
                 126
                 122)
                (f-205 x-1 x-2 x-3)
                (x-4 59))
               (else (x-7)))))))))
(define (f-205 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (logical-and-expression-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-195 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((135) (f-7) (f-196 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
             (case x-10
               ((151
                 141
                 140
                 126
                 124
                 123
                 122
                 143
                 142
                 121
                 120
                 119
                 118
                 153
                 125
                 116
                 117
                 114
                 113
                 111)
                (f-200 x-1)
                (x-2 59))
               (else (x-3)))))))))
(define (f-200 x-1)
  (let* ((x-4 (lambda ($1)
                (logical-and-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-196 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-197 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-197 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-197 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      ((62) (f-183 x-9 *attribute-value* x-6))
      (else (f-198 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-198 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((134) (f-7) (f-190 x-6 #f x-3 *attribute-value* x-7))
          (else
           (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
             (case x-14
               ((151
                 140
                 141
                 124
                 122
                 121
                 135
                 120
                 119
                 118
                 116
                 114
                 113
                 153
                 143
                 142
                 126
                 125
                 123
                 117
                 111)
                (f-199 x-1 x-2 x-3)
                (x-4 60))
               (else (x-7)))))))))
(define (f-199 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (inclusive-or-expression-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-189 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((134) (f-7) (f-190 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
             (case x-10
               ((143
                 142
                 141
                 140
                 125
                 124
                 123
                 126
                 153
                 151
                 122
                 121
                 120
                 119
                 135
                 118
                 117
                 116
                 114
                 113
                 111)
                (f-194 x-1)
                (x-2 60))
               (else (x-3)))))))))
(define (f-194 x-1)
  (let* ((x-4 (lambda ($1)
                (inclusive-or-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-190 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-191 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-191 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-191 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      ((63) (f-173 x-9 *attribute-value* x-6))
      (else (f-192 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-192 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((136) (f-7) (f-184 x-6 #f x-3 *attribute-value* x-7))
          (else
           (let* ((x-15 (stream-car *input*)) (x-14 (car x-15)))
             (case x-14
               ((143
                 142
                 140
                 135
                 126
                 125
                 134
                 124
                 123
                 120
                 118
                 116
                 114
                 117
                 122
                 151
                 113
                 153
                 141
                 121
                 119
                 111)
                (f-193 x-1 x-2 x-3)
                (x-4 61))
               (else (x-7)))))))))
(define (f-193 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (exclusive-or-expression-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-183 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((136) (f-7) (f-184 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
             (case x-10
               ((151
                 143
                 142
                 135
                 126
                 125
                 124
                 141
                 140
                 134
                 123
                 122
                 121
                 120
                 117
                 153
                 119
                 118
                 116
                 114
                 113
                 111)
                (f-188 x-1)
                (x-2 61))
               (else (x-3)))))))))
(define (f-188 x-1)
  (let* ((x-4 (lambda ($1)
                (exclusive-or-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-184 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-185 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-185 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-185 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      ((64) (f-155 x-9 *attribute-value* x-6))
      (else (f-186 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-186 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((145) (f-7) (f-178 x-6 #f x-3 *attribute-value* x-7))
          ((146) (f-7) (f-174 x-6 #f x-3 *attribute-value* x-7))
          (else
           (let* ((x-17 (stream-car *input*)) (x-16 (car x-17)))
             (case x-16
               ((135
                 124
                 120
                 118
                 134
                 116
                 114
                 113
                 119
                 111
                 153
                 151
                 143
                 142
                 141
                 140
                 136
                 126
                 125
                 123
                 122
                 121
                 117)
                (f-187 x-1 x-2 x-3)
                (x-4 62))
               (else (x-7)))))))))
(define (f-187 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (and-expression-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-173 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((146) (f-7) (f-174 x-2 #f x-1 *attribute-value* x-3))
          ((145) (f-7) (f-178 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-13 (stream-car *input*)) (x-12 (car x-13)))
             (case x-12
               ((140
                 136
                 135
                 124
                 151
                 121
                 120
                 141
                 142
                 119
                 118
                 153
                 143
                 134
                 123
                 117
                 122
                 114
                 116
                 126
                 125
                 113
                 111)
                (f-182 x-1)
                (x-2 62))
               (else (x-3)))))))))
(define (f-182 x-1)
  (let* ((x-4 (lambda ($1)
                (and-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-178 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-179 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-179 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-179 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      (else (f-180 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-180 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((149) (f-7) (f-160 x-6 #f x-3 *attribute-value* x-7))
          ((150) (f-7) (f-156 x-6 #f x-3 *attribute-value* x-7))
          ((148) (f-7) (f-164 x-6 #f x-3 *attribute-value* x-7))
          ((147) (f-7) (f-168 x-6 #f x-3 *attribute-value* x-7))
          (else
           (let* ((x-21 (stream-car *input*)) (x-20 (car x-21)))
             (case x-20
               ((135
                 134
                 119
                 118
                 113
                 111
                 153
                 151
                 146
                 143
                 123
                 122
                 141
                 117
                 121
                 116
                 125
                 124
                 145
                 142
                 140
                 114
                 136
                 120
                 126)
                (f-181 x-1 x-2 x-3)
                (x-4 63))
               (else (x-7)))))))))
(define (f-181 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (equality-expression-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-174 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-175 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-175 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-175 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      ((65) (f-137 x-9 *attribute-value* x-6))
      (else (f-176 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-176 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((149) (f-7) (f-160 x-6 #f x-3 *attribute-value* x-7))
          ((150) (f-7) (f-156 x-6 #f x-3 *attribute-value* x-7))
          ((148) (f-7) (f-164 x-6 #f x-3 *attribute-value* x-7))
          ((147) (f-7) (f-168 x-6 #f x-3 *attribute-value* x-7))
          (else
           (let* ((x-21 (stream-car *input*)) (x-20 (car x-21)))
             (case x-20
               ((135
                 134
                 119
                 118
                 113
                 111
                 153
                 151
                 146
                 143
                 123
                 122
                 141
                 117
                 121
                 116
                 125
                 124
                 145
                 142
                 140
                 114
                 136
                 120
                 126)
                (f-177 x-1 x-2 x-3)
                (x-4 63))
               (else (x-7)))))))))
(define (f-177 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (equality-expression-3 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-155 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((150) (f-7) (f-156 x-2 #f x-1 *attribute-value* x-3))
          ((149) (f-7) (f-160 x-2 #f x-1 *attribute-value* x-3))
          ((148) (f-7) (f-164 x-2 #f x-1 *attribute-value* x-3))
          ((147) (f-7) (f-168 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-17 (stream-car *input*)) (x-16 (car x-17)))
             (case x-16
               ((146
                 145
                 140
                 136
                 153
                 122
                 126
                 121
                 120
                 143
                 142
                 135
                 125
                 124
                 118
                 117
                 151
                 141
                 134
                 123
                 116
                 119
                 114
                 113
                 111)
                (f-172 x-1)
                (x-2 63))
               (else (x-3)))))))))
(define (f-172 x-1)
  (let* ((x-4 (lambda ($1)
                (equality-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-168 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-169 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-169 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-169 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      (else (f-170 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-170 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((138) (f-7) (f-150 x-6 #f x-3 *attribute-value* x-7))
          ((139) (f-7) (f-138 x-6 #f x-3 *attribute-value* x-7))
          (else
           (let* ((x-17 (stream-car *input*)) (x-16 (car x-17)))
             (case x-16
               ((135
                 123
                 122
                 143
                 116
                 142
                 113
                 153
                 151
                 150
                 148
                 147
                 146
                 145
                 141
                 140
                 149
                 136
                 126
                 125
                 134
                 124
                 121
                 120
                 119
                 118
                 117
                 114
                 111)
                (f-171 x-1 x-2 x-3)
                (x-4 64))
               (else (x-7)))))))))
(define (f-171 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (relational-expression-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-164 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-165 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-165 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-165 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      (else (f-166 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-166 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((138) (f-7) (f-150 x-6 #f x-3 *attribute-value* x-7))
          ((139) (f-7) (f-138 x-6 #f x-3 *attribute-value* x-7))
          (else
           (let* ((x-17 (stream-car *input*)) (x-16 (car x-17)))
             (case x-16
               ((135
                 123
                 122
                 143
                 116
                 142
                 113
                 153
                 151
                 150
                 148
                 147
                 146
                 145
                 141
                 140
                 149
                 136
                 126
                 125
                 134
                 124
                 121
                 120
                 119
                 118
                 117
                 114
                 111)
                (f-167 x-1 x-2 x-3)
                (x-4 64))
               (else (x-7)))))))))
(define (f-167 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (relational-expression-3 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-160 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-161 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-161 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-161 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      (else (f-162 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-162 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((138) (f-7) (f-150 x-6 #f x-3 *attribute-value* x-7))
          ((139) (f-7) (f-138 x-6 #f x-3 *attribute-value* x-7))
          (else
           (let* ((x-17 (stream-car *input*)) (x-16 (car x-17)))
             (case x-16
               ((135
                 123
                 122
                 143
                 116
                 142
                 113
                 153
                 151
                 150
                 148
                 147
                 146
                 145
                 141
                 140
                 149
                 136
                 126
                 125
                 134
                 124
                 121
                 120
                 119
                 118
                 117
                 114
                 111)
                (f-163 x-1 x-2 x-3)
                (x-4 64))
               (else (x-7)))))))))
(define (f-163 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (relational-expression-4 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-156 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-157 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-157 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-157 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      ((66) (f-72 x-9 *attribute-value* x-6))
      (else (f-158 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-158 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((138) (f-7) (f-150 x-6 #f x-3 *attribute-value* x-7))
          ((139) (f-7) (f-138 x-6 #f x-3 *attribute-value* x-7))
          (else
           (let* ((x-17 (stream-car *input*)) (x-16 (car x-17)))
             (case x-16
               ((135
                 123
                 122
                 143
                 116
                 142
                 113
                 153
                 151
                 150
                 148
                 147
                 146
                 145
                 141
                 140
                 149
                 136
                 126
                 125
                 134
                 124
                 121
                 120
                 119
                 118
                 117
                 114
                 111)
                (f-159 x-1 x-2 x-3)
                (x-4 64))
               (else (x-7)))))))))
(define (f-159 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (relational-expression-5 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-137 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*)) (x-5 (car x-6)))
        (case x-5
          ((139) (f-7) (f-138 x-2 #f x-1 *attribute-value* x-3))
          ((138) (f-7) (f-150 x-2 #f x-1 *attribute-value* x-3))
          (else
           (let* ((x-13 (stream-car *input*)) (x-12 (car x-13)))
             (case x-12
               ((149
                 147
                 146
                 143
                 142
                 134
                 126
                 124
                 141
                 123
                 153
                 150
                 148
                 145
                 140
                 136
                 135
                 125
                 122
                 121
                 120
                 119
                 118
                 117
                 116
                 151
                 114
                 113
                 111)
                (f-154 x-1)
                (x-2 64))
               (else (x-3)))))))))
(define (f-154 x-1)
  (let* ((x-4 (lambda ($1)
                (relational-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-150 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-151 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-151 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-151 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      (else (f-152 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-152 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((130) (f-7) (f-73 x-6 #f x-3 *attribute-value* x-7))
          ((129) (f-7) (f-141 x-6 #f x-3 *attribute-value* x-7))
          (else
           (let* ((x-17 (stream-car *input*)) (x-16 (car x-17)))
             (case x-16
               ((141
                 140
                 139
                 138
                 136
                 135
                 134
                 150
                 123
                 126
                 122
                 148
                 121
                 125
                 120
                 146
                 119
                 117
                 143
                 116
                 153
                 151
                 149
                 147
                 145
                 142
                 124
                 118
                 114
                 113
                 111)
                (f-153 x-1 x-2 x-3)
                (x-4 65))
               (else (x-7)))))))))
(define (f-153 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (shift-expression-3 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-138 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-139 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-139 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-139 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      ((67) (f-34 x-9 *attribute-value* x-6))
      (else (f-140 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-140 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((130) (f-7) (f-73 x-6 #f x-3 *attribute-value* x-7))
          ((129) (f-7) (f-141 x-6 #f x-3 *attribute-value* x-7))
          (else
           (let* ((x-17 (stream-car *input*)) (x-16 (car x-17)))
             (case x-16
               ((141
                 140
                 139
                 138
                 136
                 135
                 134
                 150
                 123
                 126
                 122
                 148
                 121
                 125
                 120
                 146
                 119
                 117
                 143
                 116
                 153
                 151
                 149
                 147
                 145
                 142
                 124
                 118
                 114
                 113
                 111)
                (f-149 x-1 x-2 x-3)
                (x-4 65))
               (else (x-7)))))))))
(define (f-149 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (shift-expression-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-141 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-142 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-142 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-142 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      ((68) (f-32 x-9 *attribute-value* x-6))
      (else (f-143 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-143 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*)) (x-9 (car x-10)))
        (case x-9
          ((133) (f-7) (f-35 x-6 #f x-3 *attribute-value* x-7))
          ((132) (f-7) (f-76 x-6 #f x-3 *attribute-value* x-7))
          ((131) (f-7) (f-144 x-6 #f x-3 *attribute-value* x-7))
          (else
           (let* ((x-19 (stream-car *input*)) (x-18 (car x-19)))
             (case x-18
               ((148
                 146
                 145
                 143
                 142
                 126
                 125
                 124
                 119
                 141
                 118
                 123
                 116
                 153
                 151
                 150
                 149
                 139
                 138
                 136
                 135
                 134
                 130
                 122
                 140
                 121
                 120
                 117
                 114
                 113
                 111
                 147
                 129)
                (f-148 x-1 x-2 x-3)
                (x-4 66))
               (else (x-7)))))))))
(define (f-148 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (additive-expression-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-144 x-3 x-4 x-1 x-2 x-5)
  (let ((x-8 (lambda (x-6)
               (f-145 x-3 x-4 x-1 x-2 x-5 x-6))))
    (if (stream-empty? *input*)
        (x-5)
        (let* ((x-11 (stream-car *input*)) (x-10 (car x-11)))
          (case x-10
            ((144) (f-7) (f-39 x-8 *attribute-value* x-5))
            ((137) (f-7) (f-41 x-8 *attribute-value* x-5))
            ((130) (f-7) (f-43 x-8 *attribute-value* x-5))
            ((129) (f-7) (f-45 x-8 *attribute-value* x-5))
            ((132) (f-7) (f-47 x-8 *attribute-value* x-5))
            ((136) (f-7) (f-49 x-8 *attribute-value* x-5))
            ((159) (f-7) (f-51 x-8 *attribute-value* x-5))
            ((76) (f-7) (f-53 x-8 *attribute-value* x-5))
            ((158) (f-7) (f-55 x-8 *attribute-value* x-5))
            ((77) (f-7) (f-57 x-8 *attribute-value* x-5))
            ((156) (f-7) (f-59 x-8 *attribute-value* x-5))
            ((100) (f-7) (f-61 x-8 *attribute-value* x-5))
            ((128) (f-7) (f-65 x-8 *attribute-value* x-5))
            ((127) (f-7) (f-80 x-8 *attribute-value* x-5))
            ((110) (f-7) (f-84 x-8 *attribute-value* x-5))
            (else (x-5)))))))
(define (f-145 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-145 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      (else (f-146 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-146 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            111)
           (f-147 x-1 x-2 x-3)
           (x-4 67))
          (else (x-7))))))
(define (f-147 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (multiplicative-expression-3 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-128 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (error "parse error: premature end of input")
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-12 (stream-car *input*))
             (x-11 (car x-12)))
        (case x-11
          ((114)
           (let* ((x-14 (lambda ($1)
                          (enumerator-1 $1)))
                  (x-13 (x-14 #f)))
             (set! *error-status* 3)
             (let* ((x-18 (lambda (x-16)
                            (f-129 x-3 x-4 x-1 x-2 x-5 x-16)))
                    (x-21 (lambda ()
                            (f-3)
                            (f-128 x-3 x-4 x-1 x-2 x-5))))
               (f-132 x-18 x-13 x-21))))
          ((153)
           (let* ((x-24 (lambda ($1)
                          (enumerator-1 $1)))
                  (x-23 (x-24 #f)))
             (set! *error-status* 3)
             (let* ((x-28 (lambda (x-26)
                            (f-129 x-3 x-4 x-1 x-2 x-5 x-26)))
                    (x-31 (lambda ()
                            (f-3)
                            (f-128 x-3 x-4 x-1 x-2 x-5))))
               (f-132 x-28 x-23 x-31))))
          (else
           (begin (set! *input* (stream-cdr *input*))
                  (f-128 x-3 x-4 x-1 x-2 x-5)))))))
(define (f-132 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((153 114) (f-133 x-1) (x-2 27))
          (else (x-3))))))
(define (f-133 x-1)
  (let* ((x-4 (lambda ($1)
                (enumerator-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-129 x-4 x-5 x-2 x-3 x-6 x-1)
  (let* ((x-9 (lambda ()
                (f-3)
                (f-128 x-4 x-5 x-2 x-3 x-6)))
         (x-12 (lambda (x-10)
                 (f-129 x-4 x-5 x-2 x-3 x-6 x-10))))
    (f-130 x-4 x-5 x-12 x-2 x-3 *attribute-value* x-9)))
(define (f-130 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((153 114) (f-131 x-1 x-2 x-3) (x-4 26))
          (else (x-7))))))
(define (f-131 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (enumerator-list-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-125 x-6 x-7 x-8 x-9 x-10 x-1 x-2 x-3 x-4 x-5 x-11)
  (if (stream-empty? *input*)
      (x-11)
      (let* ((x-14 (stream-car *input*))
             (x-13 (car x-14))
             (x-17 (stream-car *input*))
             (x-16 (car x-17)))
        (case x-16
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-126 x-1 x-2 x-3 x-4 x-5)
           (x-6 25))
          (else (x-11))))))
(define (f-126 x-1 x-2 x-3 x-4 x-5)
  (let* ((x-8 (lambda ($1 $2 $3 $4 $5)
                (enum-specifier-2 $1 $2 $3 $4 $5)))
         (x-7 (x-8 x-1 x-2 x-3 x-4 x-5)))
    (set! *attribute-value* x-7)))
(define (f-122 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((153 114) (f-123 x-1) (x-2 26))
          (else (x-3))))))
(define (f-123 x-1)
  (let* ((x-4 (lambda ($1)
                (enumerator-list-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-115 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-116 x-1)
           (x-2 14))
          (else (x-3))))))
(define (f-116 x-1)
  (let* ((x-4 (lambda ($1)
                (type-adjective-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-113 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-114 x-1)
           (x-2 14))
          (else (x-3))))))
(define (f-114 x-1)
  (let* ((x-4 (lambda ($1)
                (type-adjective-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-111 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-112 x-1)
           (x-2 14))
          (else (x-3))))))
(define (f-112 x-1)
  (let* ((x-4 (lambda ($1)
                (type-adjective-3 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-109 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-110 x-1)
           (x-2 14))
          (else (x-3))))))
(define (f-110 x-1)
  (let* ((x-4 (lambda ($1)
                (type-adjective-4 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-107 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-108 x-1)
           (x-2 15))
          (else (x-3))))))
(define (f-108 x-1)
  (let* ((x-4 (lambda ($1)
                (type-qualifier-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-105 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-106 x-1)
           (x-2 15))
          (else (x-3))))))
(define (f-106 x-1)
  (let* ((x-4 (lambda ($1)
                (type-qualifier-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-102 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-102 x-3 x-2 x-4 x-5))))
    (case x-1
      ((17) (f-87 x-7 *attribute-value* x-4))
      ((25) (f-91 x-7 *attribute-value* x-4))
      ((16) (f-93 x-7 *attribute-value* x-4))
      ((14) (f-95 x-7 *attribute-value* x-4))
      ((13) (f-97 x-7 *attribute-value* x-4))
      ((15) (f-99 x-7 *attribute-value* x-4))
      ((12) (f-101 x-7 *attribute-value* x-4))
      (else (f-103 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-103 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((156 141 132 112 111 110) (f-104 x-1 x-2) (x-3 22))
          (else (x-5))))))
(define (f-104 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (specifier-qualifier-list-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-97 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-98 x-1)
           (x-2 12))
          (else (x-3))))))
(define (f-98 x-1)
  (let* ((x-4 (lambda ($1)
                (type-specifier-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-95 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-96 x-1)
           (x-2 12))
          (else (x-3))))))
(define (f-96 x-1)
  (let* ((x-4 (lambda ($1)
                (type-specifier-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-93 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-94 x-1)
           (x-2 13))
          (else (x-3))))))
(define (f-94 x-1)
  (let* ((x-4 (lambda ($1)
                (actual-type-specifier-6 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-91 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((157
            156
            151
            141
            132
            114
            112
            111
            110
            108
            107
            106
            105
            104
            102
            101
            99
            98
            96
            95
            94
            90
            89
            88
            86
            82
            81
            78)
           (f-92 x-1)
           (x-2 13))
          (else (x-3))))))
(define (f-92 x-1)
  (let* ((x-4 (lambda ($1)
                (actual-type-specifier-7 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-80 x-2 x-1 x-3)
  (let ((x-6 (lambda (x-4)
               (f-81 x-2 x-1 x-3 x-4))))
    (if (stream-empty? *input*)
        (x-3)
        (let* ((x-9 (stream-car *input*)) (x-8 (car x-9)))
          (case x-8
            ((144) (f-7) (f-39 x-6 *attribute-value* x-3))
            ((137) (f-7) (f-41 x-6 *attribute-value* x-3))
            ((130) (f-7) (f-43 x-6 *attribute-value* x-3))
            ((129) (f-7) (f-45 x-6 *attribute-value* x-3))
            ((132) (f-7) (f-47 x-6 *attribute-value* x-3))
            ((136) (f-7) (f-49 x-6 *attribute-value* x-3))
            ((159) (f-7) (f-51 x-6 *attribute-value* x-3))
            ((76) (f-7) (f-53 x-6 *attribute-value* x-3))
            ((158) (f-7) (f-55 x-6 *attribute-value* x-3))
            ((110) (f-7) (f-69 x-6 *attribute-value* x-3))
            ((77) (f-7) (f-57 x-6 *attribute-value* x-3))
            ((156) (f-7) (f-59 x-6 *attribute-value* x-3))
            ((100) (f-7) (f-61 x-6 *attribute-value* x-3))
            ((128) (f-7) (f-65 x-6 *attribute-value* x-3))
            ((127) (f-7) (f-80 x-6 *attribute-value* x-3))
            (else (x-3)))))))
(define (f-81 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-81 x-3 x-2 x-4 x-5))))
    (case x-1
      ((74) (f-11 x-7 *attribute-value* x-4))
      ((72) (f-13 x-7 *attribute-value* x-4))
      ((70) (f-15 x-7 *attribute-value* x-4))
      ((71) (f-17 x-7 *attribute-value* x-4))
      (else (f-82 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-82 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            111)
           (f-83 x-1 x-2)
           (x-3 69))
          (else (x-5))))))
(define (f-83 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (unary-expression-2 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-77 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-77 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      (else (f-78 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-78 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            111)
           (f-79 x-1 x-2 x-3)
           (x-4 67))
          (else (x-7))))))
(define (f-79 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (multiplicative-expression-2 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-66 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-66 x-3 x-2 x-4 x-5))))
    (case x-1
      ((74) (f-11 x-7 *attribute-value* x-4))
      ((72) (f-13 x-7 *attribute-value* x-4))
      ((70) (f-15 x-7 *attribute-value* x-4))
      ((71) (f-17 x-7 *attribute-value* x-4))
      (else (f-67 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-67 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            111)
           (f-68 x-1 x-2)
           (x-3 69))
          (else (x-5))))))
(define (f-68 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (unary-expression-3 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-62 x-3 x-2 x-4 x-1)
  (let ((x-7 (lambda (x-5)
               (f-62 x-3 x-2 x-4 x-5))))
    (case x-1
      ((74) (f-11 x-7 *attribute-value* x-4))
      ((72) (f-13 x-7 *attribute-value* x-4))
      ((70) (f-15 x-7 *attribute-value* x-4))
      ((71) (f-17 x-7 *attribute-value* x-4))
      (else (f-63 x-3 x-7 x-2 *attribute-value* x-4)))))
(define (f-63 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            111)
           (f-64 x-1 x-2)
           (x-3 69))
          (else (x-5))))))
(define (f-64 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (unary-expression-5 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-59 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-60 x-1)
           (x-2 72))
          (else (x-3))))))
(define (f-60 x-1)
  (let* ((x-4 (lambda ($1)
                (primary-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-57 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-58 x-1)
           (x-2 72))
          (else (x-3))))))
(define (f-58 x-1)
  (let* ((x-4 (lambda ($1)
                (primary-expression-3 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-55 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-56 x-1)
           (x-2 74))
          (else (x-3))))))
(define (f-56 x-1)
  (let* ((x-4 (lambda ($1) (constant-1 $1))) (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-53 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-54 x-1)
           (x-2 74))
          (else (x-3))))))
(define (f-54 x-1)
  (let* ((x-4 (lambda ($1) (constant-2 $1))) (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-51 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-52 x-1)
           (x-2 74))
          (else (x-3))))))
(define (f-52 x-1)
  (let* ((x-4 (lambda ($1) (constant-3 $1))) (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-49 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-50 x-1)
           (x-2 70))
          (else (x-3))))))
(define (f-50 x-1)
  (let* ((x-4 (lambda ($1)
                (unary-operator-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-47 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-48 x-1)
           (x-2 70))
          (else (x-3))))))
(define (f-48 x-1)
  (let* ((x-4 (lambda ($1)
                (unary-operator-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-45 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-46 x-1)
           (x-2 70))
          (else (x-3))))))
(define (f-46 x-1)
  (let* ((x-4 (lambda ($1)
                (unary-operator-3 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-43 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-44 x-1)
           (x-2 70))
          (else (x-3))))))
(define (f-44 x-1)
  (let* ((x-4 (lambda ($1)
                (unary-operator-4 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-41 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-42 x-1)
           (x-2 70))
          (else (x-3))))))
(define (f-42 x-1)
  (let* ((x-4 (lambda ($1)
                (unary-operator-5 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-39 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((159 158 156 144 137 136 132 130 129 128 127 110 100 77 76)
           (f-40 x-1)
           (x-2 70))
          (else (x-3))))))
(define (f-40 x-1)
  (let* ((x-4 (lambda ($1)
                (unary-operator-6 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-36 x-4 x-5 x-2 x-3 x-6 x-1)
  (let ((x-9 (lambda (x-7)
               (f-36 x-4 x-5 x-2 x-3 x-6 x-7))))
    (case x-1
      ((74) (f-11 x-9 *attribute-value* x-6))
      ((72) (f-13 x-9 *attribute-value* x-6))
      ((70) (f-15 x-9 *attribute-value* x-6))
      ((71) (f-17 x-9 *attribute-value* x-6))
      ((69) (f-30 x-9 *attribute-value* x-6))
      (else (f-37 x-4 x-5 x-9 x-2 x-3 *attribute-value* x-6)))))
(define (f-37 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            111)
           (f-38 x-1 x-2 x-3)
           (x-4 67))
          (else (x-7))))))
(define (f-38 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (multiplicative-expression-4 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-32 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            111)
           (f-33 x-1)
           (x-2 67))
          (else (x-3))))))
(define (f-33 x-1)
  (let* ((x-4 (lambda ($1)
                (multiplicative-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-30 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            111)
           (f-31 x-1)
           (x-2 68))
          (else (x-3))))))
(define (f-31 x-1)
  (let* ((x-4 (lambda ($1)
                (cast-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-26 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-27 x-1 x-2)
           (x-3 71))
          (else (x-5))))))
(define (f-27 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (postfix-expression-7 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-23 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((156) (f-7) (f-24 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-24 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-25 x-1 x-2 x-3)
           (x-4 71))
          (else (x-7))))))
(define (f-25 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (postfix-expression-6 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-20 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*)) (x-7 (car x-8)))
        (case x-7
          ((156) (f-7) (f-21 x-3 x-4 #f x-1 x-2 *attribute-value* x-5))
          (else (x-5))))))
(define (f-21 x-4 x-5 x-6 x-1 x-2 x-3 x-7)
  (if (stream-empty? *input*)
      (x-7)
      (let* ((x-10 (stream-car *input*))
             (x-9 (car x-10))
             (x-13 (stream-car *input*))
             (x-12 (car x-13)))
        (case x-12
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-22 x-1 x-2 x-3)
           (x-4 71))
          (else (x-7))))))
(define (f-22 x-1 x-2 x-3)
  (let* ((x-6 (lambda ($1 $2 $3)
                (postfix-expression-5 $1 $2 $3)))
         (x-5 (x-6 x-1 x-2 x-3)))
    (set! *attribute-value* x-5)))
(define (f-18 x-3 x-4 x-1 x-2 x-5)
  (if (stream-empty? *input*)
      (x-5)
      (let* ((x-8 (stream-car *input*))
             (x-7 (car x-8))
             (x-11 (stream-car *input*))
             (x-10 (car x-11)))
        (case x-10
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-19 x-1 x-2)
           (x-3 71))
          (else (x-5))))))
(define (f-19 x-1 x-2)
  (let* ((x-5 (lambda ($1 $2)
                (postfix-expression-8 $1 $2)))
         (x-4 (x-5 x-1 x-2)))
    (set! *attribute-value* x-4)))
(define (f-13 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-14 x-1)
           (x-2 71))
          (else (x-3))))))
(define (f-14 x-1)
  (let* ((x-4 (lambda ($1)
                (postfix-expression-1 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-11 x-2 x-1 x-3)
  (if (stream-empty? *input*)
      (x-3)
      (let* ((x-6 (stream-car *input*))
             (x-5 (car x-6))
             (x-9 (stream-car *input*))
             (x-8 (car x-9)))
        (case x-8
          ((155
            154
            153
            151
            150
            149
            148
            147
            146
            145
            143
            142
            141
            140
            139
            138
            136
            135
            134
            133
            132
            131
            130
            129
            128
            127
            126
            125
            124
            123
            122
            121
            120
            119
            118
            117
            116
            114
            113
            112
            111
            110)
           (f-12 x-1)
           (x-2 72))
          (else (x-3))))))
(define (f-12 x-1)
  (let* ((x-4 (lambda ($1)
                (primary-expression-2 $1)))
         (x-3 (x-4 x-1)))
    (set! *attribute-value* x-3)))
(define (f-7)
  (let ((x-2 (stream-car *input*)))
    (set! *attribute-value* (cdr x-2))
    (set! *input* (stream-cdr *input*))
    (if (zero? *error-status*)
        (set! *error-status* *error-status*)
        (set! *error-status* (- *error-status* 1)))))
(define (f-3)
  (cond ((zero? *error-status*) (set! *input* *input*))
        ((stream-empty? *input*)
         (let ((x-2 (error "parse error: premature end of input")))
           (set! *input* x-2)))
        (else (set! *input* (stream-cdr *input*)))))