/**
 ** This file was automatically generated by the Cyclone scheme compiler
 ** http://justinethier.github.io/cyclone/
 **
 ** (c) 2014-2018 Justin Ethier
 ** Version 0.8.1 
 **
 **/

/* 
"---------------- input program:"
 */
/* 
((import
   (scheme base)
   (scheme read)
   (scheme write)
   (scheme time))
 (define (create-n n)
   (do ((n n (- n 1)) (a '() (cons '() a)))
       ((= n 0) a)))
 (define (iterative-div2 l)
   (do ((l l (cddr l)) (a '() (cons (car l) a)))
       ((null? l) a)))
 (define (main)
   (let* ((count 1000000)
          (input1 1000)
          (output 500)
          (s2 (number->string count))
          (s1 (number->string input1))
          (ll (create-n (hide count input1)))
          (name "diviter"))
     (run-r7rs-benchmark
       (string-append name ":" s1 ":" s2)
       count
       (lambda () (iterative-div2 ll))
       (lambda (result) (equal? (length result) output)))))
 (define (hide r x)
   (call-with-values
     (lambda ()
       (values
         (vector values (lambda (x) x))
         (if (< r 100) 0 1)))
     (lambda (v i) ((vector-ref v i) x))))
 (define (run-r7rs-benchmark name count thunk ok?)
   (define (rounded x) (/ (round (* 1000 x)) 1000))
   (display "Running ")
   (display name)
   (newline)
   (flush-output-port (current-output-port))
   (let* ((j/s (jiffies-per-second))
          (t0 (current-second))
          (j0 (current-jiffy)))
     (let loop ((i 0) (result #f))
       (cond ((< i count) (loop (+ i 1) (thunk)))
             ((ok? result)
              (let* ((j1 (current-jiffy))
                     (t1 (current-second))
                     (jifs (- j1 j0))
                     (secs (inexact (/ jifs j/s)))
                     (secs2 (rounded (- t1 t0))))
                (display "Elapsed time: ")
                (write secs)
                (display " seconds (")
                (write secs2)
                (display ") for ")
                (display name)
                (newline)
                (display "+!CSVLINE!+")
                (display (this-scheme-implementation-name))
                (display ",")
                (display name)
                (display ",")
                (display secs)
                (newline)
                (flush-output-port (current-output-port)))
              result)
             (else
              (display "ERROR: returned incorrect result: ")
              (write result)
              (newline)
              (flush-output-port (current-output-port))
              result)))))
 (define (this-scheme-implementation-name)
   (string-append "cyclone-" (Cyc-version)))
 (main))
 */
/* 
"inline candidates:"
 */
/* 
()
 */
/* 
"imports:"
 */
/* 
((scheme base)
 (scheme read)
 (scheme write)
 (scheme time))
 */
/* 
"resolved imports:"
 */
/* 
((member scheme base)
 (assoc scheme base)
 (cons-source scheme base)
 (syntax-rules scheme base)
 (letrec* scheme base)
 (guard scheme base)
 (guard-aux scheme base)
 (define-record-type scheme base)
 (record? scheme base)
 (is-a? scheme base)
 (register-simple-type scheme base)
 (make-type-predicate scheme base)
 (make-constructor scheme base)
 (make-getter scheme base)
 (make-setter scheme base)
 (slot-ref scheme base)
 (slot-set! scheme base)
 (type-slot-offset scheme base)
 (receive scheme base)
 (abs scheme base)
 (max scheme base)
 (min scheme base)
 (modulo scheme base)
 (floor-remainder scheme base)
 (even? scheme base)
 (exact-integer? scheme base)
 (exact-integer-sqrt scheme base)
 (exact? scheme base)
 (inexact? scheme base)
 (odd? scheme base)
 (complex? scheme base)
 (rational? scheme base)
 (bignum? scheme base)
 (gcd scheme base)
 (lcm scheme base)
 (quotient scheme base)
 (remainder scheme base)
 (truncate-quotient scheme base)
 (truncate-remainder scheme base)
 (truncate/ scheme base)
 (floor-quotient scheme base)
 (floor-remainder scheme base)
 (floor/ scheme base)
 (square scheme base)
 (expt scheme base)
 (call-with-current-continuation scheme base)
 (call/cc scheme base)
 (call-with-values scheme base)
 (dynamic-wind scheme base)
 (values scheme base)
 (char=? scheme base)
 (char<? scheme base)
 (char>? scheme base)
 (char<=? scheme base)
 (char>=? scheme base)
 (string=? scheme base)
 (string<? scheme base)
 (string<=? scheme base)
 (string>? scheme base)
 (string>=? scheme base)
 (foldl scheme base)
 (foldr scheme base)
 (not scheme base)
 (list? scheme base)
 (zero? scheme base)
 (positive? scheme base)
 (negative? scheme base)
 (append scheme base)
 (list scheme base)
 (make-list scheme base)
 (list-copy scheme base)
 (map scheme base)
 (Cyc-map-loop-1 scheme base)
 (Cyc-for-each-loop-1 scheme base)
 (for-each scheme base)
 (list-tail scheme base)
 (list-ref scheme base)
 (list-set! scheme base)
 (reverse scheme base)
 (boolean=? scheme base)
 (symbol=? scheme base)
 (Cyc-obj=? scheme base)
 (vector scheme base)
 (vector-append scheme base)
 (vector-copy scheme base)
 (vector-copy! scheme base)
 (vector-fill! scheme base)
 (vector->list scheme base)
 (vector->string scheme base)
 (vector-map scheme base)
 (vector-for-each scheme base)
 (make-string scheme base)
 (string scheme base)
 (string-copy scheme base)
 (string-copy! scheme base)
 (string-fill! scheme base)
 (string->list scheme base)
 (string->vector scheme base)
 (string-map scheme base)
 (string-for-each scheme base)
 (make-parameter scheme base)
 (current-output-port scheme base)
 (current-input-port scheme base)
 (current-error-port scheme base)
 (call-with-port scheme base)
 (error-object? scheme base)
 (error-object-message scheme base)
 (error-object-irritants scheme base)
 (error scheme base)
 (raise scheme base)
 (raise-continuable scheme base)
 (with-handler scheme base)
 (with-exception-handler scheme base)
 (Cyc-add-exception-handler scheme base)
 (Cyc-remove-exception-handler scheme base)
 (newline scheme base)
 (write-char scheme base)
 (write-string scheme base)
 (flush-output-port scheme base)
 (peek-char scheme base)
 (read-char scheme base)
 (read-line scheme base)
 (read-string scheme base)
 (input-port? scheme base)
 (output-port? scheme base)
 (input-port-open? scheme base)
 (output-port-open? scheme base)
 (get-output-string scheme base)
 (open-output-string scheme base)
 (open-input-string scheme base)
 (get-output-bytevector scheme base)
 (open-input-bytevector scheme base)
 (open-output-bytevector scheme base)
 (features scheme base)
 (Cyc-version scheme base)
 (any scheme base)
 (every scheme base)
 (and scheme base)
 (or scheme base)
 (let scheme base)
 (let* scheme base)
 (letrec scheme base)
 (let*-values scheme base)
 (let-values scheme base)
 (begin scheme base)
 (case scheme base)
 (cond scheme base)
 (cond-expand scheme base)
 (do scheme base)
 (when scheme base)
 (unless scheme base)
 (quasiquote scheme base)
 (floor scheme base)
 (ceiling scheme base)
 (truncate scheme base)
 (round scheme base)
 (exact scheme base)
 (inexact scheme base)
 (eof-object scheme base)
 (syntax-error scheme base)
 (bytevector-copy scheme base)
 (bytevector-copy! scheme base)
 (utf8->string scheme base)
 (string->utf8 scheme base)
 (denominator scheme base)
 (numerator scheme base)
 (parameterize scheme base)
 (peek-u8 scheme base)
 (read-u8 scheme base)
 (write-u8 scheme base)
 (read scheme read)
 (read-all scheme read)
 (include scheme read)
 (include-ci scheme read)
 (display scheme write)
 (write scheme write)
 (write-shared scheme write)
 (write-simple scheme write)
 (current-second scheme time)
 (current-jiffy scheme time)
 (jiffies-per-second scheme time))
 */
/* 
"resolved macros:"
 */
/* 
()
 */
/* 
"---------------- after macro expansion:"
 */
/* 
((define create-n
   (lambda (n$1)
     ((lambda (n$5 a$6)
        ((lambda (lp$2$7)
           (set! lp$2$7
             (lambda (n$8 a$9)
               (if (= n$8 0)
                 a$9
                 (lp$2$7 (- n$8 1) (cons '() a$9)))))
           (lp$2$7 n$5 a$6))
         #f))
      n$1
      '())))
 (define iterative-div2
   (lambda (l$10)
     ((lambda (l$14 a$15)
        ((lambda (lp$11$16)
           (set! lp$11$16
             (lambda (l$17 a$18)
               (if (null? l$17)
                 a$18
                 (lp$11$16 (cddr l$17) (cons (car l$17) a$18)))))
           (lp$11$16 l$14 a$15))
         #f))
      l$10
      '())))
 (define main
   (lambda ()
     ((lambda (count$21)
        ((lambda (input1$24)
           ((lambda (output$27)
              ((lambda (s2$30)
                 ((lambda (s1$33)
                    ((lambda (ll$36)
                       ((lambda (name$39)
                          ((lambda ()
                             (run-r7rs-benchmark
                               (string-append name$39 ":" s1$33 ":" s2$30)
                               count$21
                               (lambda () (iterative-div2 ll$36))
                               (lambda (result$41)
                                 (equal? (length result$41) output$27))))))
                        "diviter"))
                     (create-n (hide count$21 input1$24))))
                  (number->string input1$24)))
               (number->string count$21)))
            500))
         1000))
      1000000)))
 (define hide
   (lambda (r$42 x$43)
     (call-with-values
       (lambda ()
         (values
           (vector values (lambda (x$44) x$44))
           (if (< r$42 100) 0 1)))
       (lambda (v$45 i$46)
         ((vector-ref v$45 i$46) x$43)))))
 (define run-r7rs-benchmark
   (lambda (name$47 count$48 thunk$49 ok?$50)
     (define rounded
       (lambda (x$51) (/ (round (* 1000 x$51)) 1000)))
     (display "Running ")
     (display name$47)
     (newline)
     (flush-output-port (current-output-port))
     ((lambda (j/s$54)
        ((lambda (t0$57)
           ((lambda (j0$60)
              ((lambda ()
                 ((lambda (i$63 result$64)
                    ((lambda (loop$65)
                       (set! loop$65
                         (lambda (i$66 result$67)
                           (if (< i$66 count$48)
                             ((lambda () (loop$65 (+ i$66 1) (thunk$49))))
                             (if (ok?$50 result$67)
                               ((lambda ()
                                  ((lambda (j1$76)
                                     ((lambda (t1$79)
                                        ((lambda (jifs$82)
                                           ((lambda (secs$85)
                                              ((lambda (secs2$88)
                                                 ((lambda ()
                                                    (display "Elapsed time: ")
                                                    (write secs$85)
                                                    (display " seconds (")
                                                    (write secs2$88)
                                                    (display ") for ")
                                                    (display name$47)
                                                    (newline)
                                                    (display "+!CSVLINE!+")
                                                    (display
                                                      (this-scheme-implementation-name))
                                                    (display ",")
                                                    (display name$47)
                                                    (display ",")
                                                    (display secs$85)
                                                    (newline)
                                                    (flush-output-port
                                                      (current-output-port)))))
                                               (rounded (- t1$79 t0$57))))
                                            (inexact (/ jifs$82 j/s$54))))
                                         (- j1$76 j0$60)))
                                      (current-second)))
                                   (current-jiffy))
                                  result$67))
                               ((lambda ()
                                  (display "ERROR: returned incorrect result: ")
                                  (write result$67)
                                  (newline)
                                  (flush-output-port (current-output-port))
                                  result$67))))))
                       (loop$65 i$63 result$64))
                     #f))
                  0
                  #f))))
            (current-jiffy)))
         (current-second)))
      (jiffies-per-second))))
 (define this-scheme-implementation-name
   (lambda ()
     (string-append "cyclone-" (Cyc-version))))
 (main))
 */
/* 
"---------------- after macro expansion cleanup:"
 */
/* 
((define create-n
   (lambda (n$1)
     ((lambda (n$5 a$6)
        ((lambda (lp$2$7)
           (set! lp$2$7
             (lambda (n$8 a$9)
               (if (= n$8 0)
                 a$9
                 (lp$2$7 (- n$8 1) (cons '() a$9)))))
           (lp$2$7 n$5 a$6))
         #f))
      n$1
      '())))
 (define iterative-div2
   (lambda (l$10)
     ((lambda (l$14 a$15)
        ((lambda (lp$11$16)
           (set! lp$11$16
             (lambda (l$17 a$18)
               (if (null? l$17)
                 a$18
                 (lp$11$16 (cddr l$17) (cons (car l$17) a$18)))))
           (lp$11$16 l$14 a$15))
         #f))
      l$10
      '())))
 (define main
   (lambda ()
     ((lambda (count$21)
        ((lambda (input1$24)
           ((lambda (output$27)
              ((lambda (s2$30)
                 ((lambda (s1$33)
                    ((lambda (ll$36)
                       ((lambda (name$39)
                          ((lambda ()
                             (run-r7rs-benchmark
                               (string-append name$39 ":" s1$33 ":" s2$30)
                               count$21
                               (lambda () (iterative-div2 ll$36))
                               (lambda (result$41)
                                 (equal? (length result$41) output$27))))))
                        "diviter"))
                     (create-n (hide count$21 input1$24))))
                  (number->string input1$24)))
               (number->string count$21)))
            500))
         1000))
      1000000)))
 (define hide
   (lambda (r$42 x$43)
     (call-with-values
       (lambda ()
         (values
           (vector values (lambda (x$44) x$44))
           (if (< r$42 100) 0 1)))
       (lambda (v$45 i$46)
         ((vector-ref v$45 i$46) x$43)))))
 (define run-r7rs-benchmark
   (lambda (name$47 count$48 thunk$49 ok?$50)
     (define rounded
       (lambda (x$51) (/ (round (* 1000 x$51)) 1000)))
     (display "Running ")
     (display name$47)
     (newline)
     (flush-output-port (current-output-port))
     ((lambda (j/s$54)
        ((lambda (t0$57)
           ((lambda (j0$60)
              ((lambda ()
                 ((lambda (i$63 result$64)
                    ((lambda (loop$65)
                       (set! loop$65
                         (lambda (i$66 result$67)
                           (if (< i$66 count$48)
                             ((lambda () (loop$65 (+ i$66 1) (thunk$49))))
                             (if (ok?$50 result$67)
                               ((lambda ()
                                  ((lambda (j1$76)
                                     ((lambda (t1$79)
                                        ((lambda (jifs$82)
                                           ((lambda (secs$85)
                                              ((lambda (secs2$88)
                                                 ((lambda ()
                                                    (display "Elapsed time: ")
                                                    (write secs$85)
                                                    (display " seconds (")
                                                    (write secs2$88)
                                                    (display ") for ")
                                                    (display name$47)
                                                    (newline)
                                                    (display "+!CSVLINE!+")
                                                    (display
                                                      (this-scheme-implementation-name))
                                                    (display ",")
                                                    (display name$47)
                                                    (display ",")
                                                    (display secs$85)
                                                    (newline)
                                                    (flush-output-port
                                                      (current-output-port)))))
                                               (rounded (- t1$79 t0$57))))
                                            (inexact (/ jifs$82 j/s$54))))
                                         (- j1$76 j0$60)))
                                      (current-second)))
                                   (current-jiffy))
                                  result$67))
                               ((lambda ()
                                  (display "ERROR: returned incorrect result: ")
                                  (write result$67)
                                  (newline)
                                  (flush-output-port (current-output-port))
                                  result$67))))))
                       (loop$65 i$63 result$64))
                     #f))
                  0
                  #f))))
            (current-jiffy)))
         (current-second)))
      (jiffies-per-second))))
 (define this-scheme-implementation-name
   (lambda ()
     (string-append "cyclone-" (Cyc-version))))
 (main))
 */
/* 
"---------------- after processing globals"
 */
/* 
((define create-n
   (lambda (n$1)
     ((lambda (n$5 a$6)
        ((lambda (lp$2$7)
           (set! lp$2$7
             (lambda (n$8 a$9)
               (if (= n$8 0)
                 a$9
                 (lp$2$7 (- n$8 1) (cons '() a$9)))))
           (lp$2$7 n$5 a$6))
         #f))
      n$1
      '())))
 (define iterative-div2
   (lambda (l$10)
     ((lambda (l$14 a$15)
        ((lambda (lp$11$16)
           (set! lp$11$16
             (lambda (l$17 a$18)
               (if (null? l$17)
                 a$18
                 (lp$11$16 (cddr l$17) (cons (car l$17) a$18)))))
           (lp$11$16 l$14 a$15))
         #f))
      l$10
      '())))
 (define main
   (lambda ()
     ((lambda (count$21)
        ((lambda (input1$24)
           ((lambda (output$27)
              ((lambda (s2$30)
                 ((lambda (s1$33)
                    ((lambda (ll$36)
                       ((lambda (name$39)
                          ((lambda ()
                             (run-r7rs-benchmark
                               (string-append name$39 ":" s1$33 ":" s2$30)
                               count$21
                               (lambda () (iterative-div2 ll$36))
                               (lambda (result$41)
                                 (equal? (length result$41) output$27))))))
                        "diviter"))
                     (create-n (hide count$21 input1$24))))
                  (number->string input1$24)))
               (number->string count$21)))
            500))
         1000))
      1000000)))
 (define hide
   (lambda (r$42 x$43)
     (call-with-values
       (lambda ()
         (values
           (vector values (lambda (x$44) x$44))
           (if (< r$42 100) 0 1)))
       (lambda (v$45 i$46)
         ((vector-ref v$45 i$46) x$43)))))
 (define run-r7rs-benchmark
   (lambda (name$47 count$48 thunk$49 ok?$50)
     (define rounded
       (lambda (x$51) (/ (round (* 1000 x$51)) 1000)))
     (display "Running ")
     (display name$47)
     (newline)
     (flush-output-port (current-output-port))
     ((lambda (j/s$54)
        ((lambda (t0$57)
           ((lambda (j0$60)
              ((lambda ()
                 ((lambda (i$63 result$64)
                    ((lambda (loop$65)
                       (set! loop$65
                         (lambda (i$66 result$67)
                           (if (< i$66 count$48)
                             ((lambda () (loop$65 (+ i$66 1) (thunk$49))))
                             (if (ok?$50 result$67)
                               ((lambda ()
                                  ((lambda (j1$76)
                                     ((lambda (t1$79)
                                        ((lambda (jifs$82)
                                           ((lambda (secs$85)
                                              ((lambda (secs2$88)
                                                 ((lambda ()
                                                    (display "Elapsed time: ")
                                                    (write secs$85)
                                                    (display " seconds (")
                                                    (write secs2$88)
                                                    (display ") for ")
                                                    (display name$47)
                                                    (newline)
                                                    (display "+!CSVLINE!+")
                                                    (display
                                                      (this-scheme-implementation-name))
                                                    (display ",")
                                                    (display name$47)
                                                    (display ",")
                                                    (display secs$85)
                                                    (newline)
                                                    (flush-output-port
                                                      (current-output-port)))))
                                               (rounded (- t1$79 t0$57))))
                                            (inexact (/ jifs$82 j/s$54))))
                                         (- j1$76 j0$60)))
                                      (current-second)))
                                   (current-jiffy))
                                  result$67))
                               ((lambda ()
                                  (display "ERROR: returned incorrect result: ")
                                  (write result$67)
                                  (newline)
                                  (flush-output-port (current-output-port))
                                  result$67))))))
                       (loop$65 i$63 result$64))
                     #f))
                  0
                  #f))))
            (current-jiffy)))
         (current-second)))
      (jiffies-per-second))))
 (define this-scheme-implementation-name
   (lambda ()
     (string-append "cyclone-" (Cyc-version))))
 ((lambda () 0 (main))))
 */
/* 
"pass thru exports:"
 */
/* 
()
 */
/* 
"---------------- after alpha conversion:"
 */
/* 
((define create-n
   (lambda (n$1$91)
     ((lambda (n$5$92 a$6$93)
        ((lambda (lp$2$7$94)
           (set! lp$2$7$94
             (lambda (n$8$95 a$9$96)
               (if (Cyc-fast-eq n$8$95 0)
                 a$9$96
                 (lp$2$7$94
                   (Cyc-fast-sub n$8$95 1)
                   (cons '() a$9$96)))))
           (lp$2$7$94 n$5$92 a$6$93))
         #f))
      n$1$91
      '())))
 (define iterative-div2
   (lambda (l$10$97)
     ((lambda (l$14$98 a$15$99)
        ((lambda (lp$11$16$100)
           (set! lp$11$16$100
             (lambda (l$17$101 a$18$102)
               (if (null? l$17$101)
                 a$18$102
                 (lp$11$16$100
                   (cddr l$17$101)
                   (cons (car l$17$101) a$18$102)))))
           (lp$11$16$100 l$14$98 a$15$99))
         #f))
      l$10$97
      '())))
 (define main
   (lambda ()
     ((lambda (count$21$103)
        ((lambda (input1$24$104)
           ((lambda (output$27$105)
              ((lambda (s2$30$106)
                 ((lambda (s1$33$107)
                    ((lambda (ll$36$108)
                       ((lambda (name$39$109)
                          ((lambda ()
                             (run-r7rs-benchmark
                               (string-append
                                 name$39$109
                                 ":"
                                 s1$33$107
                                 ":"
                                 s2$30$106)
                               count$21$103
                               (lambda () (iterative-div2 ll$36$108))
                               (lambda (result$41$110)
                                 (equal?
                                   (length result$41$110)
                                   output$27$105))))))
                        "diviter"))
                     (create-n (hide count$21$103 input1$24$104))))
                  (number->string input1$24$104)))
               (number->string count$21$103)))
            500))
         1000))
      1000000)))
 (define hide
   (lambda (r$42$111 x$43$112)
     (call-with-values
       (lambda ()
         (values
           (vector values (lambda (x$44$113) x$44$113))
           (if (Cyc-fast-lt r$42$111 100) 0 1)))
       (lambda (v$45$114 i$46$115)
         ((vector-ref v$45$114 i$46$115) x$43$112)))))
 (define run-r7rs-benchmark
   (lambda (name$47$116
            count$48$117
            thunk$49$118
            ok?$50$119)
     ((lambda (rounded$121)
        ((lambda (rounded$122)
           (set! rounded$121
             (lambda (x$51$123)
               (Cyc-fast-div
                 (round (Cyc-fast-mul 1000 x$51$123))
                 1000)))
           (display "Running ")
           (display name$47$116)
           (newline)
           (flush-output-port (current-output-port))
           ((lambda (j/s$54$124)
              ((lambda (t0$57$125)
                 ((lambda (j0$60$126)
                    ((lambda ()
                       ((lambda (i$63$127 result$64$128)
                          ((lambda (loop$65$129)
                             (set! loop$65$129
                               (lambda (i$66$130 result$67$131)
                                 (if (Cyc-fast-lt i$66$130 count$48$117)
                                   ((lambda ()
                                      (loop$65$129
                                        (Cyc-fast-plus i$66$130 1)
                                        (thunk$49$118))))
                                   (if (ok?$50$119 result$67$131)
                                     ((lambda ()
                                        ((lambda (j1$76$132)
                                           ((lambda (t1$79$133)
                                              ((lambda (jifs$82$134)
                                                 ((lambda (secs$85$135)
                                                    ((lambda (secs2$88$136)
                                                       ((lambda ()
                                                          (display
                                                            "Elapsed time: ")
                                                          (write secs$85$135)
                                                          (display " seconds (")
                                                          (write secs2$88$136)
                                                          (display ") for ")
                                                          (display name$47$116)
                                                          (newline)
                                                          (display
                                                            "+!CSVLINE!+")
                                                          (display
                                                            (this-scheme-implementation-name))
                                                          (display ",")
                                                          (display name$47$116)
                                                          (display ",")
                                                          (display secs$85$135)
                                                          (newline)
                                                          (flush-output-port
                                                            (current-output-port)))))
                                                     (rounded$121
                                                       (Cyc-fast-sub
                                                         t1$79$133
                                                         t0$57$125))))
                                                  (inexact
                                                    (Cyc-fast-div
                                                      jifs$82$134
                                                      j/s$54$124))))
                                               (Cyc-fast-sub
                                                 j1$76$132
                                                 j0$60$126)))
                                            (current-second)))
                                         (current-jiffy))
                                        result$67$131))
                                     ((lambda ()
                                        (display
                                          "ERROR: returned incorrect result: ")
                                        (write result$67$131)
                                        (newline)
                                        (flush-output-port
                                          (current-output-port))
                                        result$67$131))))))
                             (loop$65$129 i$63$127 result$64$128))
                           #f))
                        0
                        #f))))
                  (current-jiffy)))
               (current-second)))
            (jiffies-per-second)))
         #f))
      #f)))
 (define this-scheme-implementation-name
   (lambda ()
     (string-append "cyclone-" (Cyc-version))))
 ((lambda () 0 (main))))
 */
/* 
"---------------- after func->primitive conversion:"
 */
/* 
((define create-n
   (lambda (n$1$91)
     ((lambda (n$5$92 a$6$93)
        ((lambda (lp$2$7$94)
           (set! lp$2$7$94
             (lambda (n$8$95 a$9$96)
               (if (Cyc-fast-eq n$8$95 0)
                 a$9$96
                 (lp$2$7$94
                   (Cyc-fast-sub n$8$95 1)
                   (cons '() a$9$96)))))
           (lp$2$7$94 n$5$92 a$6$93))
         #f))
      n$1$91
      '())))
 (define iterative-div2
   (lambda (l$10$97)
     ((lambda (l$14$98 a$15$99)
        ((lambda (lp$11$16$100)
           (set! lp$11$16$100
             (lambda (l$17$101 a$18$102)
               (if (null? l$17$101)
                 a$18$102
                 (lp$11$16$100
                   (cddr l$17$101)
                   (cons (car l$17$101) a$18$102)))))
           (lp$11$16$100 l$14$98 a$15$99))
         #f))
      l$10$97
      '())))
 (define main
   (lambda ()
     ((lambda (count$21$103)
        ((lambda (input1$24$104)
           ((lambda (output$27$105)
              ((lambda (s2$30$106)
                 ((lambda (s1$33$107)
                    ((lambda (ll$36$108)
                       ((lambda (name$39$109)
                          ((lambda ()
                             (run-r7rs-benchmark
                               (string-append
                                 name$39$109
                                 ":"
                                 s1$33$107
                                 ":"
                                 s2$30$106)
                               count$21$103
                               (lambda () (iterative-div2 ll$36$108))
                               (lambda (result$41$110)
                                 (equal?
                                   (length result$41$110)
                                   output$27$105))))))
                        "diviter"))
                     (create-n (hide count$21$103 input1$24$104))))
                  (number->string input1$24$104)))
               (number->string count$21$103)))
            500))
         1000))
      1000000)))
 (define hide
   (lambda (r$42$111 x$43$112)
     (call-with-values
       (lambda ()
         (values
           (vector values (lambda (x$44$113) x$44$113))
           (if (Cyc-fast-lt r$42$111 100) 0 1)))
       (lambda (v$45$114 i$46$115)
         ((vector-ref v$45$114 i$46$115) x$43$112)))))
 (define run-r7rs-benchmark
   (lambda (name$47$116
            count$48$117
            thunk$49$118
            ok?$50$119)
     ((lambda (rounded$121)
        ((lambda (rounded$122)
           (set! rounded$121
             (lambda (x$51$123)
               (Cyc-fast-div
                 (round__inline__ (Cyc-fast-mul 1000 x$51$123))
                 1000)))
           (display "Running ")
           (display name$47$116)
           (newline)
           (flush-output-port (current-output-port))
           ((lambda (j/s$54$124)
              ((lambda (t0$57$125)
                 ((lambda (j0$60$126)
                    ((lambda ()
                       ((lambda (i$63$127 result$64$128)
                          ((lambda (loop$65$129)
                             (set! loop$65$129
                               (lambda (i$66$130 result$67$131)
                                 (if (Cyc-fast-lt i$66$130 count$48$117)
                                   ((lambda ()
                                      (loop$65$129
                                        (Cyc-fast-plus i$66$130 1)
                                        (thunk$49$118))))
                                   (if (ok?$50$119 result$67$131)
                                     ((lambda ()
                                        ((lambda (j1$76$132)
                                           ((lambda (t1$79$133)
                                              ((lambda (jifs$82$134)
                                                 ((lambda (secs$85$135)
                                                    ((lambda (secs2$88$136)
                                                       ((lambda ()
                                                          (display
                                                            "Elapsed time: ")
                                                          (write secs$85$135)
                                                          (display " seconds (")
                                                          (write secs2$88$136)
                                                          (display ") for ")
                                                          (display name$47$116)
                                                          (newline)
                                                          (display
                                                            "+!CSVLINE!+")
                                                          (display
                                                            (this-scheme-implementation-name))
                                                          (display ",")
                                                          (display name$47$116)
                                                          (display ",")
                                                          (display secs$85$135)
                                                          (newline)
                                                          (flush-output-port
                                                            (current-output-port)))))
                                                     (rounded$121
                                                       (Cyc-fast-sub
                                                         t1$79$133
                                                         t0$57$125))))
                                                  (inexact__inline__
                                                    (Cyc-fast-div
                                                      jifs$82$134
                                                      j/s$54$124))))
                                               (Cyc-fast-sub
                                                 j1$76$132
                                                 j0$60$126)))
                                            (current-second)))
                                         (current-jiffy))
                                        result$67$131))
                                     ((lambda ()
                                        (display
                                          "ERROR: returned incorrect result: ")
                                        (write result$67$131)
                                        (newline)
                                        (flush-output-port
                                          (current-output-port))
                                        result$67$131))))))
                             (loop$65$129 i$63$127 result$64$128))
                           #f))
                        0
                        #f))))
                  (current-jiffy)))
               (current-second)))
            (jiffies-per-second)))
         #f))
      #f)))
 (define this-scheme-implementation-name
   (lambda ()
     (string-append "cyclone-" (Cyc-version))))
 ((lambda () 0 (main))))
 */
/* 
"---------------- results of inlinable-top-level-lambda analysis: "
 */
/* 
()
 */
/* 
"---------------- after CPS:"
 */
/* 
((define create-n
   (lambda-11-cont
     (k$139 n$1$91)
     ((lambda-10
        (r$140)
        ((lambda-9
           (n$5$92 a$6$93)
           ((lambda-8
              (lp$2$7$94)
              ((lambda-2
                 (r$142)
                 ((lambda-1
                    (r$141)
                    (lp$2$7$94 k$139 n$5$92 a$6$93))
                  (set! lp$2$7$94 r$142)))
               (lambda-7-cont
                 (k$143 n$8$95 a$9$96)
                 ((lambda-6
                    (r$144)
                    (if r$144
                      (k$143 a$9$96)
                      ((lambda-5
                         (r$145)
                         ((lambda-4
                            (r$147)
                            ((lambda-3 (r$146) (lp$2$7$94 k$143 r$145 r$146))
                             (cons r$147 a$9$96)))
                          '()))
                       (Cyc-fast-sub n$8$95 1))))
                  (Cyc-fast-eq n$8$95 0)))))
            #f))
         n$1$91
         r$140))
      '())))
 (define iterative-div2
   (lambda-22-cont
     (k$150 l$10$97)
     ((lambda-21
        (r$151)
        ((lambda-20
           (l$14$98 a$15$99)
           ((lambda-19
              (lp$11$16$100)
              ((lambda-13
                 (r$153)
                 ((lambda-12
                    (r$152)
                    (lp$11$16$100 k$150 l$14$98 a$15$99))
                  (set! lp$11$16$100 r$153)))
               (lambda-18-cont
                 (k$154 l$17$101 a$18$102)
                 ((lambda-17
                    (r$155)
                    (if r$155
                      (k$154 a$18$102)
                      ((lambda-16
                         (r$156)
                         ((lambda-15
                            (r$158)
                            ((lambda-14
                               (r$157)
                               (lp$11$16$100 k$154 r$156 r$157))
                             (cons r$158 a$18$102)))
                          (car l$17$101)))
                       (cddr l$17$101))))
                  (null? l$17$101)))))
            #f))
         l$10$97
         r$151))
      '())))
 (define main
   (lambda-41-cont
     (k$161)
     ((lambda-40
        (count$21$103)
        ((lambda-39
           (input1$24$104)
           ((lambda-38
              (output$27$105)
              ((lambda-37
                 (r$162)
                 ((lambda-36
                    (s2$30$106)
                    ((lambda-35
                       (r$163)
                       ((lambda-34
                          (s1$33$107)
                          (hide (lambda-33
                                  (r$171)
                                  (create-n
                                    (lambda-32
                                      (r$164)
                                      ((lambda-31
                                         (ll$36$108)
                                         ((lambda-30
                                            (name$39$109)
                                            ((lambda-29
                                               ()
                                               ((lambda-28
                                                  (r$165)
                                                  ((lambda-26
                                                     (r$166)
                                                     ((lambda-23
                                                        (r$167)
                                                        (run-r7rs-benchmark
                                                          k$161
                                                          r$165
                                                          count$21$103
                                                          r$166
                                                          r$167))
                                                      (lambda-25-cont
                                                        (k$168 result$41$110)
                                                        ((lambda-24
                                                           (r$169)
                                                           (k$168 (equal?
                                                                    r$169
                                                                    output$27$105)))
                                                         (length
                                                           result$41$110)))))
                                                   (lambda-27-cont
                                                     (k$170)
                                                     (iterative-div2
                                                       k$170
                                                       ll$36$108))))
                                                (string-append
                                                  name$39$109
                                                  ":"
                                                  s1$33$107
                                                  ":"
                                                  s2$30$106)))))
                                          "diviter"))
                                       r$164))
                                    r$171))
                                count$21$103
                                input1$24$104))
                        r$163))
                     (number->string input1$24$104)))
                  r$162))
               (number->string count$21$103)))
            500))
         1000))
      1000000)))
 (define hide
   (lambda-53-cont
     (k$174 r$42$111 x$43$112)
     ((lambda-45
        (r$175)
        ((lambda-42
           (r$176)
           (call-with-values k$174 r$175 r$176))
         (lambda-44-cont
           (k$177 v$45$114 i$46$115)
           ((lambda-43 (r$178) (r$178 k$177 x$43$112))
            (vector-ref v$45$114 i$46$115)))))
      (lambda-52-cont
        (k$179)
        ((lambda-50
           (r$184)
           (vector
             (lambda-49
               (r$180)
               ((lambda-48-cont
                  (k$182)
                  ((lambda-47
                     (r$183)
                     (if r$183 (k$182 0) (k$182 1)))
                   (Cyc-fast-lt r$42$111 100)))
                (lambda-46 (r$181) (values k$179 r$180 r$181))))
             values
             r$184))
         (lambda-51-cont
           (k$185 x$44$113)
           (k$185 x$44$113)))))))
 (define run-r7rs-benchmark
   (lambda-120-cont
     (k$188 name$47$116
            count$48$117
            thunk$49$118
            ok?$50$119)
     ((lambda-119
        (rounded$121)
        ((lambda-118
           (rounded$122)
           ((lambda-114
              (r$234)
              ((lambda-113
                 (r$189)
                 (display
                   (lambda-112
                     (r$190)
                     (display
                       (lambda-111
                         (r$191)
                         (newline
                           (lambda-110
                             (r$192)
                             (current-output-port
                               (lambda-109
                                 (r$233)
                                 (flush-output-port
                                   (lambda-108
                                     (r$193)
                                     (jiffies-per-second
                                       (lambda-107
                                         (r$194)
                                         ((lambda-106
                                            (j/s$54$124)
                                            (current-second
                                              (lambda-105
                                                (r$195)
                                                ((lambda-104
                                                   (t0$57$125)
                                                   (current-jiffy
                                                     (lambda-103
                                                       (r$196)
                                                       ((lambda-102
                                                          (j0$60$126)
                                                          ((lambda-101
                                                             ()
                                                             ((lambda-100
                                                                (i$63$127
                                                                  result$64$128)
                                                                ((lambda-99
                                                                   (loop$65$129)
                                                                   ((lambda-55
                                                                      (r$198)
                                                                      ((lambda-54
                                                                         (r$197)
                                                                         (loop$65$129
                                                                           k$188
                                                                           i$63$127
                                                                           result$64$128))
                                                                       (set! loop$65$129
                                                                         r$198)))
                                                                    (lambda-98-cont
                                                                      (k$199 i$66$130
                                                                             result$67$131)
                                                                      ((lambda-97
                                                                         (r$200)
                                                                         (if r$200
                                                                           ((lambda-58
                                                                              ()
                                                                              ((lambda-57
                                                                                 (r$201)
                                                                                 (thunk$49$118
                                                                                   (lambda-56
                                                                                     (r$202)
                                                                                     (loop$65$129
                                                                                       k$199
                                                                                       r$201
                                                                                       r$202))))
                                                                               (Cyc-fast-plus
                                                                                 i$66$130
                                                                                 1))))
                                                                           (ok?$50$119
                                                                             (lambda-96
                                                                               (r$203)
                                                                               (if r$203
                                                                                 ((lambda-89
                                                                                    ()
                                                                                    (current-jiffy
                                                                                      (lambda-88
                                                                                        (r$205)
                                                                                        ((lambda-87
                                                                                           (j1$76$132)
                                                                                           (current-second
                                                                                             (lambda-86
                                                                                               (r$206)
                                                                                               ((lambda-85
                                                                                                  (t1$79$133)
                                                                                                  ((lambda-84
                                                                                                     (r$207)
                                                                                                     ((lambda-83
                                                                                                        (jifs$82$134)
                                                                                                        ((lambda-82
                                                                                                           (r$227)
                                                                                                           ((lambda-81
                                                                                                              (r$208)
                                                                                                              ((lambda-80
                                                                                                                 (secs$85$135)
                                                                                                                 ((lambda-79
                                                                                                                    (r$226)
                                                                                                                    (rounded$121
                                                                                                                      (lambda-78
                                                                                                                        (r$209)
                                                                                                                        ((lambda-77
                                                                                                                           (secs2$88$136)
                                                                                                                           ((lambda-76
                                                                                                                              ()
                                                                                                                              (display
                                                                                                                                (lambda-75
                                                                                                                                  (r$210)
                                                                                                                                  (write (lambda-74
                                                                                                                                           (r$211)
                                                                                                                                           (display
                                                                                                                                             (lambda-73
                                                                                                                                               (r$212)
                                                                                                                                               (write (lambda-72
                                                                                                                                                        (r$213)
                                                                                                                                                        (display
                                                                                                                                                          (lambda-71
                                                                                                                                                            (r$214)
                                                                                                                                                            (display
                                                                                                                                                              (lambda-70
                                                                                                                                                                (r$215)
                                                                                                                                                                (newline
                                                                                                                                                                  (lambda-69
                                                                                                                                                                    (r$216)
                                                                                                                                                                    (display
                                                                                                                                                                      (lambda-68
                                                                                                                                                                        (r$217)
                                                                                                                                                                        (this-scheme-implementation-name
                                                                                                                                                                          (lambda-67
                                                                                                                                                                            (r$225)
                                                                                                                                                                            (display
                                                                                                                                                                              (lambda-66
                                                                                                                                                                                (r$218)
                                                                                                                                                                                (display
                                                                                                                                                                                  (lambda-65
                                                                                                                                                                                    (r$219)
                                                                                                                                                                                    (display
                                                                                                                                                                                      (lambda-64
                                                                                                                                                                                        (r$220)
                                                                                                                                                                                        (display
                                                                                                                                                                                          (lambda-63
                                                                                                                                                                                            (r$221)
                                                                                                                                                                                            (display
                                                                                                                                                                                              (lambda-62
                                                                                                                                                                                                (r$222)
                                                                                                                                                                                                (newline
                                                                                                                                                                                                  (lambda-61
                                                                                                                                                                                                    (r$223)
                                                                                                                                                                                                    (current-output-port
                                                                                                                                                                                                      (lambda-60
                                                                                                                                                                                                        (r$224)
                                                                                                                                                                                                        (flush-output-port
                                                                                                                                                                                                          (lambda-59
                                                                                                                                                                                                            (r$204)
                                                                                                                                                                                                            (k$199 result$67$131))
                                                                                                                                                                                                          r$224))))))
                                                                                                                                                                                              secs$85$135))
                                                                                                                                                                                          ","))
                                                                                                                                                                                      name$47$116))
                                                                                                                                                                                  ","))
                                                                                                                                                                              r$225))))
                                                                                                                                                                      "+!CSVLINE!+"))))
                                                                                                                                                              name$47$116))
                                                                                                                                                          ") for "))
                                                                                                                                                      secs2$88$136))
                                                                                                                                             " seconds ("))
                                                                                                                                         secs$85$135))
                                                                                                                                "Elapsed time: "))))
                                                                                                                         r$209))
                                                                                                                      r$226))
                                                                                                                  (Cyc-fast-sub
                                                                                                                    t1$79$133
                                                                                                                    t0$57$125)))
                                                                                                               r$208))
                                                                                                            (inexact__inline__
                                                                                                              r$227)))
                                                                                                         (Cyc-fast-div
                                                                                                           jifs$82$134
                                                                                                           j/s$54$124)))
                                                                                                      r$207))
                                                                                                   (Cyc-fast-sub
                                                                                                     j1$76$132
                                                                                                     j0$60$126)))
                                                                                                r$206))))
                                                                                         r$205)))))
                                                                                 ((lambda-95
                                                                                    ()
                                                                                    (display
                                                                                      (lambda-94
                                                                                        (r$228)
                                                                                        (write (lambda-93
                                                                                                 (r$229)
                                                                                                 (newline
                                                                                                   (lambda-92
                                                                                                     (r$230)
                                                                                                     (current-output-port
                                                                                                       (lambda-91
                                                                                                         (r$232)
                                                                                                         (flush-output-port
                                                                                                           (lambda-90
                                                                                                             (r$231)
                                                                                                             (k$199 result$67$131))
                                                                                                           r$232))))))
                                                                                               result$67$131))
                                                                                      "ERROR: returned incorrect result: ")))))
                                                                             result$67$131)))
                                                                       (Cyc-fast-lt
                                                                         i$66$130
                                                                         count$48$117)))))
                                                                 #f))
                                                              0
                                                              #f))))
                                                        r$196))))
                                                 r$195))))
                                          r$194))))
                                   r$233))))))
                       name$47$116))
                   "Running "))
               (set! rounded$121 r$234)))
            (lambda-117-cont
              (k$235 x$51$123)
              ((lambda-116
                 (r$237)
                 ((lambda-115
                    (r$236)
                    (k$235 (Cyc-fast-div r$236 1000)))
                  (round__inline__ r$237)))
               (Cyc-fast-mul 1000 x$51$123)))))
         #f))
      #f)))
 (define this-scheme-implementation-name
   (lambda-122-cont
     (k$240)
     (Cyc-version
       (lambda-121
         (r$241)
         (k$240 (string-append "cyclone-" r$241))))))
 ((lambda-124
    ()
    ((lambda-123 (r$242) (main %halt)) 0))))
 */
/* 
"---------------- cps analysis db:"
 */
/* 
#((record-marker)
  #((record-marker)
    "<srfi-hash-table>"
    (size hash compare associate entries))
  #(299
    #[procedure]
    #[procedure]
    #[procedure]
    #(()
      ((1
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((2
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((3
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((4
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((5
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((6
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((7
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (r$142 lp$2$7$94 r$142) #f))))
      ((8
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((9
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((10
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((11
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((12
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((13
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((14
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((15
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((%halt .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(?
                  ?
                  #f
                  #f
                  #f
                  1
                  (123)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (inexact__inline__
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (82)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (16
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((17
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((18
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (r$153 lp$11$16$100 r$153) #f))))
      ((19
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((20
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((21
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((22
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((23
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((24
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((25
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (r$167) #f))))
      ((26
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((27
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (r$166) #t))))
      ((28
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((29
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((30
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((31
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((r$241 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  121
                  #f
                  #f
                  #f
                  1
                  (121)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$225 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  67
                  #f
                  #f
                  #f
                  1
                  (67)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$217 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  68
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$209 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  78
                  #f
                  #f
                  #f
                  1
                  (78)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (k$185 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  51
                  #f
                  #f
                  #f
                  1
                  (51)
                  #f
                  #f
                  1
                  0
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$161 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  41
                  #f
                  #f
                  #f
                  1
                  (23)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (32
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#t ? () #t)))
       (k$177 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  44
                  #f
                  #f
                  #f
                  1
                  (43)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (this-scheme-implementation-name
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             -1
             122
             #f
             #f
             2
             (-1 68)
             #f
             (#((record-marker)
                #((record-marker)
                  "<lambda-ast>"
                  (id args body has-cont))
                #(122
                  (k$240)
                  ((Cyc-version
                     #((record-marker)
                       #((record-marker)
                         "<lambda-ast>"
                         (id args body has-cont))
                       #(121
                         (r$241)
                         ((k$240 (string-append "cyclone-" r$241)))
                         #f))))
                  #t)))
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$145 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  5
                  #f
                  #f
                  #f
                  1
                  (3)
                  #f
                  (Cyc-fast-sub n$8$95 1)
                  0
                  1
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (l$14$98
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             20
             #f
             #f
             #f
             1
             (12)
             #f
             l$10$97
             0
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$153 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  13
                  #f
                  #f
                  #f
                  1
                  (13)
                  #f
                  #((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(18
                      (k$154 l$17$101 a$18$102)
                      ((#((record-marker)
                          #((record-marker)
                            "<lambda-ast>"
                            (id args body has-cont))
                          #(17
                            (r$155)
                            ((if r$155
                               (k$154 a$18$102)
                               (#((record-marker)
                                  #((record-marker)
                                    "<lambda-ast>"
                                    (id args body has-cont))
                                  #(16
                                    (r$156)
                                    ((#((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(15
                                          (r$158)
                                          ((#((record-marker)
                                              #((record-marker)
                                                "<lambda-ast>"
                                                (id args body has-cont))
                                              #(14
                                                (r$157)
                                                ((lp$11$16$100
                                                   k$154
                                                   r$156
                                                   r$157))
                                                #f))
                                            (cons r$158 a$18$102)))
                                          #f))
                                      (car l$17$101)))
                                    #f))
                                (cddr l$17$101))))
                            #f))
                        (null? l$17$101)))
                      #t))
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (s2$30$106
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             36
             #f
             #f
             #f
             1
             (29)
             #f
             r$162
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$169 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  24
                  #f
                  #f
                  #f
                  1
                  (24)
                  #f
                  (length result$41$110)
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (v$45$114
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             44
             #f
             #f
             #f
             1
             (44)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (rounded$122
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             118
             #f
             #t
             #f
             0
             ()
             #f
             #f
             0
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$233 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  109
                  #f
                  #f
                  #f
                  1
                  (109)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$193 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  108
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (i$66$130
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             98
             #f
             #f
             #f
             2
             (98 58)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$201 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  57
                  #f
                  #f
                  #f
                  1
                  (56)
                  #f
                  (Cyc-fast-plus i$66$130 1)
                  0
                  1
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f))))
      ((33
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((34
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((35
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#t ? () #t))))
      ((36
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((37
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#t ? () #t))))
      ((38
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((39
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((40
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((41
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((42
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((43
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((44
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (r$176) #f))))
      ((45
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((46
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (k$182) #f))))
      ((47
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((Cyc-version
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (122)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (48
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f)))
       (flush-output-port
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             3
             (91 60 109)
             #f
             #f
             3
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f))))
      ((49
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((50
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((51
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (r$184) #f))))
      ((52
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (r$175) #f))))
      ((53
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((54
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((55
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((56
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((57
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((58
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((59
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((60
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((61
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((62
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((63
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((64
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((65
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((66
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((67
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((68
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((69
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((70
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((71
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((72
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((73
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((74
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((75
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((76
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((77
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((78
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#t ? () #f))))
      ((79
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((80
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f)))
       (Cyc-fast-eq
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (7)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (current-jiffy
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (89 104)
             #f
             #f
             2
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f))))
      ((81
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#t ? () #f))))
      ((82
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((83
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((84
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#t ? () #f))))
      ((85
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((86
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#t ? () #f))))
      ((87
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((88
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#t ? () #f))))
      ((89
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((90
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((91
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((92
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((93
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((94
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((95
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((r$242 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  123
                  #f
                  #t
                  0
                  0
                  ()
                  #f
                  0
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (x$51$123
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             117
             #f
             #f
             #f
             1
             (117)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$218 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  66
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$210 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  75
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$226 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  79
                  #f
                  #f
                  #f
                  1
                  (79)
                  #f
                  (Cyc-fast-sub t1$79$133 t0$57$125)
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (96
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f)))
       (k$154 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  18
                  #f
                  #f
                  #f
                  2
                  (14 17)
                  #f
                  #f
                  1
                  1
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$170 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  27
                  #f
                  #f
                  #f
                  1
                  (27)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (n$1$91
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             11
             #f
             #f
             #f
             1
             (10)
             #f
             #f
             0
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$146 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  3
                  #f
                  #f
                  #f
                  1
                  (3)
                  #f
                  (cons r$147 a$9$96)
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (a$15$99
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             20
             #f
             #f
             #f
             1
             (12)
             #f
             r$151
             0
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$162 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  37
                  #f
                  #f
                  #f
                  1
                  (37)
                  #f
                  (number->string count$21$103)
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (s1$33$107
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             34
             #f
             #f
             #f
             1
             (29)
             #f
             r$163
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (i$46$115
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             44
             #f
             #f
             #f
             1
             (44)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$178 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  43
                  #f
                  #f
                  #f
                  1
                  (43)
                  #f
                  (vector-ref v$45$114 i$46$115)
                  1
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$234 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  114
                  #f
                  #f
                  #f
                  1
                  (114)
                  #f
                  #((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(117
                      (k$235 x$51$123)
                      ((#((record-marker)
                          #((record-marker)
                            "<lambda-ast>"
                            (id args body has-cont))
                          #(116
                            (r$237)
                            ((#((record-marker)
                                #((record-marker)
                                  "<lambda-ast>"
                                  (id args body has-cont))
                                #(115
                                  (r$236)
                                  ((k$235 (Cyc-fast-div r$236 1000)))
                                  #f))
                              (round__inline__ r$237)))
                            #f))
                        (Cyc-fast-mul 1000 x$51$123)))
                      #t))
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$194 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  107
                  #f
                  #f
                  #f
                  1
                  (107)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (result$67$131
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             98
             #f
             #f
             #f
             4
             (97 94 90 59)
             #f
             #f
             0
             4
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$202 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  56
                  #f
                  #f
                  #f
                  1
                  (56)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f))))
      ((97
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((98
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (r$198 loop$65$129 r$198) #f))))
      ((99
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((100
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((101
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((102
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((103
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#t ? () #t))))
      ((104
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((105
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#t ? () #t))))
      ((106
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((107
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#t ? () #t))))
      ((108
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((109
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((110
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((111
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((112
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((113
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((114
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((115
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((116
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((117
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (r$234 rounded$121 r$234) #f))))
      ((118
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((119
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((120
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((121
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((122
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((123
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((124
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((Cyc-fast-plus
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (58)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((r$219 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  65
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$211 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  74
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$227 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  82
                  #f
                  #f
                  #f
                  1
                  (82)
                  #f
                  (Cyc-fast-div jifs$82$134 j/s$54$124)
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (k$139 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  11
                  #f
                  #f
                  #f
                  1
                  (1)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$179 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  52
                  #f
                  #f
                  #f
                  1
                  (46)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$235 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  117
                  #f
                  #f
                  #f
                  1
                  (115)
                  #f
                  #f
                  1
                  0
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (n$5$92
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             9
             #f
             #f
             #f
             1
             (1)
             #f
             n$1$91
             0
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$147 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  4
                  #f
                  #f
                  #f
                  1
                  (4)
                  #f
                  '()
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (lp$11$16$100
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             19
             #f
             #f
             #f
             3
             (14 13 12)
             #f
             r$153
             2
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$155 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  17
                  #f
                  #f
                  #f
                  1
                  (17)
                  #f
                  (null? l$17$101)
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$163 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  35
                  #f
                  #f
                  #f
                  1
                  (35)
                  #f
                  (number->string input1$24$104)
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$171 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  33
                  #f
                  #f
                  #f
                  1
                  (33)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (ll$36$108
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             31
             #f
             #f
             #f
             1
             (27)
             #f
             r$164
             0
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (name$47$116
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             120
             #f
             #f
             #f
             3
             (112 71 65)
             #f
             #f
             0
             3
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (j/s$54$124
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             106
             #f
             #f
             #f
             1
             (83)
             #f
             r$194
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$195 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  105
                  #f
                  #f
                  #f
                  1
                  (105)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$203 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  96
                  #f
                  #f
                  #f
                  1
                  (96)
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (j1$76$132
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             87
             #f
             #f
             #f
             1
             (85)
             #f
             r$205
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((vector
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (50)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((round__inline__
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (116)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (create-n
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             -1
             11
             #f
             #f
             2
             (33 -1)
             #f
             (#((record-marker)
                #((record-marker)
                  "<lambda-ast>"
                  (id args body has-cont))
                #(11
                  (k$139 n$1$91)
                  ((#((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(10
                        (r$140)
                        ((#((record-marker)
                            #((record-marker)
                              "<lambda-ast>"
                              (id args body has-cont))
                            #(9
                              (n$5$92 a$6$93)
                              ((#((record-marker)
                                  #((record-marker)
                                    "<lambda-ast>"
                                    (id args body has-cont))
                                  #(8
                                    (lp$2$7$94)
                                    ((#((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(2
                                          (r$142)
                                          ((#((record-marker)
                                              #((record-marker)
                                                "<lambda-ast>"
                                                (id args body has-cont))
                                              #(1
                                                (r$141)
                                                ((lp$2$7$94
                                                   k$139
                                                   n$5$92
                                                   a$6$93))
                                                #f))
                                            (set! lp$2$7$94 r$142)))
                                          #f))
                                      #((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(7
                                          (k$143 n$8$95 a$9$96)
                                          ((#((record-marker)
                                              #((record-marker)
                                                "<lambda-ast>"
                                                (id args body has-cont))
                                              #(6
                                                (r$144)
                                                ((if r$144
                                                   (k$143 a$9$96)
                                                   (#((record-marker)
                                                      #((record-marker)
                                                        "<lambda-ast>"
                                                        (id args body has-cont))
                                                      #(5
                                                        (r$145)
                                                        ((#((record-marker)
                                                            #((record-marker)
                                                              "<lambda-ast>"
                                                              (id args
                                                                  body
                                                                  has-cont))
                                                            #(4
                                                              (r$147)
                                                              ((#((record-marker)
                                                                  #((record-marker)
                                                                    "<lambda-ast>"
                                                                    (id args
                                                                        body
                                                                        has-cont))
                                                                  #(3
                                                                    (r$146)
                                                                    ((lp$2$7$94
                                                                       k$143
                                                                       r$145
                                                                       r$146))
                                                                    #f))
                                                                (cons r$147
                                                                      a$9$96)))
                                                              #f))
                                                          '()))
                                                        #f))
                                                    (Cyc-fast-sub n$8$95 1))))
                                                #f))
                                            (Cyc-fast-eq n$8$95 0)))
                                          #t))))
                                    #f))
                                #f))
                              #f))
                          n$1$91
                          r$140))
                        #f))
                    '()))
                  #t)))
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (Cyc-fast-sub
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             3
             (85 80 6)
             #f
             #f
             3
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (Cyc-fast-lt
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (98 48)
             #f
             #f
             2
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((r$236 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  115
                  #f
                  #f
                  #f
                  1
                  (115)
                  #f
                  (round__inline__ r$237)
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$228 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  94
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$204 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  59
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$220 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  64
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$212 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  73
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (k$188 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  120
                  #f
                  #f
                  #f
                  1
                  (54)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (r$140 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  10
                  #f
                  #f
                  #f
                  1
                  (10)
                  #f
                  '()
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (a$6$93
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             9
             #f
             #f
             #f
             1
             (1)
             #f
             r$140
             0
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (l$17$101
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             18
             #f
             #f
             #f
             3
             (18 17 16)
             #f
             #f
             0
             3
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$156 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  16
                  #f
                  #f
                  #f
                  1
                  (14)
                  #f
                  (cddr l$17$101)
                  0
                  1
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$164 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  32
                  #f
                  #f
                  #f
                  1
                  (32)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (name$39$109
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             30
             #f
             #f
             #f
             1
             (29)
             #f
             "diviter"
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$180 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  49
                  #f
                  #f
                  #f
                  1
                  (46)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (count$48$117
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             120
             #f
             #f
             #f
             1
             (98)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (t0$57$125
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             104
             #f
             #f
             #f
             1
             (80)
             #f
             r$195
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$196 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  103
                  #f
                  #f
                  #f
                  1
                  (103)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (t1$79$133
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             85
             #f
             #f
             #f
             1
             (80)
             #f
             r$206
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((equal?
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (24)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (number->string
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (38 36)
             #f
             #f
             2
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((Cyc-fast-mul
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (117)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (iterative-div2
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             -1
             22
             #f
             #f
             2
             (27 -1)
             #f
             (#((record-marker)
                #((record-marker)
                  "<lambda-ast>"
                  (id args body has-cont))
                #(22
                  (k$150 l$10$97)
                  ((#((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(21
                        (r$151)
                        ((#((record-marker)
                            #((record-marker)
                              "<lambda-ast>"
                              (id args body has-cont))
                            #(20
                              (l$14$98 a$15$99)
                              ((#((record-marker)
                                  #((record-marker)
                                    "<lambda-ast>"
                                    (id args body has-cont))
                                  #(19
                                    (lp$11$16$100)
                                    ((#((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(13
                                          (r$153)
                                          ((#((record-marker)
                                              #((record-marker)
                                                "<lambda-ast>"
                                                (id args body has-cont))
                                              #(12
                                                (r$152)
                                                ((lp$11$16$100
                                                   k$150
                                                   l$14$98
                                                   a$15$99))
                                                #f))
                                            (set! lp$11$16$100 r$153)))
                                          #f))
                                      #((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(18
                                          (k$154 l$17$101 a$18$102)
                                          ((#((record-marker)
                                              #((record-marker)
                                                "<lambda-ast>"
                                                (id args body has-cont))
                                              #(17
                                                (r$155)
                                                ((if r$155
                                                   (k$154 a$18$102)
                                                   (#((record-marker)
                                                      #((record-marker)
                                                        "<lambda-ast>"
                                                        (id args body has-cont))
                                                      #(16
                                                        (r$156)
                                                        ((#((record-marker)
                                                            #((record-marker)
                                                              "<lambda-ast>"
                                                              (id args
                                                                  body
                                                                  has-cont))
                                                            #(15
                                                              (r$158)
                                                              ((#((record-marker)
                                                                  #((record-marker)
                                                                    "<lambda-ast>"
                                                                    (id args
                                                                        body
                                                                        has-cont))
                                                                  #(14
                                                                    (r$157)
                                                                    ((lp$11$16$100
                                                                       k$154
                                                                       r$156
                                                                       r$157))
                                                                    #f))
                                                                (cons r$158
                                                                      a$18$102)))
                                                              #f))
                                                          (car l$17$101)))
                                                        #f))
                                                    (cddr l$17$101))))
                                                #f))
                                            (null? l$17$101)))
                                          #t))))
                                    #f))
                                #f))
                              #f))
                          l$10$97
                          r$151))
                        #f))
                    '()))
                  #t)))
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((r$237 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  116
                  #f
                  #f
                  #f
                  1
                  (116)
                  #f
                  (Cyc-fast-mul 1000 x$51$123)
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$229 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  93
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$221 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  63
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$213 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  72
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (jifs$82$134
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             83
             #f
             #f
             #f
             1
             (83)
             #f
             r$207
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (lp$2$7$94
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             8
             #f
             #f
             #f
             3
             (3 2 1)
             #f
             r$142
             2
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$141 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  1
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  (set! lp$2$7$94 r$142)
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (a$18$102
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             18
             #f
             #f
             #f
             2
             (15 17)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$157 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  14
                  #f
                  #f
                  #f
                  1
                  (14)
                  #f
                  (cons r$158 a$18$102)
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$165 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  28
                  #f
                  #f
                  #f
                  1
                  (23)
                  #f
                  (string-append
                    name$39$109
                    ":"
                    s1$33$107
                    ":"
                    s2$30$106)
                  0
                  1
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (result$41$110
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             25
             #f
             #f
             #f
             1
             (25)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$181 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  46
                  #f
                  #f
                  #f
                  1
                  (46)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (thunk$49$118
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             120
             #f
             #f
             #f
             1
             (57)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$189 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  113
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  (set! rounded$121 r$234)
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (j0$60$126
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             102
             #f
             #f
             #f
             1
             (85)
             #f
             r$196
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$197 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  54
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  (set! loop$65$129 r$198)
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$205 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  88
                  #f
                  #f
                  #f
                  1
                  (88)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((cons .
             #((record-marker)
               #((record-marker)
                 "<analysis-db-variable>"
                 (global
                   defined-by
                   defines-lambda-id
                   const
                   const-value
                   ref-count
                   ref-by
                   reassigned
                   assigned-value
                   app-fnc-count
                   app-arg-count
                   inlinable
                   mutated-indirectly
                   cont
                   def-in-loop
                   ref-in-loop
                   direct-rec-call
                   self-rec-call))
               #(?
                 ?
                 #f
                 #f
                 #f
                 2
                 (15 4)
                 #f
                 #f
                 2
                 0
                 #t
                 #f
                 #f
                 #f
                 #f
                 #f
                 #f)))
       (car .
            #((record-marker)
              #((record-marker)
                "<analysis-db-variable>"
                (global
                  defined-by
                  defines-lambda-id
                  const
                  const-value
                  ref-count
                  ref-by
                  reassigned
                  assigned-value
                  app-fnc-count
                  app-arg-count
                  inlinable
                  mutated-indirectly
                  cont
                  def-in-loop
                  ref-in-loop
                  direct-rec-call
                  self-rec-call))
              #(?
                ?
                #f
                #f
                #f
                1
                (16)
                #f
                #f
                1
                0
                #t
                #f
                #f
                #f
                #f
                #f
                #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((Cyc-fast-div
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (115 83)
             #f
             #f
             2
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (hide .
             #((record-marker)
               #((record-marker)
                 "<analysis-db-variable>"
                 (global
                   defined-by
                   defines-lambda-id
                   const
                   const-value
                   ref-count
                   ref-by
                   reassigned
                   assigned-value
                   app-fnc-count
                   app-arg-count
                   inlinable
                   mutated-indirectly
                   cont
                   def-in-loop
                   ref-in-loop
                   direct-rec-call
                   self-rec-call))
               #(?
                 -1
                 53
                 #f
                 #f
                 2
                 (-1 34)
                 #f
                 (#((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(53
                      (k$174 r$42$111 x$43$112)
                      ((#((record-marker)
                          #((record-marker)
                            "<lambda-ast>"
                            (id args body has-cont))
                          #(45
                            (r$175)
                            ((#((record-marker)
                                #((record-marker)
                                  "<lambda-ast>"
                                  (id args body has-cont))
                                #(42
                                  (r$176)
                                  ((call-with-values k$174 r$175 r$176))
                                  #f))
                              #((record-marker)
                                #((record-marker)
                                  "<lambda-ast>"
                                  (id args body has-cont))
                                #(44
                                  (k$177 v$45$114 i$46$115)
                                  ((#((record-marker)
                                      #((record-marker)
                                        "<lambda-ast>"
                                        (id args body has-cont))
                                      #(43 (r$178) ((r$178 k$177 x$43$112)) #f))
                                    (vector-ref v$45$114 i$46$115)))
                                  #t))))
                            #f))
                        #((record-marker)
                          #((record-marker)
                            "<lambda-ast>"
                            (id args body has-cont))
                          #(52
                            (k$179)
                            ((#((record-marker)
                                #((record-marker)
                                  "<lambda-ast>"
                                  (id args body has-cont))
                                #(50
                                  (r$184)
                                  ((vector
                                     #((record-marker)
                                       #((record-marker)
                                         "<lambda-ast>"
                                         (id args body has-cont))
                                       #(49
                                         (r$180)
                                         ((#((record-marker)
                                             #((record-marker)
                                               "<lambda-ast>"
                                               (id args body has-cont))
                                             #(48
                                               (k$182)
                                               ((#((record-marker)
                                                   #((record-marker)
                                                     "<lambda-ast>"
                                                     (id args body has-cont))
                                                   #(47
                                                     (r$183)
                                                     ((if r$183
                                                        (k$182 0)
                                                        (k$182 1)))
                                                     #f))
                                                 (Cyc-fast-lt r$42$111 100)))
                                               #t))
                                           #((record-marker)
                                             #((record-marker)
                                               "<lambda-ast>"
                                               (id args body has-cont))
                                             #(46
                                               (r$181)
                                               ((values k$179 r$180 r$181))
                                               #f))))
                                         #f))
                                     values
                                     r$184))
                                  #f))
                              #((record-marker)
                                #((record-marker)
                                  "<lambda-ast>"
                                  (id args body has-cont))
                                #(51 (k$185 x$44$113) ((k$185 x$44$113)) #t))))
                            #t))))
                      #t)))
                 1
                 0
                 #f
                 #f
                 #f
                 #f
                 #f
                 #f
                 #f)))
       (jiffies-per-second
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (108)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((r$230 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  92
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$222 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  62
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$214 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  71
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (secs$85$135
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             80
             #f
             #f
             #f
             2
             (75 63)
             #f
             r$208
             0
             2
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (k$150 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  22
                  #f
                  #f
                  #f
                  1
                  (12)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$174 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  53
                  #f
                  #f
                  #f
                  1
                  (42)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$182 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  48
                  #f
                  #f
                  #f
                  2
                  (47 47)
                  #f
                  #((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(46 (r$181) ((values k$179 r$180 r$181)) #f))
                  2
                  0
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (r$142 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  2
                  #f
                  #f
                  #f
                  1
                  (2)
                  #f
                  #((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(7
                      (k$143 n$8$95 a$9$96)
                      ((#((record-marker)
                          #((record-marker)
                            "<lambda-ast>"
                            (id args body has-cont))
                          #(6
                            (r$144)
                            ((if r$144
                               (k$143 a$9$96)
                               (#((record-marker)
                                  #((record-marker)
                                    "<lambda-ast>"
                                    (id args body has-cont))
                                  #(5
                                    (r$145)
                                    ((#((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(4
                                          (r$147)
                                          ((#((record-marker)
                                              #((record-marker)
                                                "<lambda-ast>"
                                                (id args body has-cont))
                                              #(3
                                                (r$146)
                                                ((lp$2$7$94 k$143 r$145 r$146))
                                                #f))
                                            (cons r$147 a$9$96)))
                                          #f))
                                      '()))
                                    #f))
                                (Cyc-fast-sub n$8$95 1))))
                            #f))
                        (Cyc-fast-eq n$8$95 0)))
                      #t))
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (n$8$95
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             7
             #f
             #f
             #f
             2
             (7 6)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$158 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  15
                  #f
                  #f
                  #f
                  1
                  (15)
                  #f
                  (car l$17$101)
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (count$21$103
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             40
             #f
             #t
             1000000
             3
             (38 34 23)
             #f
             1000000
             0
             3
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$166 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  26
                  #f
                  #f
                  #f
                  1
                  (23)
                  #f
                  #((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(27
                      (k$170)
                      ((iterative-div2 k$170 ll$36$108))
                      #t))
                  0
                  1
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$42$111
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             53
             #f
             #f
             #f
             1
             (48)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (ok?$50$119
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             120
             #f
             #f
             #f
             1
             (97)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$190 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  112
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (i$63$127
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             100
             #f
             #t
             0
             1
             (54)
             #f
             0
             0
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$198 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  55
                  #f
                  #f
                  #f
                  1
                  (55)
                  #f
                  #((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(98
                      (k$199 i$66$130 result$67$131)
                      ((#((record-marker)
                          #((record-marker)
                            "<lambda-ast>"
                            (id args body has-cont))
                          #(97
                            (r$200)
                            ((if r$200
                               (#((record-marker)
                                  #((record-marker)
                                    "<lambda-ast>"
                                    (id args body has-cont))
                                  #(58
                                    ()
                                    ((#((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(57
                                          (r$201)
                                          ((thunk$49$118
                                             #((record-marker)
                                               #((record-marker)
                                                 "<lambda-ast>"
                                                 (id args body has-cont))
                                               #(56
                                                 (r$202)
                                                 ((loop$65$129
                                                    k$199
                                                    r$201
                                                    r$202))
                                                 #f))))
                                          #f))
                                      (Cyc-fast-plus i$66$130 1)))
                                    #f)))
                               (ok?$50$119
                                 #((record-marker)
                                   #((record-marker)
                                     "<lambda-ast>"
                                     (id args body has-cont))
                                   #(96
                                     (r$203)
                                     ((if r$203
                                        (#((record-marker)
                                           #((record-marker)
                                             "<lambda-ast>"
                                             (id args body has-cont))
                                           #(89
                                             ()
                                             ((current-jiffy
                                                #((record-marker)
                                                  #((record-marker)
                                                    "<lambda-ast>"
                                                    (id args body has-cont))
                                                  #(88
                                                    (r$205)
                                                    ((#((record-marker)
                                                        #((record-marker)
                                                          "<lambda-ast>"
                                                          (id args
                                                              body
                                                              has-cont))
                                                        #(87
                                                          (j1$76$132)
                                                          ((current-second
                                                             #((record-marker)
                                                               #((record-marker)
                                                                 "<lambda-ast>"
                                                                 (id args
                                                                     body
                                                                     has-cont))
                                                               #(86
                                                                 (r$206)
                                                                 ((#((record-marker)
                                                                     #((record-marker)
                                                                       "<lambda-ast>"
                                                                       (id args
                                                                           body
                                                                           has-cont))
                                                                     #(85
                                                                       (t1$79$133)
                                                                       ((#((record-marker)
                                                                           #((record-marker)
                                                                             "<lambda-ast>"
                                                                             (id args
                                                                                 body
                                                                                 has-cont))
                                                                           #(84
                                                                             (r$207)
                                                                             ((#((record-marker)
                                                                                 #((record-marker)
                                                                                   "<lambda-ast>"
                                                                                   (id args
                                                                                       body
                                                                                       has-cont))
                                                                                 #(83
                                                                                   (jifs$82$134)
                                                                                   ((#((record-marker)
                                                                                       #((record-marker)
                                                                                         "<lambda-ast>"
                                                                                         (id args
                                                                                             body
                                                                                             has-cont))
                                                                                       #(82
                                                                                         (r$227)
                                                                                         ((#((record-marker)
                                                                                             #((record-marker)
                                                                                               "<lambda-ast>"
                                                                                               (id args
                                                                                                   body
                                                                                                   has-cont))
                                                                                             #(81
                                                                                               (r$208)
                                                                                               ((#((record-marker)
                                                                                                   #((record-marker)
                                                                                                     "<lambda-ast>"
                                                                                                     (id args
                                                                                                         body
                                                                                                         has-cont))
                                                                                                   #(80
                                                                                                     (secs$85$135)
                                                                                                     ((#((record-marker)
                                                                                                         #((record-marker)
                                                                                                           "<lambda-ast>"
                                                                                                           (id args
                                                                                                               body
                                                                                                               has-cont))
                                                                                                         #(79
                                                                                                           (r$226)
                                                                                                           ((rounded$121
                                                                                                              #((record-marker)
                                                                                                                #((record-marker)
                                                                                                                  "<lambda-ast>"
                                                                                                                  (id args
                                                                                                                      body
                                                                                                                      has-cont))
                                                                                                                #(78
                                                                                                                  (r$209)
                                                                                                                  ((#((record-marker)
                                                                                                                      #((record-marker)
                                                                                                                        "<lambda-ast>"
                                                                                                                        (id args
                                                                                                                            body
                                                                                                                            has-cont))
                                                                                                                      #(77
                                                                                                                        (secs2$88$136)
                                                                                                                        ((#((record-marker)
                                                                                                                            #((record-marker)
                                                                                                                              "<lambda-ast>"
                                                                                                                              (id args
                                                                                                                                  body
                                                                                                                                  has-cont))
                                                                                                                            #(76
                                                                                                                              ()
                                                                                                                              ((display
                                                                                                                                 #((record-marker)
                                                                                                                                   #((record-marker)
                                                                                                                                     "<lambda-ast>"
                                                                                                                                     (id args
                                                                                                                                         body
                                                                                                                                         has-cont))
                                                                                                                                   #(75
                                                                                                                                     (r$210)
                                                                                                                                     ((write #((record-marker)
                                                                                                                                               #((record-marker)
                                                                                                                                                 "<lambda-ast>"
                                                                                                                                                 (id args
                                                                                                                                                     body
                                                                                                                                                     has-cont))
                                                                                                                                               #(74
                                                                                                                                                 (r$211)
                                                                                                                                                 ((display
                                                                                                                                                    #((record-marker)
                                                                                                                                                      #((record-marker)
                                                                                                                                                        "<lambda-ast>"
                                                                                                                                                        (id args
                                                                                                                                                            body
                                                                                                                                                            has-cont))
                                                                                                                                                      #(73
                                                                                                                                                        (r$212)
                                                                                                                                                        ((write #((record-marker)
                                                                                                                                                                  #((record-marker)
                                                                                                                                                                    "<lambda-ast>"
                                                                                                                                                                    (id args
                                                                                                                                                                        body
                                                                                                                                                                        has-cont))
                                                                                                                                                                  #(72
                                                                                                                                                                    (r$213)
                                                                                                                                                                    ((display
                                                                                                                                                                       #((record-marker)
                                                                                                                                                                         #((record-marker)
                                                                                                                                                                           "<lambda-ast>"
                                                                                                                                                                           (id args
                                                                                                                                                                               body
                                                                                                                                                                               has-cont))
                                                                                                                                                                         #(71
                                                                                                                                                                           (r$214)
                                                                                                                                                                           ((display
                                                                                                                                                                              #((record-marker)
                                                                                                                                                                                #((record-marker)
                                                                                                                                                                                  "<lambda-ast>"
                                                                                                                                                                                  (id args
                                                                                                                                                                                      body
                                                                                                                                                                                      has-cont))
                                                                                                                                                                                #(70
                                                                                                                                                                                  (r$215)
                                                                                                                                                                                  ((newline
                                                                                                                                                                                     #((record-marker)
                                                                                                                                                                                       #((record-marker)
                                                                                                                                                                                         "<lambda-ast>"
                                                                                                                                                                                         (id args
                                                                                                                                                                                             body
                                                                                                                                                                                             has-cont))
                                                                                                                                                                                       #(69
                                                                                                                                                                                         (r$216)
                                                                                                                                                                                         ((display
                                                                                                                                                                                            #((record-marker)
                                                                                                                                                                                              #((record-marker)
                                                                                                                                                                                                "<lambda-ast>"
                                                                                                                                                                                                (id args
                                                                                                                                                                                                    body
                                                                                                                                                                                                    has-cont))
                                                                                                                                                                                              #(68
                                                                                                                                                                                                (r$217)
                                                                                                                                                                                                ((this-scheme-implementation-name
                                                                                                                                                                                                   #((record-marker)
                                                                                                                                                                                                     #((record-marker)
                                                                                                                                                                                                       "<lambda-ast>"
                                                                                                                                                                                                       (id args
                                                                                                                                                                                                           body
                                                                                                                                                                                                           has-cont))
                                                                                                                                                                                                     #(67
                                                                                                                                                                                                       (r$225)
                                                                                                                                                                                                       ((display
                                                                                                                                                                                                          #((record-marker)
                                                                                                                                                                                                            #((record-marker)
                                                                                                                                                                                                              "<lambda-ast>"
                                                                                                                                                                                                              (id args
                                                                                                                                                                                                                  body
                                                                                                                                                                                                                  has-cont))
                                                                                                                                                                                                            #(66
                                                                                                                                                                                                              (r$218)
                                                                                                                                                                                                              ((display
                                                                                                                                                                                                                 #((record-marker)
                                                                                                                                                                                                                   #((record-marker)
                                                                                                                                                                                                                     "<lambda-ast>"
                                                                                                                                                                                                                     (id args
                                                                                                                                                                                                                         body
                                                                                                                                                                                                                         has-cont))
                                                                                                                                                                                                                   #(65
                                                                                                                                                                                                                     (r$219)
                                                                                                                                                                                                                     ((display
                                                                                                                                                                                                                        #((record-marker)
                                                                                                                                                                                                                          #((record-marker)
                                                                                                                                                                                                                            "<lambda-ast>"
                                                                                                                                                                                                                            (id args
                                                                                                                                                                                                                                body
                                                                                                                                                                                                                                has-cont))
                                                                                                                                                                                                                          #(64
                                                                                                                                                                                                                            (r$220)
                                                                                                                                                                                                                            ((display
                                                                                                                                                                                                                               #((record-marker)
                                                                                                                                                                                                                                 #((record-marker)
                                                                                                                                                                                                                                   "<lambda-ast>"
                                                                                                                                                                                                                                   (id args
                                                                                                                                                                                                                                       body
                                                                                                                                                                                                                                       has-cont))
                                                                                                                                                                                                                                 #(63
                                                                                                                                                                                                                                   (r$221)
                                                                                                                                                                                                                                   ((display
                                                                                                                                                                                                                                      #((record-marker)
                                                                                                                                                                                                                                        #((record-marker)
                                                                                                                                                                                                                                          "<lambda-ast>"
                                                                                                                                                                                                                                          (id args
                                                                                                                                                                                                                                              body
                                                                                                                                                                                                                                              has-cont))
                                                                                                                                                                                                                                        #(62
                                                                                                                                                                                                                                          (r$222)
                                                                                                                                                                                                                                          ((newline
                                                                                                                                                                                                                                             #((record-marker)
                                                                                                                                                                                                                                               #((record-marker)
                                                                                                                                                                                                                                                 "<lambda-ast>"
                                                                                                                                                                                                                                                 (id args
                                                                                                                                                                                                                                                     body
                                                                                                                                                                                                                                                     has-cont))
                                                                                                                                                                                                                                               #(61
                                                                                                                                                                                                                                                 (r$223)
                                                                                                                                                                                                                                                 ((current-output-port
                                                                                                                                                                                                                                                    #((record-marker)
                                                                                                                                                                                                                                                      #((record-marker)
                                                                                                                                                                                                                                                        "<lambda-ast>"
                                                                                                                                                                                                                                                        (id args
                                                                                                                                                                                                                                                            body
                                                                                                                                                                                                                                                            has-cont))
                                                                                                                                                                                                                                                      #(60
                                                                                                                                                                                                                                                        (r$224)
                                                                                                                                                                                                                                                        ((flush-output-port
                                                                                                                                                                                                                                                           #((record-marker)
                                                                                                                                                                                                                                                             #((record-marker)
                                                                                                                                                                                                                                                               "<lambda-ast>"
                                                                                                                                                                                                                                                               (id args
                                                                                                                                                                                                                                                                   body
                                                                                                                                                                                                                                                                   has-cont))
                                                                                                                                                                                                                                                             #(59
                                                                                                                                                                                                                                                               (r$204)
                                                                                                                                                                                                                                                               ((k$199 result$67$131))
                                                                                                                                                                                                                                                               #f))
                                                                                                                                                                                                                                                           r$224))
                                                                                                                                                                                                                                                        #f))))
                                                                                                                                                                                                                                                 #f))))
                                                                                                                                                                                                                                          #f))
                                                                                                                                                                                                                                      secs$85$135))
                                                                                                                                                                                                                                   #f))
                                                                                                                                                                                                                               ","))
                                                                                                                                                                                                                            #f))
                                                                                                                                                                                                                        name$47$116))
                                                                                                                                                                                                                     #f))
                                                                                                                                                                                                                 ","))
                                                                                                                                                                                                              #f))
                                                                                                                                                                                                          r$225))
                                                                                                                                                                                                       #f))))
                                                                                                                                                                                                #f))
                                                                                                                                                                                            "+!CSVLINE!+"))
                                                                                                                                                                                         #f))))
                                                                                                                                                                                  #f))
                                                                                                                                                                              name$47$116))
                                                                                                                                                                           #f))
                                                                                                                                                                       ") for "))
                                                                                                                                                                    #f))
                                                                                                                                                                secs2$88$136))
                                                                                                                                                        #f))
                                                                                                                                                    " seconds ("))
                                                                                                                                                 #f))
                                                                                                                                             secs$85$135))
                                                                                                                                     #f))
                                                                                                                                 "Elapsed time: "))
                                                                                                                              #f))))
                                                                                                                        #f))
                                                                                                                    r$209))
                                                                                                                  #f))
                                                                                                              r$226))
                                                                                                           #f))
                                                                                                       (Cyc-fast-sub
                                                                                                         t1$79$133
                                                                                                         t0$57$125)))
                                                                                                     #f))
                                                                                                 r$208))
                                                                                               #f))
                                                                                           (inexact__inline__
                                                                                             r$227)))
                                                                                         #f))
                                                                                     (Cyc-fast-div
                                                                                       jifs$82$134
                                                                                       j/s$54$124)))
                                                                                   #f))
                                                                               r$207))
                                                                             #f))
                                                                         (Cyc-fast-sub
                                                                           j1$76$132
                                                                           j0$60$126)))
                                                                       #f))
                                                                   r$206))
                                                                 #f))))
                                                          #f))
                                                      r$205))
                                                    #f))))
                                             #f)))
                                        (#((record-marker)
                                           #((record-marker)
                                             "<lambda-ast>"
                                             (id args body has-cont))
                                           #(95
                                             ()
                                             ((display
                                                #((record-marker)
                                                  #((record-marker)
                                                    "<lambda-ast>"
                                                    (id args body has-cont))
                                                  #(94
                                                    (r$228)
                                                    ((write #((record-marker)
                                                              #((record-marker)
                                                                "<lambda-ast>"
                                                                (id args
                                                                    body
                                                                    has-cont))
                                                              #(93
                                                                (r$229)
                                                                ((newline
                                                                   #((record-marker)
                                                                     #((record-marker)
                                                                       "<lambda-ast>"
                                                                       (id args
                                                                           body
                                                                           has-cont))
                                                                     #(92
                                                                       (r$230)
                                                                       ((current-output-port
                                                                          #((record-marker)
                                                                            #((record-marker)
                                                                              "<lambda-ast>"
                                                                              (id args
                                                                                  body
                                                                                  has-cont))
                                                                            #(91
                                                                              (r$232)
                                                                              ((flush-output-port
                                                                                 #((record-marker)
                                                                                   #((record-marker)
                                                                                     "<lambda-ast>"
                                                                                     (id args
                                                                                         body
                                                                                         has-cont))
                                                                                   #(90
                                                                                     (r$231)
                                                                                     ((k$199 result$67$131))
                                                                                     #f))
                                                                                 r$232))
                                                                              #f))))
                                                                       #f))))
                                                                #f))
                                                            result$67$131))
                                                    #f))
                                                "ERROR: returned incorrect result: "))
                                             #f)))))
                                     #f))
                                 result$67$131)))
                            #f))
                        (Cyc-fast-lt i$66$130 count$48$117)))
                      #t))
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$206 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  86
                  #f
                  #f
                  #f
                  1
                  (86)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((write .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(?
                  ?
                  #f
                  #f
                  #f
                  3
                  (94 73 75)
                  #f
                  #f
                  3
                  0
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (call-with-values
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (42)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (newline
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             4
             (93 62 70 111)
             #f
             #f
             4
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (current-output-port
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             3
             (92 61 110)
             #f
             #f
             3
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((main .
             #((record-marker)
               #((record-marker)
                 "<analysis-db-variable>"
                 (global
                   defined-by
                   defines-lambda-id
                   const
                   const-value
                   ref-count
                   ref-by
                   reassigned
                   assigned-value
                   app-fnc-count
                   app-arg-count
                   inlinable
                   mutated-indirectly
                   cont
                   def-in-loop
                   ref-in-loop
                   direct-rec-call
                   self-rec-call))
               #(?
                 -1
                 41
                 #f
                 #f
                 2
                 (123 -1)
                 #f
                 (#((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(41
                      (k$161)
                      ((#((record-marker)
                          #((record-marker)
                            "<lambda-ast>"
                            (id args body has-cont))
                          #(40
                            (count$21$103)
                            ((#((record-marker)
                                #((record-marker)
                                  "<lambda-ast>"
                                  (id args body has-cont))
                                #(39
                                  (input1$24$104)
                                  ((#((record-marker)
                                      #((record-marker)
                                        "<lambda-ast>"
                                        (id args body has-cont))
                                      #(38
                                        (output$27$105)
                                        ((#((record-marker)
                                            #((record-marker)
                                              "<lambda-ast>"
                                              (id args body has-cont))
                                            #(37
                                              (r$162)
                                              ((#((record-marker)
                                                  #((record-marker)
                                                    "<lambda-ast>"
                                                    (id args body has-cont))
                                                  #(36
                                                    (s2$30$106)
                                                    ((#((record-marker)
                                                        #((record-marker)
                                                          "<lambda-ast>"
                                                          (id args
                                                              body
                                                              has-cont))
                                                        #(35
                                                          (r$163)
                                                          ((#((record-marker)
                                                              #((record-marker)
                                                                "<lambda-ast>"
                                                                (id args
                                                                    body
                                                                    has-cont))
                                                              #(34
                                                                (s1$33$107)
                                                                ((hide #((record-marker)
                                                                         #((record-marker)
                                                                           "<lambda-ast>"
                                                                           (id args
                                                                               body
                                                                               has-cont))
                                                                         #(33
                                                                           (r$171)
                                                                           ((create-n
                                                                              #((record-marker)
                                                                                #((record-marker)
                                                                                  "<lambda-ast>"
                                                                                  (id args
                                                                                      body
                                                                                      has-cont))
                                                                                #(32
                                                                                  (r$164)
                                                                                  ((#((record-marker)
                                                                                      #((record-marker)
                                                                                        "<lambda-ast>"
                                                                                        (id args
                                                                                            body
                                                                                            has-cont))
                                                                                      #(31
                                                                                        (ll$36$108)
                                                                                        ((#((record-marker)
                                                                                            #((record-marker)
                                                                                              "<lambda-ast>"
                                                                                              (id args
                                                                                                  body
                                                                                                  has-cont))
                                                                                            #(30
                                                                                              (name$39$109)
                                                                                              ((#((record-marker)
                                                                                                  #((record-marker)
                                                                                                    "<lambda-ast>"
                                                                                                    (id args
                                                                                                        body
                                                                                                        has-cont))
                                                                                                  #(29
                                                                                                    ()
                                                                                                    ((#((record-marker)
                                                                                                        #((record-marker)
                                                                                                          "<lambda-ast>"
                                                                                                          (id args
                                                                                                              body
                                                                                                              has-cont))
                                                                                                        #(28
                                                                                                          (r$165)
                                                                                                          ((#((record-marker)
                                                                                                              #((record-marker)
                                                                                                                "<lambda-ast>"
                                                                                                                (id args
                                                                                                                    body
                                                                                                                    has-cont))
                                                                                                              #(26
                                                                                                                (r$166)
                                                                                                                ((#((record-marker)
                                                                                                                    #((record-marker)
                                                                                                                      "<lambda-ast>"
                                                                                                                      (id args
                                                                                                                          body
                                                                                                                          has-cont))
                                                                                                                    #(23
                                                                                                                      (r$167)
                                                                                                                      ((run-r7rs-benchmark
                                                                                                                         k$161
                                                                                                                         r$165
                                                                                                                         count$21$103
                                                                                                                         r$166
                                                                                                                         r$167))
                                                                                                                      #f))
                                                                                                                  #((record-marker)
                                                                                                                    #((record-marker)
                                                                                                                      "<lambda-ast>"
                                                                                                                      (id args
                                                                                                                          body
                                                                                                                          has-cont))
                                                                                                                    #(25
                                                                                                                      (k$168 result$41$110)
                                                                                                                      ((#((record-marker)
                                                                                                                          #((record-marker)
                                                                                                                            "<lambda-ast>"
                                                                                                                            (id args
                                                                                                                                body
                                                                                                                                has-cont))
                                                                                                                          #(24
                                                                                                                            (r$169)
                                                                                                                            ((k$168 (equal?
                                                                                                                                      r$169
                                                                                                                                      output$27$105)))
                                                                                                                            #f))
                                                                                                                        (length
                                                                                                                          result$41$110)))
                                                                                                                      #t))))
                                                                                                                #f))
                                                                                                            #((record-marker)
                                                                                                              #((record-marker)
                                                                                                                "<lambda-ast>"
                                                                                                                (id args
                                                                                                                    body
                                                                                                                    has-cont))
                                                                                                              #(27
                                                                                                                (k$170)
                                                                                                                ((iterative-div2
                                                                                                                   k$170
                                                                                                                   ll$36$108))
                                                                                                                #t))))
                                                                                                          #f))
                                                                                                      (string-append
                                                                                                        name$39$109
                                                                                                        ":"
                                                                                                        s1$33$107
                                                                                                        ":"
                                                                                                        s2$30$106)))
                                                                                                    #f))))
                                                                                              #f))
                                                                                          "diviter"))
                                                                                        #f))
                                                                                    r$164))
                                                                                  #f))
                                                                              r$171))
                                                                           #f))
                                                                       count$21$103
                                                                       input1$24$104))
                                                                #f))
                                                            r$163))
                                                          #f))
                                                      (number->string
                                                        input1$24$104)))
                                                    #f))
                                                r$162))
                                              #f))
                                          (number->string count$21$103)))
                                        #f))
                                    500))
                                  #f))
                              1000))
                            #f))
                        1000000))
                      #t)))
                 1
                 0
                 #f
                 #f
                 #f
                 #f
                 #f
                 #f
                 #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((r$231 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  90
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$223 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  61
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$215 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  70
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (secs2$88$136
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             77
             #f
             #f
             #f
             1
             (73)
             #f
             r$209
             0
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$207 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  84
                  #f
                  #f
                  #f
                  1
                  (84)
                  #f
                  (Cyc-fast-sub j1$76$132 j0$60$126)
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (k$199 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  98
                  #f
                  #f
                  #f
                  3
                  (90 59 56)
                  #f
                  #f
                  2
                  1
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$143 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  7
                  #f
                  #f
                  #f
                  2
                  (3 6)
                  #f
                  #f
                  1
                  1
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (a$9$96
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             7
             #f
             #f
             #f
             2
             (4 6)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$151 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  21
                  #f
                  #f
                  #f
                  1
                  (21)
                  #f
                  '()
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (input1$24$104
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             39
             #f
             #t
             1000
             2
             (36 34)
             #f
             1000
             0
             2
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$167 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  23
                  #f
                  #f
                  #f
                  1
                  (23)
                  #f
                  #((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(25
                      (k$168 result$41$110)
                      ((#((record-marker)
                          #((record-marker)
                            "<lambda-ast>"
                            (id args body has-cont))
                          #(24
                            (r$169)
                            ((k$168 (equal? r$169 output$27$105)))
                            #f))
                        (length result$41$110)))
                      #t))
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (x$43$112
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             53
             #f
             #f
             #f
             1
             (43)
             #f
             #f
             0
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$175 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  45
                  #f
                  #f
                  #f
                  1
                  (42)
                  #f
                  #((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(52
                      (k$179)
                      ((#((record-marker)
                          #((record-marker)
                            "<lambda-ast>"
                            (id args body has-cont))
                          #(50
                            (r$184)
                            ((vector
                               #((record-marker)
                                 #((record-marker)
                                   "<lambda-ast>"
                                   (id args body has-cont))
                                 #(49
                                   (r$180)
                                   ((#((record-marker)
                                       #((record-marker)
                                         "<lambda-ast>"
                                         (id args body has-cont))
                                       #(48
                                         (k$182)
                                         ((#((record-marker)
                                             #((record-marker)
                                               "<lambda-ast>"
                                               (id args body has-cont))
                                             #(47
                                               (r$183)
                                               ((if r$183 (k$182 0) (k$182 1)))
                                               #f))
                                           (Cyc-fast-lt r$42$111 100)))
                                         #t))
                                     #((record-marker)
                                       #((record-marker)
                                         "<lambda-ast>"
                                         (id args body has-cont))
                                       #(46
                                         (r$181)
                                         ((values k$179 r$180 r$181))
                                         #f))))
                                   #f))
                               values
                               r$184))
                            #f))
                        #((record-marker)
                          #((record-marker)
                            "<lambda-ast>"
                            (id args body has-cont))
                          #(51 (k$185 x$44$113) ((k$185 x$44$113)) #t))))
                      #t))
                  0
                  1
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$183 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  47
                  #f
                  #f
                  #f
                  1
                  (47)
                  #f
                  (Cyc-fast-lt r$42$111 100)
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$191 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  111
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (result$64$128
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             100
             #f
             #t
             #f
             1
             (54)
             #f
             #f
             0
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((vector-ref
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (44)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (values
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (50 46)
             #f
             #f
             1
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (display
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             13
             (95 63 64 65 66 67 69 71 72 74 76 112 113)
             #f
             #f
             13
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((run-r7rs-benchmark
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             -1
             120
             #f
             #f
             2
             (-1 23)
             #f
             (#((record-marker)
                #((record-marker)
                  "<lambda-ast>"
                  (id args body has-cont))
                #(120
                  (k$188 name$47$116
                         count$48$117
                         thunk$49$118
                         ok?$50$119)
                  ((#((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(119
                        (rounded$121)
                        ((#((record-marker)
                            #((record-marker)
                              "<lambda-ast>"
                              (id args body has-cont))
                            #(118
                              (rounded$122)
                              ((#((record-marker)
                                  #((record-marker)
                                    "<lambda-ast>"
                                    (id args body has-cont))
                                  #(114
                                    (r$234)
                                    ((#((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(113
                                          (r$189)
                                          ((display
                                             #((record-marker)
                                               #((record-marker)
                                                 "<lambda-ast>"
                                                 (id args body has-cont))
                                               #(112
                                                 (r$190)
                                                 ((display
                                                    #((record-marker)
                                                      #((record-marker)
                                                        "<lambda-ast>"
                                                        (id args body has-cont))
                                                      #(111
                                                        (r$191)
                                                        ((newline
                                                           #((record-marker)
                                                             #((record-marker)
                                                               "<lambda-ast>"
                                                               (id args
                                                                   body
                                                                   has-cont))
                                                             #(110
                                                               (r$192)
                                                               ((current-output-port
                                                                  #((record-marker)
                                                                    #((record-marker)
                                                                      "<lambda-ast>"
                                                                      (id args
                                                                          body
                                                                          has-cont))
                                                                    #(109
                                                                      (r$233)
                                                                      ((flush-output-port
                                                                         #((record-marker)
                                                                           #((record-marker)
                                                                             "<lambda-ast>"
                                                                             (id args
                                                                                 body
                                                                                 has-cont))
                                                                           #(108
                                                                             (r$193)
                                                                             ((jiffies-per-second
                                                                                #((record-marker)
                                                                                  #((record-marker)
                                                                                    "<lambda-ast>"
                                                                                    (id args
                                                                                        body
                                                                                        has-cont))
                                                                                  #(107
                                                                                    (r$194)
                                                                                    ((#((record-marker)
                                                                                        #((record-marker)
                                                                                          "<lambda-ast>"
                                                                                          (id args
                                                                                              body
                                                                                              has-cont))
                                                                                        #(106
                                                                                          (j/s$54$124)
                                                                                          ((current-second
                                                                                             #((record-marker)
                                                                                               #((record-marker)
                                                                                                 "<lambda-ast>"
                                                                                                 (id args
                                                                                                     body
                                                                                                     has-cont))
                                                                                               #(105
                                                                                                 (r$195)
                                                                                                 ((#((record-marker)
                                                                                                     #((record-marker)
                                                                                                       "<lambda-ast>"
                                                                                                       (id args
                                                                                                           body
                                                                                                           has-cont))
                                                                                                     #(104
                                                                                                       (t0$57$125)
                                                                                                       ((current-jiffy
                                                                                                          #((record-marker)
                                                                                                            #((record-marker)
                                                                                                              "<lambda-ast>"
                                                                                                              (id args
                                                                                                                  body
                                                                                                                  has-cont))
                                                                                                            #(103
                                                                                                              (r$196)
                                                                                                              ((#((record-marker)
                                                                                                                  #((record-marker)
                                                                                                                    "<lambda-ast>"
                                                                                                                    (id args
                                                                                                                        body
                                                                                                                        has-cont))
                                                                                                                  #(102
                                                                                                                    (j0$60$126)
                                                                                                                    ((#((record-marker)
                                                                                                                        #((record-marker)
                                                                                                                          "<lambda-ast>"
                                                                                                                          (id args
                                                                                                                              body
                                                                                                                              has-cont))
                                                                                                                        #(101
                                                                                                                          ()
                                                                                                                          ((#((record-marker)
                                                                                                                              #((record-marker)
                                                                                                                                "<lambda-ast>"
                                                                                                                                (id args
                                                                                                                                    body
                                                                                                                                    has-cont))
                                                                                                                              #(100
                                                                                                                                (i$63$127
                                                                                                                                  result$64$128)
                                                                                                                                ((#((record-marker)
                                                                                                                                    #((record-marker)
                                                                                                                                      "<lambda-ast>"
                                                                                                                                      (id args
                                                                                                                                          body
                                                                                                                                          has-cont))
                                                                                                                                    #(99
                                                                                                                                      (loop$65$129)
                                                                                                                                      ((#((record-marker)
                                                                                                                                          #((record-marker)
                                                                                                                                            "<lambda-ast>"
                                                                                                                                            (id args
                                                                                                                                                body
                                                                                                                                                has-cont))
                                                                                                                                          #(55
                                                                                                                                            (r$198)
                                                                                                                                            ((#((record-marker)
                                                                                                                                                #((record-marker)
                                                                                                                                                  "<lambda-ast>"
                                                                                                                                                  (id args
                                                                                                                                                      body
                                                                                                                                                      has-cont))
                                                                                                                                                #(54
                                                                                                                                                  (r$197)
                                                                                                                                                  ((loop$65$129
                                                                                                                                                     k$188
                                                                                                                                                     i$63$127
                                                                                                                                                     result$64$128))
                                                                                                                                                  #f))
                                                                                                                                              (set! loop$65$129
                                                                                                                                                r$198)))
                                                                                                                                            #f))
                                                                                                                                        #((record-marker)
                                                                                                                                          #((record-marker)
                                                                                                                                            "<lambda-ast>"
                                                                                                                                            (id args
                                                                                                                                                body
                                                                                                                                                has-cont))
                                                                                                                                          #(98
                                                                                                                                            (k$199 i$66$130
                                                                                                                                                   result$67$131)
                                                                                                                                            ((#((record-marker)
                                                                                                                                                #((record-marker)
                                                                                                                                                  "<lambda-ast>"
                                                                                                                                                  (id args
                                                                                                                                                      body
                                                                                                                                                      has-cont))
                                                                                                                                                #(97
                                                                                                                                                  (r$200)
                                                                                                                                                  ((if r$200
                                                                                                                                                     (#((record-marker)
                                                                                                                                                        #((record-marker)
                                                                                                                                                          "<lambda-ast>"
                                                                                                                                                          (id args
                                                                                                                                                              body
                                                                                                                                                              has-cont))
                                                                                                                                                        #(58
                                                                                                                                                          ()
                                                                                                                                                          ((#((record-marker)
                                                                                                                                                              #((record-marker)
                                                                                                                                                                "<lambda-ast>"
                                                                                                                                                                (id args
                                                                                                                                                                    body
                                                                                                                                                                    has-cont))
                                                                                                                                                              #(57
                                                                                                                                                                (r$201)
                                                                                                                                                                ((thunk$49$118
                                                                                                                                                                   #((record-marker)
                                                                                                                                                                     #((record-marker)
                                                                                                                                                                       "<lambda-ast>"
                                                                                                                                                                       (id args
                                                                                                                                                                           body
                                                                                                                                                                           has-cont))
                                                                                                                                                                     #(56
                                                                                                                                                                       (r$202)
                                                                                                                                                                       ((loop$65$129
                                                                                                                                                                          k$199
                                                                                                                                                                          r$201
                                                                                                                                                                          r$202))
                                                                                                                                                                       #f))))
                                                                                                                                                                #f))
                                                                                                                                                            (Cyc-fast-plus
                                                                                                                                                              i$66$130
                                                                                                                                                              1)))
                                                                                                                                                          #f)))
                                                                                                                                                     (ok?$50$119
                                                                                                                                                       #((record-marker)
                                                                                                                                                         #((record-marker)
                                                                                                                                                           "<lambda-ast>"
                                                                                                                                                           (id args
                                                                                                                                                               body
                                                                                                                                                               has-cont))
                                                                                                                                                         #(96
                                                                                                                                                           (r$203)
                                                                                                                                                           ((if r$203
                                                                                                                                                              (#((record-marker)
                                                                                                                                                                 #((record-marker)
                                                                                                                                                                   "<lambda-ast>"
                                                                                                                                                                   (id args
                                                                                                                                                                       body
                                                                                                                                                                       has-cont))
                                                                                                                                                                 #(89
                                                                                                                                                                   ()
                                                                                                                                                                   ((current-jiffy
                                                                                                                                                                      #((record-marker)
                                                                                                                                                                        #((record-marker)
                                                                                                                                                                          "<lambda-ast>"
                                                                                                                                                                          (id args
                                                                                                                                                                              body
                                                                                                                                                                              has-cont))
                                                                                                                                                                        #(88
                                                                                                                                                                          (r$205)
                                                                                                                                                                          ((#((record-marker)
                                                                                                                                                                              #((record-marker)
                                                                                                                                                                                "<lambda-ast>"
                                                                                                                                                                                (id args
                                                                                                                                                                                    body
                                                                                                                                                                                    has-cont))
                                                                                                                                                                              #(87
                                                                                                                                                                                (j1$76$132)
                                                                                                                                                                                ((current-second
                                                                                                                                                                                   #((record-marker)
                                                                                                                                                                                     #((record-marker)
                                                                                                                                                                                       "<lambda-ast>"
                                                                                                                                                                                       (id args
                                                                                                                                                                                           body
                                                                                                                                                                                           has-cont))
                                                                                                                                                                                     #(86
                                                                                                                                                                                       (r$206)
                                                                                                                                                                                       ((#((record-marker)
                                                                                                                                                                                           #((record-marker)
                                                                                                                                                                                             "<lambda-ast>"
                                                                                                                                                                                             (id args
                                                                                                                                                                                                 body
                                                                                                                                                                                                 has-cont))
                                                                                                                                                                                           #(85
                                                                                                                                                                                             (t1$79$133)
                                                                                                                                                                                             ((#((record-marker)
                                                                                                                                                                                                 #((record-marker)
                                                                                                                                                                                                   "<lambda-ast>"
                                                                                                                                                                                                   (id args
                                                                                                                                                                                                       body
                                                                                                                                                                                                       has-cont))
                                                                                                                                                                                                 #(84
                                                                                                                                                                                                   (r$207)
                                                                                                                                                                                                   ((#((record-marker)
                                                                                                                                                                                                       #((record-marker)
                                                                                                                                                                                                         "<lambda-ast>"
                                                                                                                                                                                                         (id args
                                                                                                                                                                                                             body
                                                                                                                                                                                                             has-cont))
                                                                                                                                                                                                       #(83
                                                                                                                                                                                                         (jifs$82$134)
                                                                                                                                                                                                         ((#((record-marker)
                                                                                                                                                                                                             #((record-marker)
                                                                                                                                                                                                               "<lambda-ast>"
                                                                                                                                                                                                               (id args
                                                                                                                                                                                                                   body
                                                                                                                                                                                                                   has-cont))
                                                                                                                                                                                                             #(82
                                                                                                                                                                                                               (r$227)
                                                                                                                                                                                                               ((#((record-marker)
                                                                                                                                                                                                                   #((record-marker)
                                                                                                                                                                                                                     "<lambda-ast>"
                                                                                                                                                                                                                     (id args
                                                                                                                                                                                                                         body
                                                                                                                                                                                                                         has-cont))
                                                                                                                                                                                                                   #(81
                                                                                                                                                                                                                     (r$208)
                                                                                                                                                                                                                     ((#((record-marker)
                                                                                                                                                                                                                         #((record-marker)
                                                                                                                                                                                                                           "<lambda-ast>"
                                                                                                                                                                                                                           (id args
                                                                                                                                                                                                                               body
                                                                                                                                                                                                                               has-cont))
                                                                                                                                                                                                                         #(80
                                                                                                                                                                                                                           (secs$85$135)
                                                                                                                                                                                                                           ((#((record-marker)
                                                                                                                                                                                                                               #((record-marker)
                                                                                                                                                                                                                                 "<lambda-ast>"
                                                                                                                                                                                                                                 (id args
                                                                                                                                                                                                                                     body
                                                                                                                                                                                                                                     has-cont))
                                                                                                                                                                                                                               #(79
                                                                                                                                                                                                                                 (r$226)
                                                                                                                                                                                                                                 ((rounded$121
                                                                                                                                                                                                                                    #((record-marker)
                                                                                                                                                                                                                                      #((record-marker)
                                                                                                                                                                                                                                        "<lambda-ast>"
                                                                                                                                                                                                                                        (id args
                                                                                                                                                                                                                                            body
                                                                                                                                                                                                                                            has-cont))
                                                                                                                                                                                                                                      #(78
                                                                                                                                                                                                                                        (r$209)
                                                                                                                                                                                                                                        ((#((record-marker)
                                                                                                                                                                                                                                            #((record-marker)
                                                                                                                                                                                                                                              "<lambda-ast>"
                                                                                                                                                                                                                                              (id args
                                                                                                                                                                                                                                                  body
                                                                                                                                                                                                                                                  has-cont))
                                                                                                                                                                                                                                            #(77
                                                                                                                                                                                                                                              (secs2$88$136)
                                                                                                                                                                                                                                              ((#((record-marker)
                                                                                                                                                                                                                                                  #((record-marker)
                                                                                                                                                                                                                                                    "<lambda-ast>"
                                                                                                                                                                                                                                                    (id args
                                                                                                                                                                                                                                                        body
                                                                                                                                                                                                                                                        has-cont))
                                                                                                                                                                                                                                                  #(76
                                                                                                                                                                                                                                                    ()
                                                                                                                                                                                                                                                    ((display
                                                                                                                                                                                                                                                       #((record-marker)
                                                                                                                                                                                                                                                         #((record-marker)
                                                                                                                                                                                                                                                           "<lambda-ast>"
                                                                                                                                                                                                                                                           (id args
                                                                                                                                                                                                                                                               body
                                                                                                                                                                                                                                                               has-cont))
                                                                                                                                                                                                                                                         #(75
                                                                                                                                                                                                                                                           (r$210)
                                                                                                                                                                                                                                                           ((write #((record-marker)
                                                                                                                                                                                                                                                                     #((record-marker)
                                                                                                                                                                                                                                                                       "<lambda-ast>"
                                                                                                                                                                                                                                                                       (id args
                                                                                                                                                                                                                                                                           body
                                                                                                                                                                                                                                                                           has-cont))
                                                                                                                                                                                                                                                                     #(74
                                                                                                                                                                                                                                                                       (r$211)
                                                                                                                                                                                                                                                                       ((display
                                                                                                                                                                                                                                                                          #((record-marker)
                                                                                                                                                                                                                                                                            #((record-marker)
                                                                                                                                                                                                                                                                              "<lambda-ast>"
                                                                                                                                                                                                                                                                              (id args
                                                                                                                                                                                                                                                                                  body
                                                                                                                                                                                                                                                                                  has-cont))
                                                                                                                                                                                                                                                                            #(73
                                                                                                                                                                                                                                                                              (r$212)
                                                                                                                                                                                                                                                                              ((write #((record-marker)
                                                                                                                                                                                                                                                                                        #((record-marker)
                                                                                                                                                                                                                                                                                          "<lambda-ast>"
                                                                                                                                                                                                                                                                                          (id args
                                                                                                                                                                                                                                                                                              body
                                                                                                                                                                                                                                                                                              has-cont))
                                                                                                                                                                                                                                                                                        #(72
                                                                                                                                                                                                                                                                                          (r$213)
                                                                                                                                                                                                                                                                                          ((display
                                                                                                                                                                                                                                                                                             #((record-marker)
                                                                                                                                                                                                                                                                                               #((record-marker)
                                                                                                                                                                                                                                                                                                 "<lambda-ast>"
                                                                                                                                                                                                                                                                                                 (id args
                                                                                                                                                                                                                                                                                                     body
                                                                                                                                                                                                                                                                                                     has-cont))
                                                                                                                                                                                                                                                                                               #(71
                                                                                                                                                                                                                                                                                                 (r$214)
                                                                                                                                                                                                                                                                                                 ((display
                                                                                                                                                                                                                                                                                                    #((record-marker)
                                                                                                                                                                                                                                                                                                      #((record-marker)
                                                                                                                                                                                                                                                                                                        "<lambda-ast>"
                                                                                                                                                                                                                                                                                                        (id args
                                                                                                                                                                                                                                                                                                            body
                                                                                                                                                                                                                                                                                                            has-cont))
                                                                                                                                                                                                                                                                                                      #(70
                                                                                                                                                                                                                                                                                                        (r$215)
                                                                                                                                                                                                                                                                                                        ((newline
                                                                                                                                                                                                                                                                                                           #((record-marker)
                                                                                                                                                                                                                                                                                                             #((record-marker)
                                                                                                                                                                                                                                                                                                               "<lambda-ast>"
                                                                                                                                                                                                                                                                                                               (id args
                                                                                                                                                                                                                                                                                                                   body
                                                                                                                                                                                                                                                                                                                   has-cont))
                                                                                                                                                                                                                                                                                                             #(69
                                                                                                                                                                                                                                                                                                               (r$216)
                                                                                                                                                                                                                                                                                                               ((display
                                                                                                                                                                                                                                                                                                                  #((record-marker)
                                                                                                                                                                                                                                                                                                                    #((record-marker)
                                                                                                                                                                                                                                                                                                                      "<lambda-ast>"
                                                                                                                                                                                                                                                                                                                      (id args
                                                                                                                                                                                                                                                                                                                          body
                                                                                                                                                                                                                                                                                                                          has-cont))
                                                                                                                                                                                                                                                                                                                    #(68
                                                                                                                                                                                                                                                                                                                      (r$217)
                                                                                                                                                                                                                                                                                                                      ((this-scheme-implementation-name
                                                                                                                                                                                                                                                                                                                         #((record-marker)
                                                                                                                                                                                                                                                                                                                           #((record-marker)
                                                                                                                                                                                                                                                                                                                             "<lambda-ast>"
                                                                                                                                                                                                                                                                                                                             (id args
                                                                                                                                                                                                                                                                                                                                 body
                                                                                                                                                                                                                                                                                                                                 has-cont))
                                                                                                                                                                                                                                                                                                                           #(67
                                                                                                                                                                                                                                                                                                                             (r$225)
                                                                                                                                                                                                                                                                                                                             ((display
                                                                                                                                                                                                                                                                                                                                #((record-marker)
                                                                                                                                                                                                                                                                                                                                  #((record-marker)
                                                                                                                                                                                                                                                                                                                                    "<lambda-ast>"
                                                                                                                                                                                                                                                                                                                                    (id args
                                                                                                                                                                                                                                                                                                                                        body
                                                                                                                                                                                                                                                                                                                                        has-cont))
                                                                                                                                                                                                                                                                                                                                  #(66
                                                                                                                                                                                                                                                                                                                                    (r$218)
                                                                                                                                                                                                                                                                                                                                    ((display
                                                                                                                                                                                                                                                                                                                                       #((record-marker)
                                                                                                                                                                                                                                                                                                                                         #((record-marker)
                                                                                                                                                                                                                                                                                                                                           "<lambda-ast>"
                                                                                                                                                                                                                                                                                                                                           (id args
                                                                                                                                                                                                                                                                                                                                               body
                                                                                                                                                                                                                                                                                                                                               has-cont))
                                                                                                                                                                                                                                                                                                                                         #(65
                                                                                                                                                                                                                                                                                                                                           (r$219)
                                                                                                                                                                                                                                                                                                                                           ((display
                                                                                                                                                                                                                                                                                                                                              #((record-marker)
                                                                                                                                                                                                                                                                                                                                                #((record-marker)
                                                                                                                                                                                                                                                                                                                                                  "<lambda-ast>"
                                                                                                                                                                                                                                                                                                                                                  (id args
                                                                                                                                                                                                                                                                                                                                                      body
                                                                                                                                                                                                                                                                                                                                                      has-cont))
                                                                                                                                                                                                                                                                                                                                                #(64
                                                                                                                                                                                                                                                                                                                                                  (r$220)
                                                                                                                                                                                                                                                                                                                                                  ((display
                                                                                                                                                                                                                                                                                                                                                     #((record-marker)
                                                                                                                                                                                                                                                                                                                                                       #((record-marker)
                                                                                                                                                                                                                                                                                                                                                         "<lambda-ast>"
                                                                                                                                                                                                                                                                                                                                                         (id args
                                                                                                                                                                                                                                                                                                                                                             body
                                                                                                                                                                                                                                                                                                                                                             has-cont))
                                                                                                                                                                                                                                                                                                                                                       #(63
                                                                                                                                                                                                                                                                                                                                                         (r$221)
                                                                                                                                                                                                                                                                                                                                                         ((display
                                                                                                                                                                                                                                                                                                                                                            #((record-marker)
                                                                                                                                                                                                                                                                                                                                                              #((record-marker)
                                                                                                                                                                                                                                                                                                                                                                "<lambda-ast>"
                                                                                                                                                                                                                                                                                                                                                                (id args
                                                                                                                                                                                                                                                                                                                                                                    body
                                                                                                                                                                                                                                                                                                                                                                    has-cont))
                                                                                                                                                                                                                                                                                                                                                              #(62
                                                                                                                                                                                                                                                                                                                                                                (r$222)
                                                                                                                                                                                                                                                                                                                                                                ((newline
                                                                                                                                                                                                                                                                                                                                                                   #((record-marker)
                                                                                                                                                                                                                                                                                                                                                                     #((record-marker)
                                                                                                                                                                                                                                                                                                                                                                       "<lambda-ast>"
                                                                                                                                                                                                                                                                                                                                                                       (id args
                                                                                                                                                                                                                                                                                                                                                                           body
                                                                                                                                                                                                                                                                                                                                                                           has-cont))
                                                                                                                                                                                                                                                                                                                                                                     #(61
                                                                                                                                                                                                                                                                                                                                                                       (r$223)
                                                                                                                                                                                                                                                                                                                                                                       ((current-output-port
                                                                                                                                                                                                                                                                                                                                                                          #((record-marker)
                                                                                                                                                                                                                                                                                                                                                                            #((record-marker)
                                                                                                                                                                                                                                                                                                                                                                              "<lambda-ast>"
                                                                                                                                                                                                                                                                                                                                                                              (id args
                                                                                                                                                                                                                                                                                                                                                                                  body
                                                                                                                                                                                                                                                                                                                                                                                  has-cont))
                                                                                                                                                                                                                                                                                                                                                                            #(60
                                                                                                                                                                                                                                                                                                                                                                              (r$224)
                                                                                                                                                                                                                                                                                                                                                                              ((flush-output-port
                                                                                                                                                                                                                                                                                                                                                                                 #((record-marker)
                                                                                                                                                                                                                                                                                                                                                                                   #((record-marker)
                                                                                                                                                                                                                                                                                                                                                                                     "<lambda-ast>"
                                                                                                                                                                                                                                                                                                                                                                                     (id args
                                                                                                                                                                                                                                                                                                                                                                                         body
                                                                                                                                                                                                                                                                                                                                                                                         has-cont))
                                                                                                                                                                                                                                                                                                                                                                                   #(59
                                                                                                                                                                                                                                                                                                                                                                                     (r$204)
                                                                                                                                                                                                                                                                                                                                                                                     ((k$199 result$67$131))
                                                                                                                                                                                                                                                                                                                                                                                     #f))
                                                                                                                                                                                                                                                                                                                                                                                 r$224))
                                                                                                                                                                                                                                                                                                                                                                              #f))))
                                                                                                                                                                                                                                                                                                                                                                       #f))))
                                                                                                                                                                                                                                                                                                                                                                #f))
                                                                                                                                                                                                                                                                                                                                                            secs$85$135))
                                                                                                                                                                                                                                                                                                                                                         #f))
                                                                                                                                                                                                                                                                                                                                                     ","))
                                                                                                                                                                                                                                                                                                                                                  #f))
                                                                                                                                                                                                                                                                                                                                              name$47$116))
                                                                                                                                                                                                                                                                                                                                           #f))
                                                                                                                                                                                                                                                                                                                                       ","))
                                                                                                                                                                                                                                                                                                                                    #f))
                                                                                                                                                                                                                                                                                                                                r$225))
                                                                                                                                                                                                                                                                                                                             #f))))
                                                                                                                                                                                                                                                                                                                      #f))
                                                                                                                                                                                                                                                                                                                  "+!CSVLINE!+"))
                                                                                                                                                                                                                                                                                                               #f))))
                                                                                                                                                                                                                                                                                                        #f))
                                                                                                                                                                                                                                                                                                    name$47$116))
                                                                                                                                                                                                                                                                                                 #f))
                                                                                                                                                                                                                                                                                             ") for "))
                                                                                                                                                                                                                                                                                          #f))
                                                                                                                                                                                                                                                                                      secs2$88$136))
                                                                                                                                                                                                                                                                              #f))
                                                                                                                                                                                                                                                                          " seconds ("))
                                                                                                                                                                                                                                                                       #f))
                                                                                                                                                                                                                                                                   secs$85$135))
                                                                                                                                                                                                                                                           #f))
                                                                                                                                                                                                                                                       "Elapsed time: "))
                                                                                                                                                                                                                                                    #f))))
                                                                                                                                                                                                                                              #f))
                                                                                                                                                                                                                                          r$209))
                                                                                                                                                                                                                                        #f))
                                                                                                                                                                                                                                    r$226))
                                                                                                                                                                                                                                 #f))
                                                                                                                                                                                                                             (Cyc-fast-sub
                                                                                                                                                                                                                               t1$79$133
                                                                                                                                                                                                                               t0$57$125)))
                                                                                                                                                                                                                           #f))
                                                                                                                                                                                                                       r$208))
                                                                                                                                                                                                                     #f))
                                                                                                                                                                                                                 (inexact__inline__
                                                                                                                                                                                                                   r$227)))
                                                                                                                                                                                                               #f))
                                                                                                                                                                                                           (Cyc-fast-div
                                                                                                                                                                                                             jifs$82$134
                                                                                                                                                                                                             j/s$54$124)))
                                                                                                                                                                                                         #f))
                                                                                                                                                                                                     r$207))
                                                                                                                                                                                                   #f))
                                                                                                                                                                                               (Cyc-fast-sub
                                                                                                                                                                                                 j1$76$132
                                                                                                                                                                                                 j0$60$126)))
                                                                                                                                                                                             #f))
                                                                                                                                                                                         r$206))
                                                                                                                                                                                       #f))))
                                                                                                                                                                                #f))
                                                                                                                                                                            r$205))
                                                                                                                                                                          #f))))
                                                                                                                                                                   #f)))
                                                                                                                                                              (#((record-marker)
                                                                                                                                                                 #((record-marker)
                                                                                                                                                                   "<lambda-ast>"
                                                                                                                                                                   (id args
                                                                                                                                                                       body
                                                                                                                                                                       has-cont))
                                                                                                                                                                 #(95
                                                                                                                                                                   ()
                                                                                                                                                                   ((display
                                                                                                                                                                      #((record-marker)
                                                                                                                                                                        #((record-marker)
                                                                                                                                                                          "<lambda-ast>"
                                                                                                                                                                          (id args
                                                                                                                                                                              body
                                                                                                                                                                              has-cont))
                                                                                                                                                                        #(94
                                                                                                                                                                          (r$228)
                                                                                                                                                                          ((write #((record-marker)
                                                                                                                                                                                    #((record-marker)
                                                                                                                                                                                      "<lambda-ast>"
                                                                                                                                                                                      (id args
                                                                                                                                                                                          body
                                                                                                                                                                                          has-cont))
                                                                                                                                                                                    #(93
                                                                                                                                                                                      (r$229)
                                                                                                                                                                                      ((newline
                                                                                                                                                                                         #((record-marker)
                                                                                                                                                                                           #((record-marker)
                                                                                                                                                                                             "<lambda-ast>"
                                                                                                                                                                                             (id args
                                                                                                                                                                                                 body
                                                                                                                                                                                                 has-cont))
                                                                                                                                                                                           #(92
                                                                                                                                                                                             (r$230)
                                                                                                                                                                                             ((current-output-port
                                                                                                                                                                                                #((record-marker)
                                                                                                                                                                                                  #((record-marker)
                                                                                                                                                                                                    "<lambda-ast>"
                                                                                                                                                                                                    (id args
                                                                                                                                                                                                        body
                                                                                                                                                                                                        has-cont))
                                                                                                                                                                                                  #(91
                                                                                                                                                                                                    (r$232)
                                                                                                                                                                                                    ((flush-output-port
                                                                                                                                                                                                       #((record-marker)
                                                                                                                                                                                                         #((record-marker)
                                                                                                                                                                                                           "<lambda-ast>"
                                                                                                                                                                                                           (id args
                                                                                                                                                                                                               body
                                                                                                                                                                                                               has-cont))
                                                                                                                                                                                                         #(90
                                                                                                                                                                                                           (r$231)
                                                                                                                                                                                                           ((k$199 result$67$131))
                                                                                                                                                                                                           #f))
                                                                                                                                                                                                       r$232))
                                                                                                                                                                                                    #f))))
                                                                                                                                                                                             #f))))
                                                                                                                                                                                      #f))
                                                                                                                                                                                  result$67$131))
                                                                                                                                                                          #f))
                                                                                                                                                                      "ERROR: returned incorrect result: "))
                                                                                                                                                                   #f)))))
                                                                                                                                                           #f))
                                                                                                                                                       result$67$131)))
                                                                                                                                                  #f))
                                                                                                                                              (Cyc-fast-lt
                                                                                                                                                i$66$130
                                                                                                                                                count$48$117)))
                                                                                                                                            #t))))
                                                                                                                                      #f))
                                                                                                                                  #f))
                                                                                                                                #f))
                                                                                                                            0
                                                                                                                            #f))
                                                                                                                          #f))))
                                                                                                                    #f))
                                                                                                                r$196))
                                                                                                              #f))))
                                                                                                       #f))
                                                                                                   r$195))
                                                                                                 #f))))
                                                                                          #f))
                                                                                      r$194))
                                                                                    #f))))
                                                                             #f))
                                                                         r$233))
                                                                      #f))))
                                                               #f))))
                                                        #f))
                                                    name$47$116))
                                                 #f))
                                             "Running "))
                                          #f))
                                      (set! rounded$121 r$234)))
                                    #f))
                                #((record-marker)
                                  #((record-marker)
                                    "<lambda-ast>"
                                    (id args body has-cont))
                                  #(117
                                    (k$235 x$51$123)
                                    ((#((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(116
                                          (r$237)
                                          ((#((record-marker)
                                              #((record-marker)
                                                "<lambda-ast>"
                                                (id args body has-cont))
                                              #(115
                                                (r$236)
                                                ((k$235 (Cyc-fast-div
                                                          r$236
                                                          1000)))
                                                #f))
                                            (round__inline__ r$237)))
                                          #f))
                                      (Cyc-fast-mul 1000 x$51$123)))
                                    #t))))
                              #f))
                          #f))
                        #f))
                    #f))
                  #t)))
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (current-second
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (87 106)
             #f
             #f
             2
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((r$232 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  91
                  #f
                  #f
                  #f
                  1
                  (91)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$224 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  60
                  #f
                  #f
                  #f
                  1
                  (60)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$216 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  69
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$208 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  81
                  #f
                  #f
                  #f
                  1
                  (81)
                  #f
                  (inexact__inline__ r$227)
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (k$168 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  25
                  #f
                  #f
                  #f
                  1
                  (24)
                  #f
                  #f
                  1
                  0
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$240 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  122
                  #f
                  #f
                  #f
                  1
                  (121)
                  #f
                  #f
                  1
                  0
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (r$144 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  6
                  #f
                  #f
                  #f
                  1
                  (6)
                  #f
                  (Cyc-fast-eq n$8$95 0)
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (l$10$97
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             22
             #f
             #f
             #f
             1
             (21)
             #f
             #f
             0
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$152 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  12
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  (set! lp$11$16$100 r$153)
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (output$27$105
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             38
             #f
             #t
             500
             1
             (24)
             #f
             500
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$176 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  42
                  #f
                  #f
                  #f
                  1
                  (42)
                  #f
                  #((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(44
                      (k$177 v$45$114 i$46$115)
                      ((#((record-marker)
                          #((record-marker)
                            "<lambda-ast>"
                            (id args body has-cont))
                          #(43 (r$178) ((r$178 k$177 x$43$112)) #f))
                        (vector-ref v$45$114 i$46$115)))
                      #t))
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$184 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  50
                  #f
                  #f
                  #f
                  1
                  (50)
                  #f
                  #((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(51 (k$185 x$44$113) ((k$185 x$44$113)) #t))
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (x$44$113
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             51
             #f
             #f
             #f
             1
             (51)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (rounded$121
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             119
             #f
             #f
             #f
             2
             (114 79)
             #f
             r$234
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$192 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  110
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (loop$65$129
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             99
             #f
             #f
             #f
             3
             (56 55 54)
             #f
             r$198
             2
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$200 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  97
                  #f
                  #f
                  #f
                  1
                  (97)
                  #f
                  (Cyc-fast-lt i$66$130 count$48$117)
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((cddr .
             #((record-marker)
               #((record-marker)
                 "<analysis-db-variable>"
                 (global
                   defined-by
                   defines-lambda-id
                   const
                   const-value
                   ref-count
                   ref-by
                   reassigned
                   assigned-value
                   app-fnc-count
                   app-arg-count
                   inlinable
                   mutated-indirectly
                   cont
                   def-in-loop
                   ref-in-loop
                   direct-rec-call
                   self-rec-call))
               #(?
                 ?
                 #f
                 #f
                 #f
                 1
                 (17)
                 #f
                 #f
                 1
                 0
                 #t
                 #f
                 #f
                 #f
                 #f
                 #f
                 #f)))
       (null? .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(?
                  ?
                  #f
                  #f
                  #f
                  1
                  (18)
                  #f
                  #f
                  1
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (length
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (25)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (string-append
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (121 29)
             #f
             #f
             2
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ())))
 */
/* 
"---------------- after cps optimizations (1):"
 */
/* 
((define create-n
   (lambda-11-cont
     (k$139 n$1$91)
     ((lambda-9
        (n$5$92 a$6$93)
        ((lambda-8
           (lp$2$7$94)
           ((lambda-1
              (r$141)
              (lp$2$7$94 k$139 n$5$92 a$6$93))
            (set! lp$2$7$94
              (lambda-7-cont
                (k$143 n$8$95 a$9$96)
                (if (Cyc-fast-eq n$8$95 0)
                  (k$143 a$9$96)
                  (lp$2$7$94
                    k$143
                    (Cyc-fast-sub n$8$95 1)
                    (cons '() a$9$96)))))))
         #f))
      n$1$91
      '())))
 (define iterative-div2
   (lambda-22-cont
     (k$150 l$10$97)
     ((lambda-20
        (l$14$98 a$15$99)
        ((lambda-19
           (lp$11$16$100)
           ((lambda-12
              (r$152)
              (lp$11$16$100 k$150 l$14$98 a$15$99))
            (set! lp$11$16$100
              (lambda-18-cont
                (k$154 l$17$101 a$18$102)
                (if (null? l$17$101)
                  (k$154 a$18$102)
                  (lp$11$16$100
                    k$154
                    (cddr l$17$101)
                    (cons (car l$17$101) a$18$102)))))))
         #f))
      l$10$97
      '())))
 (define main
   (lambda-41-cont
     (k$161)
     (hide (lambda-33
             (r$171)
             (create-n
               (lambda-31
                 (ll$36$108)
                 ((lambda-28
                    (r$165)
                    (run-r7rs-benchmark
                      k$161
                      r$165
                      1000000
                      (lambda-27-cont
                        (k$170)
                        (iterative-div2 k$170 ll$36$108))
                      (lambda-25-cont
                        (k$168 result$41$110)
                        (k$168 (equal? (length result$41$110) 500)))))
                  (string-append
                    "diviter"
                    ":"
                    "1000"
                    ":"
                    "1000000")))
               r$171))
           1000000
           1000)))
 (define hide
   (lambda-53-cont
     (k$174 r$42$111 x$43$112)
     (call-with-values
       k$174
       (lambda-52-cont
         (k$179)
         (vector
           (lambda-49
             (r$180)
             ((lambda-48-cont
                (k$182)
                (if (Cyc-fast-lt r$42$111 100)
                  (k$182 0)
                  (k$182 1)))
              (lambda-46 (r$181) (values k$179 r$180 r$181))))
           values
           (lambda-51-cont
             (k$185 x$44$113)
             (k$185 x$44$113))))
       (lambda-44-cont
         (k$177 v$45$114 i$46$115)
         ((vector-ref v$45$114 i$46$115) k$177 x$43$112)))))
 (define run-r7rs-benchmark
   (lambda-120-cont
     (k$188 name$47$116
            count$48$117
            thunk$49$118
            ok?$50$119)
     ((lambda-119
        (rounded$121)
        ((lambda-113
           (r$189)
           (display
             (lambda-112
               (r$190)
               (display
                 (lambda-111
                   (r$191)
                   (newline
                     (lambda-110
                       (r$192)
                       (current-output-port
                         (lambda-109
                           (r$233)
                           (flush-output-port
                             (lambda-108
                               (r$193)
                               (jiffies-per-second
                                 (lambda-106
                                   (j/s$54$124)
                                   (current-second
                                     (lambda-104
                                       (t0$57$125)
                                       (current-jiffy
                                         (lambda-102
                                           (j0$60$126)
                                           ((lambda-99
                                              (loop$65$129)
                                              ((lambda-54
                                                 (r$197)
                                                 (loop$65$129 k$188 0 #f))
                                               (set! loop$65$129
                                                 (lambda-98-cont
                                                   (k$199 i$66$130
                                                          result$67$131)
                                                   (if (Cyc-fast-lt
                                                         i$66$130
                                                         count$48$117)
                                                     (thunk$49$118
                                                       (lambda-56
                                                         (r$202)
                                                         (loop$65$129
                                                           k$199
                                                           (Cyc-fast-plus
                                                             i$66$130
                                                             1)
                                                           r$202)))
                                                     (ok?$50$119
                                                       (lambda-96
                                                         (r$203)
                                                         (if r$203
                                                           (current-jiffy
                                                             (lambda-87
                                                               (j1$76$132)
                                                               (current-second
                                                                 (lambda-85
                                                                   (t1$79$133)
                                                                   (rounded$121
                                                                     (lambda-77
                                                                       (secs2$88$136)
                                                                       (display
                                                                         (lambda-75
                                                                           (r$210)
                                                                           (write (lambda-74
                                                                                    (r$211)
                                                                                    (display
                                                                                      (lambda-73
                                                                                        (r$212)
                                                                                        (write (lambda-72
                                                                                                 (r$213)
                                                                                                 (display
                                                                                                   (lambda-71
                                                                                                     (r$214)
                                                                                                     (display
                                                                                                       (lambda-70
                                                                                                         (r$215)
                                                                                                         (newline
                                                                                                           (lambda-69
                                                                                                             (r$216)
                                                                                                             (display
                                                                                                               (lambda-68
                                                                                                                 (r$217)
                                                                                                                 (this-scheme-implementation-name
                                                                                                                   (lambda-67
                                                                                                                     (r$225)
                                                                                                                     (display
                                                                                                                       (lambda-66
                                                                                                                         (r$218)
                                                                                                                         (display
                                                                                                                           (lambda-65
                                                                                                                             (r$219)
                                                                                                                             (display
                                                                                                                               (lambda-64
                                                                                                                                 (r$220)
                                                                                                                                 (display
                                                                                                                                   (lambda-63
                                                                                                                                     (r$221)
                                                                                                                                     (display
                                                                                                                                       (lambda-62
                                                                                                                                         (r$222)
                                                                                                                                         (newline
                                                                                                                                           (lambda-61
                                                                                                                                             (r$223)
                                                                                                                                             (current-output-port
                                                                                                                                               (lambda-60
                                                                                                                                                 (r$224)
                                                                                                                                                 (flush-output-port
                                                                                                                                                   (lambda-59
                                                                                                                                                     (r$204)
                                                                                                                                                     (k$199 result$67$131))
                                                                                                                                                   r$224))))))
                                                                                                                                       (inexact__inline__
                                                                                                                                         (Cyc-fast-div
                                                                                                                                           (Cyc-fast-sub
                                                                                                                                             j1$76$132
                                                                                                                                             j0$60$126)
                                                                                                                                           j/s$54$124))))
                                                                                                                                   ","))
                                                                                                                               name$47$116))
                                                                                                                           ","))
                                                                                                                       r$225))))
                                                                                                               "+!CSVLINE!+"))))
                                                                                                       name$47$116))
                                                                                                   ") for "))
                                                                                               secs2$88$136))
                                                                                      " seconds ("))
                                                                                  (inexact__inline__
                                                                                    (Cyc-fast-div
                                                                                      (Cyc-fast-sub
                                                                                        j1$76$132
                                                                                        j0$60$126)
                                                                                      j/s$54$124))))
                                                                         "Elapsed time: "))
                                                                     (Cyc-fast-sub
                                                                       t1$79$133
                                                                       t0$57$125))))))
                                                           (display
                                                             (lambda-94
                                                               (r$228)
                                                               (write (lambda-93
                                                                        (r$229)
                                                                        (newline
                                                                          (lambda-92
                                                                            (r$230)
                                                                            (current-output-port
                                                                              (lambda-91
                                                                                (r$232)
                                                                                (flush-output-port
                                                                                  (lambda-90
                                                                                    (r$231)
                                                                                    (k$199 result$67$131))
                                                                                  r$232))))))
                                                                      result$67$131))
                                                             "ERROR: returned incorrect result: ")))
                                                       result$67$131))))))
                                            #f))))))))
                             r$233))))))
                 name$47$116))
             "Running "))
         (set! rounded$121
           (lambda-117-cont
             (k$235 x$51$123)
             (k$235 (Cyc-fast-div
                      (round__inline__ (Cyc-fast-mul 1000 x$51$123))
                      1000))))))
      #f)))
 (define this-scheme-implementation-name
   (lambda-122-cont
     (k$240)
     (Cyc-version
       (lambda-121
         (r$241)
         (k$240 (string-append "cyclone-" r$241))))))
 (main %halt))
 */
/* 
"---------------- cps analysis db:"
 */
/* 
#((record-marker)
  #((record-marker)
    "<srfi-hash-table>"
    (size hash compare associate entries))
  #(191
    #[procedure]
    #[procedure]
    #[procedure]
    #(()
      ((1
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ()
      ()
      ()
      ()
      ((7
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (lp$2$7$94) #f))))
      ((8
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((9
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ((11
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((12
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ()
      ()
      ((%halt .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(?
                  ?
                  #f
                  #f
                  #f
                  1
                  (-1)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (Cyc-fast-mul
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (117)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (inexact__inline__
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (75 63)
             #f
             #f
             2
             0
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (iterative-div2
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             -1
             22
             #f
             #f
             2
             (27 -1)
             #f
             (#((record-marker)
                #((record-marker)
                  "<lambda-ast>"
                  (id args body has-cont))
                #(22
                  (k$150 l$10$97)
                  ((#((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(20
                        (l$14$98 a$15$99)
                        ((#((record-marker)
                            #((record-marker)
                              "<lambda-ast>"
                              (id args body has-cont))
                            #(19
                              (lp$11$16$100)
                              ((#((record-marker)
                                  #((record-marker)
                                    "<lambda-ast>"
                                    (id args body has-cont))
                                  #(12
                                    (r$152)
                                    ((lp$11$16$100 k$150 l$14$98 a$15$99))
                                    #f))
                                (set! lp$11$16$100
                                  #((record-marker)
                                    #((record-marker)
                                      "<lambda-ast>"
                                      (id args body has-cont))
                                    #(18
                                      (k$154 l$17$101 a$18$102)
                                      ((if (null? l$17$101)
                                         (k$154 a$18$102)
                                         (lp$11$16$100
                                           k$154
                                           (cddr l$17$101)
                                           (cons (car l$17$101) a$18$102))))
                                      #t)))))
                              #f))
                          #f))
                        #f))
                    l$10$97
                    '()))
                  #t)))
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ((18
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (lp$11$16$100) #f))))
      ((19
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((20
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ((22
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ()
      ((25
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((27
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((28
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ()
      ((31
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((r$241 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  121
                  #f
                  #f
                  #f
                  1
                  (121)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$193 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  108
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$233 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  109
                  #f
                  #f
                  #f
                  1
                  (109)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$189 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  113
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  (set! rounded$121
                    #((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(117
                        (k$235 x$51$123)
                        ((k$235 (Cyc-fast-div
                                  (round__inline__ (Cyc-fast-mul 1000 x$51$123))
                                  1000)))
                        #t)))
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (v$45$114
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             44
             #f
             #f
             #f
             1
             (44)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$181 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  46
                  #f
                  #f
                  #f
                  1
                  (46)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (result$41$110
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             25
             #f
             #f
             #f
             1
             (25)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$165 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  28
                  #f
                  #f
                  #f
                  1
                  (28)
                  #f
                  (string-append
                    "diviter"
                    ":"
                    "1000"
                    ":"
                    "1000000")
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$221 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  63
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$225 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  67
                  #f
                  #f
                  #f
                  1
                  (67)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #t
                  #t
                  #f
                  #f)))
       (this-scheme-implementation-name
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             -1
             122
             #f
             #f
             2
             (-1 68)
             #f
             (#((record-marker)
                #((record-marker)
                  "<lambda-ast>"
                  (id args body has-cont))
                #(122
                  (k$240)
                  ((Cyc-version
                     #((record-marker)
                       #((record-marker)
                         "<lambda-ast>"
                         (id args body has-cont))
                       #(121
                         (r$241)
                         ((k$240 (string-append "cyclone-" r$241)))
                         #f))))
                  #t)))
             1
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (r$217 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  68
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$213 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  72
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (thunk$49$118
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             120
             #f
             #f
             #f
             1
             (98)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (i$66$130
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             98
             #f
             #f
             #f
             2
             (56 98)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (r$197 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  54
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  (set! loop$65$129
                    #((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(98
                        (k$199 i$66$130 result$67$131)
                        ((if (Cyc-fast-lt i$66$130 count$48$117)
                           (thunk$49$118
                             #((record-marker)
                               #((record-marker)
                                 "<lambda-ast>"
                                 (id args body has-cont))
                               #(56
                                 (r$202)
                                 ((loop$65$129
                                    k$199
                                    (Cyc-fast-plus i$66$130 1)
                                    r$202))
                                 #f)))
                           (ok?$50$119
                             #((record-marker)
                               #((record-marker)
                                 "<lambda-ast>"
                                 (id args body has-cont))
                               #(96
                                 (r$203)
                                 ((if r$203
                                    (current-jiffy
                                      #((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(87
                                          (j1$76$132)
                                          ((current-second
                                             #((record-marker)
                                               #((record-marker)
                                                 "<lambda-ast>"
                                                 (id args body has-cont))
                                               #(85
                                                 (t1$79$133)
                                                 ((rounded$121
                                                    #((record-marker)
                                                      #((record-marker)
                                                        "<lambda-ast>"
                                                        (id args body has-cont))
                                                      #(77
                                                        (secs2$88$136)
                                                        ((display
                                                           #((record-marker)
                                                             #((record-marker)
                                                               "<lambda-ast>"
                                                               (id args
                                                                   body
                                                                   has-cont))
                                                             #(75
                                                               (r$210)
                                                               ((write #((record-marker)
                                                                         #((record-marker)
                                                                           "<lambda-ast>"
                                                                           (id args
                                                                               body
                                                                               has-cont))
                                                                         #(74
                                                                           (r$211)
                                                                           ((display
                                                                              #((record-marker)
                                                                                #((record-marker)
                                                                                  "<lambda-ast>"
                                                                                  (id args
                                                                                      body
                                                                                      has-cont))
                                                                                #(73
                                                                                  (r$212)
                                                                                  ((write #((record-marker)
                                                                                            #((record-marker)
                                                                                              "<lambda-ast>"
                                                                                              (id args
                                                                                                  body
                                                                                                  has-cont))
                                                                                            #(72
                                                                                              (r$213)
                                                                                              ((display
                                                                                                 #((record-marker)
                                                                                                   #((record-marker)
                                                                                                     "<lambda-ast>"
                                                                                                     (id args
                                                                                                         body
                                                                                                         has-cont))
                                                                                                   #(71
                                                                                                     (r$214)
                                                                                                     ((display
                                                                                                        #((record-marker)
                                                                                                          #((record-marker)
                                                                                                            "<lambda-ast>"
                                                                                                            (id args
                                                                                                                body
                                                                                                                has-cont))
                                                                                                          #(70
                                                                                                            (r$215)
                                                                                                            ((newline
                                                                                                               #((record-marker)
                                                                                                                 #((record-marker)
                                                                                                                   "<lambda-ast>"
                                                                                                                   (id args
                                                                                                                       body
                                                                                                                       has-cont))
                                                                                                                 #(69
                                                                                                                   (r$216)
                                                                                                                   ((display
                                                                                                                      #((record-marker)
                                                                                                                        #((record-marker)
                                                                                                                          "<lambda-ast>"
                                                                                                                          (id args
                                                                                                                              body
                                                                                                                              has-cont))
                                                                                                                        #(68
                                                                                                                          (r$217)
                                                                                                                          ((this-scheme-implementation-name
                                                                                                                             #((record-marker)
                                                                                                                               #((record-marker)
                                                                                                                                 "<lambda-ast>"
                                                                                                                                 (id args
                                                                                                                                     body
                                                                                                                                     has-cont))
                                                                                                                               #(67
                                                                                                                                 (r$225)
                                                                                                                                 ((display
                                                                                                                                    #((record-marker)
                                                                                                                                      #((record-marker)
                                                                                                                                        "<lambda-ast>"
                                                                                                                                        (id args
                                                                                                                                            body
                                                                                                                                            has-cont))
                                                                                                                                      #(66
                                                                                                                                        (r$218)
                                                                                                                                        ((display
                                                                                                                                           #((record-marker)
                                                                                                                                             #((record-marker)
                                                                                                                                               "<lambda-ast>"
                                                                                                                                               (id args
                                                                                                                                                   body
                                                                                                                                                   has-cont))
                                                                                                                                             #(65
                                                                                                                                               (r$219)
                                                                                                                                               ((display
                                                                                                                                                  #((record-marker)
                                                                                                                                                    #((record-marker)
                                                                                                                                                      "<lambda-ast>"
                                                                                                                                                      (id args
                                                                                                                                                          body
                                                                                                                                                          has-cont))
                                                                                                                                                    #(64
                                                                                                                                                      (r$220)
                                                                                                                                                      ((display
                                                                                                                                                         #((record-marker)
                                                                                                                                                           #((record-marker)
                                                                                                                                                             "<lambda-ast>"
                                                                                                                                                             (id args
                                                                                                                                                                 body
                                                                                                                                                                 has-cont))
                                                                                                                                                           #(63
                                                                                                                                                             (r$221)
                                                                                                                                                             ((display
                                                                                                                                                                #((record-marker)
                                                                                                                                                                  #((record-marker)
                                                                                                                                                                    "<lambda-ast>"
                                                                                                                                                                    (id args
                                                                                                                                                                        body
                                                                                                                                                                        has-cont))
                                                                                                                                                                  #(62
                                                                                                                                                                    (r$222)
                                                                                                                                                                    ((newline
                                                                                                                                                                       #((record-marker)
                                                                                                                                                                         #((record-marker)
                                                                                                                                                                           "<lambda-ast>"
                                                                                                                                                                           (id args
                                                                                                                                                                               body
                                                                                                                                                                               has-cont))
                                                                                                                                                                         #(61
                                                                                                                                                                           (r$223)
                                                                                                                                                                           ((current-output-port
                                                                                                                                                                              #((record-marker)
                                                                                                                                                                                #((record-marker)
                                                                                                                                                                                  "<lambda-ast>"
                                                                                                                                                                                  (id args
                                                                                                                                                                                      body
                                                                                                                                                                                      has-cont))
                                                                                                                                                                                #(60
                                                                                                                                                                                  (r$224)
                                                                                                                                                                                  ((flush-output-port
                                                                                                                                                                                     #((record-marker)
                                                                                                                                                                                       #((record-marker)
                                                                                                                                                                                         "<lambda-ast>"
                                                                                                                                                                                         (id args
                                                                                                                                                                                             body
                                                                                                                                                                                             has-cont))
                                                                                                                                                                                       #(59
                                                                                                                                                                                         (r$204)
                                                                                                                                                                                         ((k$199 result$67$131))
                                                                                                                                                                                         #f))
                                                                                                                                                                                     r$224))
                                                                                                                                                                                  #f))))
                                                                                                                                                                           #f))))
                                                                                                                                                                    #f))
                                                                                                                                                                (inexact__inline__
                                                                                                                                                                  (Cyc-fast-div
                                                                                                                                                                    (Cyc-fast-sub
                                                                                                                                                                      j1$76$132
                                                                                                                                                                      j0$60$126)
                                                                                                                                                                    j/s$54$124))))
                                                                                                                                                             #f))
                                                                                                                                                         ","))
                                                                                                                                                      #f))
                                                                                                                                                  name$47$116))
                                                                                                                                               #f))
                                                                                                                                           ","))
                                                                                                                                        #f))
                                                                                                                                    r$225))
                                                                                                                                 #f))))
                                                                                                                          #f))
                                                                                                                      "+!CSVLINE!+"))
                                                                                                                   #f))))
                                                                                                            #f))
                                                                                                        name$47$116))
                                                                                                     #f))
                                                                                                 ") for "))
                                                                                              #f))
                                                                                          secs2$88$136))
                                                                                  #f))
                                                                              " seconds ("))
                                                                           #f))
                                                                       (inexact__inline__
                                                                         (Cyc-fast-div
                                                                           (Cyc-fast-sub
                                                                             j1$76$132
                                                                             j0$60$126)
                                                                           j/s$54$124))))
                                                               #f))
                                                           "Elapsed time: "))
                                                        #f))
                                                    (Cyc-fast-sub
                                                      t1$79$133
                                                      t0$57$125)))
                                                 #f))))
                                          #f)))
                                    (display
                                      #((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(94
                                          (r$228)
                                          ((write #((record-marker)
                                                    #((record-marker)
                                                      "<lambda-ast>"
                                                      (id args body has-cont))
                                                    #(93
                                                      (r$229)
                                                      ((newline
                                                         #((record-marker)
                                                           #((record-marker)
                                                             "<lambda-ast>"
                                                             (id args
                                                                 body
                                                                 has-cont))
                                                           #(92
                                                             (r$230)
                                                             ((current-output-port
                                                                #((record-marker)
                                                                  #((record-marker)
                                                                    "<lambda-ast>"
                                                                    (id args
                                                                        body
                                                                        has-cont))
                                                                  #(91
                                                                    (r$232)
                                                                    ((flush-output-port
                                                                       #((record-marker)
                                                                         #((record-marker)
                                                                           "<lambda-ast>"
                                                                           (id args
                                                                               body
                                                                               has-cont))
                                                                         #(90
                                                                           (r$231)
                                                                           ((k$199 result$67$131))
                                                                           #f))
                                                                       r$232))
                                                                    #f))))
                                                             #f))))
                                                      #f))
                                                  result$67$131))
                                          #f))
                                      "ERROR: returned incorrect result: ")))
                                 #f))
                             result$67$131)))
                        #t)))
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (a$18$102
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             18
             #f
             #f
             #f
             2
             (18 18)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (l$14$98
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             20
             #f
             #f
             #f
             1
             (12)
             #f
             l$10$97
             0
             1
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (r$141 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  1
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  (set! lp$2$7$94
                    #((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(7
                        (k$143 n$8$95 a$9$96)
                        ((if (Cyc-fast-eq n$8$95 0)
                           (k$143 a$9$96)
                           (lp$2$7$94
                             k$143
                             (Cyc-fast-sub n$8$95 1)
                             (cons '() a$9$96))))
                        #t)))
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (lp$2$7$94
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             8
             #f
             #f
             #f
             3
             (7 8 1)
             #f
             #((record-marker)
               #((record-marker)
                 "<lambda-ast>"
                 (id args body has-cont))
               #(7
                 (k$143 n$8$95 a$9$96)
                 ((if (Cyc-fast-eq n$8$95 0)
                    (k$143 a$9$96)
                    (lp$2$7$94
                      k$143
                      (Cyc-fast-sub n$8$95 1)
                      (cons '() a$9$96))))
                 #t))
             2
             0
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (j0$60$126
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             102
             #f
             #f
             #f
             2
             (75 63)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (r$229 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  93
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (k$161 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  41
                  #f
                  #f
                  #f
                  1
                  (28)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$185 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  51
                  #f
                  #f
                  #f
                  1
                  (51)
                  #f
                  #f
                  1
                  0
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$177 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  44
                  #f
                  #f
                  #f
                  1
                  (44)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f))))
      ((33
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((41
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ()
      ((44
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((46
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (k$182) #f))))
      ()
      ((Cyc-version
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (122)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (flush-output-port
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             3
             (91 60 109)
             #f
             #f
             3
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (car .
            #((record-marker)
              #((record-marker)
                "<analysis-db-variable>"
                (global
                  defined-by
                  defines-lambda-id
                  const
                  const-value
                  ref-count
                  ref-by
                  reassigned
                  assigned-value
                  app-fnc-count
                  app-arg-count
                  inlinable
                  mutated-indirectly
                  cont
                  def-in-loop
                  ref-in-loop
                  direct-rec-call
                  self-rec-call))
              #(?
                ?
                #f
                #f
                #f
                1
                (18)
                #f
                #f
                1
                0
                #t
                #f
                #f
                #f
                #t
                #f
                #f)))
       (cons .
             #((record-marker)
               #((record-marker)
                 "<analysis-db-variable>"
                 (global
                   defined-by
                   defines-lambda-id
                   const
                   const-value
                   ref-count
                   ref-by
                   reassigned
                   assigned-value
                   app-fnc-count
                   app-arg-count
                   inlinable
                   mutated-indirectly
                   cont
                   def-in-loop
                   ref-in-loop
                   direct-rec-call
                   self-rec-call))
               #(?
                 ?
                 #f
                 #f
                 #f
                 2
                 (18 7)
                 #f
                 #f
                 2
                 0
                 #t
                 #f
                 #f
                 #f
                 #t
                 #f
                 #f)))
       (48
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((49
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((51
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((52
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((53
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((54
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((56
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ()
      ((59
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((60
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((61
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((62
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((63
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((64
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((65
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((66
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((67
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((68
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((69
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((70
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((71
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((72
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((73
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((74
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((75
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((77
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ()
      ((jiffies-per-second
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (108)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (current-jiffy
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (96 104)
             #f
             #f
             2
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (Cyc-fast-eq
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (7)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (Cyc-fast-div
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             3
             (117 75 63)
             #f
             #f
             3
             0
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (hide .
             #((record-marker)
               #((record-marker)
                 "<analysis-db-variable>"
                 (global
                   defined-by
                   defines-lambda-id
                   const
                   const-value
                   ref-count
                   ref-by
                   reassigned
                   assigned-value
                   app-fnc-count
                   app-arg-count
                   inlinable
                   mutated-indirectly
                   cont
                   def-in-loop
                   ref-in-loop
                   direct-rec-call
                   self-rec-call))
               #(?
                 -1
                 53
                 #f
                 #f
                 2
                 (-1 41)
                 #f
                 (#((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(53
                      (k$174 r$42$111 x$43$112)
                      ((call-with-values
                         k$174
                         #((record-marker)
                           #((record-marker)
                             "<lambda-ast>"
                             (id args body has-cont))
                           #(52
                             (k$179)
                             ((vector
                                #((record-marker)
                                  #((record-marker)
                                    "<lambda-ast>"
                                    (id args body has-cont))
                                  #(49
                                    (r$180)
                                    ((#((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(48
                                          (k$182)
                                          ((if (Cyc-fast-lt r$42$111 100)
                                             (k$182 0)
                                             (k$182 1)))
                                          #t))
                                      #((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(46
                                          (r$181)
                                          ((values k$179 r$180 r$181))
                                          #f))))
                                    #f))
                                values
                                #((record-marker)
                                  #((record-marker)
                                    "<lambda-ast>"
                                    (id args body has-cont))
                                  #(51
                                    (k$185 x$44$113)
                                    ((k$185 x$44$113))
                                    #t))))
                             #t))
                         #((record-marker)
                           #((record-marker)
                             "<lambda-ast>"
                             (id args body has-cont))
                           #(44
                             (k$177 v$45$114 i$46$115)
                             (((vector-ref v$45$114 i$46$115) k$177 x$43$112))
                             #t))))
                      #t)))
                 1
                 0
                 #f
                 #f
                 #f
                 #f
                 #f
                 #f
                 #f))))
      ()
      ()
      ()
      ()
      ((85
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((87
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ()
      ((90
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((91
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((92
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((93
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((94
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((x$51$123
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             117
             #f
             #f
             #f
             1
             (117)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$190 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  112
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (i$46$115
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             44
             #f
             #f
             #f
             1
             (44)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$42$111
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             53
             #f
             #f
             #f
             1
             (48)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (n$1$91
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             11
             #f
             #f
             #f
             1
             (11)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$222 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  62
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$218 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  66
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$214 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  71
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$210 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  75
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (ok?$50$119
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             120
             #f
             #f
             #f
             1
             (98)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (r$202 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  56
                  #f
                  #f
                  #f
                  1
                  (56)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #t
                  #t
                  #f
                  #f)))
       (result$67$131
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             98
             #f
             #f
             #f
             4
             (98 94 90 59)
             #f
             #f
             0
             4
             #f
             #f
             #f
             #t
             #t
             #f
             #f)))
       (k$154 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  18
                  #f
                  #f
                  #f
                  2
                  (18 18)
                  #f
                  #f
                  1
                  1
                  #t
                  #f
                  #t
                  #t
                  #t
                  #f
                  #f)))
       (a$15$99
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             20
             #f
             #f
             #f
             1
             (12)
             #f
             '()
             0
             1
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (k$150 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  22
                  #f
                  #f
                  #f
                  1
                  (12)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #t
                  #f
                  #t
                  #f
                  #f)))
       (n$8$95
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             7
             #f
             #f
             #f
             2
             (7 7)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (r$230 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  92
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (k$170 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  27
                  #f
                  #f
                  #f
                  1
                  (27)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$174 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  53
                  #f
                  #f
                  #f
                  1
                  (53)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$182 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  48
                  #f
                  #f
                  #f
                  2
                  (48 48)
                  #f
                  #((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(46 (r$181) ((values k$179 r$180 r$181)) #f))
                  2
                  0
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (96
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((98
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (loop$65$129) #f))))
      ((99
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ()
      ((102
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ((104
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ((106
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ((108
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((109
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((110
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((111
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((call-with-values
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (53)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (current-output-port
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             3
             (92 61 110)
             #f
             #f
             3
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (newline
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             4
             (93 62 70 111)
             #f
             #f
             4
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (write .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(?
                  ?
                  #f
                  #f
                  #f
                  3
                  (94 73 75)
                  #f
                  #f
                  3
                  0
                  #f
                  #f
                  #f
                  #f
                  #t
                  #f
                  #f)))
       (112
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((113
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ()
      ()
      ((117
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (rounded$121) #f))))
      ()
      ((119
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((120
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((121
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((122
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((Cyc-fast-plus
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (56)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (main .
             #((record-marker)
               #((record-marker)
                 "<analysis-db-variable>"
                 (global
                   defined-by
                   defines-lambda-id
                   const
                   const-value
                   ref-count
                   ref-by
                   reassigned
                   assigned-value
                   app-fnc-count
                   app-arg-count
                   inlinable
                   mutated-indirectly
                   cont
                   def-in-loop
                   ref-in-loop
                   direct-rec-call
                   self-rec-call))
               #(?
                 -1
                 41
                 #f
                 #f
                 2
                 (-1 -1)
                 #f
                 (#((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(41
                      (k$161)
                      ((hide #((record-marker)
                               #((record-marker)
                                 "<lambda-ast>"
                                 (id args body has-cont))
                               #(33
                                 (r$171)
                                 ((create-n
                                    #((record-marker)
                                      #((record-marker)
                                        "<lambda-ast>"
                                        (id args body has-cont))
                                      #(31
                                        (ll$36$108)
                                        ((#((record-marker)
                                            #((record-marker)
                                              "<lambda-ast>"
                                              (id args body has-cont))
                                            #(28
                                              (r$165)
                                              ((run-r7rs-benchmark
                                                 k$161
                                                 r$165
                                                 1000000
                                                 #((record-marker)
                                                   #((record-marker)
                                                     "<lambda-ast>"
                                                     (id args body has-cont))
                                                   #(27
                                                     (k$170)
                                                     ((iterative-div2
                                                        k$170
                                                        ll$36$108))
                                                     #t))
                                                 #((record-marker)
                                                   #((record-marker)
                                                     "<lambda-ast>"
                                                     (id args body has-cont))
                                                   #(25
                                                     (k$168 result$41$110)
                                                     ((k$168 (equal?
                                                               (length
                                                                 result$41$110)
                                                               500)))
                                                     #t))))
                                              #f))
                                          (string-append
                                            "diviter"
                                            ":"
                                            "1000"
                                            ":"
                                            "1000000")))
                                        #f))
                                    r$171))
                                 #f))
                             1000000
                             1000))
                      #t)))
                 1
                 0
                 #f
                 #f
                 #f
                 #f
                 #f
                 #f
                 #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((r$191 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  111
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (x$43$112
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             53
             #f
             #f
             #f
             1
             (44)
             #f
             #f
             0
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (ll$36$108
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             31
             #f
             #f
             #f
             1
             (27)
             #f
             #f
             0
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$171 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  33
                  #f
                  #f
                  #f
                  1
                  (33)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (k$235 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  117
                  #f
                  #f
                  #f
                  1
                  (117)
                  #f
                  #f
                  1
                  0
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (r$223 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  61
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$219 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  65
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$215 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  70
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$211 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  74
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (secs2$88$136
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             77
             #f
             #f
             #f
             1
             (73)
             #f
             #f
             0
             1
             #f
             #f
             #f
             #t
             #t
             #f
             #f)))
       (j1$76$132
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             87
             #f
             #f
             #f
             2
             (75 63)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (r$203 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  96
                  #f
                  #f
                  #f
                  1
                  (96)
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #t
                  #f
                  #f)))
       (k$199 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  98
                  #f
                  #f
                  #f
                  3
                  (90 59 56)
                  #f
                  #f
                  2
                  1
                  #t
                  #f
                  #t
                  #t
                  #t
                  #f
                  #f)))
       (lp$11$16$100
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             19
             #f
             #f
             #f
             3
             (18 19 12)
             #f
             #((record-marker)
               #((record-marker)
                 "<lambda-ast>"
                 (id args body has-cont))
               #(18
                 (k$154 l$17$101 a$18$102)
                 ((if (null? l$17$101)
                    (k$154 a$18$102)
                    (lp$11$16$100
                      k$154
                      (cddr l$17$101)
                      (cons (car l$17$101) a$18$102))))
                 #t))
             2
             0
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (a$9$96
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             7
             #f
             #f
             #f
             2
             (7 7)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (k$143 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  7
                  #f
                  #f
                  #f
                  2
                  (7 7)
                  #f
                  #f
                  1
                  1
                  #t
                  #f
                  #t
                  #t
                  #t
                  #f
                  #f)))
       (n$5$92
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             9
             #f
             #f
             #f
             1
             (1)
             #f
             n$1$91
             0
             1
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (k$139 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  11
                  #f
                  #f
                  #f
                  1
                  (1)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #t
                  #f
                  #t
                  #f
                  #f)))
       (j/s$54$124
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             106
             #f
             #f
             #f
             2
             (75 63)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (name$47$116
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             120
             #f
             #f
             #f
             3
             (112 71 65)
             #f
             #f
             0
             3
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (r$231 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  90
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (k$179 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  52
                  #f
                  #f
                  #f
                  1
                  (46)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((vector-ref
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (44)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (values
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (52 46)
             #f
             #f
             1
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (vector
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (52)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (display
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             13
             (96 63 64 65 66 67 69 71 72 74 77 112 113)
             #f
             #f
             13
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((round__inline__
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (117)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (current-second
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (87 106)
             #f
             #f
             2
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (Cyc-fast-lt
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (98 48)
             #f
             #f
             2
             0
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (Cyc-fast-sub
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             4
             (85 75 63 7)
             #f
             #f
             4
             0
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (create-n
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             -1
             11
             #f
             #f
             2
             (33 -1)
             #f
             (#((record-marker)
                #((record-marker)
                  "<lambda-ast>"
                  (id args body has-cont))
                #(11
                  (k$139 n$1$91)
                  ((#((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(9
                        (n$5$92 a$6$93)
                        ((#((record-marker)
                            #((record-marker)
                              "<lambda-ast>"
                              (id args body has-cont))
                            #(8
                              (lp$2$7$94)
                              ((#((record-marker)
                                  #((record-marker)
                                    "<lambda-ast>"
                                    (id args body has-cont))
                                  #(1
                                    (r$141)
                                    ((lp$2$7$94 k$139 n$5$92 a$6$93))
                                    #f))
                                (set! lp$2$7$94
                                  #((record-marker)
                                    #((record-marker)
                                      "<lambda-ast>"
                                      (id args body has-cont))
                                    #(7
                                      (k$143 n$8$95 a$9$96)
                                      ((if (Cyc-fast-eq n$8$95 0)
                                         (k$143 a$9$96)
                                         (lp$2$7$94
                                           k$143
                                           (Cyc-fast-sub n$8$95 1)
                                           (cons '() a$9$96))))
                                      #t)))))
                              #f))
                          #f))
                        #f))
                    n$1$91
                    '()))
                  #t)))
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (run-r7rs-benchmark
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             -1
             120
             #f
             #f
             2
             (-1 28)
             #f
             (#((record-marker)
                #((record-marker)
                  "<lambda-ast>"
                  (id args body has-cont))
                #(120
                  (k$188 name$47$116
                         count$48$117
                         thunk$49$118
                         ok?$50$119)
                  ((#((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(119
                        (rounded$121)
                        ((#((record-marker)
                            #((record-marker)
                              "<lambda-ast>"
                              (id args body has-cont))
                            #(113
                              (r$189)
                              ((display
                                 #((record-marker)
                                   #((record-marker)
                                     "<lambda-ast>"
                                     (id args body has-cont))
                                   #(112
                                     (r$190)
                                     ((display
                                        #((record-marker)
                                          #((record-marker)
                                            "<lambda-ast>"
                                            (id args body has-cont))
                                          #(111
                                            (r$191)
                                            ((newline
                                               #((record-marker)
                                                 #((record-marker)
                                                   "<lambda-ast>"
                                                   (id args body has-cont))
                                                 #(110
                                                   (r$192)
                                                   ((current-output-port
                                                      #((record-marker)
                                                        #((record-marker)
                                                          "<lambda-ast>"
                                                          (id args
                                                              body
                                                              has-cont))
                                                        #(109
                                                          (r$233)
                                                          ((flush-output-port
                                                             #((record-marker)
                                                               #((record-marker)
                                                                 "<lambda-ast>"
                                                                 (id args
                                                                     body
                                                                     has-cont))
                                                               #(108
                                                                 (r$193)
                                                                 ((jiffies-per-second
                                                                    #((record-marker)
                                                                      #((record-marker)
                                                                        "<lambda-ast>"
                                                                        (id args
                                                                            body
                                                                            has-cont))
                                                                      #(106
                                                                        (j/s$54$124)
                                                                        ((current-second
                                                                           #((record-marker)
                                                                             #((record-marker)
                                                                               "<lambda-ast>"
                                                                               (id args
                                                                                   body
                                                                                   has-cont))
                                                                             #(104
                                                                               (t0$57$125)
                                                                               ((current-jiffy
                                                                                  #((record-marker)
                                                                                    #((record-marker)
                                                                                      "<lambda-ast>"
                                                                                      (id args
                                                                                          body
                                                                                          has-cont))
                                                                                    #(102
                                                                                      (j0$60$126)
                                                                                      ((#((record-marker)
                                                                                          #((record-marker)
                                                                                            "<lambda-ast>"
                                                                                            (id args
                                                                                                body
                                                                                                has-cont))
                                                                                          #(99
                                                                                            (loop$65$129)
                                                                                            ((#((record-marker)
                                                                                                #((record-marker)
                                                                                                  "<lambda-ast>"
                                                                                                  (id args
                                                                                                      body
                                                                                                      has-cont))
                                                                                                #(54
                                                                                                  (r$197)
                                                                                                  ((loop$65$129
                                                                                                     k$188
                                                                                                     0
                                                                                                     #f))
                                                                                                  #f))
                                                                                              (set! loop$65$129
                                                                                                #((record-marker)
                                                                                                  #((record-marker)
                                                                                                    "<lambda-ast>"
                                                                                                    (id args
                                                                                                        body
                                                                                                        has-cont))
                                                                                                  #(98
                                                                                                    (k$199 i$66$130
                                                                                                           result$67$131)
                                                                                                    ((if (Cyc-fast-lt
                                                                                                           i$66$130
                                                                                                           count$48$117)
                                                                                                       (thunk$49$118
                                                                                                         #((record-marker)
                                                                                                           #((record-marker)
                                                                                                             "<lambda-ast>"
                                                                                                             (id args
                                                                                                                 body
                                                                                                                 has-cont))
                                                                                                           #(56
                                                                                                             (r$202)
                                                                                                             ((loop$65$129
                                                                                                                k$199
                                                                                                                (Cyc-fast-plus
                                                                                                                  i$66$130
                                                                                                                  1)
                                                                                                                r$202))
                                                                                                             #f)))
                                                                                                       (ok?$50$119
                                                                                                         #((record-marker)
                                                                                                           #((record-marker)
                                                                                                             "<lambda-ast>"
                                                                                                             (id args
                                                                                                                 body
                                                                                                                 has-cont))
                                                                                                           #(96
                                                                                                             (r$203)
                                                                                                             ((if r$203
                                                                                                                (current-jiffy
                                                                                                                  #((record-marker)
                                                                                                                    #((record-marker)
                                                                                                                      "<lambda-ast>"
                                                                                                                      (id args
                                                                                                                          body
                                                                                                                          has-cont))
                                                                                                                    #(87
                                                                                                                      (j1$76$132)
                                                                                                                      ((current-second
                                                                                                                         #((record-marker)
                                                                                                                           #((record-marker)
                                                                                                                             "<lambda-ast>"
                                                                                                                             (id args
                                                                                                                                 body
                                                                                                                                 has-cont))
                                                                                                                           #(85
                                                                                                                             (t1$79$133)
                                                                                                                             ((rounded$121
                                                                                                                                #((record-marker)
                                                                                                                                  #((record-marker)
                                                                                                                                    "<lambda-ast>"
                                                                                                                                    (id args
                                                                                                                                        body
                                                                                                                                        has-cont))
                                                                                                                                  #(77
                                                                                                                                    (secs2$88$136)
                                                                                                                                    ((display
                                                                                                                                       #((record-marker)
                                                                                                                                         #((record-marker)
                                                                                                                                           "<lambda-ast>"
                                                                                                                                           (id args
                                                                                                                                               body
                                                                                                                                               has-cont))
                                                                                                                                         #(75
                                                                                                                                           (r$210)
                                                                                                                                           ((write #((record-marker)
                                                                                                                                                     #((record-marker)
                                                                                                                                                       "<lambda-ast>"
                                                                                                                                                       (id args
                                                                                                                                                           body
                                                                                                                                                           has-cont))
                                                                                                                                                     #(74
                                                                                                                                                       (r$211)
                                                                                                                                                       ((display
                                                                                                                                                          #((record-marker)
                                                                                                                                                            #((record-marker)
                                                                                                                                                              "<lambda-ast>"
                                                                                                                                                              (id args
                                                                                                                                                                  body
                                                                                                                                                                  has-cont))
                                                                                                                                                            #(73
                                                                                                                                                              (r$212)
                                                                                                                                                              ((write #((record-marker)
                                                                                                                                                                        #((record-marker)
                                                                                                                                                                          "<lambda-ast>"
                                                                                                                                                                          (id args
                                                                                                                                                                              body
                                                                                                                                                                              has-cont))
                                                                                                                                                                        #(72
                                                                                                                                                                          (r$213)
                                                                                                                                                                          ((display
                                                                                                                                                                             #((record-marker)
                                                                                                                                                                               #((record-marker)
                                                                                                                                                                                 "<lambda-ast>"
                                                                                                                                                                                 (id args
                                                                                                                                                                                     body
                                                                                                                                                                                     has-cont))
                                                                                                                                                                               #(71
                                                                                                                                                                                 (r$214)
                                                                                                                                                                                 ((display
                                                                                                                                                                                    #((record-marker)
                                                                                                                                                                                      #((record-marker)
                                                                                                                                                                                        "<lambda-ast>"
                                                                                                                                                                                        (id args
                                                                                                                                                                                            body
                                                                                                                                                                                            has-cont))
                                                                                                                                                                                      #(70
                                                                                                                                                                                        (r$215)
                                                                                                                                                                                        ((newline
                                                                                                                                                                                           #((record-marker)
                                                                                                                                                                                             #((record-marker)
                                                                                                                                                                                               "<lambda-ast>"
                                                                                                                                                                                               (id args
                                                                                                                                                                                                   body
                                                                                                                                                                                                   has-cont))
                                                                                                                                                                                             #(69
                                                                                                                                                                                               (r$216)
                                                                                                                                                                                               ((display
                                                                                                                                                                                                  #((record-marker)
                                                                                                                                                                                                    #((record-marker)
                                                                                                                                                                                                      "<lambda-ast>"
                                                                                                                                                                                                      (id args
                                                                                                                                                                                                          body
                                                                                                                                                                                                          has-cont))
                                                                                                                                                                                                    #(68
                                                                                                                                                                                                      (r$217)
                                                                                                                                                                                                      ((this-scheme-implementation-name
                                                                                                                                                                                                         #((record-marker)
                                                                                                                                                                                                           #((record-marker)
                                                                                                                                                                                                             "<lambda-ast>"
                                                                                                                                                                                                             (id args
                                                                                                                                                                                                                 body
                                                                                                                                                                                                                 has-cont))
                                                                                                                                                                                                           #(67
                                                                                                                                                                                                             (r$225)
                                                                                                                                                                                                             ((display
                                                                                                                                                                                                                #((record-marker)
                                                                                                                                                                                                                  #((record-marker)
                                                                                                                                                                                                                    "<lambda-ast>"
                                                                                                                                                                                                                    (id args
                                                                                                                                                                                                                        body
                                                                                                                                                                                                                        has-cont))
                                                                                                                                                                                                                  #(66
                                                                                                                                                                                                                    (r$218)
                                                                                                                                                                                                                    ((display
                                                                                                                                                                                                                       #((record-marker)
                                                                                                                                                                                                                         #((record-marker)
                                                                                                                                                                                                                           "<lambda-ast>"
                                                                                                                                                                                                                           (id args
                                                                                                                                                                                                                               body
                                                                                                                                                                                                                               has-cont))
                                                                                                                                                                                                                         #(65
                                                                                                                                                                                                                           (r$219)
                                                                                                                                                                                                                           ((display
                                                                                                                                                                                                                              #((record-marker)
                                                                                                                                                                                                                                #((record-marker)
                                                                                                                                                                                                                                  "<lambda-ast>"
                                                                                                                                                                                                                                  (id args
                                                                                                                                                                                                                                      body
                                                                                                                                                                                                                                      has-cont))
                                                                                                                                                                                                                                #(64
                                                                                                                                                                                                                                  (r$220)
                                                                                                                                                                                                                                  ((display
                                                                                                                                                                                                                                     #((record-marker)
                                                                                                                                                                                                                                       #((record-marker)
                                                                                                                                                                                                                                         "<lambda-ast>"
                                                                                                                                                                                                                                         (id args
                                                                                                                                                                                                                                             body
                                                                                                                                                                                                                                             has-cont))
                                                                                                                                                                                                                                       #(63
                                                                                                                                                                                                                                         (r$221)
                                                                                                                                                                                                                                         ((display
                                                                                                                                                                                                                                            #((record-marker)
                                                                                                                                                                                                                                              #((record-marker)
                                                                                                                                                                                                                                                "<lambda-ast>"
                                                                                                                                                                                                                                                (id args
                                                                                                                                                                                                                                                    body
                                                                                                                                                                                                                                                    has-cont))
                                                                                                                                                                                                                                              #(62
                                                                                                                                                                                                                                                (r$222)
                                                                                                                                                                                                                                                ((newline
                                                                                                                                                                                                                                                   #((record-marker)
                                                                                                                                                                                                                                                     #((record-marker)
                                                                                                                                                                                                                                                       "<lambda-ast>"
                                                                                                                                                                                                                                                       (id args
                                                                                                                                                                                                                                                           body
                                                                                                                                                                                                                                                           has-cont))
                                                                                                                                                                                                                                                     #(61
                                                                                                                                                                                                                                                       (r$223)
                                                                                                                                                                                                                                                       ((current-output-port
                                                                                                                                                                                                                                                          #((record-marker)
                                                                                                                                                                                                                                                            #((record-marker)
                                                                                                                                                                                                                                                              "<lambda-ast>"
                                                                                                                                                                                                                                                              (id args
                                                                                                                                                                                                                                                                  body
                                                                                                                                                                                                                                                                  has-cont))
                                                                                                                                                                                                                                                            #(60
                                                                                                                                                                                                                                                              (r$224)
                                                                                                                                                                                                                                                              ((flush-output-port
                                                                                                                                                                                                                                                                 #((record-marker)
                                                                                                                                                                                                                                                                   #((record-marker)
                                                                                                                                                                                                                                                                     "<lambda-ast>"
                                                                                                                                                                                                                                                                     (id args
                                                                                                                                                                                                                                                                         body
                                                                                                                                                                                                                                                                         has-cont))
                                                                                                                                                                                                                                                                   #(59
                                                                                                                                                                                                                                                                     (r$204)
                                                                                                                                                                                                                                                                     ((k$199 result$67$131))
                                                                                                                                                                                                                                                                     #f))
                                                                                                                                                                                                                                                                 r$224))
                                                                                                                                                                                                                                                              #f))))
                                                                                                                                                                                                                                                       #f))))
                                                                                                                                                                                                                                                #f))
                                                                                                                                                                                                                                            (inexact__inline__
                                                                                                                                                                                                                                              (Cyc-fast-div
                                                                                                                                                                                                                                                (Cyc-fast-sub
                                                                                                                                                                                                                                                  j1$76$132
                                                                                                                                                                                                                                                  j0$60$126)
                                                                                                                                                                                                                                                j/s$54$124))))
                                                                                                                                                                                                                                         #f))
                                                                                                                                                                                                                                     ","))
                                                                                                                                                                                                                                  #f))
                                                                                                                                                                                                                              name$47$116))
                                                                                                                                                                                                                           #f))
                                                                                                                                                                                                                       ","))
                                                                                                                                                                                                                    #f))
                                                                                                                                                                                                                r$225))
                                                                                                                                                                                                             #f))))
                                                                                                                                                                                                      #f))
                                                                                                                                                                                                  "+!CSVLINE!+"))
                                                                                                                                                                                               #f))))
                                                                                                                                                                                        #f))
                                                                                                                                                                                    name$47$116))
                                                                                                                                                                                 #f))
                                                                                                                                                                             ") for "))
                                                                                                                                                                          #f))
                                                                                                                                                                      secs2$88$136))
                                                                                                                                                              #f))
                                                                                                                                                          " seconds ("))
                                                                                                                                                       #f))
                                                                                                                                                   (inexact__inline__
                                                                                                                                                     (Cyc-fast-div
                                                                                                                                                       (Cyc-fast-sub
                                                                                                                                                         j1$76$132
                                                                                                                                                         j0$60$126)
                                                                                                                                                       j/s$54$124))))
                                                                                                                                           #f))
                                                                                                                                       "Elapsed time: "))
                                                                                                                                    #f))
                                                                                                                                (Cyc-fast-sub
                                                                                                                                  t1$79$133
                                                                                                                                  t0$57$125)))
                                                                                                                             #f))))
                                                                                                                      #f)))
                                                                                                                (display
                                                                                                                  #((record-marker)
                                                                                                                    #((record-marker)
                                                                                                                      "<lambda-ast>"
                                                                                                                      (id args
                                                                                                                          body
                                                                                                                          has-cont))
                                                                                                                    #(94
                                                                                                                      (r$228)
                                                                                                                      ((write #((record-marker)
                                                                                                                                #((record-marker)
                                                                                                                                  "<lambda-ast>"
                                                                                                                                  (id args
                                                                                                                                      body
                                                                                                                                      has-cont))
                                                                                                                                #(93
                                                                                                                                  (r$229)
                                                                                                                                  ((newline
                                                                                                                                     #((record-marker)
                                                                                                                                       #((record-marker)
                                                                                                                                         "<lambda-ast>"
                                                                                                                                         (id args
                                                                                                                                             body
                                                                                                                                             has-cont))
                                                                                                                                       #(92
                                                                                                                                         (r$230)
                                                                                                                                         ((current-output-port
                                                                                                                                            #((record-marker)
                                                                                                                                              #((record-marker)
                                                                                                                                                "<lambda-ast>"
                                                                                                                                                (id args
                                                                                                                                                    body
                                                                                                                                                    has-cont))
                                                                                                                                              #(91
                                                                                                                                                (r$232)
                                                                                                                                                ((flush-output-port
                                                                                                                                                   #((record-marker)
                                                                                                                                                     #((record-marker)
                                                                                                                                                       "<lambda-ast>"
                                                                                                                                                       (id args
                                                                                                                                                           body
                                                                                                                                                           has-cont))
                                                                                                                                                     #(90
                                                                                                                                                       (r$231)
                                                                                                                                                       ((k$199 result$67$131))
                                                                                                                                                       #f))
                                                                                                                                                   r$232))
                                                                                                                                                #f))))
                                                                                                                                         #f))))
                                                                                                                                  #f))
                                                                                                                              result$67$131))
                                                                                                                      #f))
                                                                                                                  "ERROR: returned incorrect result: ")))
                                                                                                             #f))
                                                                                                         result$67$131)))
                                                                                                    #t)))))
                                                                                            #f))
                                                                                        #f))
                                                                                      #f))))
                                                                               #f))))
                                                                        #f))))
                                                                 #f))
                                                             r$233))
                                                          #f))))
                                                   #f))))
                                            #f))
                                        name$47$116))
                                     #f))
                                 "Running "))
                              #f))
                          (set! rounded$121
                            #((record-marker)
                              #((record-marker)
                                "<lambda-ast>"
                                (id args body has-cont))
                              #(117
                                (k$235 x$51$123)
                                ((k$235 (Cyc-fast-div
                                          (round__inline__
                                            (Cyc-fast-mul 1000 x$51$123))
                                          1000)))
                                #t)))))
                        #f))
                    #f))
                  #t)))
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((r$192 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  110
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (x$44$113
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             51
             #f
             #f
             #f
             1
             (51)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$180 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  49
                  #f
                  #f
                  #f
                  1
                  (46)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (l$10$97
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             22
             #f
             #f
             #f
             1
             (22)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (k$240 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  122
                  #f
                  #f
                  #f
                  1
                  (121)
                  #f
                  #f
                  1
                  0
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (r$204 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  59
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$224 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  60
                  #f
                  #f
                  #f
                  1
                  (60)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #t
                  #t
                  #f
                  #f)))
       (r$220 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  64
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$216 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  69
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$212 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  73
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (rounded$121
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             119
             #f
             #f
             #f
             2
             (119 85)
             #f
             #((record-marker)
               #((record-marker)
                 "<lambda-ast>"
                 (id args body has-cont))
               #(117
                 (k$235 x$51$123)
                 ((k$235 (Cyc-fast-div
                           (round__inline__ (Cyc-fast-mul 1000 x$51$123))
                           1000)))
                 #t))
             1
             0
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (t1$79$133
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             85
             #f
             #f
             #f
             1
             (85)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (count$48$117
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             120
             #f
             #f
             #f
             1
             (98)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (k$188 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  120
                  #f
                  #f
                  #f
                  1
                  (54)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #t
                  #f
                  #t
                  #f
                  #f)))
       (loop$65$129
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             99
             #f
             #f
             #f
             3
             (56 99 54)
             #f
             #((record-marker)
               #((record-marker)
                 "<lambda-ast>"
                 (id args body has-cont))
               #(98
                 (k$199 i$66$130 result$67$131)
                 ((if (Cyc-fast-lt i$66$130 count$48$117)
                    (thunk$49$118
                      #((record-marker)
                        #((record-marker)
                          "<lambda-ast>"
                          (id args body has-cont))
                        #(56
                          (r$202)
                          ((loop$65$129
                             k$199
                             (Cyc-fast-plus i$66$130 1)
                             r$202))
                          #f)))
                    (ok?$50$119
                      #((record-marker)
                        #((record-marker)
                          "<lambda-ast>"
                          (id args body has-cont))
                        #(96
                          (r$203)
                          ((if r$203
                             (current-jiffy
                               #((record-marker)
                                 #((record-marker)
                                   "<lambda-ast>"
                                   (id args body has-cont))
                                 #(87
                                   (j1$76$132)
                                   ((current-second
                                      #((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(85
                                          (t1$79$133)
                                          ((rounded$121
                                             #((record-marker)
                                               #((record-marker)
                                                 "<lambda-ast>"
                                                 (id args body has-cont))
                                               #(77
                                                 (secs2$88$136)
                                                 ((display
                                                    #((record-marker)
                                                      #((record-marker)
                                                        "<lambda-ast>"
                                                        (id args body has-cont))
                                                      #(75
                                                        (r$210)
                                                        ((write #((record-marker)
                                                                  #((record-marker)
                                                                    "<lambda-ast>"
                                                                    (id args
                                                                        body
                                                                        has-cont))
                                                                  #(74
                                                                    (r$211)
                                                                    ((display
                                                                       #((record-marker)
                                                                         #((record-marker)
                                                                           "<lambda-ast>"
                                                                           (id args
                                                                               body
                                                                               has-cont))
                                                                         #(73
                                                                           (r$212)
                                                                           ((write #((record-marker)
                                                                                     #((record-marker)
                                                                                       "<lambda-ast>"
                                                                                       (id args
                                                                                           body
                                                                                           has-cont))
                                                                                     #(72
                                                                                       (r$213)
                                                                                       ((display
                                                                                          #((record-marker)
                                                                                            #((record-marker)
                                                                                              "<lambda-ast>"
                                                                                              (id args
                                                                                                  body
                                                                                                  has-cont))
                                                                                            #(71
                                                                                              (r$214)
                                                                                              ((display
                                                                                                 #((record-marker)
                                                                                                   #((record-marker)
                                                                                                     "<lambda-ast>"
                                                                                                     (id args
                                                                                                         body
                                                                                                         has-cont))
                                                                                                   #(70
                                                                                                     (r$215)
                                                                                                     ((newline
                                                                                                        #((record-marker)
                                                                                                          #((record-marker)
                                                                                                            "<lambda-ast>"
                                                                                                            (id args
                                                                                                                body
                                                                                                                has-cont))
                                                                                                          #(69
                                                                                                            (r$216)
                                                                                                            ((display
                                                                                                               #((record-marker)
                                                                                                                 #((record-marker)
                                                                                                                   "<lambda-ast>"
                                                                                                                   (id args
                                                                                                                       body
                                                                                                                       has-cont))
                                                                                                                 #(68
                                                                                                                   (r$217)
                                                                                                                   ((this-scheme-implementation-name
                                                                                                                      #((record-marker)
                                                                                                                        #((record-marker)
                                                                                                                          "<lambda-ast>"
                                                                                                                          (id args
                                                                                                                              body
                                                                                                                              has-cont))
                                                                                                                        #(67
                                                                                                                          (r$225)
                                                                                                                          ((display
                                                                                                                             #((record-marker)
                                                                                                                               #((record-marker)
                                                                                                                                 "<lambda-ast>"
                                                                                                                                 (id args
                                                                                                                                     body
                                                                                                                                     has-cont))
                                                                                                                               #(66
                                                                                                                                 (r$218)
                                                                                                                                 ((display
                                                                                                                                    #((record-marker)
                                                                                                                                      #((record-marker)
                                                                                                                                        "<lambda-ast>"
                                                                                                                                        (id args
                                                                                                                                            body
                                                                                                                                            has-cont))
                                                                                                                                      #(65
                                                                                                                                        (r$219)
                                                                                                                                        ((display
                                                                                                                                           #((record-marker)
                                                                                                                                             #((record-marker)
                                                                                                                                               "<lambda-ast>"
                                                                                                                                               (id args
                                                                                                                                                   body
                                                                                                                                                   has-cont))
                                                                                                                                             #(64
                                                                                                                                               (r$220)
                                                                                                                                               ((display
                                                                                                                                                  #((record-marker)
                                                                                                                                                    #((record-marker)
                                                                                                                                                      "<lambda-ast>"
                                                                                                                                                      (id args
                                                                                                                                                          body
                                                                                                                                                          has-cont))
                                                                                                                                                    #(63
                                                                                                                                                      (r$221)
                                                                                                                                                      ((display
                                                                                                                                                         #((record-marker)
                                                                                                                                                           #((record-marker)
                                                                                                                                                             "<lambda-ast>"
                                                                                                                                                             (id args
                                                                                                                                                                 body
                                                                                                                                                                 has-cont))
                                                                                                                                                           #(62
                                                                                                                                                             (r$222)
                                                                                                                                                             ((newline
                                                                                                                                                                #((record-marker)
                                                                                                                                                                  #((record-marker)
                                                                                                                                                                    "<lambda-ast>"
                                                                                                                                                                    (id args
                                                                                                                                                                        body
                                                                                                                                                                        has-cont))
                                                                                                                                                                  #(61
                                                                                                                                                                    (r$223)
                                                                                                                                                                    ((current-output-port
                                                                                                                                                                       #((record-marker)
                                                                                                                                                                         #((record-marker)
                                                                                                                                                                           "<lambda-ast>"
                                                                                                                                                                           (id args
                                                                                                                                                                               body
                                                                                                                                                                               has-cont))
                                                                                                                                                                         #(60
                                                                                                                                                                           (r$224)
                                                                                                                                                                           ((flush-output-port
                                                                                                                                                                              #((record-marker)
                                                                                                                                                                                #((record-marker)
                                                                                                                                                                                  "<lambda-ast>"
                                                                                                                                                                                  (id args
                                                                                                                                                                                      body
                                                                                                                                                                                      has-cont))
                                                                                                                                                                                #(59
                                                                                                                                                                                  (r$204)
                                                                                                                                                                                  ((k$199 result$67$131))
                                                                                                                                                                                  #f))
                                                                                                                                                                              r$224))
                                                                                                                                                                           #f))))
                                                                                                                                                                    #f))))
                                                                                                                                                             #f))
                                                                                                                                                         (inexact__inline__
                                                                                                                                                           (Cyc-fast-div
                                                                                                                                                             (Cyc-fast-sub
                                                                                                                                                               j1$76$132
                                                                                                                                                               j0$60$126)
                                                                                                                                                             j/s$54$124))))
                                                                                                                                                      #f))
                                                                                                                                                  ","))
                                                                                                                                               #f))
                                                                                                                                           name$47$116))
                                                                                                                                        #f))
                                                                                                                                    ","))
                                                                                                                                 #f))
                                                                                                                             r$225))
                                                                                                                          #f))))
                                                                                                                   #f))
                                                                                                               "+!CSVLINE!+"))
                                                                                                            #f))))
                                                                                                     #f))
                                                                                                 name$47$116))
                                                                                              #f))
                                                                                          ") for "))
                                                                                       #f))
                                                                                   secs2$88$136))
                                                                           #f))
                                                                       " seconds ("))
                                                                    #f))
                                                                (inexact__inline__
                                                                  (Cyc-fast-div
                                                                    (Cyc-fast-sub
                                                                      j1$76$132
                                                                      j0$60$126)
                                                                    j/s$54$124))))
                                                        #f))
                                                    "Elapsed time: "))
                                                 #f))
                                             (Cyc-fast-sub
                                               t1$79$133
                                               t0$57$125)))
                                          #f))))
                                   #f)))
                             (display
                               #((record-marker)
                                 #((record-marker)
                                   "<lambda-ast>"
                                   (id args body has-cont))
                                 #(94
                                   (r$228)
                                   ((write #((record-marker)
                                             #((record-marker)
                                               "<lambda-ast>"
                                               (id args body has-cont))
                                             #(93
                                               (r$229)
                                               ((newline
                                                  #((record-marker)
                                                    #((record-marker)
                                                      "<lambda-ast>"
                                                      (id args body has-cont))
                                                    #(92
                                                      (r$230)
                                                      ((current-output-port
                                                         #((record-marker)
                                                           #((record-marker)
                                                             "<lambda-ast>"
                                                             (id args
                                                                 body
                                                                 has-cont))
                                                           #(91
                                                             (r$232)
                                                             ((flush-output-port
                                                                #((record-marker)
                                                                  #((record-marker)
                                                                    "<lambda-ast>"
                                                                    (id args
                                                                        body
                                                                        has-cont))
                                                                  #(90
                                                                    (r$231)
                                                                    ((k$199 result$67$131))
                                                                    #f))
                                                                r$232))
                                                             #f))))
                                                      #f))))
                                               #f))
                                           result$67$131))
                                   #f))
                               "ERROR: returned incorrect result: ")))
                          #f))
                      result$67$131)))
                 #t))
             2
             0
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (l$17$101
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             18
             #f
             #f
             #f
             3
             (18 18 18)
             #f
             #f
             0
             3
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (r$152 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  12
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  (set! lp$11$16$100
                    #((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(18
                        (k$154 l$17$101 a$18$102)
                        ((if (null? l$17$101)
                           (k$154 a$18$102)
                           (lp$11$16$100
                             k$154
                             (cddr l$17$101)
                             (cons (car l$17$101) a$18$102))))
                        #t)))
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (a$6$93
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             9
             #f
             #f
             #f
             1
             (1)
             #f
             '()
             0
             1
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (t0$57$125
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             104
             #f
             #f
             #f
             1
             (85)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (r$228 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  94
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$232 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  91
                  #f
                  #f
                  #f
                  1
                  (91)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #t
                  #t
                  #f
                  #f)))
       (k$168 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  25
                  #f
                  #f
                  #f
                  1
                  (25)
                  #f
                  #f
                  1
                  0
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((string-append
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (121 31)
             #f
             #f
             2
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (length
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (25)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (equal?
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (25)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (cddr .
             #((record-marker)
               #((record-marker)
                 "<analysis-db-variable>"
                 (global
                   defined-by
                   defines-lambda-id
                   const
                   const-value
                   ref-count
                   ref-by
                   reassigned
                   assigned-value
                   app-fnc-count
                   app-arg-count
                   inlinable
                   mutated-indirectly
                   cont
                   def-in-loop
                   ref-in-loop
                   direct-rec-call
                   self-rec-call))
               #(?
                 ?
                 #f
                 #f
                 #f
                 1
                 (18)
                 #f
                 #f
                 1
                 0
                 #t
                 #f
                 #f
                 #f
                 #t
                 #f
                 #f)))
       (null? .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(?
                  ?
                  #f
                  #f
                  #f
                  1
                  (18)
                  #f
                  #f
                  1
                  0
                  #t
                  #f
                  #f
                  #f
                  #t
                  #f
                  #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((-1
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(? ? () #t)))))))
 */
/* 
"---------------- after cps optimizations (2):"
 */
/* 
((define create-n
   (lambda-11-cont
     (k$139 n$1$91)
     ((lambda-9
        (n$5$92 a$6$93)
        ((lambda-8
           (lp$2$7$94)
           ((lambda-1
              (r$141)
              (lp$2$7$94 k$139 n$5$92 a$6$93))
            (set! lp$2$7$94
              (lambda-7-cont
                (k$143 n$8$95 a$9$96)
                (if (Cyc-fast-eq n$8$95 0)
                  (k$143 a$9$96)
                  (lp$2$7$94
                    k$143
                    (Cyc-fast-sub n$8$95 1)
                    (cons '() a$9$96)))))))
         #f))
      n$1$91
      '())))
 (define iterative-div2
   (lambda-22-cont
     (k$150 l$10$97)
     ((lambda-20
        (l$14$98 a$15$99)
        ((lambda-19
           (lp$11$16$100)
           ((lambda-12
              (r$152)
              (lp$11$16$100 k$150 l$14$98 a$15$99))
            (set! lp$11$16$100
              (lambda-18-cont
                (k$154 l$17$101 a$18$102)
                (if (null? l$17$101)
                  (k$154 a$18$102)
                  (lp$11$16$100
                    k$154
                    (cddr l$17$101)
                    (cons (car l$17$101) a$18$102)))))))
         #f))
      l$10$97
      '())))
 (define main
   (lambda-41-cont
     (k$161)
     (hide (lambda-33
             (r$171)
             (create-n
               (lambda-31
                 (ll$36$108)
                 (run-r7rs-benchmark
                   k$161
                   "diviter:1000:1000000"
                   1000000
                   (lambda-27-cont
                     (k$170)
                     (iterative-div2 k$170 ll$36$108))
                   (lambda-25-cont
                     (k$168 result$41$110)
                     (k$168 (equal? (length result$41$110) 500)))))
               r$171))
           1000000
           1000)))
 (define hide
   (lambda-53-cont
     (k$174 r$42$111 x$43$112)
     (call-with-values
       k$174
       (lambda-52-cont
         (k$179)
         (vector
           (lambda-49
             (r$180)
             ((lambda-48-cont
                (k$182)
                (if (Cyc-fast-lt r$42$111 100)
                  (k$182 0)
                  (k$182 1)))
              (lambda-46 (r$181) (values k$179 r$180 r$181))))
           values
           (lambda-51-cont
             (k$185 x$44$113)
             (k$185 x$44$113))))
       (lambda-44-cont
         (k$177 v$45$114 i$46$115)
         ((vector-ref v$45$114 i$46$115) k$177 x$43$112)))))
 (define run-r7rs-benchmark
   (lambda-120-cont
     (k$188 name$47$116
            count$48$117
            thunk$49$118
            ok?$50$119)
     ((lambda-119
        (rounded$121)
        ((lambda-113
           (r$189)
           (display
             (lambda-112
               (r$190)
               (display
                 (lambda-111
                   (r$191)
                   (newline
                     (lambda-110
                       (r$192)
                       (current-output-port
                         (lambda-109
                           (r$233)
                           (flush-output-port
                             (lambda-108
                               (r$193)
                               (jiffies-per-second
                                 (lambda-106
                                   (j/s$54$124)
                                   (current-second
                                     (lambda-104
                                       (t0$57$125)
                                       (current-jiffy
                                         (lambda-102
                                           (j0$60$126)
                                           ((lambda-99
                                              (loop$65$129)
                                              ((lambda-54
                                                 (r$197)
                                                 (loop$65$129 k$188 0 #f))
                                               (set! loop$65$129
                                                 (lambda-98-cont
                                                   (k$199 i$66$130
                                                          result$67$131)
                                                   (if (Cyc-fast-lt
                                                         i$66$130
                                                         count$48$117)
                                                     (thunk$49$118
                                                       (lambda-56
                                                         (r$202)
                                                         (loop$65$129
                                                           k$199
                                                           (Cyc-fast-plus
                                                             i$66$130
                                                             1)
                                                           r$202)))
                                                     (ok?$50$119
                                                       (lambda-96
                                                         (r$203)
                                                         (if r$203
                                                           (current-jiffy
                                                             (lambda-87
                                                               (j1$76$132)
                                                               (current-second
                                                                 (lambda-85
                                                                   (t1$79$133)
                                                                   (rounded$121
                                                                     (lambda-77
                                                                       (secs2$88$136)
                                                                       (display
                                                                         (lambda-75
                                                                           (r$210)
                                                                           (write (lambda-74
                                                                                    (r$211)
                                                                                    (display
                                                                                      (lambda-73
                                                                                        (r$212)
                                                                                        (write (lambda-72
                                                                                                 (r$213)
                                                                                                 (display
                                                                                                   (lambda-71
                                                                                                     (r$214)
                                                                                                     (display
                                                                                                       (lambda-70
                                                                                                         (r$215)
                                                                                                         (newline
                                                                                                           (lambda-69
                                                                                                             (r$216)
                                                                                                             (display
                                                                                                               (lambda-68
                                                                                                                 (r$217)
                                                                                                                 (this-scheme-implementation-name
                                                                                                                   (lambda-67
                                                                                                                     (r$225)
                                                                                                                     (display
                                                                                                                       (lambda-66
                                                                                                                         (r$218)
                                                                                                                         (display
                                                                                                                           (lambda-65
                                                                                                                             (r$219)
                                                                                                                             (display
                                                                                                                               (lambda-64
                                                                                                                                 (r$220)
                                                                                                                                 (display
                                                                                                                                   (lambda-63
                                                                                                                                     (r$221)
                                                                                                                                     (display
                                                                                                                                       (lambda-62
                                                                                                                                         (r$222)
                                                                                                                                         (newline
                                                                                                                                           (lambda-61
                                                                                                                                             (r$223)
                                                                                                                                             (current-output-port
                                                                                                                                               (lambda-60
                                                                                                                                                 (r$224)
                                                                                                                                                 (flush-output-port
                                                                                                                                                   (lambda-59
                                                                                                                                                     (r$204)
                                                                                                                                                     (k$199 result$67$131))
                                                                                                                                                   r$224))))))
                                                                                                                                       (inexact__inline__
                                                                                                                                         (Cyc-fast-div
                                                                                                                                           (Cyc-fast-sub
                                                                                                                                             j1$76$132
                                                                                                                                             j0$60$126)
                                                                                                                                           j/s$54$124))))
                                                                                                                                   ","))
                                                                                                                               name$47$116))
                                                                                                                           ","))
                                                                                                                       r$225))))
                                                                                                               "+!CSVLINE!+"))))
                                                                                                       name$47$116))
                                                                                                   ") for "))
                                                                                               secs2$88$136))
                                                                                      " seconds ("))
                                                                                  (inexact__inline__
                                                                                    (Cyc-fast-div
                                                                                      (Cyc-fast-sub
                                                                                        j1$76$132
                                                                                        j0$60$126)
                                                                                      j/s$54$124))))
                                                                         "Elapsed time: "))
                                                                     (Cyc-fast-sub
                                                                       t1$79$133
                                                                       t0$57$125))))))
                                                           (display
                                                             (lambda-94
                                                               (r$228)
                                                               (write (lambda-93
                                                                        (r$229)
                                                                        (newline
                                                                          (lambda-92
                                                                            (r$230)
                                                                            (current-output-port
                                                                              (lambda-91
                                                                                (r$232)
                                                                                (flush-output-port
                                                                                  (lambda-90
                                                                                    (r$231)
                                                                                    (k$199 result$67$131))
                                                                                  r$232))))))
                                                                      result$67$131))
                                                             "ERROR: returned incorrect result: ")))
                                                       result$67$131))))))
                                            #f))))))))
                             r$233))))))
                 name$47$116))
             "Running "))
         (set! rounded$121
           (lambda-117-cont
             (k$235 x$51$123)
             (k$235 (Cyc-fast-div
                      (round__inline__ (Cyc-fast-mul 1000 x$51$123))
                      1000))))))
      #f)))
 (define this-scheme-implementation-name
   (lambda-122-cont
     (k$240)
     (Cyc-version
       (lambda-121
         (r$241)
         (k$240 (string-append "cyclone-" r$241))))))
 (main %halt))
 */
/* 
"---------------- cps analysis db:"
 */
/* 
#((record-marker)
  #((record-marker)
    "<srfi-hash-table>"
    (size hash compare associate entries))
  #(189
    #[procedure]
    #[procedure]
    #[procedure]
    #(()
      ((1
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ()
      ()
      ()
      ()
      ((7
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (lp$2$7$94) #f))))
      ((8
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((9
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ((11
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((12
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ()
      ()
      ((%halt .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(?
                  ?
                  #f
                  #f
                  #f
                  1
                  (-1)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (Cyc-fast-mul
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (117)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (inexact__inline__
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (75 63)
             #f
             #f
             2
             0
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (iterative-div2
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             -1
             22
             #f
             #f
             2
             (27 -1)
             #f
             (#((record-marker)
                #((record-marker)
                  "<lambda-ast>"
                  (id args body has-cont))
                #(22
                  (k$150 l$10$97)
                  ((#((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(20
                        (l$14$98 a$15$99)
                        ((#((record-marker)
                            #((record-marker)
                              "<lambda-ast>"
                              (id args body has-cont))
                            #(19
                              (lp$11$16$100)
                              ((#((record-marker)
                                  #((record-marker)
                                    "<lambda-ast>"
                                    (id args body has-cont))
                                  #(12
                                    (r$152)
                                    ((lp$11$16$100 k$150 l$14$98 a$15$99))
                                    #f))
                                (set! lp$11$16$100
                                  #((record-marker)
                                    #((record-marker)
                                      "<lambda-ast>"
                                      (id args body has-cont))
                                    #(18
                                      (k$154 l$17$101 a$18$102)
                                      ((if (null? l$17$101)
                                         (k$154 a$18$102)
                                         (lp$11$16$100
                                           k$154
                                           (cddr l$17$101)
                                           (cons (car l$17$101) a$18$102))))
                                      #t)))))
                              #f))
                          #f))
                        #f))
                    l$10$97
                    '()))
                  #t)))
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ((18
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (lp$11$16$100) #f))))
      ((19
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((20
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ((22
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ()
      ((25
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((27
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ()
      ()
      ((31
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((r$241 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  121
                  #f
                  #f
                  #f
                  1
                  (121)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$193 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  108
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$233 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  109
                  #f
                  #f
                  #f
                  1
                  (109)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (r$189 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  113
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  (set! rounded$121
                    #((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(117
                        (k$235 x$51$123)
                        ((k$235 (Cyc-fast-div
                                  (round__inline__ (Cyc-fast-mul 1000 x$51$123))
                                  1000)))
                        #t)))
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (v$45$114
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             44
             #f
             #f
             #f
             1
             (44)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$181 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  46
                  #f
                  #f
                  #f
                  1
                  (46)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (result$41$110
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             25
             #f
             #f
             #f
             1
             (25)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$221 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  63
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$225 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  67
                  #f
                  #f
                  #f
                  1
                  (67)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #t
                  #t
                  #f
                  #f)))
       (this-scheme-implementation-name
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             -1
             122
             #f
             #f
             2
             (-1 68)
             #f
             (#((record-marker)
                #((record-marker)
                  "<lambda-ast>"
                  (id args body has-cont))
                #(122
                  (k$240)
                  ((Cyc-version
                     #((record-marker)
                       #((record-marker)
                         "<lambda-ast>"
                         (id args body has-cont))
                       #(121
                         (r$241)
                         ((k$240 (string-append "cyclone-" r$241)))
                         #f))))
                  #t)))
             1
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (r$217 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  68
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$213 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  72
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (thunk$49$118
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             120
             #f
             #f
             #f
             1
             (98)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (i$66$130
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             98
             #f
             #f
             #f
             2
             (56 98)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (r$197 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  54
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  (set! loop$65$129
                    #((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(98
                        (k$199 i$66$130 result$67$131)
                        ((if (Cyc-fast-lt i$66$130 count$48$117)
                           (thunk$49$118
                             #((record-marker)
                               #((record-marker)
                                 "<lambda-ast>"
                                 (id args body has-cont))
                               #(56
                                 (r$202)
                                 ((loop$65$129
                                    k$199
                                    (Cyc-fast-plus i$66$130 1)
                                    r$202))
                                 #f)))
                           (ok?$50$119
                             #((record-marker)
                               #((record-marker)
                                 "<lambda-ast>"
                                 (id args body has-cont))
                               #(96
                                 (r$203)
                                 ((if r$203
                                    (current-jiffy
                                      #((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(87
                                          (j1$76$132)
                                          ((current-second
                                             #((record-marker)
                                               #((record-marker)
                                                 "<lambda-ast>"
                                                 (id args body has-cont))
                                               #(85
                                                 (t1$79$133)
                                                 ((rounded$121
                                                    #((record-marker)
                                                      #((record-marker)
                                                        "<lambda-ast>"
                                                        (id args body has-cont))
                                                      #(77
                                                        (secs2$88$136)
                                                        ((display
                                                           #((record-marker)
                                                             #((record-marker)
                                                               "<lambda-ast>"
                                                               (id args
                                                                   body
                                                                   has-cont))
                                                             #(75
                                                               (r$210)
                                                               ((write #((record-marker)
                                                                         #((record-marker)
                                                                           "<lambda-ast>"
                                                                           (id args
                                                                               body
                                                                               has-cont))
                                                                         #(74
                                                                           (r$211)
                                                                           ((display
                                                                              #((record-marker)
                                                                                #((record-marker)
                                                                                  "<lambda-ast>"
                                                                                  (id args
                                                                                      body
                                                                                      has-cont))
                                                                                #(73
                                                                                  (r$212)
                                                                                  ((write #((record-marker)
                                                                                            #((record-marker)
                                                                                              "<lambda-ast>"
                                                                                              (id args
                                                                                                  body
                                                                                                  has-cont))
                                                                                            #(72
                                                                                              (r$213)
                                                                                              ((display
                                                                                                 #((record-marker)
                                                                                                   #((record-marker)
                                                                                                     "<lambda-ast>"
                                                                                                     (id args
                                                                                                         body
                                                                                                         has-cont))
                                                                                                   #(71
                                                                                                     (r$214)
                                                                                                     ((display
                                                                                                        #((record-marker)
                                                                                                          #((record-marker)
                                                                                                            "<lambda-ast>"
                                                                                                            (id args
                                                                                                                body
                                                                                                                has-cont))
                                                                                                          #(70
                                                                                                            (r$215)
                                                                                                            ((newline
                                                                                                               #((record-marker)
                                                                                                                 #((record-marker)
                                                                                                                   "<lambda-ast>"
                                                                                                                   (id args
                                                                                                                       body
                                                                                                                       has-cont))
                                                                                                                 #(69
                                                                                                                   (r$216)
                                                                                                                   ((display
                                                                                                                      #((record-marker)
                                                                                                                        #((record-marker)
                                                                                                                          "<lambda-ast>"
                                                                                                                          (id args
                                                                                                                              body
                                                                                                                              has-cont))
                                                                                                                        #(68
                                                                                                                          (r$217)
                                                                                                                          ((this-scheme-implementation-name
                                                                                                                             #((record-marker)
                                                                                                                               #((record-marker)
                                                                                                                                 "<lambda-ast>"
                                                                                                                                 (id args
                                                                                                                                     body
                                                                                                                                     has-cont))
                                                                                                                               #(67
                                                                                                                                 (r$225)
                                                                                                                                 ((display
                                                                                                                                    #((record-marker)
                                                                                                                                      #((record-marker)
                                                                                                                                        "<lambda-ast>"
                                                                                                                                        (id args
                                                                                                                                            body
                                                                                                                                            has-cont))
                                                                                                                                      #(66
                                                                                                                                        (r$218)
                                                                                                                                        ((display
                                                                                                                                           #((record-marker)
                                                                                                                                             #((record-marker)
                                                                                                                                               "<lambda-ast>"
                                                                                                                                               (id args
                                                                                                                                                   body
                                                                                                                                                   has-cont))
                                                                                                                                             #(65
                                                                                                                                               (r$219)
                                                                                                                                               ((display
                                                                                                                                                  #((record-marker)
                                                                                                                                                    #((record-marker)
                                                                                                                                                      "<lambda-ast>"
                                                                                                                                                      (id args
                                                                                                                                                          body
                                                                                                                                                          has-cont))
                                                                                                                                                    #(64
                                                                                                                                                      (r$220)
                                                                                                                                                      ((display
                                                                                                                                                         #((record-marker)
                                                                                                                                                           #((record-marker)
                                                                                                                                                             "<lambda-ast>"
                                                                                                                                                             (id args
                                                                                                                                                                 body
                                                                                                                                                                 has-cont))
                                                                                                                                                           #(63
                                                                                                                                                             (r$221)
                                                                                                                                                             ((display
                                                                                                                                                                #((record-marker)
                                                                                                                                                                  #((record-marker)
                                                                                                                                                                    "<lambda-ast>"
                                                                                                                                                                    (id args
                                                                                                                                                                        body
                                                                                                                                                                        has-cont))
                                                                                                                                                                  #(62
                                                                                                                                                                    (r$222)
                                                                                                                                                                    ((newline
                                                                                                                                                                       #((record-marker)
                                                                                                                                                                         #((record-marker)
                                                                                                                                                                           "<lambda-ast>"
                                                                                                                                                                           (id args
                                                                                                                                                                               body
                                                                                                                                                                               has-cont))
                                                                                                                                                                         #(61
                                                                                                                                                                           (r$223)
                                                                                                                                                                           ((current-output-port
                                                                                                                                                                              #((record-marker)
                                                                                                                                                                                #((record-marker)
                                                                                                                                                                                  "<lambda-ast>"
                                                                                                                                                                                  (id args
                                                                                                                                                                                      body
                                                                                                                                                                                      has-cont))
                                                                                                                                                                                #(60
                                                                                                                                                                                  (r$224)
                                                                                                                                                                                  ((flush-output-port
                                                                                                                                                                                     #((record-marker)
                                                                                                                                                                                       #((record-marker)
                                                                                                                                                                                         "<lambda-ast>"
                                                                                                                                                                                         (id args
                                                                                                                                                                                             body
                                                                                                                                                                                             has-cont))
                                                                                                                                                                                       #(59
                                                                                                                                                                                         (r$204)
                                                                                                                                                                                         ((k$199 result$67$131))
                                                                                                                                                                                         #f))
                                                                                                                                                                                     r$224))
                                                                                                                                                                                  #f))))
                                                                                                                                                                           #f))))
                                                                                                                                                                    #f))
                                                                                                                                                                (inexact__inline__
                                                                                                                                                                  (Cyc-fast-div
                                                                                                                                                                    (Cyc-fast-sub
                                                                                                                                                                      j1$76$132
                                                                                                                                                                      j0$60$126)
                                                                                                                                                                    j/s$54$124))))
                                                                                                                                                             #f))
                                                                                                                                                         ","))
                                                                                                                                                      #f))
                                                                                                                                                  name$47$116))
                                                                                                                                               #f))
                                                                                                                                           ","))
                                                                                                                                        #f))
                                                                                                                                    r$225))
                                                                                                                                 #f))))
                                                                                                                          #f))
                                                                                                                      "+!CSVLINE!+"))
                                                                                                                   #f))))
                                                                                                            #f))
                                                                                                        name$47$116))
                                                                                                     #f))
                                                                                                 ") for "))
                                                                                              #f))
                                                                                          secs2$88$136))
                                                                                  #f))
                                                                              " seconds ("))
                                                                           #f))
                                                                       (inexact__inline__
                                                                         (Cyc-fast-div
                                                                           (Cyc-fast-sub
                                                                             j1$76$132
                                                                             j0$60$126)
                                                                           j/s$54$124))))
                                                               #f))
                                                           "Elapsed time: "))
                                                        #f))
                                                    (Cyc-fast-sub
                                                      t1$79$133
                                                      t0$57$125)))
                                                 #f))))
                                          #f)))
                                    (display
                                      #((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(94
                                          (r$228)
                                          ((write #((record-marker)
                                                    #((record-marker)
                                                      "<lambda-ast>"
                                                      (id args body has-cont))
                                                    #(93
                                                      (r$229)
                                                      ((newline
                                                         #((record-marker)
                                                           #((record-marker)
                                                             "<lambda-ast>"
                                                             (id args
                                                                 body
                                                                 has-cont))
                                                           #(92
                                                             (r$230)
                                                             ((current-output-port
                                                                #((record-marker)
                                                                  #((record-marker)
                                                                    "<lambda-ast>"
                                                                    (id args
                                                                        body
                                                                        has-cont))
                                                                  #(91
                                                                    (r$232)
                                                                    ((flush-output-port
                                                                       #((record-marker)
                                                                         #((record-marker)
                                                                           "<lambda-ast>"
                                                                           (id args
                                                                               body
                                                                               has-cont))
                                                                         #(90
                                                                           (r$231)
                                                                           ((k$199 result$67$131))
                                                                           #f))
                                                                       r$232))
                                                                    #f))))
                                                             #f))))
                                                      #f))
                                                  result$67$131))
                                          #f))
                                      "ERROR: returned incorrect result: ")))
                                 #f))
                             result$67$131)))
                        #t)))
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (a$18$102
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             18
             #f
             #f
             #f
             2
             (18 18)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (l$14$98
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             20
             #f
             #f
             #f
             1
             (12)
             #f
             l$10$97
             0
             1
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (r$141 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  1
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  (set! lp$2$7$94
                    #((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(7
                        (k$143 n$8$95 a$9$96)
                        ((if (Cyc-fast-eq n$8$95 0)
                           (k$143 a$9$96)
                           (lp$2$7$94
                             k$143
                             (Cyc-fast-sub n$8$95 1)
                             (cons '() a$9$96))))
                        #t)))
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (lp$2$7$94
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             8
             #f
             #f
             #f
             3
             (7 8 1)
             #f
             #((record-marker)
               #((record-marker)
                 "<lambda-ast>"
                 (id args body has-cont))
               #(7
                 (k$143 n$8$95 a$9$96)
                 ((if (Cyc-fast-eq n$8$95 0)
                    (k$143 a$9$96)
                    (lp$2$7$94
                      k$143
                      (Cyc-fast-sub n$8$95 1)
                      (cons '() a$9$96))))
                 #t))
             2
             0
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (j0$60$126
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             102
             #f
             #f
             #f
             2
             (75 63)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (r$229 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  93
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (k$161 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  41
                  #f
                  #f
                  #f
                  1
                  (31)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$185 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  51
                  #f
                  #f
                  #f
                  1
                  (51)
                  #f
                  #f
                  1
                  0
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$177 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  44
                  #f
                  #f
                  #f
                  1
                  (44)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f))))
      ((33
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((41
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ()
      ((44
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((46
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (k$182) #f))))
      ()
      ((Cyc-version
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (122)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (flush-output-port
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             3
             (91 60 109)
             #f
             #f
             3
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (car .
            #((record-marker)
              #((record-marker)
                "<analysis-db-variable>"
                (global
                  defined-by
                  defines-lambda-id
                  const
                  const-value
                  ref-count
                  ref-by
                  reassigned
                  assigned-value
                  app-fnc-count
                  app-arg-count
                  inlinable
                  mutated-indirectly
                  cont
                  def-in-loop
                  ref-in-loop
                  direct-rec-call
                  self-rec-call))
              #(?
                ?
                #f
                #f
                #f
                1
                (18)
                #f
                #f
                1
                0
                #t
                #f
                #f
                #f
                #t
                #f
                #f)))
       (cons .
             #((record-marker)
               #((record-marker)
                 "<analysis-db-variable>"
                 (global
                   defined-by
                   defines-lambda-id
                   const
                   const-value
                   ref-count
                   ref-by
                   reassigned
                   assigned-value
                   app-fnc-count
                   app-arg-count
                   inlinable
                   mutated-indirectly
                   cont
                   def-in-loop
                   ref-in-loop
                   direct-rec-call
                   self-rec-call))
               #(?
                 ?
                 #f
                 #f
                 #f
                 2
                 (18 7)
                 #f
                 #f
                 2
                 0
                 #t
                 #f
                 #f
                 #f
                 #t
                 #f
                 #f)))
       (48
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((49
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((51
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((52
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((53
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((54
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((56
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ()
      ((59
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((60
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((61
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((62
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((63
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((64
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((65
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((66
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((67
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((68
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((69
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((70
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((71
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((72
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((73
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((74
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((75
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((77
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ()
      ((jiffies-per-second
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (108)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (current-jiffy
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (96 104)
             #f
             #f
             2
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (Cyc-fast-eq
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (7)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (Cyc-fast-div
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             3
             (117 75 63)
             #f
             #f
             3
             0
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (hide .
             #((record-marker)
               #((record-marker)
                 "<analysis-db-variable>"
                 (global
                   defined-by
                   defines-lambda-id
                   const
                   const-value
                   ref-count
                   ref-by
                   reassigned
                   assigned-value
                   app-fnc-count
                   app-arg-count
                   inlinable
                   mutated-indirectly
                   cont
                   def-in-loop
                   ref-in-loop
                   direct-rec-call
                   self-rec-call))
               #(?
                 -1
                 53
                 #f
                 #f
                 2
                 (-1 41)
                 #f
                 (#((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(53
                      (k$174 r$42$111 x$43$112)
                      ((call-with-values
                         k$174
                         #((record-marker)
                           #((record-marker)
                             "<lambda-ast>"
                             (id args body has-cont))
                           #(52
                             (k$179)
                             ((vector
                                #((record-marker)
                                  #((record-marker)
                                    "<lambda-ast>"
                                    (id args body has-cont))
                                  #(49
                                    (r$180)
                                    ((#((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(48
                                          (k$182)
                                          ((if (Cyc-fast-lt r$42$111 100)
                                             (k$182 0)
                                             (k$182 1)))
                                          #t))
                                      #((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(46
                                          (r$181)
                                          ((values k$179 r$180 r$181))
                                          #f))))
                                    #f))
                                values
                                #((record-marker)
                                  #((record-marker)
                                    "<lambda-ast>"
                                    (id args body has-cont))
                                  #(51
                                    (k$185 x$44$113)
                                    ((k$185 x$44$113))
                                    #t))))
                             #t))
                         #((record-marker)
                           #((record-marker)
                             "<lambda-ast>"
                             (id args body has-cont))
                           #(44
                             (k$177 v$45$114 i$46$115)
                             (((vector-ref v$45$114 i$46$115) k$177 x$43$112))
                             #t))))
                      #t)))
                 1
                 0
                 #f
                 #f
                 #f
                 #f
                 #f
                 #f
                 #f))))
      ()
      ()
      ()
      ()
      ((85
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((87
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ()
      ((90
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((91
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((92
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((93
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((94
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((x$51$123
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             117
             #f
             #f
             #f
             1
             (117)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$190 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  112
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (i$46$115
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             44
             #f
             #f
             #f
             1
             (44)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$42$111
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             53
             #f
             #f
             #f
             1
             (48)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (n$1$91
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             11
             #f
             #f
             #f
             1
             (11)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$222 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  62
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$218 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  66
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$214 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  71
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$210 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  75
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (ok?$50$119
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             120
             #f
             #f
             #f
             1
             (98)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (r$202 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  56
                  #f
                  #f
                  #f
                  1
                  (56)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #t
                  #t
                  #f
                  #f)))
       (result$67$131
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             98
             #f
             #f
             #f
             4
             (98 94 90 59)
             #f
             #f
             0
             4
             #f
             #f
             #f
             #t
             #t
             #f
             #f)))
       (k$154 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  18
                  #f
                  #f
                  #f
                  2
                  (18 18)
                  #f
                  #f
                  1
                  1
                  #t
                  #f
                  #t
                  #t
                  #t
                  #f
                  #f)))
       (a$15$99
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             20
             #f
             #f
             #f
             1
             (12)
             #f
             '()
             0
             1
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (k$150 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  22
                  #f
                  #f
                  #f
                  1
                  (12)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #t
                  #f
                  #t
                  #f
                  #f)))
       (n$8$95
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             7
             #f
             #f
             #f
             2
             (7 7)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (r$230 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  92
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (k$170 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  27
                  #f
                  #f
                  #f
                  1
                  (27)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$174 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  53
                  #f
                  #f
                  #f
                  1
                  (53)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (k$182 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  48
                  #f
                  #f
                  #f
                  2
                  (48 48)
                  #f
                  #((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(46 (r$181) ((values k$179 r$180 r$181)) #f))
                  2
                  0
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (96
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ((98
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (loop$65$129) #f))))
      ((99
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ()
      ((102
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ((104
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ((106
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ((108
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((109
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((110
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((111
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((call-with-values
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (53)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (current-output-port
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             3
             (92 61 110)
             #f
             #f
             3
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (newline
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             4
             (93 62 70 111)
             #f
             #f
             4
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (write .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(?
                  ?
                  #f
                  #f
                  #f
                  3
                  (94 73 75)
                  #f
                  #f
                  3
                  0
                  #f
                  #f
                  #f
                  #f
                  #t
                  #f
                  #f)))
       (112
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((113
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ()
      ()
      ()
      ((117
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? (rounded$121) #f))))
      ()
      ((119
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((120
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #t))))
      ((121
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ((122
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(#f ? () #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((Cyc-fast-plus
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (56)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (main .
             #((record-marker)
               #((record-marker)
                 "<analysis-db-variable>"
                 (global
                   defined-by
                   defines-lambda-id
                   const
                   const-value
                   ref-count
                   ref-by
                   reassigned
                   assigned-value
                   app-fnc-count
                   app-arg-count
                   inlinable
                   mutated-indirectly
                   cont
                   def-in-loop
                   ref-in-loop
                   direct-rec-call
                   self-rec-call))
               #(?
                 -1
                 41
                 #f
                 #f
                 2
                 (-1 -1)
                 #f
                 (#((record-marker)
                    #((record-marker)
                      "<lambda-ast>"
                      (id args body has-cont))
                    #(41
                      (k$161)
                      ((hide #((record-marker)
                               #((record-marker)
                                 "<lambda-ast>"
                                 (id args body has-cont))
                               #(33
                                 (r$171)
                                 ((create-n
                                    #((record-marker)
                                      #((record-marker)
                                        "<lambda-ast>"
                                        (id args body has-cont))
                                      #(31
                                        (ll$36$108)
                                        ((run-r7rs-benchmark
                                           k$161
                                           "diviter:1000:1000000"
                                           1000000
                                           #((record-marker)
                                             #((record-marker)
                                               "<lambda-ast>"
                                               (id args body has-cont))
                                             #(27
                                               (k$170)
                                               ((iterative-div2
                                                  k$170
                                                  ll$36$108))
                                               #t))
                                           #((record-marker)
                                             #((record-marker)
                                               "<lambda-ast>"
                                               (id args body has-cont))
                                             #(25
                                               (k$168 result$41$110)
                                               ((k$168 (equal?
                                                         (length result$41$110)
                                                         500)))
                                               #t))))
                                        #f))
                                    r$171))
                                 #f))
                             1000000
                             1000))
                      #t)))
                 1
                 0
                 #f
                 #f
                 #f
                 #f
                 #f
                 #f
                 #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((r$191 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  111
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (x$43$112
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             53
             #f
             #f
             #f
             1
             (44)
             #f
             #f
             0
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (ll$36$108
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             31
             #f
             #f
             #f
             1
             (27)
             #f
             #f
             0
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$171 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  33
                  #f
                  #f
                  #f
                  1
                  (33)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (k$235 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  117
                  #f
                  #f
                  #f
                  1
                  (117)
                  #f
                  #f
                  1
                  0
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (r$223 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  61
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$219 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  65
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$215 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  70
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$211 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  74
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (secs2$88$136
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             77
             #f
             #f
             #f
             1
             (73)
             #f
             #f
             0
             1
             #f
             #f
             #f
             #t
             #t
             #f
             #f)))
       (j1$76$132
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             87
             #f
             #f
             #f
             2
             (75 63)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (r$203 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  96
                  #f
                  #f
                  #f
                  1
                  (96)
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #t
                  #f
                  #f)))
       (k$199 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  98
                  #f
                  #f
                  #f
                  3
                  (90 59 56)
                  #f
                  #f
                  2
                  1
                  #t
                  #f
                  #t
                  #t
                  #t
                  #f
                  #f)))
       (lp$11$16$100
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             19
             #f
             #f
             #f
             3
             (18 19 12)
             #f
             #((record-marker)
               #((record-marker)
                 "<lambda-ast>"
                 (id args body has-cont))
               #(18
                 (k$154 l$17$101 a$18$102)
                 ((if (null? l$17$101)
                    (k$154 a$18$102)
                    (lp$11$16$100
                      k$154
                      (cddr l$17$101)
                      (cons (car l$17$101) a$18$102))))
                 #t))
             2
             0
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (a$9$96
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             7
             #f
             #f
             #f
             2
             (7 7)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (k$143 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  7
                  #f
                  #f
                  #f
                  2
                  (7 7)
                  #f
                  #f
                  1
                  1
                  #t
                  #f
                  #t
                  #t
                  #t
                  #f
                  #f)))
       (n$5$92
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             9
             #f
             #f
             #f
             1
             (1)
             #f
             n$1$91
             0
             1
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (k$139 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  11
                  #f
                  #f
                  #f
                  1
                  (1)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #t
                  #f
                  #t
                  #f
                  #f)))
       (j/s$54$124
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             106
             #f
             #f
             #f
             2
             (75 63)
             #f
             #f
             0
             2
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (name$47$116
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             120
             #f
             #f
             #f
             3
             (112 71 65)
             #f
             #f
             0
             3
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (r$231 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  90
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (k$179 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  52
                  #f
                  #f
                  #f
                  1
                  (46)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((vector-ref
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (44)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (values
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (52 46)
             #f
             #f
             1
             1
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (vector
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (52)
             #f
             #f
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (display
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             13
             (96 63 64 65 66 67 69 71 72 74 77 112 113)
             #f
             #f
             13
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((round__inline__
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (117)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (current-second
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (87 106)
             #f
             #f
             2
             0
             #f
             #f
             #f
             #f
             #t
             #f
             #f)))
       (Cyc-fast-lt
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             2
             (98 48)
             #f
             #f
             2
             0
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (Cyc-fast-sub
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             4
             (85 75 63 7)
             #f
             #f
             4
             0
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (create-n
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             -1
             11
             #f
             #f
             2
             (33 -1)
             #f
             (#((record-marker)
                #((record-marker)
                  "<lambda-ast>"
                  (id args body has-cont))
                #(11
                  (k$139 n$1$91)
                  ((#((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(9
                        (n$5$92 a$6$93)
                        ((#((record-marker)
                            #((record-marker)
                              "<lambda-ast>"
                              (id args body has-cont))
                            #(8
                              (lp$2$7$94)
                              ((#((record-marker)
                                  #((record-marker)
                                    "<lambda-ast>"
                                    (id args body has-cont))
                                  #(1
                                    (r$141)
                                    ((lp$2$7$94 k$139 n$5$92 a$6$93))
                                    #f))
                                (set! lp$2$7$94
                                  #((record-marker)
                                    #((record-marker)
                                      "<lambda-ast>"
                                      (id args body has-cont))
                                    #(7
                                      (k$143 n$8$95 a$9$96)
                                      ((if (Cyc-fast-eq n$8$95 0)
                                         (k$143 a$9$96)
                                         (lp$2$7$94
                                           k$143
                                           (Cyc-fast-sub n$8$95 1)
                                           (cons '() a$9$96))))
                                      #t)))))
                              #f))
                          #f))
                        #f))
                    n$1$91
                    '()))
                  #t)))
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f)))
       (run-r7rs-benchmark
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             -1
             120
             #f
             #f
             2
             (-1 31)
             #f
             (#((record-marker)
                #((record-marker)
                  "<lambda-ast>"
                  (id args body has-cont))
                #(120
                  (k$188 name$47$116
                         count$48$117
                         thunk$49$118
                         ok?$50$119)
                  ((#((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(119
                        (rounded$121)
                        ((#((record-marker)
                            #((record-marker)
                              "<lambda-ast>"
                              (id args body has-cont))
                            #(113
                              (r$189)
                              ((display
                                 #((record-marker)
                                   #((record-marker)
                                     "<lambda-ast>"
                                     (id args body has-cont))
                                   #(112
                                     (r$190)
                                     ((display
                                        #((record-marker)
                                          #((record-marker)
                                            "<lambda-ast>"
                                            (id args body has-cont))
                                          #(111
                                            (r$191)
                                            ((newline
                                               #((record-marker)
                                                 #((record-marker)
                                                   "<lambda-ast>"
                                                   (id args body has-cont))
                                                 #(110
                                                   (r$192)
                                                   ((current-output-port
                                                      #((record-marker)
                                                        #((record-marker)
                                                          "<lambda-ast>"
                                                          (id args
                                                              body
                                                              has-cont))
                                                        #(109
                                                          (r$233)
                                                          ((flush-output-port
                                                             #((record-marker)
                                                               #((record-marker)
                                                                 "<lambda-ast>"
                                                                 (id args
                                                                     body
                                                                     has-cont))
                                                               #(108
                                                                 (r$193)
                                                                 ((jiffies-per-second
                                                                    #((record-marker)
                                                                      #((record-marker)
                                                                        "<lambda-ast>"
                                                                        (id args
                                                                            body
                                                                            has-cont))
                                                                      #(106
                                                                        (j/s$54$124)
                                                                        ((current-second
                                                                           #((record-marker)
                                                                             #((record-marker)
                                                                               "<lambda-ast>"
                                                                               (id args
                                                                                   body
                                                                                   has-cont))
                                                                             #(104
                                                                               (t0$57$125)
                                                                               ((current-jiffy
                                                                                  #((record-marker)
                                                                                    #((record-marker)
                                                                                      "<lambda-ast>"
                                                                                      (id args
                                                                                          body
                                                                                          has-cont))
                                                                                    #(102
                                                                                      (j0$60$126)
                                                                                      ((#((record-marker)
                                                                                          #((record-marker)
                                                                                            "<lambda-ast>"
                                                                                            (id args
                                                                                                body
                                                                                                has-cont))
                                                                                          #(99
                                                                                            (loop$65$129)
                                                                                            ((#((record-marker)
                                                                                                #((record-marker)
                                                                                                  "<lambda-ast>"
                                                                                                  (id args
                                                                                                      body
                                                                                                      has-cont))
                                                                                                #(54
                                                                                                  (r$197)
                                                                                                  ((loop$65$129
                                                                                                     k$188
                                                                                                     0
                                                                                                     #f))
                                                                                                  #f))
                                                                                              (set! loop$65$129
                                                                                                #((record-marker)
                                                                                                  #((record-marker)
                                                                                                    "<lambda-ast>"
                                                                                                    (id args
                                                                                                        body
                                                                                                        has-cont))
                                                                                                  #(98
                                                                                                    (k$199 i$66$130
                                                                                                           result$67$131)
                                                                                                    ((if (Cyc-fast-lt
                                                                                                           i$66$130
                                                                                                           count$48$117)
                                                                                                       (thunk$49$118
                                                                                                         #((record-marker)
                                                                                                           #((record-marker)
                                                                                                             "<lambda-ast>"
                                                                                                             (id args
                                                                                                                 body
                                                                                                                 has-cont))
                                                                                                           #(56
                                                                                                             (r$202)
                                                                                                             ((loop$65$129
                                                                                                                k$199
                                                                                                                (Cyc-fast-plus
                                                                                                                  i$66$130
                                                                                                                  1)
                                                                                                                r$202))
                                                                                                             #f)))
                                                                                                       (ok?$50$119
                                                                                                         #((record-marker)
                                                                                                           #((record-marker)
                                                                                                             "<lambda-ast>"
                                                                                                             (id args
                                                                                                                 body
                                                                                                                 has-cont))
                                                                                                           #(96
                                                                                                             (r$203)
                                                                                                             ((if r$203
                                                                                                                (current-jiffy
                                                                                                                  #((record-marker)
                                                                                                                    #((record-marker)
                                                                                                                      "<lambda-ast>"
                                                                                                                      (id args
                                                                                                                          body
                                                                                                                          has-cont))
                                                                                                                    #(87
                                                                                                                      (j1$76$132)
                                                                                                                      ((current-second
                                                                                                                         #((record-marker)
                                                                                                                           #((record-marker)
                                                                                                                             "<lambda-ast>"
                                                                                                                             (id args
                                                                                                                                 body
                                                                                                                                 has-cont))
                                                                                                                           #(85
                                                                                                                             (t1$79$133)
                                                                                                                             ((rounded$121
                                                                                                                                #((record-marker)
                                                                                                                                  #((record-marker)
                                                                                                                                    "<lambda-ast>"
                                                                                                                                    (id args
                                                                                                                                        body
                                                                                                                                        has-cont))
                                                                                                                                  #(77
                                                                                                                                    (secs2$88$136)
                                                                                                                                    ((display
                                                                                                                                       #((record-marker)
                                                                                                                                         #((record-marker)
                                                                                                                                           "<lambda-ast>"
                                                                                                                                           (id args
                                                                                                                                               body
                                                                                                                                               has-cont))
                                                                                                                                         #(75
                                                                                                                                           (r$210)
                                                                                                                                           ((write #((record-marker)
                                                                                                                                                     #((record-marker)
                                                                                                                                                       "<lambda-ast>"
                                                                                                                                                       (id args
                                                                                                                                                           body
                                                                                                                                                           has-cont))
                                                                                                                                                     #(74
                                                                                                                                                       (r$211)
                                                                                                                                                       ((display
                                                                                                                                                          #((record-marker)
                                                                                                                                                            #((record-marker)
                                                                                                                                                              "<lambda-ast>"
                                                                                                                                                              (id args
                                                                                                                                                                  body
                                                                                                                                                                  has-cont))
                                                                                                                                                            #(73
                                                                                                                                                              (r$212)
                                                                                                                                                              ((write #((record-marker)
                                                                                                                                                                        #((record-marker)
                                                                                                                                                                          "<lambda-ast>"
                                                                                                                                                                          (id args
                                                                                                                                                                              body
                                                                                                                                                                              has-cont))
                                                                                                                                                                        #(72
                                                                                                                                                                          (r$213)
                                                                                                                                                                          ((display
                                                                                                                                                                             #((record-marker)
                                                                                                                                                                               #((record-marker)
                                                                                                                                                                                 "<lambda-ast>"
                                                                                                                                                                                 (id args
                                                                                                                                                                                     body
                                                                                                                                                                                     has-cont))
                                                                                                                                                                               #(71
                                                                                                                                                                                 (r$214)
                                                                                                                                                                                 ((display
                                                                                                                                                                                    #((record-marker)
                                                                                                                                                                                      #((record-marker)
                                                                                                                                                                                        "<lambda-ast>"
                                                                                                                                                                                        (id args
                                                                                                                                                                                            body
                                                                                                                                                                                            has-cont))
                                                                                                                                                                                      #(70
                                                                                                                                                                                        (r$215)
                                                                                                                                                                                        ((newline
                                                                                                                                                                                           #((record-marker)
                                                                                                                                                                                             #((record-marker)
                                                                                                                                                                                               "<lambda-ast>"
                                                                                                                                                                                               (id args
                                                                                                                                                                                                   body
                                                                                                                                                                                                   has-cont))
                                                                                                                                                                                             #(69
                                                                                                                                                                                               (r$216)
                                                                                                                                                                                               ((display
                                                                                                                                                                                                  #((record-marker)
                                                                                                                                                                                                    #((record-marker)
                                                                                                                                                                                                      "<lambda-ast>"
                                                                                                                                                                                                      (id args
                                                                                                                                                                                                          body
                                                                                                                                                                                                          has-cont))
                                                                                                                                                                                                    #(68
                                                                                                                                                                                                      (r$217)
                                                                                                                                                                                                      ((this-scheme-implementation-name
                                                                                                                                                                                                         #((record-marker)
                                                                                                                                                                                                           #((record-marker)
                                                                                                                                                                                                             "<lambda-ast>"
                                                                                                                                                                                                             (id args
                                                                                                                                                                                                                 body
                                                                                                                                                                                                                 has-cont))
                                                                                                                                                                                                           #(67
                                                                                                                                                                                                             (r$225)
                                                                                                                                                                                                             ((display
                                                                                                                                                                                                                #((record-marker)
                                                                                                                                                                                                                  #((record-marker)
                                                                                                                                                                                                                    "<lambda-ast>"
                                                                                                                                                                                                                    (id args
                                                                                                                                                                                                                        body
                                                                                                                                                                                                                        has-cont))
                                                                                                                                                                                                                  #(66
                                                                                                                                                                                                                    (r$218)
                                                                                                                                                                                                                    ((display
                                                                                                                                                                                                                       #((record-marker)
                                                                                                                                                                                                                         #((record-marker)
                                                                                                                                                                                                                           "<lambda-ast>"
                                                                                                                                                                                                                           (id args
                                                                                                                                                                                                                               body
                                                                                                                                                                                                                               has-cont))
                                                                                                                                                                                                                         #(65
                                                                                                                                                                                                                           (r$219)
                                                                                                                                                                                                                           ((display
                                                                                                                                                                                                                              #((record-marker)
                                                                                                                                                                                                                                #((record-marker)
                                                                                                                                                                                                                                  "<lambda-ast>"
                                                                                                                                                                                                                                  (id args
                                                                                                                                                                                                                                      body
                                                                                                                                                                                                                                      has-cont))
                                                                                                                                                                                                                                #(64
                                                                                                                                                                                                                                  (r$220)
                                                                                                                                                                                                                                  ((display
                                                                                                                                                                                                                                     #((record-marker)
                                                                                                                                                                                                                                       #((record-marker)
                                                                                                                                                                                                                                         "<lambda-ast>"
                                                                                                                                                                                                                                         (id args
                                                                                                                                                                                                                                             body
                                                                                                                                                                                                                                             has-cont))
                                                                                                                                                                                                                                       #(63
                                                                                                                                                                                                                                         (r$221)
                                                                                                                                                                                                                                         ((display
                                                                                                                                                                                                                                            #((record-marker)
                                                                                                                                                                                                                                              #((record-marker)
                                                                                                                                                                                                                                                "<lambda-ast>"
                                                                                                                                                                                                                                                (id args
                                                                                                                                                                                                                                                    body
                                                                                                                                                                                                                                                    has-cont))
                                                                                                                                                                                                                                              #(62
                                                                                                                                                                                                                                                (r$222)
                                                                                                                                                                                                                                                ((newline
                                                                                                                                                                                                                                                   #((record-marker)
                                                                                                                                                                                                                                                     #((record-marker)
                                                                                                                                                                                                                                                       "<lambda-ast>"
                                                                                                                                                                                                                                                       (id args
                                                                                                                                                                                                                                                           body
                                                                                                                                                                                                                                                           has-cont))
                                                                                                                                                                                                                                                     #(61
                                                                                                                                                                                                                                                       (r$223)
                                                                                                                                                                                                                                                       ((current-output-port
                                                                                                                                                                                                                                                          #((record-marker)
                                                                                                                                                                                                                                                            #((record-marker)
                                                                                                                                                                                                                                                              "<lambda-ast>"
                                                                                                                                                                                                                                                              (id args
                                                                                                                                                                                                                                                                  body
                                                                                                                                                                                                                                                                  has-cont))
                                                                                                                                                                                                                                                            #(60
                                                                                                                                                                                                                                                              (r$224)
                                                                                                                                                                                                                                                              ((flush-output-port
                                                                                                                                                                                                                                                                 #((record-marker)
                                                                                                                                                                                                                                                                   #((record-marker)
                                                                                                                                                                                                                                                                     "<lambda-ast>"
                                                                                                                                                                                                                                                                     (id args
                                                                                                                                                                                                                                                                         body
                                                                                                                                                                                                                                                                         has-cont))
                                                                                                                                                                                                                                                                   #(59
                                                                                                                                                                                                                                                                     (r$204)
                                                                                                                                                                                                                                                                     ((k$199 result$67$131))
                                                                                                                                                                                                                                                                     #f))
                                                                                                                                                                                                                                                                 r$224))
                                                                                                                                                                                                                                                              #f))))
                                                                                                                                                                                                                                                       #f))))
                                                                                                                                                                                                                                                #f))
                                                                                                                                                                                                                                            (inexact__inline__
                                                                                                                                                                                                                                              (Cyc-fast-div
                                                                                                                                                                                                                                                (Cyc-fast-sub
                                                                                                                                                                                                                                                  j1$76$132
                                                                                                                                                                                                                                                  j0$60$126)
                                                                                                                                                                                                                                                j/s$54$124))))
                                                                                                                                                                                                                                         #f))
                                                                                                                                                                                                                                     ","))
                                                                                                                                                                                                                                  #f))
                                                                                                                                                                                                                              name$47$116))
                                                                                                                                                                                                                           #f))
                                                                                                                                                                                                                       ","))
                                                                                                                                                                                                                    #f))
                                                                                                                                                                                                                r$225))
                                                                                                                                                                                                             #f))))
                                                                                                                                                                                                      #f))
                                                                                                                                                                                                  "+!CSVLINE!+"))
                                                                                                                                                                                               #f))))
                                                                                                                                                                                        #f))
                                                                                                                                                                                    name$47$116))
                                                                                                                                                                                 #f))
                                                                                                                                                                             ") for "))
                                                                                                                                                                          #f))
                                                                                                                                                                      secs2$88$136))
                                                                                                                                                              #f))
                                                                                                                                                          " seconds ("))
                                                                                                                                                       #f))
                                                                                                                                                   (inexact__inline__
                                                                                                                                                     (Cyc-fast-div
                                                                                                                                                       (Cyc-fast-sub
                                                                                                                                                         j1$76$132
                                                                                                                                                         j0$60$126)
                                                                                                                                                       j/s$54$124))))
                                                                                                                                           #f))
                                                                                                                                       "Elapsed time: "))
                                                                                                                                    #f))
                                                                                                                                (Cyc-fast-sub
                                                                                                                                  t1$79$133
                                                                                                                                  t0$57$125)))
                                                                                                                             #f))))
                                                                                                                      #f)))
                                                                                                                (display
                                                                                                                  #((record-marker)
                                                                                                                    #((record-marker)
                                                                                                                      "<lambda-ast>"
                                                                                                                      (id args
                                                                                                                          body
                                                                                                                          has-cont))
                                                                                                                    #(94
                                                                                                                      (r$228)
                                                                                                                      ((write #((record-marker)
                                                                                                                                #((record-marker)
                                                                                                                                  "<lambda-ast>"
                                                                                                                                  (id args
                                                                                                                                      body
                                                                                                                                      has-cont))
                                                                                                                                #(93
                                                                                                                                  (r$229)
                                                                                                                                  ((newline
                                                                                                                                     #((record-marker)
                                                                                                                                       #((record-marker)
                                                                                                                                         "<lambda-ast>"
                                                                                                                                         (id args
                                                                                                                                             body
                                                                                                                                             has-cont))
                                                                                                                                       #(92
                                                                                                                                         (r$230)
                                                                                                                                         ((current-output-port
                                                                                                                                            #((record-marker)
                                                                                                                                              #((record-marker)
                                                                                                                                                "<lambda-ast>"
                                                                                                                                                (id args
                                                                                                                                                    body
                                                                                                                                                    has-cont))
                                                                                                                                              #(91
                                                                                                                                                (r$232)
                                                                                                                                                ((flush-output-port
                                                                                                                                                   #((record-marker)
                                                                                                                                                     #((record-marker)
                                                                                                                                                       "<lambda-ast>"
                                                                                                                                                       (id args
                                                                                                                                                           body
                                                                                                                                                           has-cont))
                                                                                                                                                     #(90
                                                                                                                                                       (r$231)
                                                                                                                                                       ((k$199 result$67$131))
                                                                                                                                                       #f))
                                                                                                                                                   r$232))
                                                                                                                                                #f))))
                                                                                                                                         #f))))
                                                                                                                                  #f))
                                                                                                                              result$67$131))
                                                                                                                      #f))
                                                                                                                  "ERROR: returned incorrect result: ")))
                                                                                                             #f))
                                                                                                         result$67$131)))
                                                                                                    #t)))))
                                                                                            #f))
                                                                                        #f))
                                                                                      #f))))
                                                                               #f))))
                                                                        #f))))
                                                                 #f))
                                                             r$233))
                                                          #f))))
                                                   #f))))
                                            #f))
                                        name$47$116))
                                     #f))
                                 "Running "))
                              #f))
                          (set! rounded$121
                            #((record-marker)
                              #((record-marker)
                                "<lambda-ast>"
                                (id args body has-cont))
                              #(117
                                (k$235 x$51$123)
                                ((k$235 (Cyc-fast-div
                                          (round__inline__
                                            (Cyc-fast-mul 1000 x$51$123))
                                          1000)))
                                #t)))))
                        #f))
                    #f))
                  #t)))
             1
             0
             #f
             #f
             #f
             #f
             #f
             #f
             #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((r$192 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  110
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (x$44$113
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             51
             #f
             #f
             #f
             1
             (51)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (r$180 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  49
                  #f
                  #f
                  #f
                  1
                  (46)
                  #f
                  #f
                  0
                  1
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f
                  #f)))
       (l$10$97
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             22
             #f
             #f
             #f
             1
             (22)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (k$240 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  122
                  #f
                  #f
                  #f
                  1
                  (121)
                  #f
                  #f
                  1
                  0
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f)))
       (r$204 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  59
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$224 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  60
                  #f
                  #f
                  #f
                  1
                  (60)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #t
                  #t
                  #f
                  #f)))
       (r$220 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  64
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$216 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  69
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$212 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  73
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (rounded$121
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             119
             #f
             #f
             #f
             2
             (119 85)
             #f
             #((record-marker)
               #((record-marker)
                 "<lambda-ast>"
                 (id args body has-cont))
               #(117
                 (k$235 x$51$123)
                 ((k$235 (Cyc-fast-div
                           (round__inline__ (Cyc-fast-mul 1000 x$51$123))
                           1000)))
                 #t))
             1
             0
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (t1$79$133
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             85
             #f
             #f
             #f
             1
             (85)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (count$48$117
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             120
             #f
             #f
             #f
             1
             (98)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (k$188 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  120
                  #f
                  #f
                  #f
                  1
                  (54)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #t
                  #f
                  #t
                  #f
                  #f)))
       (loop$65$129
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             99
             #f
             #f
             #f
             3
             (56 99 54)
             #f
             #((record-marker)
               #((record-marker)
                 "<lambda-ast>"
                 (id args body has-cont))
               #(98
                 (k$199 i$66$130 result$67$131)
                 ((if (Cyc-fast-lt i$66$130 count$48$117)
                    (thunk$49$118
                      #((record-marker)
                        #((record-marker)
                          "<lambda-ast>"
                          (id args body has-cont))
                        #(56
                          (r$202)
                          ((loop$65$129
                             k$199
                             (Cyc-fast-plus i$66$130 1)
                             r$202))
                          #f)))
                    (ok?$50$119
                      #((record-marker)
                        #((record-marker)
                          "<lambda-ast>"
                          (id args body has-cont))
                        #(96
                          (r$203)
                          ((if r$203
                             (current-jiffy
                               #((record-marker)
                                 #((record-marker)
                                   "<lambda-ast>"
                                   (id args body has-cont))
                                 #(87
                                   (j1$76$132)
                                   ((current-second
                                      #((record-marker)
                                        #((record-marker)
                                          "<lambda-ast>"
                                          (id args body has-cont))
                                        #(85
                                          (t1$79$133)
                                          ((rounded$121
                                             #((record-marker)
                                               #((record-marker)
                                                 "<lambda-ast>"
                                                 (id args body has-cont))
                                               #(77
                                                 (secs2$88$136)
                                                 ((display
                                                    #((record-marker)
                                                      #((record-marker)
                                                        "<lambda-ast>"
                                                        (id args body has-cont))
                                                      #(75
                                                        (r$210)
                                                        ((write #((record-marker)
                                                                  #((record-marker)
                                                                    "<lambda-ast>"
                                                                    (id args
                                                                        body
                                                                        has-cont))
                                                                  #(74
                                                                    (r$211)
                                                                    ((display
                                                                       #((record-marker)
                                                                         #((record-marker)
                                                                           "<lambda-ast>"
                                                                           (id args
                                                                               body
                                                                               has-cont))
                                                                         #(73
                                                                           (r$212)
                                                                           ((write #((record-marker)
                                                                                     #((record-marker)
                                                                                       "<lambda-ast>"
                                                                                       (id args
                                                                                           body
                                                                                           has-cont))
                                                                                     #(72
                                                                                       (r$213)
                                                                                       ((display
                                                                                          #((record-marker)
                                                                                            #((record-marker)
                                                                                              "<lambda-ast>"
                                                                                              (id args
                                                                                                  body
                                                                                                  has-cont))
                                                                                            #(71
                                                                                              (r$214)
                                                                                              ((display
                                                                                                 #((record-marker)
                                                                                                   #((record-marker)
                                                                                                     "<lambda-ast>"
                                                                                                     (id args
                                                                                                         body
                                                                                                         has-cont))
                                                                                                   #(70
                                                                                                     (r$215)
                                                                                                     ((newline
                                                                                                        #((record-marker)
                                                                                                          #((record-marker)
                                                                                                            "<lambda-ast>"
                                                                                                            (id args
                                                                                                                body
                                                                                                                has-cont))
                                                                                                          #(69
                                                                                                            (r$216)
                                                                                                            ((display
                                                                                                               #((record-marker)
                                                                                                                 #((record-marker)
                                                                                                                   "<lambda-ast>"
                                                                                                                   (id args
                                                                                                                       body
                                                                                                                       has-cont))
                                                                                                                 #(68
                                                                                                                   (r$217)
                                                                                                                   ((this-scheme-implementation-name
                                                                                                                      #((record-marker)
                                                                                                                        #((record-marker)
                                                                                                                          "<lambda-ast>"
                                                                                                                          (id args
                                                                                                                              body
                                                                                                                              has-cont))
                                                                                                                        #(67
                                                                                                                          (r$225)
                                                                                                                          ((display
                                                                                                                             #((record-marker)
                                                                                                                               #((record-marker)
                                                                                                                                 "<lambda-ast>"
                                                                                                                                 (id args
                                                                                                                                     body
                                                                                                                                     has-cont))
                                                                                                                               #(66
                                                                                                                                 (r$218)
                                                                                                                                 ((display
                                                                                                                                    #((record-marker)
                                                                                                                                      #((record-marker)
                                                                                                                                        "<lambda-ast>"
                                                                                                                                        (id args
                                                                                                                                            body
                                                                                                                                            has-cont))
                                                                                                                                      #(65
                                                                                                                                        (r$219)
                                                                                                                                        ((display
                                                                                                                                           #((record-marker)
                                                                                                                                             #((record-marker)
                                                                                                                                               "<lambda-ast>"
                                                                                                                                               (id args
                                                                                                                                                   body
                                                                                                                                                   has-cont))
                                                                                                                                             #(64
                                                                                                                                               (r$220)
                                                                                                                                               ((display
                                                                                                                                                  #((record-marker)
                                                                                                                                                    #((record-marker)
                                                                                                                                                      "<lambda-ast>"
                                                                                                                                                      (id args
                                                                                                                                                          body
                                                                                                                                                          has-cont))
                                                                                                                                                    #(63
                                                                                                                                                      (r$221)
                                                                                                                                                      ((display
                                                                                                                                                         #((record-marker)
                                                                                                                                                           #((record-marker)
                                                                                                                                                             "<lambda-ast>"
                                                                                                                                                             (id args
                                                                                                                                                                 body
                                                                                                                                                                 has-cont))
                                                                                                                                                           #(62
                                                                                                                                                             (r$222)
                                                                                                                                                             ((newline
                                                                                                                                                                #((record-marker)
                                                                                                                                                                  #((record-marker)
                                                                                                                                                                    "<lambda-ast>"
                                                                                                                                                                    (id args
                                                                                                                                                                        body
                                                                                                                                                                        has-cont))
                                                                                                                                                                  #(61
                                                                                                                                                                    (r$223)
                                                                                                                                                                    ((current-output-port
                                                                                                                                                                       #((record-marker)
                                                                                                                                                                         #((record-marker)
                                                                                                                                                                           "<lambda-ast>"
                                                                                                                                                                           (id args
                                                                                                                                                                               body
                                                                                                                                                                               has-cont))
                                                                                                                                                                         #(60
                                                                                                                                                                           (r$224)
                                                                                                                                                                           ((flush-output-port
                                                                                                                                                                              #((record-marker)
                                                                                                                                                                                #((record-marker)
                                                                                                                                                                                  "<lambda-ast>"
                                                                                                                                                                                  (id args
                                                                                                                                                                                      body
                                                                                                                                                                                      has-cont))
                                                                                                                                                                                #(59
                                                                                                                                                                                  (r$204)
                                                                                                                                                                                  ((k$199 result$67$131))
                                                                                                                                                                                  #f))
                                                                                                                                                                              r$224))
                                                                                                                                                                           #f))))
                                                                                                                                                                    #f))))
                                                                                                                                                             #f))
                                                                                                                                                         (inexact__inline__
                                                                                                                                                           (Cyc-fast-div
                                                                                                                                                             (Cyc-fast-sub
                                                                                                                                                               j1$76$132
                                                                                                                                                               j0$60$126)
                                                                                                                                                             j/s$54$124))))
                                                                                                                                                      #f))
                                                                                                                                                  ","))
                                                                                                                                               #f))
                                                                                                                                           name$47$116))
                                                                                                                                        #f))
                                                                                                                                    ","))
                                                                                                                                 #f))
                                                                                                                             r$225))
                                                                                                                          #f))))
                                                                                                                   #f))
                                                                                                               "+!CSVLINE!+"))
                                                                                                            #f))))
                                                                                                     #f))
                                                                                                 name$47$116))
                                                                                              #f))
                                                                                          ") for "))
                                                                                       #f))
                                                                                   secs2$88$136))
                                                                           #f))
                                                                       " seconds ("))
                                                                    #f))
                                                                (inexact__inline__
                                                                  (Cyc-fast-div
                                                                    (Cyc-fast-sub
                                                                      j1$76$132
                                                                      j0$60$126)
                                                                    j/s$54$124))))
                                                        #f))
                                                    "Elapsed time: "))
                                                 #f))
                                             (Cyc-fast-sub
                                               t1$79$133
                                               t0$57$125)))
                                          #f))))
                                   #f)))
                             (display
                               #((record-marker)
                                 #((record-marker)
                                   "<lambda-ast>"
                                   (id args body has-cont))
                                 #(94
                                   (r$228)
                                   ((write #((record-marker)
                                             #((record-marker)
                                               "<lambda-ast>"
                                               (id args body has-cont))
                                             #(93
                                               (r$229)
                                               ((newline
                                                  #((record-marker)
                                                    #((record-marker)
                                                      "<lambda-ast>"
                                                      (id args body has-cont))
                                                    #(92
                                                      (r$230)
                                                      ((current-output-port
                                                         #((record-marker)
                                                           #((record-marker)
                                                             "<lambda-ast>"
                                                             (id args
                                                                 body
                                                                 has-cont))
                                                           #(91
                                                             (r$232)
                                                             ((flush-output-port
                                                                #((record-marker)
                                                                  #((record-marker)
                                                                    "<lambda-ast>"
                                                                    (id args
                                                                        body
                                                                        has-cont))
                                                                  #(90
                                                                    (r$231)
                                                                    ((k$199 result$67$131))
                                                                    #f))
                                                                r$232))
                                                             #f))))
                                                      #f))))
                                               #f))
                                           result$67$131))
                                   #f))
                               "ERROR: returned incorrect result: ")))
                          #f))
                      result$67$131)))
                 #t))
             2
             0
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (l$17$101
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             18
             #f
             #f
             #f
             3
             (18 18 18)
             #f
             #f
             0
             3
             #t
             #f
             #f
             #t
             #t
             #f
             #f)))
       (r$152 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  12
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  (set! lp$11$16$100
                    #((record-marker)
                      #((record-marker)
                        "<lambda-ast>"
                        (id args body has-cont))
                      #(18
                        (k$154 l$17$101 a$18$102)
                        ((if (null? l$17$101)
                           (k$154 a$18$102)
                           (lp$11$16$100
                             k$154
                             (cddr l$17$101)
                             (cons (car l$17$101) a$18$102))))
                        #t)))
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (a$6$93
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             9
             #f
             #f
             #f
             1
             (1)
             #f
             '()
             0
             1
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (t0$57$125
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(#f
             104
             #f
             #f
             #f
             1
             (85)
             #f
             #f
             0
             1
             #t
             #f
             #f
             #f
             #t
             #f
             #f)))
       (r$228 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  94
                  #f
                  #f
                  #f
                  0
                  ()
                  #f
                  #f
                  0
                  0
                  #t
                  #f
                  #f
                  #t
                  #f
                  #f
                  #f)))
       (r$232 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  91
                  #f
                  #f
                  #f
                  1
                  (91)
                  #f
                  #f
                  0
                  1
                  #t
                  #f
                  #f
                  #t
                  #t
                  #f
                  #f)))
       (k$168 .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(#f
                  25
                  #f
                  #f
                  #f
                  1
                  (25)
                  #f
                  #f
                  1
                  0
                  #t
                  #f
                  #t
                  #f
                  #f
                  #f
                  #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((string-append
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (121)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (length
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (25)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (equal?
         .
         #((record-marker)
           #((record-marker)
             "<analysis-db-variable>"
             (global
               defined-by
               defines-lambda-id
               const
               const-value
               ref-count
               ref-by
               reassigned
               assigned-value
               app-fnc-count
               app-arg-count
               inlinable
               mutated-indirectly
               cont
               def-in-loop
               ref-in-loop
               direct-rec-call
               self-rec-call))
           #(?
             ?
             #f
             #f
             #f
             1
             (25)
             #f
             #f
             1
             0
             #t
             #f
             #f
             #f
             #f
             #f
             #f)))
       (cddr .
             #((record-marker)
               #((record-marker)
                 "<analysis-db-variable>"
                 (global
                   defined-by
                   defines-lambda-id
                   const
                   const-value
                   ref-count
                   ref-by
                   reassigned
                   assigned-value
                   app-fnc-count
                   app-arg-count
                   inlinable
                   mutated-indirectly
                   cont
                   def-in-loop
                   ref-in-loop
                   direct-rec-call
                   self-rec-call))
               #(?
                 ?
                 #f
                 #f
                 #f
                 1
                 (18)
                 #f
                 #f
                 1
                 0
                 #t
                 #f
                 #f
                 #f
                 #t
                 #f
                 #f)))
       (null? .
              #((record-marker)
                #((record-marker)
                  "<analysis-db-variable>"
                  (global
                    defined-by
                    defines-lambda-id
                    const
                    const-value
                    ref-count
                    ref-by
                    reassigned
                    assigned-value
                    app-fnc-count
                    app-arg-count
                    inlinable
                    mutated-indirectly
                    cont
                    def-in-loop
                    ref-in-loop
                    direct-rec-call
                    self-rec-call))
                #(?
                  ?
                  #f
                  #f
                  #f
                  1
                  (18)
                  #f
                  #f
                  1
                  0
                  #t
                  #f
                  #f
                  #f
                  #t
                  #f
                  #f))))
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ()
      ((-1
        .
        #((record-marker)
          #((record-marker)
            "<analysis-db-function>"
            (simple
              unused-params
              assigned-to-var
              side-effects))
          #(? ? () #t)))))))
 */
/* 
"---------------- after cps optimizations (3):"
 */
/* 
((define create-n
   (lambda-11-cont
     (k$139 n$1$91)
     ((lambda-9
        (n$5$92 a$6$93)
        ((lambda-8
           (lp$2$7$94)
           ((lambda-1
              (r$141)
              (lp$2$7$94 k$139 n$5$92 a$6$93))
            (set! lp$2$7$94
              (lambda-7-cont
                (k$143 n$8$95 a$9$96)
                (if (Cyc-fast-eq n$8$95 0)
                  (k$143 a$9$96)
                  (lp$2$7$94
                    k$143
                    (Cyc-fast-sub n$8$95 1)
                    (cons '() a$9$96)))))))
         #f))
      n$1$91
      '())))
 (define iterative-div2
   (lambda-22-cont
     (k$150 l$10$97)
     ((lambda-20
        (l$14$98 a$15$99)
        ((lambda-19
           (lp$11$16$100)
           ((lambda-12
              (r$152)
              (lp$11$16$100 k$150 l$14$98 a$15$99))
            (set! lp$11$16$100
              (lambda-18-cont
                (k$154 l$17$101 a$18$102)
                (if (null? l$17$101)
                  (k$154 a$18$102)
                  (lp$11$16$100
                    k$154
                    (cddr l$17$101)
                    (cons (car l$17$101) a$18$102)))))))
         #f))
      l$10$97
      '())))
 (define main
   (lambda-41-cont
     (k$161)
     (hide (lambda-33
             (r$171)
             (create-n
               (lambda-31
                 (ll$36$108)
                 (run-r7rs-benchmark
                   k$161
                   "diviter:1000:1000000"
                   1000000
                   (lambda-27-cont
                     (k$170)
                     (iterative-div2 k$170 ll$36$108))
                   (lambda-25-cont
                     (k$168 result$41$110)
                     (k$168 (equal? (length result$41$110) 500)))))
               r$171))
           1000000
           1000)))
 (define hide
   (lambda-53-cont
     (k$174 r$42$111 x$43$112)
     (call-with-values
       k$174
       (lambda-52-cont
         (k$179)
         (vector
           (lambda-49
             (r$180)
             ((lambda-48-cont
                (k$182)
                (if (Cyc-fast-lt r$42$111 100)
                  (k$182 0)
                  (k$182 1)))
              (lambda-46 (r$181) (values k$179 r$180 r$181))))
           values
           (lambda-51-cont
             (k$185 x$44$113)
             (k$185 x$44$113))))
       (lambda-44-cont
         (k$177 v$45$114 i$46$115)
         ((vector-ref v$45$114 i$46$115) k$177 x$43$112)))))
 (define run-r7rs-benchmark
   (lambda-120-cont
     (k$188 name$47$116
            count$48$117
            thunk$49$118
            ok?$50$119)
     ((lambda-119
        (rounded$121)
        ((lambda-113
           (r$189)
           (display
             (lambda-112
               (r$190)
               (display
                 (lambda-111
                   (r$191)
                   (newline
                     (lambda-110
                       (r$192)
                       (current-output-port
                         (lambda-109
                           (r$233)
                           (flush-output-port
                             (lambda-108
                               (r$193)
                               (jiffies-per-second
                                 (lambda-106
                                   (j/s$54$124)
                                   (current-second
                                     (lambda-104
                                       (t0$57$125)
                                       (current-jiffy
                                         (lambda-102
                                           (j0$60$126)
                                           ((lambda-99
                                              (loop$65$129)
                                              ((lambda-54
                                                 (r$197)
                                                 (loop$65$129 k$188 0 #f))
                                               (set! loop$65$129
                                                 (lambda-98-cont
                                                   (k$199 i$66$130
                                                          result$67$131)
                                                   (if (Cyc-fast-lt
                                                         i$66$130
                                                         count$48$117)
                                                     (thunk$49$118
                                                       (lambda-56
                                                         (r$202)
                                                         (loop$65$129
                                                           k$199
                                                           (Cyc-fast-plus
                                                             i$66$130
                                                             1)
                                                           r$202)))
                                                     (ok?$50$119
                                                       (lambda-96
                                                         (r$203)
                                                         (if r$203
                                                           (current-jiffy
                                                             (lambda-87
                                                               (j1$76$132)
                                                               (current-second
                                                                 (lambda-85
                                                                   (t1$79$133)
                                                                   (rounded$121
                                                                     (lambda-77
                                                                       (secs2$88$136)
                                                                       (display
                                                                         (lambda-75
                                                                           (r$210)
                                                                           (write (lambda-74
                                                                                    (r$211)
                                                                                    (display
                                                                                      (lambda-73
                                                                                        (r$212)
                                                                                        (write (lambda-72
                                                                                                 (r$213)
                                                                                                 (display
                                                                                                   (lambda-71
                                                                                                     (r$214)
                                                                                                     (display
                                                                                                       (lambda-70
                                                                                                         (r$215)
                                                                                                         (newline
                                                                                                           (lambda-69
                                                                                                             (r$216)
                                                                                                             (display
                                                                                                               (lambda-68
                                                                                                                 (r$217)
                                                                                                                 (this-scheme-implementation-name
                                                                                                                   (lambda-67
                                                                                                                     (r$225)
                                                                                                                     (display
                                                                                                                       (lambda-66
                                                                                                                         (r$218)
                                                                                                                         (display
                                                                                                                           (lambda-65
                                                                                                                             (r$219)
                                                                                                                             (display
                                                                                                                               (lambda-64
                                                                                                                                 (r$220)
                                                                                                                                 (display
                                                                                                                                   (lambda-63
                                                                                                                                     (r$221)
                                                                                                                                     (display
                                                                                                                                       (lambda-62
                                                                                                                                         (r$222)
                                                                                                                                         (newline
                                                                                                                                           (lambda-61
                                                                                                                                             (r$223)
                                                                                                                                             (current-output-port
                                                                                                                                               (lambda-60
                                                                                                                                                 (r$224)
                                                                                                                                                 (flush-output-port
                                                                                                                                                   (lambda-59
                                                                                                                                                     (r$204)
                                                                                                                                                     (k$199 result$67$131))
                                                                                                                                                   r$224))))))
                                                                                                                                       (inexact__inline__
                                                                                                                                         (Cyc-fast-div
                                                                                                                                           (Cyc-fast-sub
                                                                                                                                             j1$76$132
                                                                                                                                             j0$60$126)
                                                                                                                                           j/s$54$124))))
                                                                                                                                   ","))
                                                                                                                               name$47$116))
                                                                                                                           ","))
                                                                                                                       r$225))))
                                                                                                               "+!CSVLINE!+"))))
                                                                                                       name$47$116))
                                                                                                   ") for "))
                                                                                               secs2$88$136))
                                                                                      " seconds ("))
                                                                                  (inexact__inline__
                                                                                    (Cyc-fast-div
                                                                                      (Cyc-fast-sub
                                                                                        j1$76$132
                                                                                        j0$60$126)
                                                                                      j/s$54$124))))
                                                                         "Elapsed time: "))
                                                                     (Cyc-fast-sub
                                                                       t1$79$133
                                                                       t0$57$125))))))
                                                           (display
                                                             (lambda-94
                                                               (r$228)
                                                               (write (lambda-93
                                                                        (r$229)
                                                                        (newline
                                                                          (lambda-92
                                                                            (r$230)
                                                                            (current-output-port
                                                                              (lambda-91
                                                                                (r$232)
                                                                                (flush-output-port
                                                                                  (lambda-90
                                                                                    (r$231)
                                                                                    (k$199 result$67$131))
                                                                                  r$232))))))
                                                                      result$67$131))
                                                             "ERROR: returned incorrect result: ")))
                                                       result$67$131))))))
                                            #f))))))))
                             r$233))))))
                 name$47$116))
             "Running "))
         (set! rounded$121
           (lambda-117-cont
             (k$235 x$51$123)
             (k$235 (Cyc-fast-div
                      (round__inline__ (Cyc-fast-mul 1000 x$51$123))
                      1000))))))
      #f)))
 (define this-scheme-implementation-name
   (lambda-122-cont
     (k$240)
     (Cyc-version
       (lambda-121
         (r$241)
         (k$240 (string-append "cyclone-" r$241))))))
 (main %halt))
 */
/* 
"---------------- after wrap-mutables:"
 */
/* 
((define create-n
   (lambda (k$139 n$1$91)
     ((lambda (n$5$92 a$6$93)
        ((lambda (lp$2$7$94)
           ((lambda (lp$2$7$94)
              ((lambda (r$141)
                 ((cell-get lp$2$7$94) k$139 n$5$92 a$6$93))
               (set-cell!
                 lp$2$7$94
                 (lambda (k$143 n$8$95 a$9$96)
                   (if (Cyc-fast-eq n$8$95 0)
                     (k$143 a$9$96)
                     ((cell-get lp$2$7$94)
                      k$143
                      (Cyc-fast-sub n$8$95 1)
                      (cons '() a$9$96)))))))
            (cell lp$2$7$94)))
         #f))
      n$1$91
      '())))
 (define iterative-div2
   (lambda (k$150 l$10$97)
     ((lambda (l$14$98 a$15$99)
        ((lambda (lp$11$16$100)
           ((lambda (lp$11$16$100)
              ((lambda (r$152)
                 ((cell-get lp$11$16$100) k$150 l$14$98 a$15$99))
               (set-cell!
                 lp$11$16$100
                 (lambda (k$154 l$17$101 a$18$102)
                   (if (null? l$17$101)
                     (k$154 a$18$102)
                     ((cell-get lp$11$16$100)
                      k$154
                      (cddr l$17$101)
                      (cons (car l$17$101) a$18$102)))))))
            (cell lp$11$16$100)))
         #f))
      l$10$97
      '())))
 (define main
   (lambda (k$161)
     (hide (lambda (r$171)
             (create-n
               (lambda (ll$36$108)
                 (run-r7rs-benchmark
                   k$161
                   "diviter:1000:1000000"
                   1000000
                   (lambda (k$170) (iterative-div2 k$170 ll$36$108))
                   (lambda (k$168 result$41$110)
                     (k$168 (equal? (length result$41$110) 500)))))
               r$171))
           1000000
           1000)))
 (define hide
   (lambda (k$174 r$42$111 x$43$112)
     (call-with-values
       k$174
       (lambda (k$179)
         (vector
           (lambda (r$180)
             ((lambda (k$182)
                (if (Cyc-fast-lt r$42$111 100)
                  (k$182 0)
                  (k$182 1)))
              (lambda (r$181) (values k$179 r$180 r$181))))
           values
           (lambda (k$185 x$44$113) (k$185 x$44$113))))
       (lambda (k$177 v$45$114 i$46$115)
         ((vector-ref v$45$114 i$46$115) k$177 x$43$112)))))
 (define run-r7rs-benchmark
   (lambda (k$188
            name$47$116
            count$48$117
            thunk$49$118
            ok?$50$119)
     ((lambda (rounded$121)
        ((lambda (rounded$121)
           ((lambda (r$189)
              (display
                (lambda (r$190)
                  (display
                    (lambda (r$191)
                      (newline
                        (lambda (r$192)
                          (current-output-port
                            (lambda (r$233)
                              (flush-output-port
                                (lambda (r$193)
                                  (jiffies-per-second
                                    (lambda (j/s$54$124)
                                      (current-second
                                        (lambda (t0$57$125)
                                          (current-jiffy
                                            (lambda (j0$60$126)
                                              ((lambda (loop$65$129)
                                                 ((lambda (loop$65$129)
                                                    ((lambda (r$197)
                                                       ((cell-get loop$65$129)
                                                        k$188
                                                        0
                                                        #f))
                                                     (set-cell!
                                                       loop$65$129
                                                       (lambda (k$199
                                                                i$66$130
                                                                result$67$131)
                                                         (if (Cyc-fast-lt
                                                               i$66$130
                                                               count$48$117)
                                                           (thunk$49$118
                                                             (lambda (r$202)
                                                               ((cell-get
                                                                  loop$65$129)
                                                                k$199
                                                                (Cyc-fast-plus
                                                                  i$66$130
                                                                  1)
                                                                r$202)))
                                                           (ok?$50$119
                                                             (lambda (r$203)
                                                               (if r$203
                                                                 (current-jiffy
                                                                   (lambda (j1$76$132)
                                                                     (current-second
                                                                       (lambda (t1$79$133)
                                                                         ((cell-get
                                                                            rounded$121)
                                                                          (lambda (secs2$88$136)
                                                                            (display
                                                                              (lambda (r$210)
                                                                                (write (lambda (r$211)
                                                                                         (display
                                                                                           (lambda (r$212)
                                                                                             (write (lambda (r$213)
                                                                                                      (display
                                                                                                        (lambda (r$214)
                                                                                                          (display
                                                                                                            (lambda (r$215)
                                                                                                              (newline
                                                                                                                (lambda (r$216)
                                                                                                                  (display
                                                                                                                    (lambda (r$217)
                                                                                                                      (this-scheme-implementation-name
                                                                                                                        (lambda (r$225)
                                                                                                                          (display
                                                                                                                            (lambda (r$218)
                                                                                                                              (display
                                                                                                                                (lambda (r$219)
                                                                                                                                  (display
                                                                                                                                    (lambda (r$220)
                                                                                                                                      (display
                                                                                                                                        (lambda (r$221)
                                                                                                                                          (display
                                                                                                                                            (lambda (r$222)
                                                                                                                                              (newline
                                                                                                                                                (lambda (r$223)
                                                                                                                                                  (current-output-port
                                                                                                                                                    (lambda (r$224)
                                                                                                                                                      (flush-output-port
                                                                                                                                                        (lambda (r$204)
                                                                                                                                                          (k$199 result$67$131))
                                                                                                                                                        r$224))))))
                                                                                                                                            (inexact__inline__
                                                                                                                                              (Cyc-fast-div
                                                                                                                                                (Cyc-fast-sub
                                                                                                                                                  j1$76$132
                                                                                                                                                  j0$60$126)
                                                                                                                                                j/s$54$124))))
                                                                                                                                        ","))
                                                                                                                                    name$47$116))
                                                                                                                                ","))
                                                                                                                            r$225))))
                                                                                                                    "+!CSVLINE!+"))))
                                                                                                            name$47$116))
                                                                                                        ") for "))
                                                                                                    secs2$88$136))
                                                                                           " seconds ("))
                                                                                       (inexact__inline__
                                                                                         (Cyc-fast-div
                                                                                           (Cyc-fast-sub
                                                                                             j1$76$132
                                                                                             j0$60$126)
                                                                                           j/s$54$124))))
                                                                              "Elapsed time: "))
                                                                          (Cyc-fast-sub
                                                                            t1$79$133
                                                                            t0$57$125))))))
                                                                 (display
                                                                   (lambda (r$228)
                                                                     (write (lambda (r$229)
                                                                              (newline
                                                                                (lambda (r$230)
                                                                                  (current-output-port
                                                                                    (lambda (r$232)
                                                                                      (flush-output-port
                                                                                        (lambda (r$231)
                                                                                          (k$199 result$67$131))
                                                                                        r$232))))))
                                                                            result$67$131))
                                                                   "ERROR: returned incorrect result: ")))
                                                             result$67$131))))))
                                                  (cell loop$65$129)))
                                               #f))))))))
                                r$233))))))
                    name$47$116))
                "Running "))
            (set-cell!
              rounded$121
              (lambda (k$235 x$51$123)
                (k$235 (Cyc-fast-div
                         (round__inline__ (Cyc-fast-mul 1000 x$51$123))
                         1000))))))
         (cell rounded$121)))
      #f)))
 (define this-scheme-implementation-name
   (lambda (k$240)
     (Cyc-version
       (lambda (r$241)
         (k$240 (string-append "cyclone-" r$241))))))
 (main %halt))
 */
/* 
"---------------- after closure-convert:"
 */
/* 
((define create-n
   (lambda (k$139 n$1$91)
     ((%closure
        (lambda (self$243 n$5$92 a$6$93)
          ((%closure
             (lambda (self$244 lp$2$7$94)
               ((%closure
                  (lambda (self$245 lp$2$7$94)
                    ((%closure
                       (lambda (self$247 r$141)
                         ((%closure-ref
                            (cell-get (%closure-ref self$247 3))
                            0)
                          (cell-get (%closure-ref self$247 3))
                          (%closure-ref self$247 2)
                          (%closure-ref self$247 4)
                          (%closure-ref self$247 1)))
                       (%closure-ref self$245 1)
                       (%closure-ref self$245 2)
                       lp$2$7$94
                       (%closure-ref self$245 3))
                     (set-cell!
                       lp$2$7$94
                       (%closure
                         (lambda (self$246 k$143 n$8$95 a$9$96)
                           (if (Cyc-fast-eq n$8$95 0)
                             ((%closure-ref k$143 0) k$143 a$9$96)
                             ((%closure-ref
                                (cell-get (%closure-ref self$246 1))
                                0)
                              (cell-get (%closure-ref self$246 1))
                              k$143
                              (Cyc-fast-sub n$8$95 1)
                              (cons '() a$9$96))))
                         lp$2$7$94))))
                  (%closure-ref self$244 1)
                  (%closure-ref self$244 2)
                  (%closure-ref self$244 3))
                (cell lp$2$7$94)))
             a$6$93
             (%closure-ref self$243 1)
             n$5$92)
           #f))
        k$139)
      n$1$91
      '())))
 (define iterative-div2
   (lambda (k$150 l$10$97)
     ((%closure
        (lambda (self$248 l$14$98 a$15$99)
          ((%closure
             (lambda (self$249 lp$11$16$100)
               ((%closure
                  (lambda (self$250 lp$11$16$100)
                    ((%closure
                       (lambda (self$252 r$152)
                         ((%closure-ref
                            (cell-get (%closure-ref self$252 4))
                            0)
                          (cell-get (%closure-ref self$252 4))
                          (%closure-ref self$252 2)
                          (%closure-ref self$252 3)
                          (%closure-ref self$252 1)))
                       (%closure-ref self$250 1)
                       (%closure-ref self$250 2)
                       (%closure-ref self$250 3)
                       lp$11$16$100)
                     (set-cell!
                       lp$11$16$100
                       (%closure
                         (lambda (self$251 k$154 l$17$101 a$18$102)
                           (if (null? l$17$101)
                             ((%closure-ref k$154 0) k$154 a$18$102)
                             ((%closure-ref
                                (cell-get (%closure-ref self$251 1))
                                0)
                              (cell-get (%closure-ref self$251 1))
                              k$154
                              (cddr l$17$101)
                              (cons (car l$17$101) a$18$102))))
                         lp$11$16$100))))
                  (%closure-ref self$249 1)
                  (%closure-ref self$249 2)
                  (%closure-ref self$249 3))
                (cell lp$11$16$100)))
             a$15$99
             (%closure-ref self$248 1)
             l$14$98)
           #f))
        k$150)
      l$10$97
      '())))
 (define main
   (lambda (k$161)
     ((%closure-ref hide 0)
      hide
      (%closure
        (lambda (self$253 r$171)
          ((%closure-ref create-n 0)
           create-n
           (%closure
             (lambda (self$254 ll$36$108)
               ((%closure-ref run-r7rs-benchmark 0)
                run-r7rs-benchmark
                (%closure-ref self$254 1)
                "diviter:1000:1000000"
                1000000
                (%closure
                  (lambda (self$255 k$170)
                    ((%closure-ref iterative-div2 0)
                     iterative-div2
                     k$170
                     (%closure-ref self$255 1)))
                  ll$36$108)
                (%closure
                  (lambda (self$256 k$168 result$41$110)
                    ((%closure-ref k$168 0)
                     k$168
                     (equal? (length result$41$110) 500))))))
             (%closure-ref self$253 1))
           r$171))
        k$161)
      1000000
      1000)))
 (define hide
   (lambda (k$174 r$42$111 x$43$112)
     ((%closure-ref call-with-values 0)
      call-with-values
      k$174
      (%closure
        (lambda (self$257 k$179)
          ((%closure-ref vector 0)
           vector
           (%closure
             (lambda (self$258 r$180)
               ((%closure
                  (lambda (self$260 k$182)
                    (if (Cyc-fast-lt (%closure-ref self$260 1) 100)
                      ((%closure-ref k$182 0) k$182 0)
                      ((%closure-ref k$182 0) k$182 1)))
                  (%closure-ref self$258 2))
                (%closure
                  (lambda (self$259 r$181)
                    ((%closure-ref values 0)
                     values
                     (%closure-ref self$259 1)
                     (%closure-ref self$259 2)
                     r$181))
                  (%closure-ref self$258 1)
                  r$180)))
             k$179
             (%closure-ref self$257 1))
           values
           (%closure
             (lambda (self$261 k$185 x$44$113)
               ((%closure-ref k$185 0) k$185 x$44$113)))))
        r$42$111)
      (%closure
        (lambda (self$262 k$177 v$45$114 i$46$115)
          ((%closure-ref (vector-ref v$45$114 i$46$115) 0)
           (vector-ref v$45$114 i$46$115)
           k$177
           (%closure-ref self$262 1)))
        x$43$112))))
 (define run-r7rs-benchmark
   (lambda (k$188
            name$47$116
            count$48$117
            thunk$49$118
            ok?$50$119)
     ((%closure
        (lambda (self$263 rounded$121)
          ((%closure
             (lambda (self$264 rounded$121)
               ((%closure
                  (lambda (self$266 r$189)
                    ((%closure-ref display 0)
                     display
                     (%closure
                       (lambda (self$267 r$190)
                         ((%closure-ref display 0)
                          display
                          (%closure
                            (lambda (self$268 r$191)
                              ((%closure-ref newline 0)
                               newline
                               (%closure
                                 (lambda (self$269 r$192)
                                   ((%closure-ref current-output-port 0)
                                    current-output-port
                                    (%closure
                                      (lambda (self$270 r$233)
                                        ((%closure-ref flush-output-port 0)
                                         flush-output-port
                                         (%closure
                                           (lambda (self$271 r$193)
                                             ((%closure-ref
                                                jiffies-per-second
                                                0)
                                              jiffies-per-second
                                              (%closure
                                                (lambda (self$272 j/s$54$124)
                                                  ((%closure-ref
                                                     current-second
                                                     0)
                                                   current-second
                                                   (%closure
                                                     (lambda (self$273
                                                              t0$57$125)
                                                       ((%closure-ref
                                                          current-jiffy
                                                          0)
                                                        current-jiffy
                                                        (%closure
                                                          (lambda (self$274
                                                                   j0$60$126)
                                                            ((%closure
                                                               (lambda (self$275
                                                                        loop$65$129)
                                                                 ((%closure
                                                                    (lambda (self$276
                                                                             loop$65$129)
                                                                      ((%closure
                                                                         (lambda (self$305
                                                                                  r$197)
                                                                           ((%closure-ref
                                                                              (cell-get
                                                                                (%closure-ref
                                                                                  self$305
                                                                                  2))
                                                                              0)
                                                                            (cell-get
                                                                              (%closure-ref
                                                                                self$305
                                                                                2))
                                                                            (%closure-ref
                                                                              self$305
                                                                              1)
                                                                            0
                                                                            #f))
                                                                         (%closure-ref
                                                                           self$276
                                                                           4)
                                                                         loop$65$129)
                                                                       (set-cell!
                                                                         loop$65$129
                                                                         (%closure
                                                                           (lambda (self$277
                                                                                    k$199
                                                                                    i$66$130
                                                                                    result$67$131)
                                                                             (if (Cyc-fast-lt
                                                                                   i$66$130
                                                                                   (%closure-ref
                                                                                     self$277
                                                                                     1))
                                                                               ((%closure-ref
                                                                                  (%closure-ref
                                                                                    self$277
                                                                                    9)
                                                                                  0)
                                                                                (%closure-ref
                                                                                  self$277
                                                                                  9)
                                                                                (%closure
                                                                                  (lambda (self$278
                                                                                           r$202)
                                                                                    ((%closure-ref
                                                                                       (cell-get
                                                                                         (%closure-ref
                                                                                           self$278
                                                                                           3))
                                                                                       0)
                                                                                     (cell-get
                                                                                       (%closure-ref
                                                                                         self$278
                                                                                         3))
                                                                                     (%closure-ref
                                                                                       self$278
                                                                                       2)
                                                                                     (Cyc-fast-plus
                                                                                       (%closure-ref
                                                                                         self$278
                                                                                         1)
                                                                                       1)
                                                                                     r$202))
                                                                                  i$66$130
                                                                                  k$199
                                                                                  (%closure-ref
                                                                                    self$277
                                                                                    4)))
                                                                               ((%closure-ref
                                                                                  (%closure-ref
                                                                                    self$277
                                                                                    6)
                                                                                  0)
                                                                                (%closure-ref
                                                                                  self$277
                                                                                  6)
                                                                                (%closure
                                                                                  (lambda (self$279
                                                                                           r$203)
                                                                                    (if r$203
                                                                                      ((%closure-ref
                                                                                         current-jiffy
                                                                                         0)
                                                                                       current-jiffy
                                                                                       (%closure
                                                                                         (lambda (self$280
                                                                                                  j1$76$132)
                                                                                           ((%closure-ref
                                                                                              current-second
                                                                                              0)
                                                                                            current-second
                                                                                            (%closure
                                                                                              (lambda (self$281
                                                                                                       t1$79$133)
                                                                                                ((%closure-ref
                                                                                                   (cell-get
                                                                                                     (%closure-ref
                                                                                                       self$281
                                                                                                       7))
                                                                                                   0)
                                                                                                 (cell-get
                                                                                                   (%closure-ref
                                                                                                     self$281
                                                                                                     7))
                                                                                                 (%closure
                                                                                                   (lambda (self$282
                                                                                                            secs2$88$136)
                                                                                                     ((%closure-ref
                                                                                                        display
                                                                                                        0)
                                                                                                      display
                                                                                                      (%closure
                                                                                                        (lambda (self$283
                                                                                                                 r$210)
                                                                                                          ((%closure-ref
                                                                                                             write
                                                                                                             0)
                                                                                                           write
                                                                                                           (%closure
                                                                                                             (lambda (self$284
                                                                                                                      r$211)
                                                                                                               ((%closure-ref
                                                                                                                  display
                                                                                                                  0)
                                                                                                                display
                                                                                                                (%closure
                                                                                                                  (lambda (self$285
                                                                                                                           r$212)
                                                                                                                    ((%closure-ref
                                                                                                                       write
                                                                                                                       0)
                                                                                                                     write
                                                                                                                     (%closure
                                                                                                                       (lambda (self$286
                                                                                                                                r$213)
                                                                                                                         ((%closure-ref
                                                                                                                            display
                                                                                                                            0)
                                                                                                                          display
                                                                                                                          (%closure
                                                                                                                            (lambda (self$287
                                                                                                                                     r$214)
                                                                                                                              ((%closure-ref
                                                                                                                                 display
                                                                                                                                 0)
                                                                                                                               display
                                                                                                                               (%closure
                                                                                                                                 (lambda (self$288
                                                                                                                                          r$215)
                                                                                                                                   ((%closure-ref
                                                                                                                                      newline
                                                                                                                                      0)
                                                                                                                                    newline
                                                                                                                                    (%closure
                                                                                                                                      (lambda (self$289
                                                                                                                                               r$216)
                                                                                                                                        ((%closure-ref
                                                                                                                                           display
                                                                                                                                           0)
                                                                                                                                         display
                                                                                                                                         (%closure
                                                                                                                                           (lambda (self$290
                                                                                                                                                    r$217)
                                                                                                                                             ((%closure-ref
                                                                                                                                                this-scheme-implementation-name
                                                                                                                                                0)
                                                                                                                                              this-scheme-implementation-name
                                                                                                                                              (%closure
                                                                                                                                                (lambda (self$291
                                                                                                                                                         r$225)
                                                                                                                                                  ((%closure-ref
                                                                                                                                                     display
                                                                                                                                                     0)
                                                                                                                                                   display
                                                                                                                                                   (%closure
                                                                                                                                                     (lambda (self$292
                                                                                                                                                              r$218)
                                                                                                                                                       ((%closure-ref
                                                                                                                                                          display
                                                                                                                                                          0)
                                                                                                                                                        display
                                                                                                                                                        (%closure
                                                                                                                                                          (lambda (self$293
                                                                                                                                                                   r$219)
                                                                                                                                                            ((%closure-ref
                                                                                                                                                               display
                                                                                                                                                               0)
                                                                                                                                                             display
                                                                                                                                                             (%closure
                                                                                                                                                               (lambda (self$294
                                                                                                                                                                        r$220)
                                                                                                                                                                 ((%closure-ref
                                                                                                                                                                    display
                                                                                                                                                                    0)
                                                                                                                                                                  display
                                                                                                                                                                  (%closure
                                                                                                                                                                    (lambda (self$295
                                                                                                                                                                             r$221)
                                                                                                                                                                      ((%closure-ref
                                                                                                                                                                         display
                                                                                                                                                                         0)
                                                                                                                                                                       display
                                                                                                                                                                       (%closure
                                                                                                                                                                         (lambda (self$296
                                                                                                                                                                                  r$222)
                                                                                                                                                                           ((%closure-ref
                                                                                                                                                                              newline
                                                                                                                                                                              0)
                                                                                                                                                                            newline
                                                                                                                                                                            (%closure
                                                                                                                                                                              (lambda (self$297
                                                                                                                                                                                       r$223)
                                                                                                                                                                                ((%closure-ref
                                                                                                                                                                                   current-output-port
                                                                                                                                                                                   0)
                                                                                                                                                                                 current-output-port
                                                                                                                                                                                 (%closure
                                                                                                                                                                                   (lambda (self$298
                                                                                                                                                                                            r$224)
                                                                                                                                                                                     ((%closure-ref
                                                                                                                                                                                        flush-output-port
                                                                                                                                                                                        0)
                                                                                                                                                                                      flush-output-port
                                                                                                                                                                                      (%closure
                                                                                                                                                                                        (lambda (self$299
                                                                                                                                                                                                 r$204)
                                                                                                                                                                                          ((%closure-ref
                                                                                                                                                                                             (%closure-ref
                                                                                                                                                                                               self$299
                                                                                                                                                                                               1)
                                                                                                                                                                                             0)
                                                                                                                                                                                           (%closure-ref
                                                                                                                                                                                             self$299
                                                                                                                                                                                             1)
                                                                                                                                                                                           (%closure-ref
                                                                                                                                                                                             self$299
                                                                                                                                                                                             2)))
                                                                                                                                                                                        (%closure-ref
                                                                                                                                                                                          self$298
                                                                                                                                                                                          1)
                                                                                                                                                                                        (%closure-ref
                                                                                                                                                                                          self$298
                                                                                                                                                                                          2))
                                                                                                                                                                                      r$224))
                                                                                                                                                                                   (%closure-ref
                                                                                                                                                                                     self$297
                                                                                                                                                                                     1)
                                                                                                                                                                                   (%closure-ref
                                                                                                                                                                                     self$297
                                                                                                                                                                                     2))))
                                                                                                                                                                              (%closure-ref
                                                                                                                                                                                self$296
                                                                                                                                                                                1)
                                                                                                                                                                              (%closure-ref
                                                                                                                                                                                self$296
                                                                                                                                                                                2))))
                                                                                                                                                                         (%closure-ref
                                                                                                                                                                           self$295
                                                                                                                                                                           4)
                                                                                                                                                                         (%closure-ref
                                                                                                                                                                           self$295
                                                                                                                                                                           5))
                                                                                                                                                                       (inexact__inline__
                                                                                                                                                                         (Cyc-fast-div
                                                                                                                                                                           (Cyc-fast-sub
                                                                                                                                                                             (%closure-ref
                                                                                                                                                                               self$295
                                                                                                                                                                               3)
                                                                                                                                                                             (%closure-ref
                                                                                                                                                                               self$295
                                                                                                                                                                               2))
                                                                                                                                                                           (%closure-ref
                                                                                                                                                                             self$295
                                                                                                                                                                             1)))))
                                                                                                                                                                    (%closure-ref
                                                                                                                                                                      self$294
                                                                                                                                                                      1)
                                                                                                                                                                    (%closure-ref
                                                                                                                                                                      self$294
                                                                                                                                                                      2)
                                                                                                                                                                    (%closure-ref
                                                                                                                                                                      self$294
                                                                                                                                                                      3)
                                                                                                                                                                    (%closure-ref
                                                                                                                                                                      self$294
                                                                                                                                                                      4)
                                                                                                                                                                    (%closure-ref
                                                                                                                                                                      self$294
                                                                                                                                                                      5))
                                                                                                                                                                  ","))
                                                                                                                                                               (%closure-ref
                                                                                                                                                                 self$293
                                                                                                                                                                 1)
                                                                                                                                                               (%closure-ref
                                                                                                                                                                 self$293
                                                                                                                                                                 2)
                                                                                                                                                               (%closure-ref
                                                                                                                                                                 self$293
                                                                                                                                                                 3)
                                                                                                                                                               (%closure-ref
                                                                                                                                                                 self$293
                                                                                                                                                                 4)
                                                                                                                                                               (%closure-ref
                                                                                                                                                                 self$293
                                                                                                                                                                 6))
                                                                                                                                                             (%closure-ref
                                                                                                                                                               self$293
                                                                                                                                                               5)))
                                                                                                                                                          (%closure-ref
                                                                                                                                                            self$292
                                                                                                                                                            1)
                                                                                                                                                          (%closure-ref
                                                                                                                                                            self$292
                                                                                                                                                            2)
                                                                                                                                                          (%closure-ref
                                                                                                                                                            self$292
                                                                                                                                                            3)
                                                                                                                                                          (%closure-ref
                                                                                                                                                            self$292
                                                                                                                                                            4)
                                                                                                                                                          (%closure-ref
                                                                                                                                                            self$292
                                                                                                                                                            5)
                                                                                                                                                          (%closure-ref
                                                                                                                                                            self$292
                                                                                                                                                            6))
                                                                                                                                                        ","))
                                                                                                                                                     (%closure-ref
                                                                                                                                                       self$291
                                                                                                                                                       1)
                                                                                                                                                     (%closure-ref
                                                                                                                                                       self$291
                                                                                                                                                       2)
                                                                                                                                                     (%closure-ref
                                                                                                                                                       self$291
                                                                                                                                                       3)
                                                                                                                                                     (%closure-ref
                                                                                                                                                       self$291
                                                                                                                                                       4)
                                                                                                                                                     (%closure-ref
                                                                                                                                                       self$291
                                                                                                                                                       5)
                                                                                                                                                     (%closure-ref
                                                                                                                                                       self$291
                                                                                                                                                       6))
                                                                                                                                                   r$225))
                                                                                                                                                (%closure-ref
                                                                                                                                                  self$290
                                                                                                                                                  1)
                                                                                                                                                (%closure-ref
                                                                                                                                                  self$290
                                                                                                                                                  2)
                                                                                                                                                (%closure-ref
                                                                                                                                                  self$290
                                                                                                                                                  3)
                                                                                                                                                (%closure-ref
                                                                                                                                                  self$290
                                                                                                                                                  4)
                                                                                                                                                (%closure-ref
                                                                                                                                                  self$290
                                                                                                                                                  5)
                                                                                                                                                (%closure-ref
                                                                                                                                                  self$290
                                                                                                                                                  6))))
                                                                                                                                           (%closure-ref
                                                                                                                                             self$289
                                                                                                                                             1)
                                                                                                                                           (%closure-ref
                                                                                                                                             self$289
                                                                                                                                             2)
                                                                                                                                           (%closure-ref
                                                                                                                                             self$289
                                                                                                                                             3)
                                                                                                                                           (%closure-ref
                                                                                                                                             self$289
                                                                                                                                             4)
                                                                                                                                           (%closure-ref
                                                                                                                                             self$289
                                                                                                                                             5)
                                                                                                                                           (%closure-ref
                                                                                                                                             self$289
                                                                                                                                             6))
                                                                                                                                         "+!CSVLINE!+"))
                                                                                                                                      (%closure-ref
                                                                                                                                        self$288
                                                                                                                                        1)
                                                                                                                                      (%closure-ref
                                                                                                                                        self$288
                                                                                                                                        2)
                                                                                                                                      (%closure-ref
                                                                                                                                        self$288
                                                                                                                                        3)
                                                                                                                                      (%closure-ref
                                                                                                                                        self$288
                                                                                                                                        4)
                                                                                                                                      (%closure-ref
                                                                                                                                        self$288
                                                                                                                                        5)
                                                                                                                                      (%closure-ref
                                                                                                                                        self$288
                                                                                                                                        6))))
                                                                                                                                 (%closure-ref
                                                                                                                                   self$287
                                                                                                                                   1)
                                                                                                                                 (%closure-ref
                                                                                                                                   self$287
                                                                                                                                   2)
                                                                                                                                 (%closure-ref
                                                                                                                                   self$287
                                                                                                                                   3)
                                                                                                                                 (%closure-ref
                                                                                                                                   self$287
                                                                                                                                   4)
                                                                                                                                 (%closure-ref
                                                                                                                                   self$287
                                                                                                                                   5)
                                                                                                                                 (%closure-ref
                                                                                                                                   self$287
                                                                                                                                   6))
                                                                                                                               (%closure-ref
                                                                                                                                 self$287
                                                                                                                                 5)))
                                                                                                                            (%closure-ref
                                                                                                                              self$286
                                                                                                                              1)
                                                                                                                            (%closure-ref
                                                                                                                              self$286
                                                                                                                              2)
                                                                                                                            (%closure-ref
                                                                                                                              self$286
                                                                                                                              3)
                                                                                                                            (%closure-ref
                                                                                                                              self$286
                                                                                                                              4)
                                                                                                                            (%closure-ref
                                                                                                                              self$286
                                                                                                                              5)
                                                                                                                            (%closure-ref
                                                                                                                              self$286
                                                                                                                              6))
                                                                                                                          ") for "))
                                                                                                                       (%closure-ref
                                                                                                                         self$285
                                                                                                                         1)
                                                                                                                       (%closure-ref
                                                                                                                         self$285
                                                                                                                         2)
                                                                                                                       (%closure-ref
                                                                                                                         self$285
                                                                                                                         3)
                                                                                                                       (%closure-ref
                                                                                                                         self$285
                                                                                                                         4)
                                                                                                                       (%closure-ref
                                                                                                                         self$285
                                                                                                                         5)
                                                                                                                       (%closure-ref
                                                                                                                         self$285
                                                                                                                         6))
                                                                                                                     (%closure-ref
                                                                                                                       self$285
                                                                                                                       7)))
                                                                                                                  (%closure-ref
                                                                                                                    self$284
                                                                                                                    1)
                                                                                                                  (%closure-ref
                                                                                                                    self$284
                                                                                                                    2)
                                                                                                                  (%closure-ref
                                                                                                                    self$284
                                                                                                                    3)
                                                                                                                  (%closure-ref
                                                                                                                    self$284
                                                                                                                    4)
                                                                                                                  (%closure-ref
                                                                                                                    self$284
                                                                                                                    5)
                                                                                                                  (%closure-ref
                                                                                                                    self$284
                                                                                                                    6)
                                                                                                                  (%closure-ref
                                                                                                                    self$284
                                                                                                                    7))
                                                                                                                " seconds ("))
                                                                                                             (%closure-ref
                                                                                                               self$283
                                                                                                               1)
                                                                                                             (%closure-ref
                                                                                                               self$283
                                                                                                               2)
                                                                                                             (%closure-ref
                                                                                                               self$283
                                                                                                               3)
                                                                                                             (%closure-ref
                                                                                                               self$283
                                                                                                               4)
                                                                                                             (%closure-ref
                                                                                                               self$283
                                                                                                               5)
                                                                                                             (%closure-ref
                                                                                                               self$283
                                                                                                               6)
                                                                                                             (%closure-ref
                                                                                                               self$283
                                                                                                               7))
                                                                                                           (inexact__inline__
                                                                                                             (Cyc-fast-div
                                                                                                               (Cyc-fast-sub
                                                                                                                 (%closure-ref
                                                                                                                   self$283
                                                                                                                   3)
                                                                                                                 (%closure-ref
                                                                                                                   self$283
                                                                                                                   2))
                                                                                                               (%closure-ref
                                                                                                                 self$283
                                                                                                                 1)))))
                                                                                                        (%closure-ref
                                                                                                          self$282
                                                                                                          1)
                                                                                                        (%closure-ref
                                                                                                          self$282
                                                                                                          2)
                                                                                                        (%closure-ref
                                                                                                          self$282
                                                                                                          3)
                                                                                                        (%closure-ref
                                                                                                          self$282
                                                                                                          4)
                                                                                                        (%closure-ref
                                                                                                          self$282
                                                                                                          5)
                                                                                                        (%closure-ref
                                                                                                          self$282
                                                                                                          6)
                                                                                                        secs2$88$136)
                                                                                                      "Elapsed time: "))
                                                                                                   (%closure-ref
                                                                                                     self$281
                                                                                                     1)
                                                                                                   (%closure-ref
                                                                                                     self$281
                                                                                                     2)
                                                                                                   (%closure-ref
                                                                                                     self$281
                                                                                                     3)
                                                                                                   (%closure-ref
                                                                                                     self$281
                                                                                                     4)
                                                                                                   (%closure-ref
                                                                                                     self$281
                                                                                                     5)
                                                                                                   (%closure-ref
                                                                                                     self$281
                                                                                                     6))
                                                                                                 (Cyc-fast-sub
                                                                                                   t1$79$133
                                                                                                   (%closure-ref
                                                                                                     self$281
                                                                                                     8))))
                                                                                              (%closure-ref
                                                                                                self$280
                                                                                                1)
                                                                                              (%closure-ref
                                                                                                self$280
                                                                                                2)
                                                                                              j1$76$132
                                                                                              (%closure-ref
                                                                                                self$280
                                                                                                3)
                                                                                              (%closure-ref
                                                                                                self$280
                                                                                                4)
                                                                                              (%closure-ref
                                                                                                self$280
                                                                                                5)
                                                                                              (%closure-ref
                                                                                                self$280
                                                                                                6)
                                                                                              (%closure-ref
                                                                                                self$280
                                                                                                7))))
                                                                                         (%closure-ref
                                                                                           self$279
                                                                                           1)
                                                                                         (%closure-ref
                                                                                           self$279
                                                                                           2)
                                                                                         (%closure-ref
                                                                                           self$279
                                                                                           3)
                                                                                         (%closure-ref
                                                                                           self$279
                                                                                           4)
                                                                                         (%closure-ref
                                                                                           self$279
                                                                                           5)
                                                                                         (%closure-ref
                                                                                           self$279
                                                                                           6)
                                                                                         (%closure-ref
                                                                                           self$279
                                                                                           7)))
                                                                                      ((%closure-ref
                                                                                         display
                                                                                         0)
                                                                                       display
                                                                                       (%closure
                                                                                         (lambda (self$300
                                                                                                  r$228)
                                                                                           ((%closure-ref
                                                                                              write
                                                                                              0)
                                                                                            write
                                                                                            (%closure
                                                                                              (lambda (self$301
                                                                                                       r$229)
                                                                                                ((%closure-ref
                                                                                                   newline
                                                                                                   0)
                                                                                                 newline
                                                                                                 (%closure
                                                                                                   (lambda (self$302
                                                                                                            r$230)
                                                                                                     ((%closure-ref
                                                                                                        current-output-port
                                                                                                        0)
                                                                                                      current-output-port
                                                                                                      (%closure
                                                                                                        (lambda (self$303
                                                                                                                 r$232)
                                                                                                          ((%closure-ref
                                                                                                             flush-output-port
                                                                                                             0)
                                                                                                           flush-output-port
                                                                                                           (%closure
                                                                                                             (lambda (self$304
                                                                                                                      r$231)
                                                                                                               ((%closure-ref
                                                                                                                  (%closure-ref
                                                                                                                    self$304
                                                                                                                    1)
                                                                                                                  0)
                                                                                                                (%closure-ref
                                                                                                                  self$304
                                                                                                                  1)
                                                                                                                (%closure-ref
                                                                                                                  self$304
                                                                                                                  2)))
                                                                                                             (%closure-ref
                                                                                                               self$303
                                                                                                               1)
                                                                                                             (%closure-ref
                                                                                                               self$303
                                                                                                               2))
                                                                                                           r$232))
                                                                                                        (%closure-ref
                                                                                                          self$302
                                                                                                          1)
                                                                                                        (%closure-ref
                                                                                                          self$302
                                                                                                          2))))
                                                                                                   (%closure-ref
                                                                                                     self$301
                                                                                                     1)
                                                                                                   (%closure-ref
                                                                                                     self$301
                                                                                                     2))))
                                                                                              (%closure-ref
                                                                                                self$300
                                                                                                1)
                                                                                              (%closure-ref
                                                                                                self$300
                                                                                                2))
                                                                                            (%closure-ref
                                                                                              self$300
                                                                                              2)))
                                                                                         (%closure-ref
                                                                                           self$279
                                                                                           3)
                                                                                         (%closure-ref
                                                                                           self$279
                                                                                           5))
                                                                                       "ERROR: returned incorrect result: ")))
                                                                                  (%closure-ref
                                                                                    self$277
                                                                                    2)
                                                                                  (%closure-ref
                                                                                    self$277
                                                                                    3)
                                                                                  k$199
                                                                                  (%closure-ref
                                                                                    self$277
                                                                                    5)
                                                                                  result$67$131
                                                                                  (%closure-ref
                                                                                    self$277
                                                                                    7)
                                                                                  (%closure-ref
                                                                                    self$277
                                                                                    8))
                                                                                result$67$131)))
                                                                           (%closure-ref
                                                                             self$276
                                                                             1)
                                                                           (%closure-ref
                                                                             self$276
                                                                             2)
                                                                           (%closure-ref
                                                                             self$276
                                                                             3)
                                                                           loop$65$129
                                                                           (%closure-ref
                                                                             self$276
                                                                             5)
                                                                           (%closure-ref
                                                                             self$276
                                                                             6)
                                                                           (%closure-ref
                                                                             self$276
                                                                             7)
                                                                           (%closure-ref
                                                                             self$276
                                                                             8)
                                                                           (%closure-ref
                                                                             self$276
                                                                             9)))))
                                                                    (%closure-ref
                                                                      self$275
                                                                      1)
                                                                    (%closure-ref
                                                                      self$275
                                                                      2)
                                                                    (%closure-ref
                                                                      self$275
                                                                      3)
                                                                    (%closure-ref
                                                                      self$275
                                                                      4)
                                                                    (%closure-ref
                                                                      self$275
                                                                      5)
                                                                    (%closure-ref
                                                                      self$275
                                                                      6)
                                                                    (%closure-ref
                                                                      self$275
                                                                      7)
                                                                    (%closure-ref
                                                                      self$275
                                                                      8)
                                                                    (%closure-ref
                                                                      self$275
                                                                      9))
                                                                  (cell loop$65$129)))
                                                               (%closure-ref
                                                                 self$274
                                                                 1)
                                                               (%closure-ref
                                                                 self$274
                                                                 2)
                                                               j0$60$126
                                                               (%closure-ref
                                                                 self$274
                                                                 3)
                                                               (%closure-ref
                                                                 self$274
                                                                 4)
                                                               (%closure-ref
                                                                 self$274
                                                                 5)
                                                               (%closure-ref
                                                                 self$274
                                                                 6)
                                                               (%closure-ref
                                                                 self$274
                                                                 7)
                                                               (%closure-ref
                                                                 self$274
                                                                 8))
                                                             #f))
                                                          (%closure-ref
                                                            self$273
                                                            1)
                                                          (%closure-ref
                                                            self$273
                                                            2)
                                                          (%closure-ref
                                                            self$273
                                                            3)
                                                          (%closure-ref
                                                            self$273
                                                            4)
                                                          (%closure-ref
                                                            self$273
                                                            5)
                                                          (%closure-ref
                                                            self$273
                                                            6)
                                                          t0$57$125
                                                          (%closure-ref
                                                            self$273
                                                            7))))
                                                     (%closure-ref self$272 1)
                                                     j/s$54$124
                                                     (%closure-ref self$272 2)
                                                     (%closure-ref self$272 3)
                                                     (%closure-ref self$272 4)
                                                     (%closure-ref self$272 5)
                                                     (%closure-ref
                                                       self$272
                                                       6))))
                                                (%closure-ref self$271 1)
                                                (%closure-ref self$271 2)
                                                (%closure-ref self$271 3)
                                                (%closure-ref self$271 4)
                                                (%closure-ref self$271 5)
                                                (%closure-ref self$271 6))))
                                           (%closure-ref self$270 1)
                                           (%closure-ref self$270 2)
                                           (%closure-ref self$270 3)
                                           (%closure-ref self$270 4)
                                           (%closure-ref self$270 5)
                                           (%closure-ref self$270 6))
                                         r$233))
                                      (%closure-ref self$269 1)
                                      (%closure-ref self$269 2)
                                      (%closure-ref self$269 3)
                                      (%closure-ref self$269 4)
                                      (%closure-ref self$269 5)
                                      (%closure-ref self$269 6))))
                                 (%closure-ref self$268 1)
                                 (%closure-ref self$268 2)
                                 (%closure-ref self$268 3)
                                 (%closure-ref self$268 4)
                                 (%closure-ref self$268 5)
                                 (%closure-ref self$268 6))))
                            (%closure-ref self$267 1)
                            (%closure-ref self$267 2)
                            (%closure-ref self$267 3)
                            (%closure-ref self$267 4)
                            (%closure-ref self$267 5)
                            (%closure-ref self$267 6))
                          (%closure-ref self$267 3)))
                       (%closure-ref self$266 1)
                       (%closure-ref self$266 2)
                       (%closure-ref self$266 3)
                       (%closure-ref self$266 4)
                       (%closure-ref self$266 5)
                       (%closure-ref self$266 6))
                     "Running "))
                  (%closure-ref self$264 1)
                  (%closure-ref self$264 2)
                  (%closure-ref self$264 3)
                  (%closure-ref self$264 4)
                  rounded$121
                  (%closure-ref self$264 5))
                (set-cell!
                  rounded$121
                  (%closure
                    (lambda (self$265 k$235 x$51$123)
                      ((%closure-ref k$235 0)
                       k$235
                       (Cyc-fast-div
                         (round__inline__ (Cyc-fast-mul 1000 x$51$123))
                         1000)))))))
             (%closure-ref self$263 1)
             (%closure-ref self$263 2)
             (%closure-ref self$263 3)
             (%closure-ref self$263 4)
             (%closure-ref self$263 5))
           (cell rounded$121)))
        count$48$117
        k$188
        name$47$116
        ok?$50$119
        thunk$49$118)
      #f)))
 (define this-scheme-implementation-name
   (lambda (k$240)
     ((%closure-ref Cyc-version 0)
      Cyc-version
      (%closure
        (lambda (self$306 r$241)
          ((%closure-ref (%closure-ref self$306 1) 0)
           (%closure-ref self$306 1)
           (string-append "cyclone-" r$241)))
        k$240))))
 ((%closure-ref main 0) main %halt))
 */
/* 
"---------------- C headers: "
 */
/* 
()
 */
/* 
"---------------- module globals: "
 */
/* 
(this-scheme-implementation-name
  run-r7rs-benchmark
  hide
  main
  iterative-div2
  create-n)
 */
/* 
"---------------- C code:"
 */
#define closcall1(td, clo,a1) \
if (type_is_pair_prim(clo)) { \
   Cyc_apply(td, 0, (closure)(a1), clo); \
} else { \
   ((clo)->fn)(td, 1, clo,a1);\
}
#define return_closcall1(td, clo,a1) { \
 char top; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[1]; buf[0] = a1;\
     GC(td, clo, buf, 1); \
     return; \
 } else {\
     closcall1(td, (closure) (clo),a1); \
     return;\
 } \
}

#define return_direct1(td, _fn,a1) { \
 char top; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[1]; buf[0] = a1; \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 1); \
     return; \
 } else { \
     (_fn)(td, 1, (closure)_fn,a1); \
 }}

#define closcall2(td, clo,a1,a2) \
if (type_is_pair_prim(clo)) { \
   Cyc_apply(td, 1, (closure)(a1), clo,a2); \
} else { \
   ((clo)->fn)(td, 2, clo,a1,a2);\
}
#define return_closcall2(td, clo,a1,a2) { \
 char top; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[2]; buf[0] = a1;buf[1] = a2;\
     GC(td, clo, buf, 2); \
     return; \
 } else {\
     closcall2(td, (closure) (clo),a1,a2); \
     return;\
 } \
}

#define return_direct2(td, _fn,a1,a2) { \
 char top; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[2]; buf[0] = a1;buf[1] = a2; \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 2); \
     return; \
 } else { \
     (_fn)(td, 2, (closure)_fn,a1,a2); \
 }}

#define closcall3(td, clo,a1,a2,a3) \
if (type_is_pair_prim(clo)) { \
   Cyc_apply(td, 2, (closure)(a1), clo,a2,a3); \
} else { \
   ((clo)->fn)(td, 3, clo,a1,a2,a3);\
}
#define return_closcall3(td, clo,a1,a2,a3) { \
 char top; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[3]; buf[0] = a1;buf[1] = a2;buf[2] = a3;\
     GC(td, clo, buf, 3); \
     return; \
 } else {\
     closcall3(td, (closure) (clo),a1,a2,a3); \
     return;\
 } \
}

#define return_direct3(td, _fn,a1,a2,a3) { \
 char top; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[3]; buf[0] = a1;buf[1] = a2;buf[2] = a3; \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 3); \
     return; \
 } else { \
     (_fn)(td, 3, (closure)_fn,a1,a2,a3); \
 }}

#define closcall5(td, clo,a1,a2,a3,a4,a5) \
if (type_is_pair_prim(clo)) { \
   Cyc_apply(td, 4, (closure)(a1), clo,a2,a3,a4,a5); \
} else { \
   ((clo)->fn)(td, 5, clo,a1,a2,a3,a4,a5);\
}
#define return_closcall5(td, clo,a1,a2,a3,a4,a5) { \
 char top; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[5]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5;\
     GC(td, clo, buf, 5); \
     return; \
 } else {\
     closcall5(td, (closure) (clo),a1,a2,a3,a4,a5); \
     return;\
 } \
}

#define return_direct5(td, _fn,a1,a2,a3,a4,a5) { \
 char top; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[5]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5; \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 5); \
     return; \
 } else { \
     (_fn)(td, 5, (closure)_fn,a1,a2,a3,a4,a5); \
 }}

#include "cyclone/types.h"
object __glo_this_91scheme_91implementation_91name = NULL;
object __glo_run_91r7rs_91benchmark = NULL;
object __glo_hide = NULL;
object __glo_main = NULL;
object __glo_iterative_91div2 = NULL;
object __glo_create_91n = NULL;
extern object __glo_member_scheme_base;
extern object __glo_assoc_scheme_base;
extern object __glo_cons_91source_scheme_base;
extern object __glo_syntax_91rules_scheme_base;
extern object __glo_letrec_85_scheme_base;
extern object __glo_guard_scheme_base;
extern object __glo_guard_91aux_scheme_base;
extern object __glo_define_91record_91type_scheme_base;
extern object __glo_record_127_scheme_base;
extern object __glo_is_91a_127_scheme_base;
extern object __glo_register_91simple_91type_scheme_base;
extern object __glo_make_91type_91predicate_scheme_base;
extern object __glo_make_91constructor_scheme_base;
extern object __glo_make_91getter_scheme_base;
extern object __glo_make_91setter_scheme_base;
extern object __glo_slot_91ref_scheme_base;
extern object __glo_slot_91set_67_scheme_base;
extern object __glo_type_91slot_91offset_scheme_base;
extern object __glo_receive_scheme_base;
extern object __glo_abs_scheme_base;
extern object __glo_max_scheme_base;
extern object __glo_min_scheme_base;
extern object __glo_modulo_scheme_base;
extern object __glo_floor_91remainder_scheme_base;
extern object __glo_even_127_scheme_base;
extern object __glo_exact_91integer_127_scheme_base;
extern object __glo_exact_91integer_91sqrt_scheme_base;
extern object __glo_exact_127_scheme_base;
extern object __glo_inexact_127_scheme_base;
extern object __glo_odd_127_scheme_base;
extern object __glo_complex_127_scheme_base;
extern object __glo_rational_127_scheme_base;
extern object __glo_bignum_127_scheme_base;
extern object __glo_gcd_scheme_base;
extern object __glo_lcm_scheme_base;
extern object __glo_quotient_scheme_base;
extern object __glo_remainder_scheme_base;
extern object __glo_truncate_91quotient_scheme_base;
extern object __glo_truncate_91remainder_scheme_base;
extern object __glo_truncate_95_scheme_base;
extern object __glo_floor_91quotient_scheme_base;
extern object __glo_floor_91remainder_scheme_base;
extern object __glo_floor_95_scheme_base;
extern object __glo_square_scheme_base;
extern object __glo_expt_scheme_base;
extern object __glo_call_91with_91current_91continuation_scheme_base;
extern object __glo_call_95cc_scheme_base;
extern object __glo_call_91with_91values_scheme_base;
extern object __glo_dynamic_91wind_scheme_base;
extern object __glo_values_scheme_base;
extern object __glo_char_123_127_scheme_base;
extern object __glo_char_121_127_scheme_base;
extern object __glo_char_125_127_scheme_base;
extern object __glo_char_121_123_127_scheme_base;
extern object __glo_char_125_123_127_scheme_base;
extern object __glo_string_123_127_scheme_base;
extern object __glo_string_121_127_scheme_base;
extern object __glo_string_121_123_127_scheme_base;
extern object __glo_string_125_127_scheme_base;
extern object __glo_string_125_123_127_scheme_base;
extern object __glo_foldl_scheme_base;
extern object __glo_foldr_scheme_base;
extern object __glo_not_scheme_base;
extern object __glo_list_127_scheme_base;
extern object __glo_zero_127_scheme_base;
extern object __glo_positive_127_scheme_base;
extern object __glo_negative_127_scheme_base;
extern object __glo_append_scheme_base;
extern object __glo__list_scheme_base;
extern object __glo_make_91list_scheme_base;
extern object __glo_list_91copy_scheme_base;
extern object __glo_map_scheme_base;
extern object __glo_Cyc_91map_91loop_911_scheme_base;
extern object __glo_Cyc_91for_91each_91loop_911_scheme_base;
extern object __glo_for_91each_scheme_base;
extern object __glo_list_91tail_scheme_base;
extern object __glo_list_91ref_scheme_base;
extern object __glo_list_91set_67_scheme_base;
extern object __glo_reverse_scheme_base;
extern object __glo_boolean_123_127_scheme_base;
extern object __glo_symbol_123_127_scheme_base;
extern object __glo_Cyc_91obj_123_127_scheme_base;
extern object __glo_vector_scheme_base;
extern object __glo_vector_91append_scheme_base;
extern object __glo_vector_91copy_scheme_base;
extern object __glo_vector_91copy_67_scheme_base;
extern object __glo_vector_91fill_67_scheme_base;
extern object __glo_vector_91_125list_scheme_base;
extern object __glo_vector_91_125string_scheme_base;
extern object __glo_vector_91map_scheme_base;
extern object __glo_vector_91for_91each_scheme_base;
extern object __glo_make_91string_scheme_base;
extern object __glo_string_scheme_base;
extern object __glo_string_91copy_scheme_base;
extern object __glo_string_91copy_67_scheme_base;
extern object __glo_string_91fill_67_scheme_base;
extern object __glo_string_91_125list_scheme_base;
extern object __glo_string_91_125vector_scheme_base;
extern object __glo_string_91map_scheme_base;
extern object __glo_string_91for_91each_scheme_base;
extern object __glo_make_91parameter_scheme_base;
extern object __glo_current_91output_91port_scheme_base;
extern object __glo_current_91input_91port_scheme_base;
extern object __glo_current_91error_91port_scheme_base;
extern object __glo_call_91with_91port_scheme_base;
extern object __glo_error_91object_127_scheme_base;
extern object __glo_error_91object_91message_scheme_base;
extern object __glo_error_91object_91irritants_scheme_base;
extern object __glo_error_scheme_base;
extern object __glo_raise_scheme_base;
extern object __glo_raise_91continuable_scheme_base;
extern object __glo_with_91handler_scheme_base;
extern object __glo_with_91exception_91handler_scheme_base;
extern object __glo_Cyc_91add_91exception_91handler_scheme_base;
extern object __glo_Cyc_91remove_91exception_91handler_scheme_base;
extern object __glo_newline_scheme_base;
extern object __glo_write_91char_scheme_base;
extern object __glo_write_91string_scheme_base;
extern object __glo_flush_91output_91port_scheme_base;
extern object __glo_peek_91char_scheme_base;
extern object __glo_read_91char_scheme_base;
extern object __glo_read_91line_scheme_base;
extern object __glo_read_91string_scheme_base;
extern object __glo_input_91port_127_scheme_base;
extern object __glo_output_91port_127_scheme_base;
extern object __glo_input_91port_91open_127_scheme_base;
extern object __glo_output_91port_91open_127_scheme_base;
extern object __glo_get_91output_91string_scheme_base;
extern object __glo_open_91output_91string_scheme_base;
extern object __glo_open_91input_91string_scheme_base;
extern object __glo_get_91output_91bytevector_scheme_base;
extern object __glo_open_91input_91bytevector_scheme_base;
extern object __glo_open_91output_91bytevector_scheme_base;
extern object __glo_features_scheme_base;
extern object __glo_Cyc_91version_scheme_base;
extern object __glo_any_scheme_base;
extern object __glo_every_scheme_base;
extern object __glo_and_scheme_base;
extern object __glo_or_scheme_base;
extern object __glo_let_scheme_base;
extern object __glo_let_85_scheme_base;
extern object __glo_letrec_scheme_base;
extern object __glo_let_85_91values_scheme_base;
extern object __glo_let_91values_scheme_base;
extern object __glo_begin_scheme_base;
extern object __glo__case_scheme_base;
extern object __glo_cond_scheme_base;
extern object __glo_cond_91expand_scheme_base;
extern object __glo__do_scheme_base;
extern object __glo_when_scheme_base;
extern object __glo_unless_scheme_base;
extern object __glo_quasiquote_scheme_base;
extern object __glo_floor_scheme_base;
extern object __glo_ceiling_scheme_base;
extern object __glo_truncate_scheme_base;
extern object __glo_round_scheme_base;
extern object __glo_exact_scheme_base;
extern object __glo_inexact_scheme_base;
extern object __glo_eof_91object_scheme_base;
extern object __glo_syntax_91error_scheme_base;
extern object __glo_bytevector_91copy_scheme_base;
extern object __glo_bytevector_91copy_67_scheme_base;
extern object __glo_utf8_91_125string_scheme_base;
extern object __glo_string_91_125utf8_scheme_base;
extern object __glo_denominator_scheme_base;
extern object __glo_numerator_scheme_base;
extern object __glo_parameterize_scheme_base;
extern object __glo_peek_91u8_scheme_base;
extern object __glo_read_91u8_scheme_base;
extern object __glo_write_91u8_scheme_base;
extern object __glo_read_scheme_read;
extern object __glo_read_91all_scheme_read;
extern object __glo_include_scheme_read;
extern object __glo_include_91ci_scheme_read;
extern object __glo_display_scheme_write;
extern object __glo_write_scheme_write;
extern object __glo_write_91shared_scheme_write;
extern object __glo_write_91simple_scheme_write;
extern object __glo_current_91second_scheme_time;
extern object __glo_current_91jiffy_scheme_time;
extern object __glo_jiffies_91per_91second_scheme_time;
extern object __glo_string_123_127_191_191inline_191_191_scheme_base;
extern object __glo_string_121_127_191_191inline_191_191_scheme_base;
extern object __glo_string_121_123_127_191_191inline_191_191_scheme_base;
extern object __glo_string_125_127_191_191inline_191_191_scheme_base;
extern object __glo_string_125_123_127_191_191inline_191_191_scheme_base;
extern object __glo_not_191_191inline_191_191_scheme_base;
extern object __glo_zero_127_191_191inline_191_191_scheme_base;
extern object __glo_positive_127_191_191inline_191_191_scheme_base;
extern object __glo_negative_127_191_191inline_191_191_scheme_base;
extern object __glo_floor_191_191inline_191_191_scheme_base;
extern object __glo_ceiling_191_191inline_191_191_scheme_base;
extern object __glo_truncate_191_191inline_191_191_scheme_base;
extern object __glo_round_191_191inline_191_191_scheme_base;
extern object __glo_inexact_191_191inline_191_191_scheme_base;
extern object __glo_sqrt_191_191inline_191_191_scheme_base;
extern object __glo_exact_91integer_127_191_191inline_191_191_scheme_base;
extern object __glo_exact_127_191_191inline_191_191_scheme_base;
extern object __glo_complex_127_191_191inline_191_191_scheme_base;
extern object __glo_denominator_191_191inline_191_191_scheme_base;
extern object __glo_numerator_191_191inline_191_191_scheme_base;
extern object __glo_quotient_191_191inline_191_191_scheme_base;
extern object __glo_square_191_191inline_191_191_scheme_base;
extern object __glo_eof_91object_191_191inline_191_191_scheme_base;
extern object __glo_Cyc_91opaque_91eq_127_191_191inline_191_191_scheme_read;
extern object __glo_Cyc_91opaque_91unsafe_91eq_127_191_191inline_191_191_scheme_read;
extern object __glo_Cyc_91opaque_91unsafe_91string_127_191_191inline_191_191_scheme_read;
#include "cyclone/runtime.h"
#include "cyclone/runtime-main.h"
static void __lambda_69(void *data, int argc, closure _,object k_73240) ;
static void __lambda_68(void *data, int argc, object self_73306, object r_73241) ;
static void __lambda_67(void *data, int argc, closure _,object k_73188, object name_7347_73116, object count_7348_73117, object thunk_7349_73118, object ok_127_7350_73119) ;
static void __lambda_66(void *data, int argc, object self_73263, object rounded_73121) ;
static void __lambda_65(void *data, int argc, object self_73264, object rounded_73121) ;
static void __lambda_64(void *data, int argc, object self_73265, object k_73235, object x_7351_73123) ;
static void __lambda_63(void *data, int argc, object self_73266, object r_73189) ;
static void __lambda_62(void *data, int argc, object self_73267, object r_73190) ;
static void __lambda_61(void *data, int argc, object self_73268, object r_73191) ;
static void __lambda_60(void *data, int argc, object self_73269, object r_73192) ;
static void __lambda_59(void *data, int argc, object self_73270, object r_73233) ;
static void __lambda_58(void *data, int argc, object self_73271, object r_73193) ;
static void __lambda_57(void *data, int argc, object self_73272, object j_95s_7354_73124) ;
static void __lambda_56(void *data, int argc, object self_73273, object t0_7357_73125) ;
static void __lambda_55(void *data, int argc, object self_73274, object j0_7360_73126) ;
static void __lambda_54(void *data, int argc, object self_73275, object loop_7365_73129) ;
static void __lambda_53(void *data, int argc, object self_73276, object loop_7365_73129) ;
static void __lambda_52(void *data, int argc, object self_73277, object k_73199, object i_7366_73130, object result_7367_73131) ;
static void __lambda_51(void *data, int argc, object self_73279, object r_73203) ;
static void __lambda_50(void *data, int argc, object self_73300, object r_73228) ;
static void __lambda_49(void *data, int argc, object self_73301, object r_73229) ;
static void __lambda_48(void *data, int argc, object self_73302, object r_73230) ;
static void __lambda_47(void *data, int argc, object self_73303, object r_73232) ;
static void __lambda_46(void *data, int argc, object self_73304, object r_73231) ;
static void __lambda_45(void *data, int argc, object self_73280, object j1_7376_73132) ;
static void __lambda_44(void *data, int argc, object self_73281, object t1_7379_73133) ;
static void __lambda_43(void *data, int argc, object self_73282, object secs2_7388_73136) ;
static void __lambda_42(void *data, int argc, object self_73283, object r_73210) ;
static void __lambda_41(void *data, int argc, object self_73284, object r_73211) ;
static void __lambda_40(void *data, int argc, object self_73285, object r_73212) ;
static void __lambda_39(void *data, int argc, object self_73286, object r_73213) ;
static void __lambda_38(void *data, int argc, object self_73287, object r_73214) ;
static void __lambda_37(void *data, int argc, object self_73288, object r_73215) ;
static void __lambda_36(void *data, int argc, object self_73289, object r_73216) ;
static void __lambda_35(void *data, int argc, object self_73290, object r_73217) ;
static void __lambda_34(void *data, int argc, object self_73291, object r_73225) ;
static void __lambda_33(void *data, int argc, object self_73292, object r_73218) ;
static void __lambda_32(void *data, int argc, object self_73293, object r_73219) ;
static void __lambda_31(void *data, int argc, object self_73294, object r_73220) ;
static void __lambda_30(void *data, int argc, object self_73295, object r_73221) ;
static void __lambda_29(void *data, int argc, object self_73296, object r_73222) ;
static void __lambda_28(void *data, int argc, object self_73297, object r_73223) ;
static void __lambda_27(void *data, int argc, object self_73298, object r_73224) ;
static void __lambda_26(void *data, int argc, object self_73299, object r_73204) ;
static void __lambda_25(void *data, int argc, object self_73278, object r_73202) ;
static void __lambda_24(void *data, int argc, object self_73305, object r_73197) ;
static void __lambda_23(void *data, int argc, closure _,object k_73174, object r_7342_73111, object x_7343_73112) ;
static void __lambda_22(void *data, int argc, object self_73262, object k_73177, object v_7345_73114, object i_7346_73115) ;
static void __lambda_21(void *data, int argc, object self_73257, object k_73179) ;
static void __lambda_20(void *data, int argc, object self_73261, object k_73185, object x_7344_73113) ;
static void __lambda_19(void *data, int argc, object self_73258, object r_73180) ;
static void __lambda_18(void *data, int argc, object self_73259, object r_73181) ;
static void __lambda_17(void *data, int argc, object self_73260, object k_73182) ;
static void __lambda_16(void *data, int argc, closure _,object k_73161) ;
static void __lambda_15(void *data, int argc, object self_73253, object r_73171) ;
static void __lambda_14(void *data, int argc, object self_73254, object ll_7336_73108) ;
static void __lambda_13(void *data, int argc, object self_73256, object k_73168, object result_7341_73110) ;
static void __lambda_12(void *data, int argc, object self_73255, object k_73170) ;
static void __lambda_11(void *data, int argc, closure _,object k_73150, object l_7310_7397) ;
static void __lambda_10(void *data, int argc, object self_73248, object l_7314_7398, object a_7315_7399) ;
static void __lambda_9(void *data, int argc, object self_73249, object lp_7311_7316_73100) ;
static void __lambda_8(void *data, int argc, object self_73250, object lp_7311_7316_73100) ;
static void __lambda_7(void *data, int argc, object self_73251, object k_73154, object l_7317_73101, object a_7318_73102) ;
static void __lambda_6(void *data, int argc, object self_73252, object r_73152) ;
static void __lambda_5(void *data, int argc, closure _,object k_73139, object n_731_7391) ;
static void __lambda_4(void *data, int argc, object self_73243, object n_735_7392, object a_736_7393) ;
static void __lambda_3(void *data, int argc, object self_73244, object lp_732_737_7394) ;
static void __lambda_2(void *data, int argc, object self_73245, object lp_732_737_7394) ;
static void __lambda_1(void *data, int argc, object self_73246, object k_73143, object n_738_7395, object a_739_7396) ;
static void __lambda_0(void *data, int argc, object self_73247, object r_73141) ;

static void __lambda_69(void *data, int argc, closure _,object k_73240) {
  Cyc_st_add(data, "diviter.scm:this-scheme-implementation-name");

closureN_type c_73609;
c_73609.hdr.mark = gc_color_red;
 c_73609.hdr.grayed = 0;
c_73609.tag = closureN_tag;
 c_73609.fn = (function_type)__lambda_68;
c_73609.num_args = 1;
c_73609.num_elements = 1;
c_73609.elements = (object *)alloca(sizeof(object) * 1);
c_73609.elements[0] = k_73240;

return_closcall1(data,  __glo_Cyc_91version_scheme_base,  &c_73609);; 
}

static void __lambda_68(void *data, int argc, object self_73306, object r_73241) {
  
make_utf8_string_with_len(c_73615, "cyclone-", 8, 8);

object c_73614 = Cyc_string_append(data,  ((closureN)self_73306)->elements[0],2,&c_73615, r_73241);
return_closcall1(data,  ((closureN)self_73306)->elements[0],  c_73614);; 
}

static void __lambda_67(void *data, int argc, closure _,object k_73188, object name_7347_73116, object count_7348_73117, object thunk_7349_73118, object ok_127_7350_73119) {
  Cyc_st_add(data, "diviter.scm:run-r7rs-benchmark");

closureN_type c_73423;
c_73423.hdr.mark = gc_color_red;
 c_73423.hdr.grayed = 0;
c_73423.tag = closureN_tag;
 c_73423.fn = (function_type)__lambda_66;
c_73423.num_args = 1;
c_73423.num_elements = 5;
c_73423.elements = (object *)alloca(sizeof(object) * 5);
c_73423.elements[0] = count_7348_73117;
c_73423.elements[1] = k_73188;
c_73423.elements[2] = name_7347_73116;
c_73423.elements[3] = ok_127_7350_73119;
c_73423.elements[4] = thunk_7349_73118;

return_closcall1(data,(closure)&c_73423,  boolean_f);; 
}

static void __lambda_66(void *data, int argc, object self_73263, object rounded_73121) {
  
closureN_type c_73425;
c_73425.hdr.mark = gc_color_red;
 c_73425.hdr.grayed = 0;
c_73425.tag = closureN_tag;
 c_73425.fn = (function_type)__lambda_65;
c_73425.num_args = 1;
c_73425.num_elements = 5;
c_73425.elements = (object *)alloca(sizeof(object) * 5);
c_73425.elements[0] = ((closureN)self_73263)->elements[0];
c_73425.elements[1] = ((closureN)self_73263)->elements[1];
c_73425.elements[2] = ((closureN)self_73263)->elements[2];
c_73425.elements[3] = ((closureN)self_73263)->elements[3];
c_73425.elements[4] = ((closureN)self_73263)->elements[4];


make_cell(c_73606,rounded_73121);
return_closcall1(data,(closure)&c_73425,  &c_73606);; 
}

static void __lambda_65(void *data, int argc, object self_73264, object rounded_73121) {
  
closureN_type c_73427;
c_73427.hdr.mark = gc_color_red;
 c_73427.hdr.grayed = 0;
c_73427.tag = closureN_tag;
 c_73427.fn = (function_type)__lambda_63;
c_73427.num_args = 1;
c_73427.num_elements = 6;
c_73427.elements = (object *)alloca(sizeof(object) * 6);
c_73427.elements[0] = ((closureN)self_73264)->elements[0];
c_73427.elements[1] = ((closureN)self_73264)->elements[1];
c_73427.elements[2] = ((closureN)self_73264)->elements[2];
c_73427.elements[3] = ((closureN)self_73264)->elements[3];
c_73427.elements[4] = rounded_73121;
c_73427.elements[5] = ((closureN)self_73264)->elements[4];


mclosure0(c_73590, (function_type)__lambda_64);c_73590.num_args = 1;
return_closcall1(data,(closure)&c_73427,  Cyc_set_cell(data, rounded_73121, &c_73590));; 
}

static void __lambda_64(void *data, int argc, object self_73265, object k_73235, object x_7351_73123) {
  
complex_num_type local_73602; object c_73603 = Cyc_fast_mul(data,&local_73602,obj_int2obj(1000), x_7351_73123);

complex_num_type local_73598; object c_73599 = ((inline_function_type)
                   ((closure)__glo_round_191_191inline_191_191_scheme_base)->fn)(data,&local_73598,c_73603);

complex_num_type local_73594; object c_73595 = Cyc_fast_div(data,&local_73594,c_73599, obj_int2obj(1000));
return_closcall1(data,  k_73235,  c_73595);; 
}

static void __lambda_63(void *data, int argc, object self_73266, object r_73189) {
  
closureN_type c_73429;
c_73429.hdr.mark = gc_color_red;
 c_73429.hdr.grayed = 0;
c_73429.tag = closureN_tag;
 c_73429.fn = (function_type)__lambda_62;
c_73429.num_args = 1;
c_73429.num_elements = 6;
c_73429.elements = (object *)alloca(sizeof(object) * 6);
c_73429.elements[0] = ((closureN)self_73266)->elements[0];
c_73429.elements[1] = ((closureN)self_73266)->elements[1];
c_73429.elements[2] = ((closureN)self_73266)->elements[2];
c_73429.elements[3] = ((closureN)self_73266)->elements[3];
c_73429.elements[4] = ((closureN)self_73266)->elements[4];
c_73429.elements[5] = ((closureN)self_73266)->elements[5];


make_utf8_string_with_len(c_73587, "Running ", 8, 8);
return_closcall2(data,  __glo_display_scheme_write,  &c_73429, &c_73587);; 
}

static void __lambda_62(void *data, int argc, object self_73267, object r_73190) {
  
closureN_type c_73431;
c_73431.hdr.mark = gc_color_red;
 c_73431.hdr.grayed = 0;
c_73431.tag = closureN_tag;
 c_73431.fn = (function_type)__lambda_61;
c_73431.num_args = 1;
c_73431.num_elements = 6;
c_73431.elements = (object *)alloca(sizeof(object) * 6);
c_73431.elements[0] = ((closureN)self_73267)->elements[0];
c_73431.elements[1] = ((closureN)self_73267)->elements[1];
c_73431.elements[2] = ((closureN)self_73267)->elements[2];
c_73431.elements[3] = ((closureN)self_73267)->elements[3];
c_73431.elements[4] = ((closureN)self_73267)->elements[4];
c_73431.elements[5] = ((closureN)self_73267)->elements[5];

return_closcall2(data,  __glo_display_scheme_write,  &c_73431, ((closureN)self_73267)->elements[2]);; 
}

static void __lambda_61(void *data, int argc, object self_73268, object r_73191) {
  
closureN_type c_73433;
c_73433.hdr.mark = gc_color_red;
 c_73433.hdr.grayed = 0;
c_73433.tag = closureN_tag;
 c_73433.fn = (function_type)__lambda_60;
c_73433.num_args = 1;
c_73433.num_elements = 6;
c_73433.elements = (object *)alloca(sizeof(object) * 6);
c_73433.elements[0] = ((closureN)self_73268)->elements[0];
c_73433.elements[1] = ((closureN)self_73268)->elements[1];
c_73433.elements[2] = ((closureN)self_73268)->elements[2];
c_73433.elements[3] = ((closureN)self_73268)->elements[3];
c_73433.elements[4] = ((closureN)self_73268)->elements[4];
c_73433.elements[5] = ((closureN)self_73268)->elements[5];

return_closcall1(data,  __glo_newline_scheme_base,  &c_73433);; 
}

static void __lambda_60(void *data, int argc, object self_73269, object r_73192) {
  
closureN_type c_73435;
c_73435.hdr.mark = gc_color_red;
 c_73435.hdr.grayed = 0;
c_73435.tag = closureN_tag;
 c_73435.fn = (function_type)__lambda_59;
c_73435.num_args = 1;
c_73435.num_elements = 6;
c_73435.elements = (object *)alloca(sizeof(object) * 6);
c_73435.elements[0] = ((closureN)self_73269)->elements[0];
c_73435.elements[1] = ((closureN)self_73269)->elements[1];
c_73435.elements[2] = ((closureN)self_73269)->elements[2];
c_73435.elements[3] = ((closureN)self_73269)->elements[3];
c_73435.elements[4] = ((closureN)self_73269)->elements[4];
c_73435.elements[5] = ((closureN)self_73269)->elements[5];

return_closcall1(data,  __glo_current_91output_91port_scheme_base,  &c_73435);; 
}

static void __lambda_59(void *data, int argc, object self_73270, object r_73233) {
  
closureN_type c_73437;
c_73437.hdr.mark = gc_color_red;
 c_73437.hdr.grayed = 0;
c_73437.tag = closureN_tag;
 c_73437.fn = (function_type)__lambda_58;
c_73437.num_args = 1;
c_73437.num_elements = 6;
c_73437.elements = (object *)alloca(sizeof(object) * 6);
c_73437.elements[0] = ((closureN)self_73270)->elements[0];
c_73437.elements[1] = ((closureN)self_73270)->elements[1];
c_73437.elements[2] = ((closureN)self_73270)->elements[2];
c_73437.elements[3] = ((closureN)self_73270)->elements[3];
c_73437.elements[4] = ((closureN)self_73270)->elements[4];
c_73437.elements[5] = ((closureN)self_73270)->elements[5];

return_closcall2(data,  __glo_flush_91output_91port_scheme_base,  &c_73437, r_73233);; 
}

static void __lambda_58(void *data, int argc, object self_73271, object r_73193) {
  
closureN_type c_73439;
c_73439.hdr.mark = gc_color_red;
 c_73439.hdr.grayed = 0;
c_73439.tag = closureN_tag;
 c_73439.fn = (function_type)__lambda_57;
c_73439.num_args = 1;
c_73439.num_elements = 6;
c_73439.elements = (object *)alloca(sizeof(object) * 6);
c_73439.elements[0] = ((closureN)self_73271)->elements[0];
c_73439.elements[1] = ((closureN)self_73271)->elements[1];
c_73439.elements[2] = ((closureN)self_73271)->elements[2];
c_73439.elements[3] = ((closureN)self_73271)->elements[3];
c_73439.elements[4] = ((closureN)self_73271)->elements[4];
c_73439.elements[5] = ((closureN)self_73271)->elements[5];

return_closcall1(data,  __glo_jiffies_91per_91second_scheme_time,  &c_73439);; 
}

static void __lambda_57(void *data, int argc, object self_73272, object j_95s_7354_73124) {
  
closureN_type c_73441;
c_73441.hdr.mark = gc_color_red;
 c_73441.hdr.grayed = 0;
c_73441.tag = closureN_tag;
 c_73441.fn = (function_type)__lambda_56;
c_73441.num_args = 1;
c_73441.num_elements = 7;
c_73441.elements = (object *)alloca(sizeof(object) * 7);
c_73441.elements[0] = ((closureN)self_73272)->elements[0];
c_73441.elements[1] = j_95s_7354_73124;
c_73441.elements[2] = ((closureN)self_73272)->elements[1];
c_73441.elements[3] = ((closureN)self_73272)->elements[2];
c_73441.elements[4] = ((closureN)self_73272)->elements[3];
c_73441.elements[5] = ((closureN)self_73272)->elements[4];
c_73441.elements[6] = ((closureN)self_73272)->elements[5];

return_closcall1(data,  __glo_current_91second_scheme_time,  &c_73441);; 
}

static void __lambda_56(void *data, int argc, object self_73273, object t0_7357_73125) {
  
closureN_type c_73443;
c_73443.hdr.mark = gc_color_red;
 c_73443.hdr.grayed = 0;
c_73443.tag = closureN_tag;
 c_73443.fn = (function_type)__lambda_55;
c_73443.num_args = 1;
c_73443.num_elements = 8;
c_73443.elements = (object *)alloca(sizeof(object) * 8);
c_73443.elements[0] = ((closureN)self_73273)->elements[0];
c_73443.elements[1] = ((closureN)self_73273)->elements[1];
c_73443.elements[2] = ((closureN)self_73273)->elements[2];
c_73443.elements[3] = ((closureN)self_73273)->elements[3];
c_73443.elements[4] = ((closureN)self_73273)->elements[4];
c_73443.elements[5] = ((closureN)self_73273)->elements[5];
c_73443.elements[6] = t0_7357_73125;
c_73443.elements[7] = ((closureN)self_73273)->elements[6];

return_closcall1(data,  __glo_current_91jiffy_scheme_time,  &c_73443);; 
}

static void __lambda_55(void *data, int argc, object self_73274, object j0_7360_73126) {
  
closureN_type c_73445;
c_73445.hdr.mark = gc_color_red;
 c_73445.hdr.grayed = 0;
c_73445.tag = closureN_tag;
 c_73445.fn = (function_type)__lambda_54;
c_73445.num_args = 1;
c_73445.num_elements = 9;
c_73445.elements = (object *)alloca(sizeof(object) * 9);
c_73445.elements[0] = ((closureN)self_73274)->elements[0];
c_73445.elements[1] = ((closureN)self_73274)->elements[1];
c_73445.elements[2] = j0_7360_73126;
c_73445.elements[3] = ((closureN)self_73274)->elements[2];
c_73445.elements[4] = ((closureN)self_73274)->elements[3];
c_73445.elements[5] = ((closureN)self_73274)->elements[4];
c_73445.elements[6] = ((closureN)self_73274)->elements[5];
c_73445.elements[7] = ((closureN)self_73274)->elements[6];
c_73445.elements[8] = ((closureN)self_73274)->elements[7];

return_closcall1(data,(closure)&c_73445,  boolean_f);; 
}

static void __lambda_54(void *data, int argc, object self_73275, object loop_7365_73129) {
  
closureN_type c_73447;
c_73447.hdr.mark = gc_color_red;
 c_73447.hdr.grayed = 0;
c_73447.tag = closureN_tag;
 c_73447.fn = (function_type)__lambda_53;
c_73447.num_args = 1;
c_73447.num_elements = 9;
c_73447.elements = (object *)alloca(sizeof(object) * 9);
c_73447.elements[0] = ((closureN)self_73275)->elements[0];
c_73447.elements[1] = ((closureN)self_73275)->elements[1];
c_73447.elements[2] = ((closureN)self_73275)->elements[2];
c_73447.elements[3] = ((closureN)self_73275)->elements[3];
c_73447.elements[4] = ((closureN)self_73275)->elements[4];
c_73447.elements[5] = ((closureN)self_73275)->elements[5];
c_73447.elements[6] = ((closureN)self_73275)->elements[6];
c_73447.elements[7] = ((closureN)self_73275)->elements[7];
c_73447.elements[8] = ((closureN)self_73275)->elements[8];


make_cell(c_73585,loop_7365_73129);
return_closcall1(data,(closure)&c_73447,  &c_73585);; 
}

static void __lambda_53(void *data, int argc, object self_73276, object loop_7365_73129) {
  
closureN_type c_73449;
c_73449.hdr.mark = gc_color_red;
 c_73449.hdr.grayed = 0;
c_73449.tag = closureN_tag;
 c_73449.fn = (function_type)__lambda_24;
c_73449.num_args = 1;
c_73449.num_elements = 2;
c_73449.elements = (object *)alloca(sizeof(object) * 2);
c_73449.elements[0] = ((closureN)self_73276)->elements[3];
c_73449.elements[1] = loop_7365_73129;


closureN_type c_73457;
c_73457.hdr.mark = gc_color_red;
 c_73457.hdr.grayed = 0;
c_73457.tag = closureN_tag;
 c_73457.fn = (function_type)__lambda_52;
c_73457.num_args = 2;
c_73457.num_elements = 9;
c_73457.elements = (object *)alloca(sizeof(object) * 9);
c_73457.elements[0] = ((closureN)self_73276)->elements[0];
c_73457.elements[1] = ((closureN)self_73276)->elements[1];
c_73457.elements[2] = ((closureN)self_73276)->elements[2];
c_73457.elements[3] = loop_7365_73129;
c_73457.elements[4] = ((closureN)self_73276)->elements[4];
c_73457.elements[5] = ((closureN)self_73276)->elements[5];
c_73457.elements[6] = ((closureN)self_73276)->elements[6];
c_73457.elements[7] = ((closureN)self_73276)->elements[7];
c_73457.elements[8] = ((closureN)self_73276)->elements[8];

return_closcall1(data,(closure)&c_73449,  Cyc_set_cell(data, loop_7365_73129, &c_73457));; 
}

static void __lambda_52(void *data, int argc, object self_73277, object k_73199, object i_7366_73130, object result_7367_73131) {
    object c_73460 = Cyc_num_fast_lt_op(data,i_7366_73130, ((closureN)self_73277)->elements[0]);
if( (boolean_f != c_73460) ){ 
  
closureN_type c_73464;
c_73464.hdr.mark = gc_color_red;
 c_73464.hdr.grayed = 0;
c_73464.tag = closureN_tag;
 c_73464.fn = (function_type)__lambda_25;
c_73464.num_args = 1;
c_73464.num_elements = 3;
c_73464.elements = (object *)alloca(sizeof(object) * 3);
c_73464.elements[0] = i_7366_73130;
c_73464.elements[1] = k_73199;
c_73464.elements[2] = ((closureN)self_73277)->elements[3];

return_closcall1(data,  ((closureN)self_73277)->elements[8],  &c_73464);
} else { 
  
closureN_type c_73477;
c_73477.hdr.mark = gc_color_red;
 c_73477.hdr.grayed = 0;
c_73477.tag = closureN_tag;
 c_73477.fn = (function_type)__lambda_51;
c_73477.num_args = 1;
c_73477.num_elements = 7;
c_73477.elements = (object *)alloca(sizeof(object) * 7);
c_73477.elements[0] = ((closureN)self_73277)->elements[1];
c_73477.elements[1] = ((closureN)self_73277)->elements[2];
c_73477.elements[2] = k_73199;
c_73477.elements[3] = ((closureN)self_73277)->elements[4];
c_73477.elements[4] = result_7367_73131;
c_73477.elements[5] = ((closureN)self_73277)->elements[6];
c_73477.elements[6] = ((closureN)self_73277)->elements[7];

return_closcall2(data,  ((closureN)self_73277)->elements[5],  &c_73477, result_7367_73131);}
; 
}

static void __lambda_51(void *data, int argc, object self_73279, object r_73203) {
  if( (boolean_f != r_73203) ){ 
  
closureN_type c_73479;
c_73479.hdr.mark = gc_color_red;
 c_73479.hdr.grayed = 0;
c_73479.tag = closureN_tag;
 c_73479.fn = (function_type)__lambda_45;
c_73479.num_args = 1;
c_73479.num_elements = 7;
c_73479.elements = (object *)alloca(sizeof(object) * 7);
c_73479.elements[0] = ((closureN)self_73279)->elements[0];
c_73479.elements[1] = ((closureN)self_73279)->elements[1];
c_73479.elements[2] = ((closureN)self_73279)->elements[2];
c_73479.elements[3] = ((closureN)self_73279)->elements[3];
c_73479.elements[4] = ((closureN)self_73279)->elements[4];
c_73479.elements[5] = ((closureN)self_73279)->elements[5];
c_73479.elements[6] = ((closureN)self_73279)->elements[6];

return_closcall1(data,  __glo_current_91jiffy_scheme_time,  &c_73479);
} else { 
  
closureN_type c_73569;
c_73569.hdr.mark = gc_color_red;
 c_73569.hdr.grayed = 0;
c_73569.tag = closureN_tag;
 c_73569.fn = (function_type)__lambda_50;
c_73569.num_args = 1;
c_73569.num_elements = 2;
c_73569.elements = (object *)alloca(sizeof(object) * 2);
c_73569.elements[0] = ((closureN)self_73279)->elements[2];
c_73569.elements[1] = ((closureN)self_73279)->elements[4];


make_utf8_string_with_len(c_73582, "ERROR: returned incorrect result: ", 34, 34);
return_closcall2(data,  __glo_display_scheme_write,  &c_73569, &c_73582);}
; 
}

static void __lambda_50(void *data, int argc, object self_73300, object r_73228) {
  
closureN_type c_73571;
c_73571.hdr.mark = gc_color_red;
 c_73571.hdr.grayed = 0;
c_73571.tag = closureN_tag;
 c_73571.fn = (function_type)__lambda_49;
c_73571.num_args = 1;
c_73571.num_elements = 2;
c_73571.elements = (object *)alloca(sizeof(object) * 2);
c_73571.elements[0] = ((closureN)self_73300)->elements[0];
c_73571.elements[1] = ((closureN)self_73300)->elements[1];

return_closcall2(data,  __glo_write_scheme_write,  &c_73571, ((closureN)self_73300)->elements[1]);; 
}

static void __lambda_49(void *data, int argc, object self_73301, object r_73229) {
  
closureN_type c_73573;
c_73573.hdr.mark = gc_color_red;
 c_73573.hdr.grayed = 0;
c_73573.tag = closureN_tag;
 c_73573.fn = (function_type)__lambda_48;
c_73573.num_args = 1;
c_73573.num_elements = 2;
c_73573.elements = (object *)alloca(sizeof(object) * 2);
c_73573.elements[0] = ((closureN)self_73301)->elements[0];
c_73573.elements[1] = ((closureN)self_73301)->elements[1];

return_closcall1(data,  __glo_newline_scheme_base,  &c_73573);; 
}

static void __lambda_48(void *data, int argc, object self_73302, object r_73230) {
  
closureN_type c_73575;
c_73575.hdr.mark = gc_color_red;
 c_73575.hdr.grayed = 0;
c_73575.tag = closureN_tag;
 c_73575.fn = (function_type)__lambda_47;
c_73575.num_args = 1;
c_73575.num_elements = 2;
c_73575.elements = (object *)alloca(sizeof(object) * 2);
c_73575.elements[0] = ((closureN)self_73302)->elements[0];
c_73575.elements[1] = ((closureN)self_73302)->elements[1];

return_closcall1(data,  __glo_current_91output_91port_scheme_base,  &c_73575);; 
}

static void __lambda_47(void *data, int argc, object self_73303, object r_73232) {
  
closureN_type c_73577;
c_73577.hdr.mark = gc_color_red;
 c_73577.hdr.grayed = 0;
c_73577.tag = closureN_tag;
 c_73577.fn = (function_type)__lambda_46;
c_73577.num_args = 1;
c_73577.num_elements = 2;
c_73577.elements = (object *)alloca(sizeof(object) * 2);
c_73577.elements[0] = ((closureN)self_73303)->elements[0];
c_73577.elements[1] = ((closureN)self_73303)->elements[1];

return_closcall2(data,  __glo_flush_91output_91port_scheme_base,  &c_73577, r_73232);; 
}

static void __lambda_46(void *data, int argc, object self_73304, object r_73231) {
  return_closcall1(data,  ((closureN)self_73304)->elements[0],  ((closureN)self_73304)->elements[1]);; 
}

static void __lambda_45(void *data, int argc, object self_73280, object j1_7376_73132) {
  
closureN_type c_73481;
c_73481.hdr.mark = gc_color_red;
 c_73481.hdr.grayed = 0;
c_73481.tag = closureN_tag;
 c_73481.fn = (function_type)__lambda_44;
c_73481.num_args = 1;
c_73481.num_elements = 8;
c_73481.elements = (object *)alloca(sizeof(object) * 8);
c_73481.elements[0] = ((closureN)self_73280)->elements[0];
c_73481.elements[1] = ((closureN)self_73280)->elements[1];
c_73481.elements[2] = j1_7376_73132;
c_73481.elements[3] = ((closureN)self_73280)->elements[2];
c_73481.elements[4] = ((closureN)self_73280)->elements[3];
c_73481.elements[5] = ((closureN)self_73280)->elements[4];
c_73481.elements[6] = ((closureN)self_73280)->elements[5];
c_73481.elements[7] = ((closureN)self_73280)->elements[6];

return_closcall1(data,  __glo_current_91second_scheme_time,  &c_73481);; 
}

static void __lambda_44(void *data, int argc, object self_73281, object t1_7379_73133) {
  
closureN_type c_73486;
c_73486.hdr.mark = gc_color_red;
 c_73486.hdr.grayed = 0;
c_73486.tag = closureN_tag;
 c_73486.fn = (function_type)__lambda_43;
c_73486.num_args = 1;
c_73486.num_elements = 6;
c_73486.elements = (object *)alloca(sizeof(object) * 6);
c_73486.elements[0] = ((closureN)self_73281)->elements[0];
c_73486.elements[1] = ((closureN)self_73281)->elements[1];
c_73486.elements[2] = ((closureN)self_73281)->elements[2];
c_73486.elements[3] = ((closureN)self_73281)->elements[3];
c_73486.elements[4] = ((closureN)self_73281)->elements[4];
c_73486.elements[5] = ((closureN)self_73281)->elements[5];


complex_num_type local_73565; object c_73566 = Cyc_fast_sub(data,&local_73565,t1_7379_73133, ((closureN)self_73281)->elements[7]);
return_closcall2(data,  car(((closureN)self_73281)->elements[6]),  &c_73486, c_73566);; 
}

static void __lambda_43(void *data, int argc, object self_73282, object secs2_7388_73136) {
  
closureN_type c_73488;
c_73488.hdr.mark = gc_color_red;
 c_73488.hdr.grayed = 0;
c_73488.tag = closureN_tag;
 c_73488.fn = (function_type)__lambda_42;
c_73488.num_args = 1;
c_73488.num_elements = 7;
c_73488.elements = (object *)alloca(sizeof(object) * 7);
c_73488.elements[0] = ((closureN)self_73282)->elements[0];
c_73488.elements[1] = ((closureN)self_73282)->elements[1];
c_73488.elements[2] = ((closureN)self_73282)->elements[2];
c_73488.elements[3] = ((closureN)self_73282)->elements[3];
c_73488.elements[4] = ((closureN)self_73282)->elements[4];
c_73488.elements[5] = ((closureN)self_73282)->elements[5];
c_73488.elements[6] = secs2_7388_73136;


make_utf8_string_with_len(c_73562, "Elapsed time: ", 14, 14);
return_closcall2(data,  __glo_display_scheme_write,  &c_73488, &c_73562);; 
}

static void __lambda_42(void *data, int argc, object self_73283, object r_73210) {
  
closureN_type c_73490;
c_73490.hdr.mark = gc_color_red;
 c_73490.hdr.grayed = 0;
c_73490.tag = closureN_tag;
 c_73490.fn = (function_type)__lambda_41;
c_73490.num_args = 1;
c_73490.num_elements = 7;
c_73490.elements = (object *)alloca(sizeof(object) * 7);
c_73490.elements[0] = ((closureN)self_73283)->elements[0];
c_73490.elements[1] = ((closureN)self_73283)->elements[1];
c_73490.elements[2] = ((closureN)self_73283)->elements[2];
c_73490.elements[3] = ((closureN)self_73283)->elements[3];
c_73490.elements[4] = ((closureN)self_73283)->elements[4];
c_73490.elements[5] = ((closureN)self_73283)->elements[5];
c_73490.elements[6] = ((closureN)self_73283)->elements[6];


complex_num_type local_73557; object c_73558 = Cyc_fast_sub(data,&local_73557,((closureN)self_73283)->elements[2], ((closureN)self_73283)->elements[1]);

complex_num_type local_73553; object c_73554 = Cyc_fast_div(data,&local_73553,c_73558, ((closureN)self_73283)->elements[0]);

complex_num_type local_73549; object c_73550 = ((inline_function_type)
                   ((closure)__glo_inexact_191_191inline_191_191_scheme_base)->fn)(data,&local_73549,c_73554);
return_closcall2(data,  __glo_write_scheme_write,  &c_73490, c_73550);; 
}

static void __lambda_41(void *data, int argc, object self_73284, object r_73211) {
  
closureN_type c_73492;
c_73492.hdr.mark = gc_color_red;
 c_73492.hdr.grayed = 0;
c_73492.tag = closureN_tag;
 c_73492.fn = (function_type)__lambda_40;
c_73492.num_args = 1;
c_73492.num_elements = 7;
c_73492.elements = (object *)alloca(sizeof(object) * 7);
c_73492.elements[0] = ((closureN)self_73284)->elements[0];
c_73492.elements[1] = ((closureN)self_73284)->elements[1];
c_73492.elements[2] = ((closureN)self_73284)->elements[2];
c_73492.elements[3] = ((closureN)self_73284)->elements[3];
c_73492.elements[4] = ((closureN)self_73284)->elements[4];
c_73492.elements[5] = ((closureN)self_73284)->elements[5];
c_73492.elements[6] = ((closureN)self_73284)->elements[6];


make_utf8_string_with_len(c_73546, " seconds (", 10, 10);
return_closcall2(data,  __glo_display_scheme_write,  &c_73492, &c_73546);; 
}

static void __lambda_40(void *data, int argc, object self_73285, object r_73212) {
  
closureN_type c_73494;
c_73494.hdr.mark = gc_color_red;
 c_73494.hdr.grayed = 0;
c_73494.tag = closureN_tag;
 c_73494.fn = (function_type)__lambda_39;
c_73494.num_args = 1;
c_73494.num_elements = 6;
c_73494.elements = (object *)alloca(sizeof(object) * 6);
c_73494.elements[0] = ((closureN)self_73285)->elements[0];
c_73494.elements[1] = ((closureN)self_73285)->elements[1];
c_73494.elements[2] = ((closureN)self_73285)->elements[2];
c_73494.elements[3] = ((closureN)self_73285)->elements[3];
c_73494.elements[4] = ((closureN)self_73285)->elements[4];
c_73494.elements[5] = ((closureN)self_73285)->elements[5];

return_closcall2(data,  __glo_write_scheme_write,  &c_73494, ((closureN)self_73285)->elements[6]);; 
}

static void __lambda_39(void *data, int argc, object self_73286, object r_73213) {
  
closureN_type c_73496;
c_73496.hdr.mark = gc_color_red;
 c_73496.hdr.grayed = 0;
c_73496.tag = closureN_tag;
 c_73496.fn = (function_type)__lambda_38;
c_73496.num_args = 1;
c_73496.num_elements = 6;
c_73496.elements = (object *)alloca(sizeof(object) * 6);
c_73496.elements[0] = ((closureN)self_73286)->elements[0];
c_73496.elements[1] = ((closureN)self_73286)->elements[1];
c_73496.elements[2] = ((closureN)self_73286)->elements[2];
c_73496.elements[3] = ((closureN)self_73286)->elements[3];
c_73496.elements[4] = ((closureN)self_73286)->elements[4];
c_73496.elements[5] = ((closureN)self_73286)->elements[5];


make_utf8_string_with_len(c_73544, ") for ", 6, 6);
return_closcall2(data,  __glo_display_scheme_write,  &c_73496, &c_73544);; 
}

static void __lambda_38(void *data, int argc, object self_73287, object r_73214) {
  
closureN_type c_73498;
c_73498.hdr.mark = gc_color_red;
 c_73498.hdr.grayed = 0;
c_73498.tag = closureN_tag;
 c_73498.fn = (function_type)__lambda_37;
c_73498.num_args = 1;
c_73498.num_elements = 6;
c_73498.elements = (object *)alloca(sizeof(object) * 6);
c_73498.elements[0] = ((closureN)self_73287)->elements[0];
c_73498.elements[1] = ((closureN)self_73287)->elements[1];
c_73498.elements[2] = ((closureN)self_73287)->elements[2];
c_73498.elements[3] = ((closureN)self_73287)->elements[3];
c_73498.elements[4] = ((closureN)self_73287)->elements[4];
c_73498.elements[5] = ((closureN)self_73287)->elements[5];

return_closcall2(data,  __glo_display_scheme_write,  &c_73498, ((closureN)self_73287)->elements[4]);; 
}

static void __lambda_37(void *data, int argc, object self_73288, object r_73215) {
  
closureN_type c_73500;
c_73500.hdr.mark = gc_color_red;
 c_73500.hdr.grayed = 0;
c_73500.tag = closureN_tag;
 c_73500.fn = (function_type)__lambda_36;
c_73500.num_args = 1;
c_73500.num_elements = 6;
c_73500.elements = (object *)alloca(sizeof(object) * 6);
c_73500.elements[0] = ((closureN)self_73288)->elements[0];
c_73500.elements[1] = ((closureN)self_73288)->elements[1];
c_73500.elements[2] = ((closureN)self_73288)->elements[2];
c_73500.elements[3] = ((closureN)self_73288)->elements[3];
c_73500.elements[4] = ((closureN)self_73288)->elements[4];
c_73500.elements[5] = ((closureN)self_73288)->elements[5];

return_closcall1(data,  __glo_newline_scheme_base,  &c_73500);; 
}

static void __lambda_36(void *data, int argc, object self_73289, object r_73216) {
  
closureN_type c_73502;
c_73502.hdr.mark = gc_color_red;
 c_73502.hdr.grayed = 0;
c_73502.tag = closureN_tag;
 c_73502.fn = (function_type)__lambda_35;
c_73502.num_args = 1;
c_73502.num_elements = 6;
c_73502.elements = (object *)alloca(sizeof(object) * 6);
c_73502.elements[0] = ((closureN)self_73289)->elements[0];
c_73502.elements[1] = ((closureN)self_73289)->elements[1];
c_73502.elements[2] = ((closureN)self_73289)->elements[2];
c_73502.elements[3] = ((closureN)self_73289)->elements[3];
c_73502.elements[4] = ((closureN)self_73289)->elements[4];
c_73502.elements[5] = ((closureN)self_73289)->elements[5];


make_utf8_string_with_len(c_73542, "+!CSVLINE!+", 11, 11);
return_closcall2(data,  __glo_display_scheme_write,  &c_73502, &c_73542);; 
}

static void __lambda_35(void *data, int argc, object self_73290, object r_73217) {
  
closureN_type c_73504;
c_73504.hdr.mark = gc_color_red;
 c_73504.hdr.grayed = 0;
c_73504.tag = closureN_tag;
 c_73504.fn = (function_type)__lambda_34;
c_73504.num_args = 1;
c_73504.num_elements = 6;
c_73504.elements = (object *)alloca(sizeof(object) * 6);
c_73504.elements[0] = ((closureN)self_73290)->elements[0];
c_73504.elements[1] = ((closureN)self_73290)->elements[1];
c_73504.elements[2] = ((closureN)self_73290)->elements[2];
c_73504.elements[3] = ((closureN)self_73290)->elements[3];
c_73504.elements[4] = ((closureN)self_73290)->elements[4];
c_73504.elements[5] = ((closureN)self_73290)->elements[5];

return_closcall1(data,  __glo_this_91scheme_91implementation_91name,  &c_73504);; 
}

static void __lambda_34(void *data, int argc, object self_73291, object r_73225) {
  
closureN_type c_73506;
c_73506.hdr.mark = gc_color_red;
 c_73506.hdr.grayed = 0;
c_73506.tag = closureN_tag;
 c_73506.fn = (function_type)__lambda_33;
c_73506.num_args = 1;
c_73506.num_elements = 6;
c_73506.elements = (object *)alloca(sizeof(object) * 6);
c_73506.elements[0] = ((closureN)self_73291)->elements[0];
c_73506.elements[1] = ((closureN)self_73291)->elements[1];
c_73506.elements[2] = ((closureN)self_73291)->elements[2];
c_73506.elements[3] = ((closureN)self_73291)->elements[3];
c_73506.elements[4] = ((closureN)self_73291)->elements[4];
c_73506.elements[5] = ((closureN)self_73291)->elements[5];

return_closcall2(data,  __glo_display_scheme_write,  &c_73506, r_73225);; 
}

static void __lambda_33(void *data, int argc, object self_73292, object r_73218) {
  
closureN_type c_73508;
c_73508.hdr.mark = gc_color_red;
 c_73508.hdr.grayed = 0;
c_73508.tag = closureN_tag;
 c_73508.fn = (function_type)__lambda_32;
c_73508.num_args = 1;
c_73508.num_elements = 6;
c_73508.elements = (object *)alloca(sizeof(object) * 6);
c_73508.elements[0] = ((closureN)self_73292)->elements[0];
c_73508.elements[1] = ((closureN)self_73292)->elements[1];
c_73508.elements[2] = ((closureN)self_73292)->elements[2];
c_73508.elements[3] = ((closureN)self_73292)->elements[3];
c_73508.elements[4] = ((closureN)self_73292)->elements[4];
c_73508.elements[5] = ((closureN)self_73292)->elements[5];


make_utf8_string_with_len(c_73541, ",", 1, 1);
return_closcall2(data,  __glo_display_scheme_write,  &c_73508, &c_73541);; 
}

static void __lambda_32(void *data, int argc, object self_73293, object r_73219) {
  
closureN_type c_73510;
c_73510.hdr.mark = gc_color_red;
 c_73510.hdr.grayed = 0;
c_73510.tag = closureN_tag;
 c_73510.fn = (function_type)__lambda_31;
c_73510.num_args = 1;
c_73510.num_elements = 5;
c_73510.elements = (object *)alloca(sizeof(object) * 5);
c_73510.elements[0] = ((closureN)self_73293)->elements[0];
c_73510.elements[1] = ((closureN)self_73293)->elements[1];
c_73510.elements[2] = ((closureN)self_73293)->elements[2];
c_73510.elements[3] = ((closureN)self_73293)->elements[3];
c_73510.elements[4] = ((closureN)self_73293)->elements[5];

return_closcall2(data,  __glo_display_scheme_write,  &c_73510, ((closureN)self_73293)->elements[4]);; 
}

static void __lambda_31(void *data, int argc, object self_73294, object r_73220) {
  
closureN_type c_73512;
c_73512.hdr.mark = gc_color_red;
 c_73512.hdr.grayed = 0;
c_73512.tag = closureN_tag;
 c_73512.fn = (function_type)__lambda_30;
c_73512.num_args = 1;
c_73512.num_elements = 5;
c_73512.elements = (object *)alloca(sizeof(object) * 5);
c_73512.elements[0] = ((closureN)self_73294)->elements[0];
c_73512.elements[1] = ((closureN)self_73294)->elements[1];
c_73512.elements[2] = ((closureN)self_73294)->elements[2];
c_73512.elements[3] = ((closureN)self_73294)->elements[3];
c_73512.elements[4] = ((closureN)self_73294)->elements[4];


make_utf8_string_with_len(c_73539, ",", 1, 1);
return_closcall2(data,  __glo_display_scheme_write,  &c_73512, &c_73539);; 
}

static void __lambda_30(void *data, int argc, object self_73295, object r_73221) {
  
closureN_type c_73514;
c_73514.hdr.mark = gc_color_red;
 c_73514.hdr.grayed = 0;
c_73514.tag = closureN_tag;
 c_73514.fn = (function_type)__lambda_29;
c_73514.num_args = 1;
c_73514.num_elements = 2;
c_73514.elements = (object *)alloca(sizeof(object) * 2);
c_73514.elements[0] = ((closureN)self_73295)->elements[3];
c_73514.elements[1] = ((closureN)self_73295)->elements[4];


complex_num_type local_73534; object c_73535 = Cyc_fast_sub(data,&local_73534,((closureN)self_73295)->elements[2], ((closureN)self_73295)->elements[1]);

complex_num_type local_73530; object c_73531 = Cyc_fast_div(data,&local_73530,c_73535, ((closureN)self_73295)->elements[0]);

complex_num_type local_73526; object c_73527 = ((inline_function_type)
                   ((closure)__glo_inexact_191_191inline_191_191_scheme_base)->fn)(data,&local_73526,c_73531);
return_closcall2(data,  __glo_display_scheme_write,  &c_73514, c_73527);; 
}

static void __lambda_29(void *data, int argc, object self_73296, object r_73222) {
  
closureN_type c_73516;
c_73516.hdr.mark = gc_color_red;
 c_73516.hdr.grayed = 0;
c_73516.tag = closureN_tag;
 c_73516.fn = (function_type)__lambda_28;
c_73516.num_args = 1;
c_73516.num_elements = 2;
c_73516.elements = (object *)alloca(sizeof(object) * 2);
c_73516.elements[0] = ((closureN)self_73296)->elements[0];
c_73516.elements[1] = ((closureN)self_73296)->elements[1];

return_closcall1(data,  __glo_newline_scheme_base,  &c_73516);; 
}

static void __lambda_28(void *data, int argc, object self_73297, object r_73223) {
  
closureN_type c_73518;
c_73518.hdr.mark = gc_color_red;
 c_73518.hdr.grayed = 0;
c_73518.tag = closureN_tag;
 c_73518.fn = (function_type)__lambda_27;
c_73518.num_args = 1;
c_73518.num_elements = 2;
c_73518.elements = (object *)alloca(sizeof(object) * 2);
c_73518.elements[0] = ((closureN)self_73297)->elements[0];
c_73518.elements[1] = ((closureN)self_73297)->elements[1];

return_closcall1(data,  __glo_current_91output_91port_scheme_base,  &c_73518);; 
}

static void __lambda_27(void *data, int argc, object self_73298, object r_73224) {
  
closureN_type c_73520;
c_73520.hdr.mark = gc_color_red;
 c_73520.hdr.grayed = 0;
c_73520.tag = closureN_tag;
 c_73520.fn = (function_type)__lambda_26;
c_73520.num_args = 1;
c_73520.num_elements = 2;
c_73520.elements = (object *)alloca(sizeof(object) * 2);
c_73520.elements[0] = ((closureN)self_73298)->elements[0];
c_73520.elements[1] = ((closureN)self_73298)->elements[1];

return_closcall2(data,  __glo_flush_91output_91port_scheme_base,  &c_73520, r_73224);; 
}

static void __lambda_26(void *data, int argc, object self_73299, object r_73204) {
  return_closcall1(data,  ((closureN)self_73299)->elements[0],  ((closureN)self_73299)->elements[1]);; 
}

static void __lambda_25(void *data, int argc, object self_73278, object r_73202) {
  
complex_num_type local_73472; object c_73473 = Cyc_fast_sum(data,&local_73472,((closureN)self_73278)->elements[0], obj_int2obj(1));
return_closcall3(data,  car(((closureN)self_73278)->elements[2]),  ((closureN)self_73278)->elements[1], c_73473, r_73202);; 
}

static void __lambda_24(void *data, int argc, object self_73305, object r_73197) {
  return_closcall3(data,  car(((closureN)self_73305)->elements[1]),  ((closureN)self_73305)->elements[0], obj_int2obj(0), boolean_f);; 
}

static void __lambda_23(void *data, int argc, closure _,object k_73174, object r_7342_73111, object x_7343_73112) {
  Cyc_st_add(data, "diviter.scm:hide");

closureN_type c_73399;
c_73399.hdr.mark = gc_color_red;
 c_73399.hdr.grayed = 0;
c_73399.tag = closureN_tag;
 c_73399.fn = (function_type)__lambda_21;
c_73399.num_args = 0;
c_73399.num_elements = 1;
c_73399.elements = (object *)alloca(sizeof(object) * 1);
c_73399.elements[0] = r_7342_73111;


closureN_type c_73416;
c_73416.hdr.mark = gc_color_red;
 c_73416.hdr.grayed = 0;
c_73416.tag = closureN_tag;
 c_73416.fn = (function_type)__lambda_22;
c_73416.num_args = 2;
c_73416.num_elements = 1;
c_73416.elements = (object *)alloca(sizeof(object) * 1);
c_73416.elements[0] = x_7343_73112;

return_closcall3(data,  __glo_call_91with_91values_scheme_base,  k_73174, &c_73399, &c_73416);; 
}

static void __lambda_22(void *data, int argc, object self_73262, object k_73177, object v_7345_73114, object i_7346_73115) {
  return_closcall2(data,  Cyc_vector_ref(data, v_7345_73114, i_7346_73115),  k_73177, ((closureN)self_73262)->elements[0]);; 
}

static void __lambda_21(void *data, int argc, object self_73257, object k_73179) {
  
closureN_type c_73401;
c_73401.hdr.mark = gc_color_red;
 c_73401.hdr.grayed = 0;
c_73401.tag = closureN_tag;
 c_73401.fn = (function_type)__lambda_19;
c_73401.num_args = 1;
c_73401.num_elements = 2;
c_73401.elements = (object *)alloca(sizeof(object) * 2);
c_73401.elements[0] = k_73179;
c_73401.elements[1] = ((closureN)self_73257)->elements[0];


mclosure0(c_73414, (function_type)__lambda_20);c_73414.num_args = 1;
return_closcall3(data,  __glo_vector_scheme_base,  &c_73401, __glo_values_scheme_base, &c_73414);; 
}

static void __lambda_20(void *data, int argc, object self_73261, object k_73185, object x_7344_73113) {
  return_closcall1(data,  k_73185,  x_7344_73113);; 
}

static void __lambda_19(void *data, int argc, object self_73258, object r_73180) {
  
closureN_type c_73403;
c_73403.hdr.mark = gc_color_red;
 c_73403.hdr.grayed = 0;
c_73403.tag = closureN_tag;
 c_73403.fn = (function_type)__lambda_17;
c_73403.num_args = 0;
c_73403.num_elements = 1;
c_73403.elements = (object *)alloca(sizeof(object) * 1);
c_73403.elements[0] = ((closureN)self_73258)->elements[1];


closureN_type c_73410;
c_73410.hdr.mark = gc_color_red;
 c_73410.hdr.grayed = 0;
c_73410.tag = closureN_tag;
 c_73410.fn = (function_type)__lambda_18;
c_73410.num_args = 1;
c_73410.num_elements = 2;
c_73410.elements = (object *)alloca(sizeof(object) * 2);
c_73410.elements[0] = ((closureN)self_73258)->elements[0];
c_73410.elements[1] = r_73180;

return_closcall1(data,(closure)&c_73403,  &c_73410);; 
}

static void __lambda_18(void *data, int argc, object self_73259, object r_73181) {
  return_closcall3(data,  __glo_values_scheme_base,  ((closureN)self_73259)->elements[0], ((closureN)self_73259)->elements[1], r_73181);; 
}

static void __lambda_17(void *data, int argc, object self_73260, object k_73182) {
    object c_73406 = Cyc_num_fast_lt_op(data,((closureN)self_73260)->elements[0], obj_int2obj(100));
if( (boolean_f != c_73406) ){ 
  return_closcall1(data,  k_73182,  obj_int2obj(0));
} else { 
  return_closcall1(data,  k_73182,  obj_int2obj(1));}
; 
}

static void __lambda_16(void *data, int argc, closure _,object k_73161) {
  Cyc_st_add(data, "diviter.scm:main");

closureN_type c_73382;
c_73382.hdr.mark = gc_color_red;
 c_73382.hdr.grayed = 0;
c_73382.tag = closureN_tag;
 c_73382.fn = (function_type)__lambda_15;
c_73382.num_args = 1;
c_73382.num_elements = 1;
c_73382.elements = (object *)alloca(sizeof(object) * 1);
c_73382.elements[0] = k_73161;

return_closcall3(data,  __glo_hide,  &c_73382, obj_int2obj(1000000), obj_int2obj(1000));; 
}

static void __lambda_15(void *data, int argc, object self_73253, object r_73171) {
  
closureN_type c_73384;
c_73384.hdr.mark = gc_color_red;
 c_73384.hdr.grayed = 0;
c_73384.tag = closureN_tag;
 c_73384.fn = (function_type)__lambda_14;
c_73384.num_args = 1;
c_73384.num_elements = 1;
c_73384.elements = (object *)alloca(sizeof(object) * 1);
c_73384.elements[0] = ((closureN)self_73253)->elements[0];

return_closcall2(data,  __glo_create_91n,  &c_73384, r_73171);; 
}

static void __lambda_14(void *data, int argc, object self_73254, object ll_7336_73108) {
  
make_utf8_string_with_len(c_73387, "diviter:1000:1000000", 20, 20);

closureN_type c_73388;
c_73388.hdr.mark = gc_color_red;
 c_73388.hdr.grayed = 0;
c_73388.tag = closureN_tag;
 c_73388.fn = (function_type)__lambda_12;
c_73388.num_args = 0;
c_73388.num_elements = 1;
c_73388.elements = (object *)alloca(sizeof(object) * 1);
c_73388.elements[0] = ll_7336_73108;


mclosure0(c_73391, (function_type)__lambda_13);c_73391.num_args = 1;
return_closcall5(data,  __glo_run_91r7rs_91benchmark,  ((closureN)self_73254)->elements[0], &c_73387, obj_int2obj(1000000), &c_73388, &c_73391);; 
}

static void __lambda_13(void *data, int argc, object self_73256, object k_73168, object result_7341_73110) {
  return_closcall1(data,  k_73168,  equalp(Cyc_length(data, result_7341_73110), obj_int2obj(500)));; 
}

static void __lambda_12(void *data, int argc, object self_73255, object k_73170) {
  return_closcall2(data,  __glo_iterative_91div2,  k_73170, ((closureN)self_73255)->elements[0]);; 
}

static void __lambda_11(void *data, int argc, closure _,object k_73150, object l_7310_7397) {
  Cyc_st_add(data, "diviter.scm:iterative-div2");

closureN_type c_73346;
c_73346.hdr.mark = gc_color_red;
 c_73346.hdr.grayed = 0;
c_73346.tag = closureN_tag;
 c_73346.fn = (function_type)__lambda_10;
c_73346.num_args = 2;
c_73346.num_elements = 1;
c_73346.elements = (object *)alloca(sizeof(object) * 1);
c_73346.elements[0] = k_73150;

return_closcall2(data,(closure)&c_73346,  l_7310_7397, NULL);; 
}

static void __lambda_10(void *data, int argc, object self_73248, object l_7314_7398, object a_7315_7399) {
  
closureN_type c_73348;
c_73348.hdr.mark = gc_color_red;
 c_73348.hdr.grayed = 0;
c_73348.tag = closureN_tag;
 c_73348.fn = (function_type)__lambda_9;
c_73348.num_args = 1;
c_73348.num_elements = 3;
c_73348.elements = (object *)alloca(sizeof(object) * 3);
c_73348.elements[0] = a_7315_7399;
c_73348.elements[1] = ((closureN)self_73248)->elements[0];
c_73348.elements[2] = l_7314_7398;

return_closcall1(data,(closure)&c_73348,  boolean_f);; 
}

static void __lambda_9(void *data, int argc, object self_73249, object lp_7311_7316_73100) {
  
closureN_type c_73350;
c_73350.hdr.mark = gc_color_red;
 c_73350.hdr.grayed = 0;
c_73350.tag = closureN_tag;
 c_73350.fn = (function_type)__lambda_8;
c_73350.num_args = 1;
c_73350.num_elements = 3;
c_73350.elements = (object *)alloca(sizeof(object) * 3);
c_73350.elements[0] = ((closureN)self_73249)->elements[0];
c_73350.elements[1] = ((closureN)self_73249)->elements[1];
c_73350.elements[2] = ((closureN)self_73249)->elements[2];


make_cell(c_73379,lp_7311_7316_73100);
return_closcall1(data,(closure)&c_73350,  &c_73379);; 
}

static void __lambda_8(void *data, int argc, object self_73250, object lp_7311_7316_73100) {
  
closureN_type c_73352;
c_73352.hdr.mark = gc_color_red;
 c_73352.hdr.grayed = 0;
c_73352.tag = closureN_tag;
 c_73352.fn = (function_type)__lambda_6;
c_73352.num_args = 1;
c_73352.num_elements = 4;
c_73352.elements = (object *)alloca(sizeof(object) * 4);
c_73352.elements[0] = ((closureN)self_73250)->elements[0];
c_73352.elements[1] = ((closureN)self_73250)->elements[1];
c_73352.elements[2] = ((closureN)self_73250)->elements[2];
c_73352.elements[3] = lp_7311_7316_73100;


closureN_type c_73362;
c_73362.hdr.mark = gc_color_red;
 c_73362.hdr.grayed = 0;
c_73362.tag = closureN_tag;
 c_73362.fn = (function_type)__lambda_7;
c_73362.num_args = 2;
c_73362.num_elements = 1;
c_73362.elements = (object *)alloca(sizeof(object) * 1);
c_73362.elements[0] = lp_7311_7316_73100;

return_closcall1(data,(closure)&c_73352,  Cyc_set_cell(data, lp_7311_7316_73100, &c_73362));; 
}

static void __lambda_7(void *data, int argc, object self_73251, object k_73154, object l_7317_73101_arg, object a_7318_73102_arg) {
object l_7317_73101 , a_7318_73102;
l_7317_73101 = l_7317_73101_arg;
a_7318_73102 = a_7318_73102_arg;
loop: {
  if( (boolean_f != Cyc_is_null(l_7317_73101)) ){ 
  return_closcall1(data,  k_73154,  a_7318_73102);
} else { 
pair_type *c_73374 = alloca(sizeof(pair_type));  
set_pair(c_73374,Cyc_car(data, l_7317_73101), a_7318_73102);
l_7317_73101 = Cyc_cddr(data, l_7317_73101);
a_7318_73102 = c_73374;
//return_closcall3(data,  car(((closureN)self_73251)->elements[0]),  k_73154, Cyc_cddr(data, l_7317_73101), c_73374);}
goto loop;
; 
}}}

static void __lambda_6(void *data, int argc, object self_73252, object r_73152) {
  return_closcall3(data,  car(((closureN)self_73252)->elements[3]),  ((closureN)self_73252)->elements[1], ((closureN)self_73252)->elements[2], ((closureN)self_73252)->elements[0]);; 
}

static void __lambda_5(void *data, int argc, closure _,object k_73139, object n_731_7391) {
  Cyc_st_add(data, "diviter.scm:create-n");

closureN_type c_73309;
c_73309.hdr.mark = gc_color_red;
 c_73309.hdr.grayed = 0;
c_73309.tag = closureN_tag;
 c_73309.fn = (function_type)__lambda_4;
c_73309.num_args = 2;
c_73309.num_elements = 1;
c_73309.elements = (object *)alloca(sizeof(object) * 1);
c_73309.elements[0] = k_73139;

return_closcall2(data,(closure)&c_73309,  n_731_7391, NULL);; 
}

static void __lambda_4(void *data, int argc, object self_73243, object n_735_7392, object a_736_7393) {
  
closureN_type c_73311;
c_73311.hdr.mark = gc_color_red;
 c_73311.hdr.grayed = 0;
c_73311.tag = closureN_tag;
 c_73311.fn = (function_type)__lambda_3;
c_73311.num_args = 1;
c_73311.num_elements = 3;
c_73311.elements = (object *)alloca(sizeof(object) * 3);
c_73311.elements[0] = a_736_7393;
c_73311.elements[1] = ((closureN)self_73243)->elements[0];
c_73311.elements[2] = n_735_7392;

return_closcall1(data,(closure)&c_73311,  boolean_f);; 
}

static void __lambda_3(void *data, int argc, object self_73244, object lp_732_737_7394) {
  
closureN_type c_73313;
c_73313.hdr.mark = gc_color_red;
 c_73313.hdr.grayed = 0;
c_73313.tag = closureN_tag;
 c_73313.fn = (function_type)__lambda_2;
c_73313.num_args = 1;
c_73313.num_elements = 3;
c_73313.elements = (object *)alloca(sizeof(object) * 3);
c_73313.elements[0] = ((closureN)self_73244)->elements[0];
c_73313.elements[1] = ((closureN)self_73244)->elements[1];
c_73313.elements[2] = ((closureN)self_73244)->elements[2];


make_cell(c_73343,lp_732_737_7394);
return_closcall1(data,(closure)&c_73313,  &c_73343);; 
}

static void __lambda_2(void *data, int argc, object self_73245, object lp_732_737_7394) {
  
closureN_type c_73315;
c_73315.hdr.mark = gc_color_red;
 c_73315.hdr.grayed = 0;
c_73315.tag = closureN_tag;
 c_73315.fn = (function_type)__lambda_0;
c_73315.num_args = 1;
c_73315.num_elements = 4;
c_73315.elements = (object *)alloca(sizeof(object) * 4);
c_73315.elements[0] = ((closureN)self_73245)->elements[0];
c_73315.elements[1] = ((closureN)self_73245)->elements[1];
c_73315.elements[2] = lp_732_737_7394;
c_73315.elements[3] = ((closureN)self_73245)->elements[2];


closureN_type c_73325;
c_73325.hdr.mark = gc_color_red;
 c_73325.hdr.grayed = 0;
c_73325.tag = closureN_tag;
 c_73325.fn = (function_type)__lambda_1;
c_73325.num_args = 2;
c_73325.num_elements = 1;
c_73325.elements = (object *)alloca(sizeof(object) * 1);
c_73325.elements[0] = lp_732_737_7394;

return_closcall1(data,(closure)&c_73315,  Cyc_set_cell(data, lp_732_737_7394, &c_73325));; 
}

static void __lambda_1(void *data, int argc, object self_73246, object k_73143, object n_738_7395_arg, object a_739_7396_arg) {
object n_738_7395, a_739_7396;
n_738_7395 = n_738_7395_arg;
a_739_7396 = a_739_7396_arg;
loop: {
    object c_73328 = Cyc_num_fast_eq_op(data,n_738_7395, obj_int2obj(0));
if( (boolean_f != c_73328) ){ 
  return_closcall1(data,  k_73143,  a_739_7396);
} else { 
  
complex_num_type *local_73336 = alloca(sizeof(complex_num_type));
object c_73337 = Cyc_fast_sub(data,local_73336,n_738_7395, obj_int2obj(1));
pair_type *c_73340 = alloca(sizeof(pair_type));
// TODO: check if stack is full!
set_pair(c_73340, NULL, a_739_7396);
//return_closcall3(data,  car(((closureN)self_73246)->elements[0]),  k_73143, c_73337, c_73340);
n_738_7395 = c_73337;
a_739_7396 = c_73340;
goto loop;
}
; 
}}

static void __lambda_0(void *data, int argc, object self_73247, object r_73141) {
  return_closcall3(data,  car(((closureN)self_73247)->elements[2]),  ((closureN)self_73247)->elements[1], ((closureN)self_73247)->elements[3], ((closureN)self_73247)->elements[0]);; 
}

static void c_entry_pt_first_lambda(void *data, int argc, closure cont, object value);
extern void c_schemecyclonecommon_entry_pt(void *data, int argc, closure cont, object value);
extern void c_schemebase_entry_pt(void *data, int argc, closure cont, object value);
extern void c_schemetime_entry_pt(void *data, int argc, closure cont, object value);
extern void c_schemewrite_entry_pt(void *data, int argc, closure cont, object value);
extern void c_scheme_char_entry_pt(void *data, int argc, closure cont, object value);
extern void c_schemeread_entry_pt(void *data, int argc, closure cont, object value);
static void c_entry_pt(data, argc, env,cont) void *data; int argc; closure env,cont; { 
Cyc_set_globals_changed((gc_thread_data *)data);

  add_global((object *) &__glo_this_91scheme_91implementation_91name);
  add_global((object *) &__glo_run_91r7rs_91benchmark);
  add_global((object *) &__glo_hide);
  add_global((object *) &__glo_main);
  add_global((object *) &__glo_iterative_91div2);
  add_global((object *) &__glo_create_91n);
  mclosure0(c_73607, (function_type)__lambda_69);c_73607.num_args = 0; 
  __glo_this_91scheme_91implementation_91name = &c_73607; 
  mclosure0(c_73421, (function_type)__lambda_67);c_73421.num_args = 4; 
  __glo_run_91r7rs_91benchmark = &c_73421; 
  mclosure0(c_73397, (function_type)__lambda_23);c_73397.num_args = 2; 
  __glo_hide = &c_73397; 
  mclosure0(c_73380, (function_type)__lambda_16);c_73380.num_args = 0; 
  __glo_main = &c_73380; 
  mclosure0(c_73344, (function_type)__lambda_11);c_73344.num_args = 1; 
  __glo_iterative_91div2 = &c_73344; 
  mclosure0(c_73307, (function_type)__lambda_5);c_73307.num_args = 1; 
  __glo_create_91n = &c_73307; 

  make_cvar(cvar_73617, (object *)&__glo_this_91scheme_91implementation_91name);make_pair(pair_73618, find_or_add_symbol("this-scheme-implementation-name"), &cvar_73617);
  make_cvar(cvar_73619, (object *)&__glo_run_91r7rs_91benchmark);make_pair(pair_73620, find_or_add_symbol("run-r7rs-benchmark"), &cvar_73619);
  make_cvar(cvar_73621, (object *)&__glo_hide);make_pair(pair_73622, find_or_add_symbol("hide"), &cvar_73621);
  make_cvar(cvar_73623, (object *)&__glo_main);make_pair(pair_73624, find_or_add_symbol("main"), &cvar_73623);
  make_cvar(cvar_73625, (object *)&__glo_iterative_91div2);make_pair(pair_73626, find_or_add_symbol("iterative-div2"), &cvar_73625);
  make_cvar(cvar_73627, (object *)&__glo_create_91n);make_pair(pair_73628, find_or_add_symbol("create-n"), &cvar_73627);
make_pair(c_73634, &pair_73618,Cyc_global_variables);
make_pair(c_73633, &pair_73620, &c_73634);
make_pair(c_73632, &pair_73622, &c_73633);
make_pair(c_73631, &pair_73624, &c_73632);
make_pair(c_73630, &pair_73626, &c_73631);
make_pair(c_73629, &pair_73628, &c_73630);
Cyc_global_variables = &c_73629;
mclosure1(c_done, c_entry_pt_first_lambda, &c_done);
mclosure1(c_73635, c_schemeread_entry_pt, &c_done);
mclosure1(c_73636, c_scheme_char_entry_pt, &c_73635);
mclosure1(c_73637, c_schemewrite_entry_pt, &c_73636);
mclosure1(c_73638, c_schemetime_entry_pt, &c_73637);
mclosure1(c_73639, c_schemebase_entry_pt, &c_73638);
mclosure1(c_73640, c_schemecyclonecommon_entry_pt, &c_73639);
(c_73640.fn)(data, 0, &c_73640, &c_73640);
}
static void c_entry_pt_first_lambda(void *data, int argc, closure cont, object value) {
  
    
    
    
    
    
    return_closcall1(data,  __glo_main,  primitive__75halt);
;
}
int main(int argc, char **argv, char **envp)
{gc_thread_data *thd;
 long stack_size = global_stack_size = STACK_SIZE;
 long heap_size = global_heap_size = HEAP_SIZE;
 mclosure0(clos_halt,&Cyc_halt);  // Halt if final closure is reached
 mclosure0(entry_pt,&c_entry_pt); // First function to execute
 _cyc_argc = argc;
 _cyc_argv = argv;
 set_env_variables(envp);
 gc_initialize();
 thd = malloc(sizeof(gc_thread_data));
 gc_thread_data_init(thd, 0, (char *) &stack_size, stack_size);
 thd->gc_cont = &entry_pt;
 thd->gc_args[0] = &clos_halt;
 thd->gc_num_args = 1;
 thd->thread_id = pthread_self();
 gc_add_mutator(thd);
 Cyc_heap_init(heap_size);
 thd->thread_state = CYC_THREAD_STATE_RUNNABLE;
 Cyc_start_trampoline(thd);
 return 0;}
