new syntax procedures to (system syntax)

* module/ice-9/boot-9.scm:
* module/ice-9/psyntax.scm (syntax-module, syntax-local-binding)
  (syntax-locally-bound-identifiers): After boot, move these definitions
  to a new (system syntax) module.

* module/ice-9/psyntax-pp.scm: Regenerate.

* doc/ref/api-macros.texi: Add some words about syntax-module and
  friends being in (system syntax).

diff --git a/doc/ref/api-macros.texi b/doc/ref/api-macros.texi
index 2b6f15a..f6a03bc 100644 (file)
--- a/doc/ref/api-macros.texi
+++ b/doc/ref/api-macros.texi
@@ -706,6 +706,18 @@ Return the source properties that correspond to the syntax object
 @var{x}.  @xref{Source Properties}, for more information.
 @end deffn
 
+Guile also offers some more experimental interfaces in a separate
+module.  As was the case with the Large Hadron Collider, it is unclear
+to our senior macrologists whether adding these interfaces will result
+in awesomeness or in the destruction of Guile via the creation of a
+singularity.  We will preserve their functionality through the 2.0
+series, but we reserve the right to modify them in a future stable
+series, to a more than usual degree.
+
+@example
+(use-modules (system syntax))
+@end example
+
 @deffn {Scheme Procedure} syntax-module id
 Return the name of the module whose source contains the identifier
 @var{id}.

diff --git a/module/ice-9/boot-9.scm b/module/ice-9/boot-9.scm
index 3914ff3..39be83d 100644 (file)
--- a/module/ice-9/boot-9.scm
+++ b/module/ice-9/boot-9.scm
@@ -385,13 +385,10 @@ If there is no handler at all, Guile prints an error and then exits."
 (define datum->syntax #f)
 (define syntax->datum #f)
 (define syntax-source #f)
-(define syntax-module #f)
 (define identifier? #f)
 (define generate-temporaries #f)
 (define bound-identifier=? #f)
 (define free-identifier=? #f)
-(define syntax-local-binding #f)
-(define syntax-locally-bound-identifiers #f)
 
 ;; $sc-dispatch is an implementation detail of psyntax. It is used by
 ;; expanded macros, to dispatch an input against a set of patterns.
@@ -3863,12 +3860,43 @@ module '(ice-9 q) '(make-q q-length))}."
 
 \f
 
-;;; Place the user in the guile-user module.
+;;; SRFI-4 in the default environment.  FIXME: we should figure out how
+;;; to deprecate this.
 ;;;
 
 ;; FIXME:
 (module-use! the-scm-module (resolve-interface '(srfi srfi-4)))
 
+\f
+
+;;; A few identifiers that need to be defined in this file are really
+;;; internal implementation details.  We shove them off into internal
+;;; modules, removing them from the (guile) module.
+;;;
+
+(define-module (system syntax))
+
+(let ()
+  (define (steal-bindings! from to ids)
+    (for-each
+     (lambda (sym)
+       (let ((v (module-local-variable from sym)))
+         (module-remove! from sym)
+         (module-add! to sym v)))
+     ids)
+    (module-export! to ids))
+
+  (steal-bindings! the-root-module (resolve-module '(system syntax))
+                   '(syntax-local-binding
+                     syntax-module
+                     syntax-locally-bound-identifiers)))
+
+
+\f
+
+;;; Place the user in the guile-user module.
+;;;
+
 ;; Set filename to #f to prevent reload.
 (define-module (guile-user)
   #:autoload (system base compile) (compile compile-file)

diff --git a/module/ice-9/psyntax-pp.scm b/module/ice-9/psyntax-pp.scm
index daded1a..d616c7f 100644 (file)
--- a/module/ice-9/psyntax-pp.scm
+++ b/module/ice-9/psyntax-pp.scm
@@ -1,1553 +1,1541 @@
 (eval-when (compile) (set-current-module (resolve-module (quote (guile)))))
 (if #f #f)
 
-(let ((#{gen-label _hoQGWMnyQPAh3k2jhWHTD}# (if #f #f))
-      (#{transformer-environment _hoQGWMnyQPAh3k2jhWHTX}#
+(let ((#{gen-label -ANAU$bmvAmthP7L7xwnNi}# (if #f #f))
+      (#{transformer-environment -ANAU$bmvAmthP7L7xwnN2}#
         (if #f #f)))
   (letrec*
-    ((#{top-level-eval-hook _hoQGWMnyQPAh3k2jhWHSZ}#
-       (lambda (#{x _hoQGWMnyQPAh3k2jhWMnv}#
-                #{mod _hoQGWMnyQPAh3k2jhWMnw}#)
-         (primitive-eval #{x _hoQGWMnyQPAh3k2jhWMnv}#)))
-     (#{get-global-definition-hook _hoQGWMnyQPAh3k2jhWHSc}#
-       (lambda (#{symbol _hoQGWMnyQPAh3k2jhWJ@F}#
-                #{module _hoQGWMnyQPAh3k2jhWJ@G}#)
+    ((#{top-level-eval-hook -ANAU$bmvAmthP7L7xwnM4}#
+       (lambda (#{x -ANAU$bmvAmthP7L7xwsuQ}#
+                #{mod -ANAU$bmvAmthP7L7xwsuR}#)
+         (primitive-eval #{x -ANAU$bmvAmthP7L7xwsuQ}#)))
+     (#{get-global-definition-hook -ANAU$bmvAmthP7L7xwnM7}#
+       (lambda (#{symbol -ANAU$bmvAmthP7L7xwp7A}#
+                #{module -ANAU$bmvAmthP7L7xwp7B}#)
          (begin
-           (if (if (not #{module _hoQGWMnyQPAh3k2jhWJ@G}#)
+           (if (if (not #{module -ANAU$bmvAmthP7L7xwp7B}#)
                  (current-module)
                  #f)
              (warn "module system is booted, we should have a module"
-                   #{symbol _hoQGWMnyQPAh3k2jhWJ@F}#))
-           (let ((#{v _hoQGWMnyQPAh3k2jhWJ@H}#
+                   #{symbol -ANAU$bmvAmthP7L7xwp7A}#))
+           (let ((#{v -ANAU$bmvAmthP7L7xwp7C}#
                    (module-variable
-                     (if #{module _hoQGWMnyQPAh3k2jhWJ@G}#
+                     (if #{module -ANAU$bmvAmthP7L7xwp7B}#
                        (resolve-module
-                         (cdr #{module _hoQGWMnyQPAh3k2jhWJ@G}#))
+                         (cdr #{module -ANAU$bmvAmthP7L7xwp7B}#))
                        (current-module))
-                     #{symbol _hoQGWMnyQPAh3k2jhWJ@F}#)))
-             (if #{v _hoQGWMnyQPAh3k2jhWJ@H}#
-               (if (variable-bound? #{v _hoQGWMnyQPAh3k2jhWJ@H}#)
-                 (let ((#{val _hoQGWMnyQPAh3k2jhWJ@J}#
-                         (variable-ref #{v _hoQGWMnyQPAh3k2jhWJ@H}#)))
-                   (if (macro? #{val _hoQGWMnyQPAh3k2jhWJ@J}#)
-                     (if (macro-type #{val _hoQGWMnyQPAh3k2jhWJ@J}#)
-                       (cons (macro-type #{val _hoQGWMnyQPAh3k2jhWJ@J}#)
-                             (macro-binding #{val _hoQGWMnyQPAh3k2jhWJ@J}#))
+                     #{symbol -ANAU$bmvAmthP7L7xwp7A}#)))
+             (if #{v -ANAU$bmvAmthP7L7xwp7C}#
+               (if (variable-bound? #{v -ANAU$bmvAmthP7L7xwp7C}#)
+                 (let ((#{val -ANAU$bmvAmthP7L7xwp7E}#
+                         (variable-ref #{v -ANAU$bmvAmthP7L7xwp7C}#)))
+                   (if (macro? #{val -ANAU$bmvAmthP7L7xwp7E}#)
+                     (if (macro-type #{val -ANAU$bmvAmthP7L7xwp7E}#)
+                       (cons (macro-type #{val -ANAU$bmvAmthP7L7xwp7E}#)
+                             (macro-binding #{val -ANAU$bmvAmthP7L7xwp7E}#))
                        #f)
                      #f))
                  #f)
                #f)))))
-     (#{maybe-name-value! _hoQGWMnyQPAh3k2jhWHSe}#
-       (lambda (#{name _hoQGWMnyQPAh3k2jhWKDe}#
-                #{val _hoQGWMnyQPAh3k2jhWKDf}#)
-         (if (if (struct? #{val _hoQGWMnyQPAh3k2jhWKDf}#)
-               (eq? (struct-vtable #{val _hoQGWMnyQPAh3k2jhWKDf}#)
+     (#{maybe-name-value! -ANAU$bmvAmthP7L7xwnM9}#
+       (lambda (#{name -ANAU$bmvAmthP7L7xwp@Z}#
+                #{val -ANAU$bmvAmthP7L7xwp@a}#)
+         (if (if (struct? #{val -ANAU$bmvAmthP7L7xwp@a}#)
+               (eq? (struct-vtable #{val -ANAU$bmvAmthP7L7xwp@a}#)
                     (vector-ref %expanded-vtables 13))
                #f)
-           (let ((#{meta _hoQGWMnyQPAh3k2jhWKDm}#
-                   (struct-ref #{val _hoQGWMnyQPAh3k2jhWKDf}# 1)))
-             (if (not (assq 'name #{meta _hoQGWMnyQPAh3k2jhWKDm}#))
-               (let ((#{v _hoQGWMnyQPAh3k2jhWKDr}#
-                       (cons (cons 'name #{name _hoQGWMnyQPAh3k2jhWKDe}#)
-                             #{meta _hoQGWMnyQPAh3k2jhWKDm}#)))
+           (let ((#{meta -ANAU$bmvAmthP7L7xwp@h}#
+                   (struct-ref #{val -ANAU$bmvAmthP7L7xwp@a}# 1)))
+             (if (not (assq 'name #{meta -ANAU$bmvAmthP7L7xwp@h}#))
+               (let ((#{v -ANAU$bmvAmthP7L7xwp@m}#
+                       (cons (cons 'name #{name -ANAU$bmvAmthP7L7xwp@Z}#)
+                             #{meta -ANAU$bmvAmthP7L7xwp@h}#)))
                  (struct-set!
-                   #{val _hoQGWMnyQPAh3k2jhWKDf}#
+                   #{val -ANAU$bmvAmthP7L7xwp@a}#
                    1
-                   #{v _hoQGWMnyQPAh3k2jhWKDr}#)))))))
-     (#{build-application _hoQGWMnyQPAh3k2jhWHSg}#
-       (lambda (#{source _hoQGWMnyQPAh3k2jhWJ@L}#
-                #{fun-exp _hoQGWMnyQPAh3k2jhWJ@M}#
-                #{arg-exps _hoQGWMnyQPAh3k2jhWJ@N}#)
+                   #{v -ANAU$bmvAmthP7L7xwp@m}#)))))))
+     (#{build-application -ANAU$bmvAmthP7L7xwnM@}#
+       (lambda (#{source -ANAU$bmvAmthP7L7xwp7G}#
+                #{fun-exp -ANAU$bmvAmthP7L7xwp7H}#
+                #{arg-exps -ANAU$bmvAmthP7L7xwp7I}#)
          (make-struct/no-tail
            (vector-ref %expanded-vtables 11)
-           #{source _hoQGWMnyQPAh3k2jhWJ@L}#
-           #{fun-exp _hoQGWMnyQPAh3k2jhWJ@M}#
-           #{arg-exps _hoQGWMnyQPAh3k2jhWJ@N}#)))
-     (#{build-conditional _hoQGWMnyQPAh3k2jhWHSh}#
-       (lambda (#{source _hoQGWMnyQPAh3k2jhWJ@T}#
-                #{test-exp _hoQGWMnyQPAh3k2jhWJ@U}#
-                #{then-exp _hoQGWMnyQPAh3k2jhWJ@V}#
-                #{else-exp _hoQGWMnyQPAh3k2jhWJ@W}#)
+           #{source -ANAU$bmvAmthP7L7xwp7G}#
+           #{fun-exp -ANAU$bmvAmthP7L7xwp7H}#
+           #{arg-exps -ANAU$bmvAmthP7L7xwp7I}#)))
+     (#{build-conditional -ANAU$bmvAmthP7L7xwnNA}#
+       (lambda (#{source -ANAU$bmvAmthP7L7xwp7O}#
+                #{test-exp -ANAU$bmvAmthP7L7xwp7P}#
+                #{then-exp -ANAU$bmvAmthP7L7xwp7Q}#
+                #{else-exp -ANAU$bmvAmthP7L7xwp7R}#)
          (make-struct/no-tail
            (vector-ref %expanded-vtables 10)
-           #{source _hoQGWMnyQPAh3k2jhWJ@T}#
-           #{test-exp _hoQGWMnyQPAh3k2jhWJ@U}#
-           #{then-exp _hoQGWMnyQPAh3k2jhWJ@V}#
-           #{else-exp _hoQGWMnyQPAh3k2jhWJ@W}#)))
-     (#{build-dynlet _hoQGWMnyQPAh3k2jhWHSi}#
-       (lambda (#{source _hoQGWMnyQPAh3k2jhWJ@d}#
-                #{fluids _hoQGWMnyQPAh3k2jhWJ@e}#
-                #{vals _hoQGWMnyQPAh3k2jhWJ@f}#
-                #{body _hoQGWMnyQPAh3k2jhWJ@g}#)
+           #{source -ANAU$bmvAmthP7L7xwp7O}#
+           #{test-exp -ANAU$bmvAmthP7L7xwp7P}#
+           #{then-exp -ANAU$bmvAmthP7L7xwp7Q}#
+           #{else-exp -ANAU$bmvAmthP7L7xwp7R}#)))
+     (#{build-dynlet -ANAU$bmvAmthP7L7xwnNB}#
+       (lambda (#{source -ANAU$bmvAmthP7L7xwp7Y}#
+                #{fluids -ANAU$bmvAmthP7L7xwp7Z}#
+                #{vals -ANAU$bmvAmthP7L7xwp7a}#
+                #{body -ANAU$bmvAmthP7L7xwp7b}#)
          (make-struct/no-tail
            (vector-ref %expanded-vtables 17)
-           #{source _hoQGWMnyQPAh3k2jhWJ@d}#
-           #{fluids _hoQGWMnyQPAh3k2jhWJ@e}#
-           #{vals _hoQGWMnyQPAh3k2jhWJ@f}#
-           #{body _hoQGWMnyQPAh3k2jhWJ@g}#)))
-     (#{build-lexical-reference _hoQGWMnyQPAh3k2jhWHSj}#
-       (lambda (#{type _hoQGWMnyQPAh3k2jhWMnx}#
-                #{source _hoQGWMnyQPAh3k2jhWMny}#
-                #{name _hoQGWMnyQPAh3k2jhWMnz}#
-                #{var _hoQGWMnyQPAh3k2jhWMn0}#)
+           #{source -ANAU$bmvAmthP7L7xwp7Y}#
+           #{fluids -ANAU$bmvAmthP7L7xwp7Z}#
+           #{vals -ANAU$bmvAmthP7L7xwp7a}#
+           #{body -ANAU$bmvAmthP7L7xwp7b}#)))
+     (#{build-lexical-reference -ANAU$bmvAmthP7L7xwnNC}#
+       (lambda (#{type -ANAU$bmvAmthP7L7xwsuS}#
+                #{source -ANAU$bmvAmthP7L7xwsuT}#
+                #{name -ANAU$bmvAmthP7L7xwsuU}#
+                #{var -ANAU$bmvAmthP7L7xwsuV}#)
          (make-struct/no-tail
            (vector-ref %expanded-vtables 3)
-           #{source _hoQGWMnyQPAh3k2jhWMny}#
-           #{name _hoQGWMnyQPAh3k2jhWMnz}#
-           #{var _hoQGWMnyQPAh3k2jhWMn0}#)))
-     (#{build-lexical-assignment _hoQGWMnyQPAh3k2jhWHSk}#
-       (lambda (#{source _hoQGWMnyQPAh3k2jhWJ@n}#
-                #{name _hoQGWMnyQPAh3k2jhWJ@o}#
-                #{var _hoQGWMnyQPAh3k2jhWJ@p}#
-                #{exp _hoQGWMnyQPAh3k2jhWJ@q}#)
+           #{source -ANAU$bmvAmthP7L7xwsuT}#
+           #{name -ANAU$bmvAmthP7L7xwsuU}#
+           #{var -ANAU$bmvAmthP7L7xwsuV}#)))
+     (#{build-lexical-assignment -ANAU$bmvAmthP7L7xwnND}#
+       (lambda (#{source -ANAU$bmvAmthP7L7xwp7i}#
+                #{name -ANAU$bmvAmthP7L7xwp7j}#
+                #{var -ANAU$bmvAmthP7L7xwp7k}#
+                #{exp -ANAU$bmvAmthP7L7xwp7l}#)
          (begin
-           (if (if (struct? #{exp _hoQGWMnyQPAh3k2jhWJ@q}#)
-                 (eq? (struct-vtable #{exp _hoQGWMnyQPAh3k2jhWJ@q}#)
+           (if (if (struct? #{exp -ANAU$bmvAmthP7L7xwp7l}#)
+                 (eq? (struct-vtable #{exp -ANAU$bmvAmthP7L7xwp7l}#)
                       (vector-ref %expanded-vtables 13))
                  #f)
-             (let ((#{meta _hoQGWMnyQPAh3k2jhWJ@6}#
-                     (struct-ref #{exp _hoQGWMnyQPAh3k2jhWJ@q}# 1)))
-               (if (not (assq 'name #{meta _hoQGWMnyQPAh3k2jhWJ@6}#))
-                 (let ((#{v _hoQGWMnyQPAh3k2jhWKAB}#
-                         (cons (cons 'name #{name _hoQGWMnyQPAh3k2jhWJ@o}#)
-                               #{meta _hoQGWMnyQPAh3k2jhWJ@6}#)))
+             (let ((#{meta -ANAU$bmvAmthP7L7xwp71}#
+                     (struct-ref #{exp -ANAU$bmvAmthP7L7xwp7l}# 1)))
+               (if (not (assq 'name #{meta -ANAU$bmvAmthP7L7xwp71}#))
+                 (let ((#{v -ANAU$bmvAmthP7L7xwp78}#
+                         (cons (cons 'name #{name -ANAU$bmvAmthP7L7xwp7j}#)
+                               #{meta -ANAU$bmvAmthP7L7xwp71}#)))
                    (struct-set!
-                     #{exp _hoQGWMnyQPAh3k2jhWJ@q}#
+                     #{exp -ANAU$bmvAmthP7L7xwp7l}#
                      1
-                     #{v _hoQGWMnyQPAh3k2jhWKAB}#)))))
+                     #{v -ANAU$bmvAmthP7L7xwp78}#)))))
            (make-struct/no-tail
              (vector-ref %expanded-vtables 4)
-             #{source _hoQGWMnyQPAh3k2jhWJ@n}#
-             #{name _hoQGWMnyQPAh3k2jhWJ@o}#
-             #{var _hoQGWMnyQPAh3k2jhWJ@p}#
-             #{exp _hoQGWMnyQPAh3k2jhWJ@q}#))))
-     (#{analyze-variable _hoQGWMnyQPAh3k2jhWHSl}#
-       (lambda (#{mod _hoQGWMnyQPAh3k2jhWMn6}#
-                #{var _hoQGWMnyQPAh3k2jhWMn7}#
-                #{modref-cont _hoQGWMnyQPAh3k2jhWMn8}#
-                #{bare-cont _hoQGWMnyQPAh3k2jhWMn9}#)
-         (if (not #{mod _hoQGWMnyQPAh3k2jhWMn6}#)
-           (#{bare-cont _hoQGWMnyQPAh3k2jhWMn9}#
-             #{var _hoQGWMnyQPAh3k2jhWMn7}#)
-           (let ((#{kind _hoQGWMnyQPAh3k2jhWMn$}#
-                   (car #{mod _hoQGWMnyQPAh3k2jhWMn6}#))
-                 (#{mod _hoQGWMnyQPAh3k2jhWMn@}#
-                   (cdr #{mod _hoQGWMnyQPAh3k2jhWMn6}#)))
-             (if (eqv? #{kind _hoQGWMnyQPAh3k2jhWMn$}# 'public)
-               (#{modref-cont _hoQGWMnyQPAh3k2jhWMn8}#
-                 #{mod _hoQGWMnyQPAh3k2jhWMn@}#
-                 #{var _hoQGWMnyQPAh3k2jhWMn7}#
+             #{source -ANAU$bmvAmthP7L7xwp7i}#
+             #{name -ANAU$bmvAmthP7L7xwp7j}#
+             #{var -ANAU$bmvAmthP7L7xwp7k}#
+             #{exp -ANAU$bmvAmthP7L7xwp7l}#))))
+     (#{analyze-variable -ANAU$bmvAmthP7L7xwnNE}#
+       (lambda (#{mod -ANAU$bmvAmthP7L7xwsub}#
+                #{var -ANAU$bmvAmthP7L7xwsuc}#
+                #{modref-cont -ANAU$bmvAmthP7L7xwsud}#
+                #{bare-cont -ANAU$bmvAmthP7L7xwsue}#)
+         (if (not #{mod -ANAU$bmvAmthP7L7xwsub}#)
+           (#{bare-cont -ANAU$bmvAmthP7L7xwsue}#
+             #{var -ANAU$bmvAmthP7L7xwsuc}#)
+           (let ((#{kind -ANAU$bmvAmthP7L7xwsuf}#
+                   (car #{mod -ANAU$bmvAmthP7L7xwsub}#))
+                 (#{mod -ANAU$bmvAmthP7L7xwsug}#
+                   (cdr #{mod -ANAU$bmvAmthP7L7xwsub}#)))
+             (if (eqv? #{kind -ANAU$bmvAmthP7L7xwsuf}# 'public)
+               (#{modref-cont -ANAU$bmvAmthP7L7xwsud}#
+                 #{mod -ANAU$bmvAmthP7L7xwsug}#
+                 #{var -ANAU$bmvAmthP7L7xwsuc}#
                  #t)
-               (if (eqv? #{kind _hoQGWMnyQPAh3k2jhWMn$}# 'private)
+               (if (eqv? #{kind -ANAU$bmvAmthP7L7xwsuf}# 'private)
                  (if (not (equal?
-                            #{mod _hoQGWMnyQPAh3k2jhWMn@}#
+                            #{mod -ANAU$bmvAmthP7L7xwsug}#
                             (module-name (current-module))))
-                   (#{modref-cont _hoQGWMnyQPAh3k2jhWMn8}#
-                     #{mod _hoQGWMnyQPAh3k2jhWMn@}#
-                     #{var _hoQGWMnyQPAh3k2jhWMn7}#
+                   (#{modref-cont -ANAU$bmvAmthP7L7xwsud}#
+                     #{mod -ANAU$bmvAmthP7L7xwsug}#
+                     #{var -ANAU$bmvAmthP7L7xwsuc}#
                      #f)
-                   (#{bare-cont _hoQGWMnyQPAh3k2jhWMn9}#
-                     #{var _hoQGWMnyQPAh3k2jhWMn7}#))
-                 (if (eqv? #{kind _hoQGWMnyQPAh3k2jhWMn$}# 'bare)
-                   (#{bare-cont _hoQGWMnyQPAh3k2jhWMn9}#
-                     #{var _hoQGWMnyQPAh3k2jhWMn7}#)
-                   (if (eqv? #{kind _hoQGWMnyQPAh3k2jhWMn$}# 'hygiene)
+                   (#{bare-cont -ANAU$bmvAmthP7L7xwsue}#
+                     #{var -ANAU$bmvAmthP7L7xwsuc}#))
+                 (if (eqv? #{kind -ANAU$bmvAmthP7L7xwsuf}# 'bare)
+                   (#{bare-cont -ANAU$bmvAmthP7L7xwsue}#
+                     #{var -ANAU$bmvAmthP7L7xwsuc}#)
+                   (if (eqv? #{kind -ANAU$bmvAmthP7L7xwsuf}# 'hygiene)
                      (if (if (not (equal?
-                                    #{mod _hoQGWMnyQPAh3k2jhWMn@}#
+                                    #{mod -ANAU$bmvAmthP7L7xwsug}#
                                     (module-name (current-module))))
                            (module-variable
-                             (resolve-module #{mod _hoQGWMnyQPAh3k2jhWMn@}#)
-                             #{var _hoQGWMnyQPAh3k2jhWMn7}#)
+                             (resolve-module #{mod -ANAU$bmvAmthP7L7xwsug}#)
+                             #{var -ANAU$bmvAmthP7L7xwsuc}#)
                            #f)
-                       (#{modref-cont _hoQGWMnyQPAh3k2jhWMn8}#
-                         #{mod _hoQGWMnyQPAh3k2jhWMn@}#
-                         #{var _hoQGWMnyQPAh3k2jhWMn7}#
+                       (#{modref-cont -ANAU$bmvAmthP7L7xwsud}#
+                         #{mod -ANAU$bmvAmthP7L7xwsug}#
+                         #{var -ANAU$bmvAmthP7L7xwsuc}#
                          #f)
-                       (#{bare-cont _hoQGWMnyQPAh3k2jhWMn9}#
-                         #{var _hoQGWMnyQPAh3k2jhWMn7}#))
+                       (#{bare-cont -ANAU$bmvAmthP7L7xwsue}#
+                         #{var -ANAU$bmvAmthP7L7xwsuc}#))
                      (syntax-violation
                        #f
                        "bad module kind"
-                       #{var _hoQGWMnyQPAh3k2jhWMn7}#
-                       #{mod _hoQGWMnyQPAh3k2jhWMn@}#)))))))))
-     (#{build-global-reference _hoQGWMnyQPAh3k2jhWHSm}#
-       (lambda (#{source _hoQGWMnyQPAh3k2jhWMoO}#
-                #{var _hoQGWMnyQPAh3k2jhWMoP}#
-                #{mod _hoQGWMnyQPAh3k2jhWMoQ}#)
-         (#{analyze-variable _hoQGWMnyQPAh3k2jhWHSl}#
-           #{mod _hoQGWMnyQPAh3k2jhWMoQ}#
-           #{var _hoQGWMnyQPAh3k2jhWMoP}#
-           (lambda (#{mod _hoQGWMnyQPAh3k2jhWMoT}#
-                    #{var _hoQGWMnyQPAh3k2jhWMoU}#
-                    #{public? _hoQGWMnyQPAh3k2jhWMoV}#)
+                       #{var -ANAU$bmvAmthP7L7xwsuc}#
+                       #{mod -ANAU$bmvAmthP7L7xwsug}#)))))))))
+     (#{build-global-reference -ANAU$bmvAmthP7L7xwnNF}#
+       (lambda (#{source -ANAU$bmvAmthP7L7xwsuv}#
+                #{var -ANAU$bmvAmthP7L7xwsuw}#
+                #{mod -ANAU$bmvAmthP7L7xwsux}#)
+         (#{analyze-variable -ANAU$bmvAmthP7L7xwnNE}#
+           #{mod -ANAU$bmvAmthP7L7xwsux}#
+           #{var -ANAU$bmvAmthP7L7xwsuw}#
+           (lambda (#{mod -ANAU$bmvAmthP7L7xwsu0}#
+                    #{var -ANAU$bmvAmthP7L7xwsu1}#
+                    #{public? -ANAU$bmvAmthP7L7xwsu2}#)
              (make-struct/no-tail
                (vector-ref %expanded-vtables 5)
-               #{source _hoQGWMnyQPAh3k2jhWMoO}#
-               #{mod _hoQGWMnyQPAh3k2jhWMoT}#
-               #{var _hoQGWMnyQPAh3k2jhWMoU}#
-               #{public? _hoQGWMnyQPAh3k2jhWMoV}#))
-           (lambda (#{var _hoQGWMnyQPAh3k2jhWMod}#)
+               #{source -ANAU$bmvAmthP7L7xwsuv}#
+               #{mod -ANAU$bmvAmthP7L7xwsu0}#
+               #{var -ANAU$bmvAmthP7L7xwsu1}#
+               #{public? -ANAU$bmvAmthP7L7xwsu2}#))
+           (lambda (#{var -ANAU$bmvAmthP7L7xwsu$}#)
              (make-struct/no-tail
                (vector-ref %expanded-vtables 7)
-               #{source _hoQGWMnyQPAh3k2jhWMoO}#
-               #{var _hoQGWMnyQPAh3k2jhWMod}#)))))
-     (#{build-global-assignment _hoQGWMnyQPAh3k2jhWHSn}#
-       (lambda (#{source _hoQGWMnyQPAh3k2jhWKAK}#
-                #{var _hoQGWMnyQPAh3k2jhWKAL}#
-                #{exp _hoQGWMnyQPAh3k2jhWKAM}#
-                #{mod _hoQGWMnyQPAh3k2jhWKAN}#)
+               #{source -ANAU$bmvAmthP7L7xwsuv}#
+               #{var -ANAU$bmvAmthP7L7xwsu$}#)))))
+     (#{build-global-assignment -ANAU$bmvAmthP7L7xwnNG}#
+       (lambda (#{source -ANAU$bmvAmthP7L7xwp8F}#
+                #{var -ANAU$bmvAmthP7L7xwp8G}#
+                #{exp -ANAU$bmvAmthP7L7xwp8H}#
+                #{mod -ANAU$bmvAmthP7L7xwp8I}#)
          (begin
-           (if (if (struct? #{exp _hoQGWMnyQPAh3k2jhWKAM}#)
-                 (eq? (struct-vtable #{exp _hoQGWMnyQPAh3k2jhWKAM}#)
+           (if (if (struct? #{exp -ANAU$bmvAmthP7L7xwp8H}#)
+                 (eq? (struct-vtable #{exp -ANAU$bmvAmthP7L7xwp8H}#)
                       (vector-ref %expanded-vtables 13))
                  #f)
-             (let ((#{meta _hoQGWMnyQPAh3k2jhWKAd}#
-                     (struct-ref #{exp _hoQGWMnyQPAh3k2jhWKAM}# 1)))
-               (if (not (assq 'name #{meta _hoQGWMnyQPAh3k2jhWKAd}#))
-                 (let ((#{v _hoQGWMnyQPAh3k2jhWKAk}#
-                         (cons (cons 'name #{var _hoQGWMnyQPAh3k2jhWKAL}#)
-                               #{meta _hoQGWMnyQPAh3k2jhWKAd}#)))
+             (let ((#{meta -ANAU$bmvAmthP7L7xwp8Y}#
+                     (struct-ref #{exp -ANAU$bmvAmthP7L7xwp8H}# 1)))
+               (if (not (assq 'name #{meta -ANAU$bmvAmthP7L7xwp8Y}#))
+                 (let ((#{v -ANAU$bmvAmthP7L7xwp8f}#
+                         (cons (cons 'name #{var -ANAU$bmvAmthP7L7xwp8G}#)
+                               #{meta -ANAU$bmvAmthP7L7xwp8Y}#)))
                    (struct-set!
-                     #{exp _hoQGWMnyQPAh3k2jhWKAM}#
+                     #{exp -ANAU$bmvAmthP7L7xwp8H}#
                      1
-                     #{v _hoQGWMnyQPAh3k2jhWKAk}#)))))
-           (#{analyze-variable _hoQGWMnyQPAh3k2jhWHSl}#
-             #{mod _hoQGWMnyQPAh3k2jhWKAN}#
-             #{var _hoQGWMnyQPAh3k2jhWKAL}#
-             (lambda (#{mod _hoQGWMnyQPAh3k2jhWKAp}#
-                      #{var _hoQGWMnyQPAh3k2jhWKAq}#
-                      #{public? _hoQGWMnyQPAh3k2jhWKAr}#)
+                     #{v -ANAU$bmvAmthP7L7xwp8f}#)))))
+           (#{analyze-variable -ANAU$bmvAmthP7L7xwnNE}#
+             #{mod -ANAU$bmvAmthP7L7xwp8I}#
+             #{var -ANAU$bmvAmthP7L7xwp8G}#
+             (lambda (#{mod -ANAU$bmvAmthP7L7xwp8k}#
+                      #{var -ANAU$bmvAmthP7L7xwp8l}#
+                      #{public? -ANAU$bmvAmthP7L7xwp8m}#)
                (make-struct/no-tail
                  (vector-ref %expanded-vtables 6)
-                 #{source _hoQGWMnyQPAh3k2jhWKAK}#
-                 #{mod _hoQGWMnyQPAh3k2jhWKAp}#
-                 #{var _hoQGWMnyQPAh3k2jhWKAq}#
-                 #{public? _hoQGWMnyQPAh3k2jhWKAr}#
-                 #{exp _hoQGWMnyQPAh3k2jhWKAM}#))
-             (lambda (#{var _hoQGWMnyQPAh3k2jhWKAz}#)
+                 #{source -ANAU$bmvAmthP7L7xwp8F}#
+                 #{mod -ANAU$bmvAmthP7L7xwp8k}#
+                 #{var -ANAU$bmvAmthP7L7xwp8l}#
+                 #{public? -ANAU$bmvAmthP7L7xwp8m}#
+                 #{exp -ANAU$bmvAmthP7L7xwp8H}#))
+             (lambda (#{var -ANAU$bmvAmthP7L7xwp8u}#)
                (make-struct/no-tail
                  (vector-ref %expanded-vtables 8)
-                 #{source _hoQGWMnyQPAh3k2jhWKAK}#
-                 #{var _hoQGWMnyQPAh3k2jhWKAz}#
-                 #{exp _hoQGWMnyQPAh3k2jhWKAM}#))))))
-     (#{build-global-definition _hoQGWMnyQPAh3k2jhWHSo}#
-       (lambda (#{source _hoQGWMnyQPAh3k2jhWMoj}#
-                #{var _hoQGWMnyQPAh3k2jhWMok}#
-                #{exp _hoQGWMnyQPAh3k2jhWMol}#)
+                 #{source -ANAU$bmvAmthP7L7xwp8F}#
+                 #{var -ANAU$bmvAmthP7L7xwp8u}#
+                 #{exp -ANAU$bmvAmthP7L7xwp8H}#))))))
+     (#{build-global-definition -ANAU$bmvAmthP7L7xwnNH}#
+       (lambda (#{source -ANAU$bmvAmthP7L7xwsvE}#
+                #{var -ANAU$bmvAmthP7L7xwsvF}#
+                #{exp -ANAU$bmvAmthP7L7xwsvG}#)
          (begin
-           (if (if (struct? #{exp _hoQGWMnyQPAh3k2jhWMol}#)
-                 (eq? (struct-vtable #{exp _hoQGWMnyQPAh3k2jhWMol}#)
+           (if (if (struct? #{exp -ANAU$bmvAmthP7L7xwsvG}#)
+                 (eq? (struct-vtable #{exp -ANAU$bmvAmthP7L7xwsvG}#)
                       (vector-ref %expanded-vtables 13))
                  #f)
-             (let ((#{meta _hoQGWMnyQPAh3k2jhWMo1}#
-                     (struct-ref #{exp _hoQGWMnyQPAh3k2jhWMol}# 1)))
-               (if (not (assq 'name #{meta _hoQGWMnyQPAh3k2jhWMo1}#))
-                 (let ((#{v _hoQGWMnyQPAh3k2jhWMo8}#
-                         (cons (cons 'name #{var _hoQGWMnyQPAh3k2jhWMok}#)
-                               #{meta _hoQGWMnyQPAh3k2jhWMo1}#)))
+             (let ((#{meta -ANAU$bmvAmthP7L7xwsvW}#
+                     (struct-ref #{exp -ANAU$bmvAmthP7L7xwsvG}# 1)))
+               (if (not (assq 'name #{meta -ANAU$bmvAmthP7L7xwsvW}#))
+                 (let ((#{v -ANAU$bmvAmthP7L7xwsvd}#
+                         (cons (cons 'name #{var -ANAU$bmvAmthP7L7xwsvF}#)
+                               #{meta -ANAU$bmvAmthP7L7xwsvW}#)))
                    (struct-set!
-                     #{exp _hoQGWMnyQPAh3k2jhWMol}#
+                     #{exp -ANAU$bmvAmthP7L7xwsvG}#
                      1
-                     #{v _hoQGWMnyQPAh3k2jhWMo8}#)))))
+                     #{v -ANAU$bmvAmthP7L7xwsvd}#)))))
            (make-struct/no-tail
              (vector-ref %expanded-vtables 9)
-             #{source _hoQGWMnyQPAh3k2jhWMoj}#
-             #{var _hoQGWMnyQPAh3k2jhWMok}#
-             #{exp _hoQGWMnyQPAh3k2jhWMol}#))))
-     (#{build-simple-lambda _hoQGWMnyQPAh3k2jhWHSp}#
-       (lambda (#{src _hoQGWMnyQPAh3k2jhWKA5}#
-                #{req _hoQGWMnyQPAh3k2jhWKA6}#
-                #{rest _hoQGWMnyQPAh3k2jhWKA7}#
-                #{vars _hoQGWMnyQPAh3k2jhWKA8}#
-                #{meta _hoQGWMnyQPAh3k2jhWKA9}#
-                #{exp _hoQGWMnyQPAh3k2jhWKA$}#)
-         (let ((#{body _hoQGWMnyQPAh3k2jhWKBE}#
+             #{source -ANAU$bmvAmthP7L7xwsvE}#
+             #{var -ANAU$bmvAmthP7L7xwsvF}#
+             #{exp -ANAU$bmvAmthP7L7xwsvG}#))))
+     (#{build-simple-lambda -ANAU$bmvAmthP7L7xwnNI}#
+       (lambda (#{src -ANAU$bmvAmthP7L7xwp80}#
+                #{req -ANAU$bmvAmthP7L7xwp81}#
+                #{rest -ANAU$bmvAmthP7L7xwp82}#
+                #{vars -ANAU$bmvAmthP7L7xwp83}#
+                #{meta -ANAU$bmvAmthP7L7xwp84}#
+                #{exp -ANAU$bmvAmthP7L7xwp85}#)
+         (let ((#{body -ANAU$bmvAmthP7L7xwp8@}#
                  (make-struct/no-tail
                    (vector-ref %expanded-vtables 14)
-                   #{src _hoQGWMnyQPAh3k2jhWKA5}#
-                   #{req _hoQGWMnyQPAh3k2jhWKA6}#
+                   #{src -ANAU$bmvAmthP7L7xwp80}#
+                   #{req -ANAU$bmvAmthP7L7xwp81}#
                    #f
-                   #{rest _hoQGWMnyQPAh3k2jhWKA7}#
+                   #{rest -ANAU$bmvAmthP7L7xwp82}#
                    #f
                    '()
-                   #{vars _hoQGWMnyQPAh3k2jhWKA8}#
-                   #{exp _hoQGWMnyQPAh3k2jhWKA$}#
+                   #{vars -ANAU$bmvAmthP7L7xwp83}#
+                   #{exp -ANAU$bmvAmthP7L7xwp85}#
                    #f)))
            (make-struct/no-tail
              (vector-ref %expanded-vtables 13)
-             #{src _hoQGWMnyQPAh3k2jhWKA5}#
-             #{meta _hoQGWMnyQPAh3k2jhWKA9}#
-             #{body _hoQGWMnyQPAh3k2jhWKBE}#))))
-     (#{build-sequence _hoQGWMnyQPAh3k2jhWHSu}#
-       (lambda (#{src _hoQGWMnyQPAh3k2jhWMpE}#
-                #{exps _hoQGWMnyQPAh3k2jhWMpF}#)
-         (if (null? (cdr #{exps _hoQGWMnyQPAh3k2jhWMpF}#))
-           (car #{exps _hoQGWMnyQPAh3k2jhWMpF}#)
+             #{src -ANAU$bmvAmthP7L7xwp80}#
+             #{meta -ANAU$bmvAmthP7L7xwp84}#
+             #{body -ANAU$bmvAmthP7L7xwp8@}#))))
+     (#{build-sequence -ANAU$bmvAmthP7L7xwnNN}#
+       (lambda (#{src -ANAU$bmvAmthP7L7xwsvl}#
+                #{exps -ANAU$bmvAmthP7L7xwsvm}#)
+         (if (null? (cdr #{exps -ANAU$bmvAmthP7L7xwsvm}#))
+           (car #{exps -ANAU$bmvAmthP7L7xwsvm}#)
            (make-struct/no-tail
              (vector-ref %expanded-vtables 12)
-             #{src _hoQGWMnyQPAh3k2jhWMpE}#
-             #{exps _hoQGWMnyQPAh3k2jhWMpF}#))))
-     (#{build-let _hoQGWMnyQPAh3k2jhWHSv}#
-       (lambda (#{src _hoQGWMnyQPAh3k2jhWKBQ}#
-                #{ids _hoQGWMnyQPAh3k2jhWKBR}#
-                #{vars _hoQGWMnyQPAh3k2jhWKBS}#
-                #{val-exps _hoQGWMnyQPAh3k2jhWKBT}#
-                #{body-exp _hoQGWMnyQPAh3k2jhWKBU}#)
+             #{src -ANAU$bmvAmthP7L7xwsvl}#
+             #{exps -ANAU$bmvAmthP7L7xwsvm}#))))
+     (#{build-let -ANAU$bmvAmthP7L7xwnNO}#
+       (lambda (#{src -ANAU$bmvAmthP7L7xwp9L}#
+                #{ids -ANAU$bmvAmthP7L7xwp9M}#
+                #{vars -ANAU$bmvAmthP7L7xwp9N}#
+                #{val-exps -ANAU$bmvAmthP7L7xwp9O}#
+                #{body-exp -ANAU$bmvAmthP7L7xwp9P}#)
          (begin
            (for-each
-             #{maybe-name-value! _hoQGWMnyQPAh3k2jhWHSe}#
-             #{ids _hoQGWMnyQPAh3k2jhWKBR}#
-             #{val-exps _hoQGWMnyQPAh3k2jhWKBT}#)
-           (if (null? #{vars _hoQGWMnyQPAh3k2jhWKBS}#)
-             #{body-exp _hoQGWMnyQPAh3k2jhWKBU}#
+             #{maybe-name-value! -ANAU$bmvAmthP7L7xwnM9}#
+             #{ids -ANAU$bmvAmthP7L7xwp9M}#
+             #{val-exps -ANAU$bmvAmthP7L7xwp9O}#)
+           (if (null? #{vars -ANAU$bmvAmthP7L7xwp9N}#)
+             #{body-exp -ANAU$bmvAmthP7L7xwp9P}#
              (make-struct/no-tail
                (vector-ref %expanded-vtables 15)
-               #{src _hoQGWMnyQPAh3k2jhWKBQ}#
-               #{ids _hoQGWMnyQPAh3k2jhWKBR}#
-               #{vars _hoQGWMnyQPAh3k2jhWKBS}#
-               #{val-exps _hoQGWMnyQPAh3k2jhWKBT}#
-               #{body-exp _hoQGWMnyQPAh3k2jhWKBU}#)))))
-     (#{build-named-let _hoQGWMnyQPAh3k2jhWHSw}#
-       (lambda (#{src _hoQGWMnyQPAh3k2jhWKBs}#
-                #{ids _hoQGWMnyQPAh3k2jhWKBt}#
-                #{vars _hoQGWMnyQPAh3k2jhWKBu}#
-                #{val-exps _hoQGWMnyQPAh3k2jhWKBv}#
-                #{body-exp _hoQGWMnyQPAh3k2jhWKBw}#)
-         (let ((#{f _hoQGWMnyQPAh3k2jhWKBx}#
-                 (car #{vars _hoQGWMnyQPAh3k2jhWKBu}#))
-               (#{f-name _hoQGWMnyQPAh3k2jhWKBy}#
-                 (car #{ids _hoQGWMnyQPAh3k2jhWKBt}#))
-               (#{vars _hoQGWMnyQPAh3k2jhWKBz}#
-                 (cdr #{vars _hoQGWMnyQPAh3k2jhWKBu}#))
-               (#{ids _hoQGWMnyQPAh3k2jhWKB0}#
-                 (cdr #{ids _hoQGWMnyQPAh3k2jhWKBt}#)))
-           (let ((#{proc _hoQGWMnyQPAh3k2jhWKB1}#
-                   (let ((#{body _hoQGWMnyQPAh3k2jhWKCJ}#
+               #{src -ANAU$bmvAmthP7L7xwp9L}#
+               #{ids -ANAU$bmvAmthP7L7xwp9M}#
+               #{vars -ANAU$bmvAmthP7L7xwp9N}#
+               #{val-exps -ANAU$bmvAmthP7L7xwp9O}#
+               #{body-exp -ANAU$bmvAmthP7L7xwp9P}#)))))
+     (#{build-named-let -ANAU$bmvAmthP7L7xwnNP}#
+       (lambda (#{src -ANAU$bmvAmthP7L7xwp9n}#
+                #{ids -ANAU$bmvAmthP7L7xwp9o}#
+                #{vars -ANAU$bmvAmthP7L7xwp9p}#
+                #{val-exps -ANAU$bmvAmthP7L7xwp9q}#
+                #{body-exp -ANAU$bmvAmthP7L7xwp9r}#)
+         (let ((#{f -ANAU$bmvAmthP7L7xwp9s}#
+                 (car #{vars -ANAU$bmvAmthP7L7xwp9p}#))
+               (#{f-name -ANAU$bmvAmthP7L7xwp9t}#
+                 (car #{ids -ANAU$bmvAmthP7L7xwp9o}#))
+               (#{vars -ANAU$bmvAmthP7L7xwp9u}#
+                 (cdr #{vars -ANAU$bmvAmthP7L7xwp9p}#))
+               (#{ids -ANAU$bmvAmthP7L7xwp9v}#
+                 (cdr #{ids -ANAU$bmvAmthP7L7xwp9o}#)))
+           (let ((#{proc -ANAU$bmvAmthP7L7xwp9w}#
+                   (let ((#{body -ANAU$bmvAmthP7L7xwp$E}#
                            (make-struct/no-tail
                              (vector-ref %expanded-vtables 14)
-                             #{src _hoQGWMnyQPAh3k2jhWKBs}#
-                             #{ids _hoQGWMnyQPAh3k2jhWKB0}#
+                             #{src -ANAU$bmvAmthP7L7xwp9n}#
+                             #{ids -ANAU$bmvAmthP7L7xwp9v}#
                              #f
                              #f
                              #f
                              '()
-                             #{vars _hoQGWMnyQPAh3k2jhWKBz}#
-                             #{body-exp _hoQGWMnyQPAh3k2jhWKBw}#
+                             #{vars -ANAU$bmvAmthP7L7xwp9u}#
+                             #{body-exp -ANAU$bmvAmthP7L7xwp9r}#
                              #f)))
                      (make-struct/no-tail
                        (vector-ref %expanded-vtables 13)
-                       #{src _hoQGWMnyQPAh3k2jhWKBs}#
+                       #{src -ANAU$bmvAmthP7L7xwp9n}#
                        '()
-                       #{body _hoQGWMnyQPAh3k2jhWKCJ}#))))
+                       #{body -ANAU$bmvAmthP7L7xwp$E}#))))
              (begin
-               (if (if (struct? #{proc _hoQGWMnyQPAh3k2jhWKB1}#)
-                     (eq? (struct-vtable #{proc _hoQGWMnyQPAh3k2jhWKB1}#)
+               (if (if (struct? #{proc -ANAU$bmvAmthP7L7xwp9w}#)
+                     (eq? (struct-vtable #{proc -ANAU$bmvAmthP7L7xwp9w}#)
                           (vector-ref %expanded-vtables 13))
                      #f)
-                 (let ((#{meta _hoQGWMnyQPAh3k2jhWKCh}#
-                         (struct-ref #{proc _hoQGWMnyQPAh3k2jhWKB1}# 1)))
-                   (if (not (assq 'name #{meta _hoQGWMnyQPAh3k2jhWKCh}#))
-                     (let ((#{v _hoQGWMnyQPAh3k2jhWKCo}#
+                 (let ((#{meta -ANAU$bmvAmthP7L7xwp$c}#
+                         (struct-ref #{proc -ANAU$bmvAmthP7L7xwp9w}# 1)))
+                   (if (not (assq 'name #{meta -ANAU$bmvAmthP7L7xwp$c}#))
+                     (let ((#{v -ANAU$bmvAmthP7L7xwp$j}#
                              (cons (cons 'name
-                                         #{f-name _hoQGWMnyQPAh3k2jhWKBy}#)
-                                   #{meta _hoQGWMnyQPAh3k2jhWKCh}#)))
+                                         #{f-name -ANAU$bmvAmthP7L7xwp9t}#)
+                                   #{meta -ANAU$bmvAmthP7L7xwp$c}#)))
                        (struct-set!
-                         #{proc _hoQGWMnyQPAh3k2jhWKB1}#
+                         #{proc -ANAU$bmvAmthP7L7xwp9w}#
                          1
-                         #{v _hoQGWMnyQPAh3k2jhWKCo}#)))))
+                         #{v -ANAU$bmvAmthP7L7xwp$j}#)))))
                (for-each
-                 #{maybe-name-value! _hoQGWMnyQPAh3k2jhWHSe}#
-                 #{ids _hoQGWMnyQPAh3k2jhWKB0}#
-                 #{val-exps _hoQGWMnyQPAh3k2jhWKBv}#)
-               (let ((#{names _hoQGWMnyQPAh3k2jhWKDA}#
-                       (list #{f-name _hoQGWMnyQPAh3k2jhWKBy}#))
-                     (#{gensyms _hoQGWMnyQPAh3k2jhWKDB}#
-                       (list #{f _hoQGWMnyQPAh3k2jhWKBx}#))
-                     (#{vals _hoQGWMnyQPAh3k2jhWKDC}#
-                       (list #{proc _hoQGWMnyQPAh3k2jhWKB1}#))
-                     (#{body _hoQGWMnyQPAh3k2jhWKDD}#
-                       (let ((#{fun-exp _hoQGWMnyQPAh3k2jhWKDH}#
+                 #{maybe-name-value! -ANAU$bmvAmthP7L7xwnM9}#
+                 #{ids -ANAU$bmvAmthP7L7xwp9v}#
+                 #{val-exps -ANAU$bmvAmthP7L7xwp9q}#)
+               (let ((#{names -ANAU$bmvAmthP7L7xwp$7}#
+                       (list #{f-name -ANAU$bmvAmthP7L7xwp9t}#))
+                     (#{gensyms -ANAU$bmvAmthP7L7xwp$8}#
+                       (list #{f -ANAU$bmvAmthP7L7xwp9s}#))
+                     (#{vals -ANAU$bmvAmthP7L7xwp$9}#
+                       (list #{proc -ANAU$bmvAmthP7L7xwp9w}#))
+                     (#{body -ANAU$bmvAmthP7L7xwp$$}#
+                       (let ((#{fun-exp -ANAU$bmvAmthP7L7xwp@C}#
                                (make-struct/no-tail
                                  (vector-ref %expanded-vtables 3)
-                                 #{src _hoQGWMnyQPAh3k2jhWKBs}#
-                                 #{f-name _hoQGWMnyQPAh3k2jhWKBy}#
-                                 #{f _hoQGWMnyQPAh3k2jhWKBx}#)))
+                                 #{src -ANAU$bmvAmthP7L7xwp9n}#
+                                 #{f-name -ANAU$bmvAmthP7L7xwp9t}#
+                                 #{f -ANAU$bmvAmthP7L7xwp9s}#)))
                          (make-struct/no-tail
                            (vector-ref %expanded-vtables 11)
-                           #{src _hoQGWMnyQPAh3k2jhWKBs}#
-                           #{fun-exp _hoQGWMnyQPAh3k2jhWKDH}#
-                           #{val-exps _hoQGWMnyQPAh3k2jhWKBv}#))))
+                           #{src -ANAU$bmvAmthP7L7xwp9n}#
+                           #{fun-exp -ANAU$bmvAmthP7L7xwp@C}#
+                           #{val-exps -ANAU$bmvAmthP7L7xwp9q}#))))
                  (make-struct/no-tail
                    (vector-ref %expanded-vtables 16)
-                   #{src _hoQGWMnyQPAh3k2jhWKBs}#
+                   #{src -ANAU$bmvAmthP7L7xwp9n}#
                    #f
-                   #{names _hoQGWMnyQPAh3k2jhWKDA}#
-                   #{gensyms _hoQGWMnyQPAh3k2jhWKDB}#
-                   #{vals _hoQGWMnyQPAh3k2jhWKDC}#
-                   #{body _hoQGWMnyQPAh3k2jhWKDD}#)))))))
-     (#{build-letrec _hoQGWMnyQPAh3k2jhWHSx}#
-       (lambda (#{src _hoQGWMnyQPAh3k2jhWKDX}#
-                #{in-order? _hoQGWMnyQPAh3k2jhWKDY}#
-                #{ids _hoQGWMnyQPAh3k2jhWKDZ}#
-                #{vars _hoQGWMnyQPAh3k2jhWKDa}#
-                #{val-exps _hoQGWMnyQPAh3k2jhWKDb}#
-                #{body-exp _hoQGWMnyQPAh3k2jhWKDc}#)
-         (if (null? #{vars _hoQGWMnyQPAh3k2jhWKDa}#)
-           #{body-exp _hoQGWMnyQPAh3k2jhWKDc}#
+                   #{names -ANAU$bmvAmthP7L7xwp$7}#
+                   #{gensyms -ANAU$bmvAmthP7L7xwp$8}#
+                   #{vals -ANAU$bmvAmthP7L7xwp$9}#
+                   #{body -ANAU$bmvAmthP7L7xwp$$}#)))))))
+     (#{build-letrec -ANAU$bmvAmthP7L7xwnNQ}#
+       (lambda (#{src -ANAU$bmvAmthP7L7xwp@S}#
+                #{in-order? -ANAU$bmvAmthP7L7xwp@T}#
+                #{ids -ANAU$bmvAmthP7L7xwp@U}#
+                #{vars -ANAU$bmvAmthP7L7xwp@V}#
+                #{val-exps -ANAU$bmvAmthP7L7xwp@W}#
+                #{body-exp -ANAU$bmvAmthP7L7xwp@X}#)
+         (if (null? #{vars -ANAU$bmvAmthP7L7xwp@V}#)
+           #{body-exp -ANAU$bmvAmthP7L7xwp@X}#
            (begin
              (for-each
-               #{maybe-name-value! _hoQGWMnyQPAh3k2jhWHSe}#
-               #{ids _hoQGWMnyQPAh3k2jhWKDZ}#
-               #{val-exps _hoQGWMnyQPAh3k2jhWKDb}#)
+               #{maybe-name-value! -ANAU$bmvAmthP7L7xwnM9}#
+               #{ids -ANAU$bmvAmthP7L7xwp@U}#
+               #{val-exps -ANAU$bmvAmthP7L7xwp@W}#)
              (make-struct/no-tail
                (vector-ref %expanded-vtables 16)
-               #{src _hoQGWMnyQPAh3k2jhWKDX}#
-               #{in-order? _hoQGWMnyQPAh3k2jhWKDY}#
-               #{ids _hoQGWMnyQPAh3k2jhWKDZ}#
-               #{vars _hoQGWMnyQPAh3k2jhWKDa}#
-               #{val-exps _hoQGWMnyQPAh3k2jhWKDb}#
-               #{body-exp _hoQGWMnyQPAh3k2jhWKDc}#)))))
-     (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-       (lambda (#{x _hoQGWMnyQPAh3k2jhWKD2}#)
-         (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWKD2}#)
-               (if (= (vector-length #{x _hoQGWMnyQPAh3k2jhWKD2}#)
+               #{src -ANAU$bmvAmthP7L7xwp@S}#
+               #{in-order? -ANAU$bmvAmthP7L7xwp@T}#
+               #{ids -ANAU$bmvAmthP7L7xwp@U}#
+               #{vars -ANAU$bmvAmthP7L7xwp@V}#
+               #{val-exps -ANAU$bmvAmthP7L7xwp@W}#
+               #{body-exp -ANAU$bmvAmthP7L7xwp@X}#)))))
+     (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+       (lambda (#{x -ANAU$bmvAmthP7L7xwp@x}#)
+         (if (if (vector? #{x -ANAU$bmvAmthP7L7xwp@x}#)
+               (if (= (vector-length #{x -ANAU$bmvAmthP7L7xwp@x}#)
                       4)
-                 (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWKD2}# 0)
+                 (eq? (vector-ref #{x -ANAU$bmvAmthP7L7xwp@x}# 0)
                       'syntax-object)
                  #f)
                #f)
-           (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-             (vector-ref #{x _hoQGWMnyQPAh3k2jhWKD2}# 1))
-           (if (pair? #{x _hoQGWMnyQPAh3k2jhWKD2}#)
-             (let ((#{props _hoQGWMnyQPAh3k2jhWKEF}#
-                     (source-properties #{x _hoQGWMnyQPAh3k2jhWKD2}#)))
-               (if (pair? #{props _hoQGWMnyQPAh3k2jhWKEF}#)
-                 #{props _hoQGWMnyQPAh3k2jhWKEF}#
+           (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+             (vector-ref #{x -ANAU$bmvAmthP7L7xwp@x}# 1))
+           (if (pair? #{x -ANAU$bmvAmthP7L7xwp@x}#)
+             (let ((#{props -ANAU$bmvAmthP7L7xwqAA}#
+                     (source-properties #{x -ANAU$bmvAmthP7L7xwp@x}#)))
+               (if (pair? #{props -ANAU$bmvAmthP7L7xwqAA}#)
+                 #{props -ANAU$bmvAmthP7L7xwqAA}#
                  #f))
              #f))))
-     (#{extend-env _hoQGWMnyQPAh3k2jhWHS7}#
-       (lambda (#{labels _hoQGWMnyQPAh3k2jhWKEH}#
-                #{bindings _hoQGWMnyQPAh3k2jhWKEI}#
-                #{r _hoQGWMnyQPAh3k2jhWKEJ}#)
-         (if (null? #{labels _hoQGWMnyQPAh3k2jhWKEH}#)
-           #{r _hoQGWMnyQPAh3k2jhWKEJ}#
-           (#{extend-env _hoQGWMnyQPAh3k2jhWHS7}#
-             (cdr #{labels _hoQGWMnyQPAh3k2jhWKEH}#)
-             (cdr #{bindings _hoQGWMnyQPAh3k2jhWKEI}#)
-             (cons (cons (car #{labels _hoQGWMnyQPAh3k2jhWKEH}#)
-                         (car #{bindings _hoQGWMnyQPAh3k2jhWKEI}#))
-                   #{r _hoQGWMnyQPAh3k2jhWKEJ}#)))))
-     (#{extend-var-env _hoQGWMnyQPAh3k2jhWHS8}#
-       (lambda (#{labels _hoQGWMnyQPAh3k2jhWKEK}#
-                #{vars _hoQGWMnyQPAh3k2jhWKEL}#
-                #{r _hoQGWMnyQPAh3k2jhWKEM}#)
-         (if (null? #{labels _hoQGWMnyQPAh3k2jhWKEK}#)
-           #{r _hoQGWMnyQPAh3k2jhWKEM}#
-           (#{extend-var-env _hoQGWMnyQPAh3k2jhWHS8}#
-             (cdr #{labels _hoQGWMnyQPAh3k2jhWKEK}#)
-             (cdr #{vars _hoQGWMnyQPAh3k2jhWKEL}#)
-             (cons (cons (car #{labels _hoQGWMnyQPAh3k2jhWKEK}#)
+     (#{extend-env -ANAU$bmvAmthP7L7xwnNa}#
+       (lambda (#{labels -ANAU$bmvAmthP7L7xwqAC}#
+                #{bindings -ANAU$bmvAmthP7L7xwqAD}#
+                #{r -ANAU$bmvAmthP7L7xwqAE}#)
+         (if (null? #{labels -ANAU$bmvAmthP7L7xwqAC}#)
+           #{r -ANAU$bmvAmthP7L7xwqAE}#
+           (#{extend-env -ANAU$bmvAmthP7L7xwnNa}#
+             (cdr #{labels -ANAU$bmvAmthP7L7xwqAC}#)
+             (cdr #{bindings -ANAU$bmvAmthP7L7xwqAD}#)
+             (cons (cons (car #{labels -ANAU$bmvAmthP7L7xwqAC}#)
+                         (car #{bindings -ANAU$bmvAmthP7L7xwqAD}#))
+                   #{r -ANAU$bmvAmthP7L7xwqAE}#)))))
+     (#{extend-var-env -ANAU$bmvAmthP7L7xwnNb}#
+       (lambda (#{labels -ANAU$bmvAmthP7L7xwqAF}#
+                #{vars -ANAU$bmvAmthP7L7xwqAG}#
+                #{r -ANAU$bmvAmthP7L7xwqAH}#)
+         (if (null? #{labels -ANAU$bmvAmthP7L7xwqAF}#)
+           #{r -ANAU$bmvAmthP7L7xwqAH}#
+           (#{extend-var-env -ANAU$bmvAmthP7L7xwnNb}#
+             (cdr #{labels -ANAU$bmvAmthP7L7xwqAF}#)
+             (cdr #{vars -ANAU$bmvAmthP7L7xwqAG}#)
+             (cons (cons (car #{labels -ANAU$bmvAmthP7L7xwqAF}#)
                          (cons 'lexical
-                               (car #{vars _hoQGWMnyQPAh3k2jhWKEL}#)))
-                   #{r _hoQGWMnyQPAh3k2jhWKEM}#)))))
-     (#{macros-only-env _hoQGWMnyQPAh3k2jhWHS9}#
-       (lambda (#{r _hoQGWMnyQPAh3k2jhWKEN}#)
-         (if (null? #{r _hoQGWMnyQPAh3k2jhWKEN}#)
+                               (car #{vars -ANAU$bmvAmthP7L7xwqAG}#)))
+                   #{r -ANAU$bmvAmthP7L7xwqAH}#)))))
+     (#{macros-only-env -ANAU$bmvAmthP7L7xwnNc}#
+       (lambda (#{r -ANAU$bmvAmthP7L7xwqAI}#)
+         (if (null? #{r -ANAU$bmvAmthP7L7xwqAI}#)
            '()
-           (let ((#{a _hoQGWMnyQPAh3k2jhWKEO}#
-                   (car #{r _hoQGWMnyQPAh3k2jhWKEN}#)))
-             (if (eq? (car (cdr #{a _hoQGWMnyQPAh3k2jhWKEO}#))
+           (let ((#{a -ANAU$bmvAmthP7L7xwqAJ}#
+                   (car #{r -ANAU$bmvAmthP7L7xwqAI}#)))
+             (if (eq? (car (cdr #{a -ANAU$bmvAmthP7L7xwqAJ}#))
                       'macro)
-               (cons #{a _hoQGWMnyQPAh3k2jhWKEO}#
-                     (#{macros-only-env _hoQGWMnyQPAh3k2jhWHS9}#
-                       (cdr #{r _hoQGWMnyQPAh3k2jhWKEN}#)))
-               (#{macros-only-env _hoQGWMnyQPAh3k2jhWHS9}#
-                 (cdr #{r _hoQGWMnyQPAh3k2jhWKEN}#)))))))
-     (#{global-extend _hoQGWMnyQPAh3k2jhWHS@}#
-       (lambda (#{type _hoQGWMnyQPAh3k2jhWKEQ}#
-                #{sym _hoQGWMnyQPAh3k2jhWKER}#
-                #{val _hoQGWMnyQPAh3k2jhWKES}#)
+               (cons #{a -ANAU$bmvAmthP7L7xwqAJ}#
+                     (#{macros-only-env -ANAU$bmvAmthP7L7xwnNc}#
+                       (cdr #{r -ANAU$bmvAmthP7L7xwqAI}#)))
+               (#{macros-only-env -ANAU$bmvAmthP7L7xwnNc}#
+                 (cdr #{r -ANAU$bmvAmthP7L7xwqAI}#)))))))
+     (#{global-extend -ANAU$bmvAmthP7L7xwnNe}#
+       (lambda (#{type -ANAU$bmvAmthP7L7xwqAL}#
+                #{sym -ANAU$bmvAmthP7L7xwqAM}#
+                #{val -ANAU$bmvAmthP7L7xwqAN}#)
          (module-define!
            (current-module)
-           #{sym _hoQGWMnyQPAh3k2jhWKER}#
+           #{sym -ANAU$bmvAmthP7L7xwqAM}#
            (make-syntax-transformer
-             #{sym _hoQGWMnyQPAh3k2jhWKER}#
-             #{type _hoQGWMnyQPAh3k2jhWKEQ}#
-             #{val _hoQGWMnyQPAh3k2jhWKES}#))))
-     (#{id? _hoQGWMnyQPAh3k2jhWHTB}#
-       (lambda (#{x _hoQGWMnyQPAh3k2jhWIlN}#)
-         (if (symbol? #{x _hoQGWMnyQPAh3k2jhWIlN}#)
+             #{sym -ANAU$bmvAmthP7L7xwqAM}#
+             #{type -ANAU$bmvAmthP7L7xwqAL}#
+             #{val -ANAU$bmvAmthP7L7xwqAN}#))))
+     (#{id? -ANAU$bmvAmthP7L7xwnNg}#
+       (lambda (#{x -ANAU$bmvAmthP7L7xwofs}#)
+         (if (symbol? #{x -ANAU$bmvAmthP7L7xwofs}#)
            #t
-           (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWIlN}#)
-                 (if (= (vector-length #{x _hoQGWMnyQPAh3k2jhWIlN}#)
+           (if (if (vector? #{x -ANAU$bmvAmthP7L7xwofs}#)
+                 (if (= (vector-length #{x -ANAU$bmvAmthP7L7xwofs}#)
                         4)
-                   (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWIlN}# 0)
+                   (eq? (vector-ref #{x -ANAU$bmvAmthP7L7xwofs}# 0)
                         'syntax-object)
                    #f)
                  #f)
              (symbol?
-               (vector-ref #{x _hoQGWMnyQPAh3k2jhWIlN}# 1))
+               (vector-ref #{x -ANAU$bmvAmthP7L7xwofs}# 1))
              #f))))
-     (#{gen-labels _hoQGWMnyQPAh3k2jhWHTE}#
-       (lambda (#{ls _hoQGWMnyQPAh3k2jhWKEf}#)
-         (if (null? #{ls _hoQGWMnyQPAh3k2jhWKEf}#)
+     (#{gen-labels -ANAU$bmvAmthP7L7xwnNj}#
+       (lambda (#{ls -ANAU$bmvAmthP7L7xwqAa}#)
+         (if (null? #{ls -ANAU$bmvAmthP7L7xwqAa}#)
            '()
-           (cons (#{gen-label _hoQGWMnyQPAh3k2jhWHTD}#)
-                 (#{gen-labels _hoQGWMnyQPAh3k2jhWHTE}#
-                   (cdr #{ls _hoQGWMnyQPAh3k2jhWKEf}#))))))
-     (#{make-binding-wrap _hoQGWMnyQPAh3k2jhWHTP}#
-       (lambda (#{ids _hoQGWMnyQPAh3k2jhWKEg}#
-                #{labels _hoQGWMnyQPAh3k2jhWKEh}#
-                #{w _hoQGWMnyQPAh3k2jhWKEi}#)
-         (if (null? #{ids _hoQGWMnyQPAh3k2jhWKEg}#)
-           #{w _hoQGWMnyQPAh3k2jhWKEi}#
-           (cons (car #{w _hoQGWMnyQPAh3k2jhWKEi}#)
-                 (cons (let ((#{labelvec _hoQGWMnyQPAh3k2jhWKEj}#
+           (cons (#{gen-label -ANAU$bmvAmthP7L7xwnNi}#)
+                 (#{gen-labels -ANAU$bmvAmthP7L7xwnNj}#
+                   (cdr #{ls -ANAU$bmvAmthP7L7xwqAa}#))))))
+     (#{make-binding-wrap -ANAU$bmvAmthP7L7xwnNu}#
+       (lambda (#{ids -ANAU$bmvAmthP7L7xwqAb}#
+                #{labels -ANAU$bmvAmthP7L7xwqAc}#
+                #{w -ANAU$bmvAmthP7L7xwqAd}#)
+         (if (null? #{ids -ANAU$bmvAmthP7L7xwqAb}#)
+           #{w -ANAU$bmvAmthP7L7xwqAd}#
+           (cons (car #{w -ANAU$bmvAmthP7L7xwqAd}#)
+                 (cons (let ((#{labelvec -ANAU$bmvAmthP7L7xwqAe}#
                                (list->vector
-                                 #{labels _hoQGWMnyQPAh3k2jhWKEh}#)))
-                         (let ((#{n _hoQGWMnyQPAh3k2jhWKEk}#
+                                 #{labels -ANAU$bmvAmthP7L7xwqAc}#)))
+                         (let ((#{n -ANAU$bmvAmthP7L7xwqAf}#
                                  (vector-length
-                                   #{labelvec _hoQGWMnyQPAh3k2jhWKEj}#)))
-                           (let ((#{symnamevec _hoQGWMnyQPAh3k2jhWKEl}#
-                                   (make-vector #{n _hoQGWMnyQPAh3k2jhWKEk}#))
-                                 (#{marksvec _hoQGWMnyQPAh3k2jhWKEm}#
-                                   (make-vector #{n _hoQGWMnyQPAh3k2jhWKEk}#)))
+                                   #{labelvec -ANAU$bmvAmthP7L7xwqAe}#)))
+                           (let ((#{symnamevec -ANAU$bmvAmthP7L7xwqAg}#
+                                   (make-vector #{n -ANAU$bmvAmthP7L7xwqAf}#))
+                                 (#{marksvec -ANAU$bmvAmthP7L7xwqAh}#
+                                   (make-vector #{n -ANAU$bmvAmthP7L7xwqAf}#)))
                              (begin
                                (letrec*
-                                 ((#{f _hoQGWMnyQPAh3k2jhWKEn}#
-                                    (lambda (#{ids _hoQGWMnyQPAh3k2jhWKEq}#
-                                             #{i _hoQGWMnyQPAh3k2jhWKEr}#)
-                                      (if (not (null? #{ids _hoQGWMnyQPAh3k2jhWKEq}#))
+                                 ((#{f -ANAU$bmvAmthP7L7xwqAi}#
+                                    (lambda (#{ids -ANAU$bmvAmthP7L7xwqAl}#
+                                             #{i -ANAU$bmvAmthP7L7xwqAm}#)
+                                      (if (not (null? #{ids -ANAU$bmvAmthP7L7xwqAl}#))
                                         (call-with-values
                                           (lambda ()
-                                            (let ((#{x _hoQGWMnyQPAh3k2jhWKEu}#
-                                                    (car #{ids _hoQGWMnyQPAh3k2jhWKEq}#)))
+                                            (let ((#{x -ANAU$bmvAmthP7L7xwqAp}#
+                                                    (car #{ids -ANAU$bmvAmthP7L7xwqAl}#)))
                                               (if (if (vector?
-                                                        #{x _hoQGWMnyQPAh3k2jhWKEu}#)
+                                                        #{x -ANAU$bmvAmthP7L7xwqAp}#)
                                                     (if (= (vector-length
-                                                             #{x _hoQGWMnyQPAh3k2jhWKEu}#)
+                                                             #{x -ANAU$bmvAmthP7L7xwqAp}#)
                                                            4)
                                                       (eq? (vector-ref
-                                                             #{x _hoQGWMnyQPAh3k2jhWKEu}#
+                                                             #{x -ANAU$bmvAmthP7L7xwqAp}#
                                                              0)
                                                            'syntax-object)
                                                       #f)
                                                     #f)
                                                 (values
                                                   (vector-ref
-                                                    #{x _hoQGWMnyQPAh3k2jhWKEu}#
+                                                    #{x -ANAU$bmvAmthP7L7xwqAp}#
                                                     1)
-                                                  (let ((#{m1 _hoQGWMnyQPAh3k2jhWKE$}#
-                                                          (car #{w _hoQGWMnyQPAh3k2jhWKEi}#))
-                                                        (#{m2 _hoQGWMnyQPAh3k2jhWKE@}#
+                                                  (let ((#{m1 -ANAU$bmvAmthP7L7xwqA5}#
+                                                          (car #{w -ANAU$bmvAmthP7L7xwqAd}#))
+                                                        (#{m2 -ANAU$bmvAmthP7L7xwqA6}#
                                                           (car (vector-ref
-                                                                 #{x _hoQGWMnyQPAh3k2jhWKEu}#
+                                                                 #{x -ANAU$bmvAmthP7L7xwqAp}#
                                                                  2))))
-                                                    (if (null? #{m2 _hoQGWMnyQPAh3k2jhWKE@}#)
-                                                      #{m1 _hoQGWMnyQPAh3k2jhWKE$}#
+                                                    (if (null? #{m2 -ANAU$bmvAmthP7L7xwqA6}#)
+                                                      #{m1 -ANAU$bmvAmthP7L7xwqA5}#
                                                       (append
-                                                        #{m1 _hoQGWMnyQPAh3k2jhWKE$}#
-                                                        #{m2 _hoQGWMnyQPAh3k2jhWKE@}#))))
+                                                        #{m1 -ANAU$bmvAmthP7L7xwqA5}#
+                                                        #{m2 -ANAU$bmvAmthP7L7xwqA6}#))))
                                                 (values
-                                                  #{x _hoQGWMnyQPAh3k2jhWKEu}#
-                                                  (car #{w _hoQGWMnyQPAh3k2jhWKEi}#)))))
-                                          (lambda (#{symname _hoQGWMnyQPAh3k2jhWKFT}#
-                                                   #{marks _hoQGWMnyQPAh3k2jhWKFU}#)
+                                                  #{x -ANAU$bmvAmthP7L7xwqAp}#
+                                                  (car #{w -ANAU$bmvAmthP7L7xwqAd}#)))))
+                                          (lambda (#{symname -ANAU$bmvAmthP7L7xwqBO}#
+                                                   #{marks -ANAU$bmvAmthP7L7xwqBP}#)
                                             (begin
                                               (vector-set!
-                                                #{symnamevec _hoQGWMnyQPAh3k2jhWKEl}#
-                                                #{i _hoQGWMnyQPAh3k2jhWKEr}#
-                                                #{symname _hoQGWMnyQPAh3k2jhWKFT}#)
+                                                #{symnamevec -ANAU$bmvAmthP7L7xwqAg}#
+                                                #{i -ANAU$bmvAmthP7L7xwqAm}#
+                                                #{symname -ANAU$bmvAmthP7L7xwqBO}#)
                                               (vector-set!
-                                                #{marksvec _hoQGWMnyQPAh3k2jhWKEm}#
-                                                #{i _hoQGWMnyQPAh3k2jhWKEr}#
-                                                #{marks _hoQGWMnyQPAh3k2jhWKFU}#)
-                                              (#{f _hoQGWMnyQPAh3k2jhWKEn}#
-                                                (cdr #{ids _hoQGWMnyQPAh3k2jhWKEq}#)
-                                                (#{1+}# #{i _hoQGWMnyQPAh3k2jhWKEr}#)))))))))
-                                 (#{f _hoQGWMnyQPAh3k2jhWKEn}#
-                                   #{ids _hoQGWMnyQPAh3k2jhWKEg}#
+                                                #{marksvec -ANAU$bmvAmthP7L7xwqAh}#
+                                                #{i -ANAU$bmvAmthP7L7xwqAm}#
+                                                #{marks -ANAU$bmvAmthP7L7xwqBP}#)
+                                              (#{f -ANAU$bmvAmthP7L7xwqAi}#
+                                                (cdr #{ids -ANAU$bmvAmthP7L7xwqAl}#)
+                                                (#{1+}# #{i -ANAU$bmvAmthP7L7xwqAm}#)))))))))
+                                 (#{f -ANAU$bmvAmthP7L7xwqAi}#
+                                   #{ids -ANAU$bmvAmthP7L7xwqAb}#
                                    0))
                                (vector
                                  'ribcage
-                                 #{symnamevec _hoQGWMnyQPAh3k2jhWKEl}#
-                                 #{marksvec _hoQGWMnyQPAh3k2jhWKEm}#
-                                 #{labelvec _hoQGWMnyQPAh3k2jhWKEj}#)))))
-                       (cdr #{w _hoQGWMnyQPAh3k2jhWKEi}#))))))
-     (#{join-wraps _hoQGWMnyQPAh3k2jhWHTR}#
-       (lambda (#{w1 _hoQGWMnyQPAh3k2jhWKFd}#
-                #{w2 _hoQGWMnyQPAh3k2jhWKFe}#)
-         (let ((#{m1 _hoQGWMnyQPAh3k2jhWKFf}#
-                 (car #{w1 _hoQGWMnyQPAh3k2jhWKFd}#))
-               (#{s1 _hoQGWMnyQPAh3k2jhWKFg}#
-                 (cdr #{w1 _hoQGWMnyQPAh3k2jhWKFd}#)))
-           (if (null? #{m1 _hoQGWMnyQPAh3k2jhWKFf}#)
-             (if (null? #{s1 _hoQGWMnyQPAh3k2jhWKFg}#)
-               #{w2 _hoQGWMnyQPAh3k2jhWKFe}#
-               (cons (car #{w2 _hoQGWMnyQPAh3k2jhWKFe}#)
-                     (let ((#{m2 _hoQGWMnyQPAh3k2jhWKFn}#
-                             (cdr #{w2 _hoQGWMnyQPAh3k2jhWKFe}#)))
-                       (if (null? #{m2 _hoQGWMnyQPAh3k2jhWKFn}#)
-                         #{s1 _hoQGWMnyQPAh3k2jhWKFg}#
+                                 #{symnamevec -ANAU$bmvAmthP7L7xwqAg}#
+                                 #{marksvec -ANAU$bmvAmthP7L7xwqAh}#
+                                 #{labelvec -ANAU$bmvAmthP7L7xwqAe}#)))))
+                       (cdr #{w -ANAU$bmvAmthP7L7xwqAd}#))))))
+     (#{join-wraps -ANAU$bmvAmthP7L7xwnNw}#
+       (lambda (#{w1 -ANAU$bmvAmthP7L7xwqBY}#
+                #{w2 -ANAU$bmvAmthP7L7xwqBZ}#)
+         (let ((#{m1 -ANAU$bmvAmthP7L7xwqBa}#
+                 (car #{w1 -ANAU$bmvAmthP7L7xwqBY}#))
+               (#{s1 -ANAU$bmvAmthP7L7xwqBb}#
+                 (cdr #{w1 -ANAU$bmvAmthP7L7xwqBY}#)))
+           (if (null? #{m1 -ANAU$bmvAmthP7L7xwqBa}#)
+             (if (null? #{s1 -ANAU$bmvAmthP7L7xwqBb}#)
+               #{w2 -ANAU$bmvAmthP7L7xwqBZ}#
+               (cons (car #{w2 -ANAU$bmvAmthP7L7xwqBZ}#)
+                     (let ((#{m2 -ANAU$bmvAmthP7L7xwqBi}#
+                             (cdr #{w2 -ANAU$bmvAmthP7L7xwqBZ}#)))
+                       (if (null? #{m2 -ANAU$bmvAmthP7L7xwqBi}#)
+                         #{s1 -ANAU$bmvAmthP7L7xwqBb}#
                          (append
-                           #{s1 _hoQGWMnyQPAh3k2jhWKFg}#
-                           #{m2 _hoQGWMnyQPAh3k2jhWKFn}#)))))
-             (cons (let ((#{m2 _hoQGWMnyQPAh3k2jhWKFw}#
-                           (car #{w2 _hoQGWMnyQPAh3k2jhWKFe}#)))
-                     (if (null? #{m2 _hoQGWMnyQPAh3k2jhWKFw}#)
-                       #{m1 _hoQGWMnyQPAh3k2jhWKFf}#
+                           #{s1 -ANAU$bmvAmthP7L7xwqBb}#
+                           #{m2 -ANAU$bmvAmthP7L7xwqBi}#)))))
+             (cons (let ((#{m2 -ANAU$bmvAmthP7L7xwqBr}#
+                           (car #{w2 -ANAU$bmvAmthP7L7xwqBZ}#)))
+                     (if (null? #{m2 -ANAU$bmvAmthP7L7xwqBr}#)
+                       #{m1 -ANAU$bmvAmthP7L7xwqBa}#
                        (append
-                         #{m1 _hoQGWMnyQPAh3k2jhWKFf}#
-                         #{m2 _hoQGWMnyQPAh3k2jhWKFw}#)))
-                   (let ((#{m2 _hoQGWMnyQPAh3k2jhWKF5}#
-                           (cdr #{w2 _hoQGWMnyQPAh3k2jhWKFe}#)))
-                     (if (null? #{m2 _hoQGWMnyQPAh3k2jhWKF5}#)
-                       #{s1 _hoQGWMnyQPAh3k2jhWKFg}#
+                         #{m1 -ANAU$bmvAmthP7L7xwqBa}#
+                         #{m2 -ANAU$bmvAmthP7L7xwqBr}#)))
+                   (let ((#{m2 -ANAU$bmvAmthP7L7xwqB0}#
+                           (cdr #{w2 -ANAU$bmvAmthP7L7xwqBZ}#)))
+                     (if (null? #{m2 -ANAU$bmvAmthP7L7xwqB0}#)
+                       #{s1 -ANAU$bmvAmthP7L7xwqBb}#
                        (append
-                         #{s1 _hoQGWMnyQPAh3k2jhWKFg}#
-                         #{m2 _hoQGWMnyQPAh3k2jhWKF5}#))))))))
-     (#{same-marks? _hoQGWMnyQPAh3k2jhWHTT}#
-       (lambda (#{x _hoQGWMnyQPAh3k2jhWKF$}#
-                #{y _hoQGWMnyQPAh3k2jhWKF@}#)
-         (if (eq? #{x _hoQGWMnyQPAh3k2jhWKF$}#
-                  #{y _hoQGWMnyQPAh3k2jhWKF@}#)
-           (eq? #{x _hoQGWMnyQPAh3k2jhWKF$}#
-                #{y _hoQGWMnyQPAh3k2jhWKF@}#)
-           (if (not (null? #{x _hoQGWMnyQPAh3k2jhWKF$}#))
-             (if (not (null? #{y _hoQGWMnyQPAh3k2jhWKF@}#))
-               (if (eq? (car #{x _hoQGWMnyQPAh3k2jhWKF$}#)
-                        (car #{y _hoQGWMnyQPAh3k2jhWKF@}#))
-                 (#{same-marks? _hoQGWMnyQPAh3k2jhWHTT}#
-                   (cdr #{x _hoQGWMnyQPAh3k2jhWKF$}#)
-                   (cdr #{y _hoQGWMnyQPAh3k2jhWKF@}#))
+                         #{s1 -ANAU$bmvAmthP7L7xwqBb}#
+                         #{m2 -ANAU$bmvAmthP7L7xwqB0}#))))))))
+     (#{same-marks? -ANAU$bmvAmthP7L7xwnNy}#
+       (lambda (#{x -ANAU$bmvAmthP7L7xwqB5}#
+                #{y -ANAU$bmvAmthP7L7xwqB6}#)
+         (if (eq? #{x -ANAU$bmvAmthP7L7xwqB5}#
+                  #{y -ANAU$bmvAmthP7L7xwqB6}#)
+           (eq? #{x -ANAU$bmvAmthP7L7xwqB5}#
+                #{y -ANAU$bmvAmthP7L7xwqB6}#)
+           (if (not (null? #{x -ANAU$bmvAmthP7L7xwqB5}#))
+             (if (not (null? #{y -ANAU$bmvAmthP7L7xwqB6}#))
+               (if (eq? (car #{x -ANAU$bmvAmthP7L7xwqB5}#)
+                        (car #{y -ANAU$bmvAmthP7L7xwqB6}#))
+                 (#{same-marks? -ANAU$bmvAmthP7L7xwnNy}#
+                   (cdr #{x -ANAU$bmvAmthP7L7xwqB5}#)
+                   (cdr #{y -ANAU$bmvAmthP7L7xwqB6}#))
                  #f)
                #f)
              #f))))
-     (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-       (lambda (#{id _hoQGWMnyQPAh3k2jhWKGH}#
-                #{w _hoQGWMnyQPAh3k2jhWKGI}#)
+     (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+       (lambda (#{id -ANAU$bmvAmthP7L7xwqCC}#
+                #{w -ANAU$bmvAmthP7L7xwqCD}#)
          (letrec*
-           ((#{search _hoQGWMnyQPAh3k2jhWKGJ}#
-              (lambda (#{sym _hoQGWMnyQPAh3k2jhWKHG}#
-                       #{subst _hoQGWMnyQPAh3k2jhWKHH}#
-                       #{marks _hoQGWMnyQPAh3k2jhWKHI}#)
-                (if (null? #{subst _hoQGWMnyQPAh3k2jhWKHH}#)
-                  (values #f #{marks _hoQGWMnyQPAh3k2jhWKHI}#)
-                  (let ((#{fst _hoQGWMnyQPAh3k2jhWKHJ}#
-                          (car #{subst _hoQGWMnyQPAh3k2jhWKHH}#)))
-                    (if (eq? #{fst _hoQGWMnyQPAh3k2jhWKHJ}# 'shift)
-                      (#{search _hoQGWMnyQPAh3k2jhWKGJ}#
-                        #{sym _hoQGWMnyQPAh3k2jhWKHG}#
-                        (cdr #{subst _hoQGWMnyQPAh3k2jhWKHH}#)
-                        (cdr #{marks _hoQGWMnyQPAh3k2jhWKHI}#))
-                      (let ((#{symnames _hoQGWMnyQPAh3k2jhWKHL}#
-                              (vector-ref #{fst _hoQGWMnyQPAh3k2jhWKHJ}# 1)))
-                        (if (vector? #{symnames _hoQGWMnyQPAh3k2jhWKHL}#)
-                          (let ((#{n _hoQGWMnyQPAh3k2jhWKHX}#
+           ((#{search -ANAU$bmvAmthP7L7xwqCE}#
+              (lambda (#{sym -ANAU$bmvAmthP7L7xwqDB}#
+                       #{subst -ANAU$bmvAmthP7L7xwqDC}#
+                       #{marks -ANAU$bmvAmthP7L7xwqDD}#)
+                (if (null? #{subst -ANAU$bmvAmthP7L7xwqDC}#)
+                  (values #f #{marks -ANAU$bmvAmthP7L7xwqDD}#)
+                  (let ((#{fst -ANAU$bmvAmthP7L7xwqDE}#
+                          (car #{subst -ANAU$bmvAmthP7L7xwqDC}#)))
+                    (if (eq? #{fst -ANAU$bmvAmthP7L7xwqDE}# 'shift)
+                      (#{search -ANAU$bmvAmthP7L7xwqCE}#
+                        #{sym -ANAU$bmvAmthP7L7xwqDB}#
+                        (cdr #{subst -ANAU$bmvAmthP7L7xwqDC}#)
+                        (cdr #{marks -ANAU$bmvAmthP7L7xwqDD}#))
+                      (let ((#{symnames -ANAU$bmvAmthP7L7xwqDG}#
+                              (vector-ref #{fst -ANAU$bmvAmthP7L7xwqDE}# 1)))
+                        (if (vector? #{symnames -ANAU$bmvAmthP7L7xwqDG}#)
+                          (let ((#{n -ANAU$bmvAmthP7L7xwqDS}#
                                   (vector-length
-                                    #{symnames _hoQGWMnyQPAh3k2jhWKHL}#)))
+                                    #{symnames -ANAU$bmvAmthP7L7xwqDG}#)))
                             (letrec*
-                              ((#{f _hoQGWMnyQPAh3k2jhWKHY}#
-                                 (lambda (#{i _hoQGWMnyQPAh3k2jhWKHa}#)
-                                   (if (= #{i _hoQGWMnyQPAh3k2jhWKHa}#
-                                          #{n _hoQGWMnyQPAh3k2jhWKHX}#)
-                                     (#{search _hoQGWMnyQPAh3k2jhWKGJ}#
-                                       #{sym _hoQGWMnyQPAh3k2jhWKHG}#
-                                       (cdr #{subst _hoQGWMnyQPAh3k2jhWKHH}#)
-                                       #{marks _hoQGWMnyQPAh3k2jhWKHI}#)
+                              ((#{f -ANAU$bmvAmthP7L7xwqDT}#
+                                 (lambda (#{i -ANAU$bmvAmthP7L7xwqDV}#)
+                                   (if (= #{i -ANAU$bmvAmthP7L7xwqDV}#
+                                          #{n -ANAU$bmvAmthP7L7xwqDS}#)
+                                     (#{search -ANAU$bmvAmthP7L7xwqCE}#
+                                       #{sym -ANAU$bmvAmthP7L7xwqDB}#
+                                       (cdr #{subst -ANAU$bmvAmthP7L7xwqDC}#)
+                                       #{marks -ANAU$bmvAmthP7L7xwqDD}#)
                                      (if (if (eq? (vector-ref
-                                                    #{symnames _hoQGWMnyQPAh3k2jhWKHL}#
-                                                    #{i _hoQGWMnyQPAh3k2jhWKHa}#)
-                                                  #{sym _hoQGWMnyQPAh3k2jhWKHG}#)
-                                           (#{same-marks? _hoQGWMnyQPAh3k2jhWHTT}#
-                                             #{marks _hoQGWMnyQPAh3k2jhWKHI}#
+                                                    #{symnames -ANAU$bmvAmthP7L7xwqDG}#
+                                                    #{i -ANAU$bmvAmthP7L7xwqDV}#)
+                                                  #{sym -ANAU$bmvAmthP7L7xwqDB}#)
+                                           (#{same-marks? -ANAU$bmvAmthP7L7xwnNy}#
+                                             #{marks -ANAU$bmvAmthP7L7xwqDD}#
                                              (vector-ref
                                                (vector-ref
-                                                 #{fst _hoQGWMnyQPAh3k2jhWKHJ}#
+                                                 #{fst -ANAU$bmvAmthP7L7xwqDE}#
                                                  2)
-                                               #{i _hoQGWMnyQPAh3k2jhWKHa}#))
+                                               #{i -ANAU$bmvAmthP7L7xwqDV}#))
                                            #f)
                                        (values
                                          (vector-ref
                                            (vector-ref
-                                             #{fst _hoQGWMnyQPAh3k2jhWKHJ}#
+                                             #{fst -ANAU$bmvAmthP7L7xwqDE}#
                                              3)
-                                           #{i _hoQGWMnyQPAh3k2jhWKHa}#)
-                                         #{marks _hoQGWMnyQPAh3k2jhWKHI}#)
-                                       (#{f _hoQGWMnyQPAh3k2jhWKHY}#
-                                         (#{1+}# #{i _hoQGWMnyQPAh3k2jhWKHa}#)))))))
-                              (#{f _hoQGWMnyQPAh3k2jhWKHY}# 0)))
+                                           #{i -ANAU$bmvAmthP7L7xwqDV}#)
+                                         #{marks -ANAU$bmvAmthP7L7xwqDD}#)
+                                       (#{f -ANAU$bmvAmthP7L7xwqDT}#
+                                         (#{1+}# #{i -ANAU$bmvAmthP7L7xwqDV}#)))))))
+                              (#{f -ANAU$bmvAmthP7L7xwqDT}# 0)))
                           (letrec*
-                            ((#{f _hoQGWMnyQPAh3k2jhWKH7}#
-                               (lambda (#{symnames _hoQGWMnyQPAh3k2jhWKH9}#
-                                        #{i _hoQGWMnyQPAh3k2jhWKH$}#)
-                                 (if (null? #{symnames _hoQGWMnyQPAh3k2jhWKH9}#)
-                                   (#{search _hoQGWMnyQPAh3k2jhWKGJ}#
-                                     #{sym _hoQGWMnyQPAh3k2jhWKHG}#
-                                     (cdr #{subst _hoQGWMnyQPAh3k2jhWKHH}#)
-                                     #{marks _hoQGWMnyQPAh3k2jhWKHI}#)
-                                   (if (if (eq? (car #{symnames _hoQGWMnyQPAh3k2jhWKH9}#)
-                                                #{sym _hoQGWMnyQPAh3k2jhWKHG}#)
-                                         (#{same-marks? _hoQGWMnyQPAh3k2jhWHTT}#
-                                           #{marks _hoQGWMnyQPAh3k2jhWKHI}#
+                            ((#{f -ANAU$bmvAmthP7L7xwqD2}#
+                               (lambda (#{symnames -ANAU$bmvAmthP7L7xwqD4}#
+                                        #{i -ANAU$bmvAmthP7L7xwqD5}#)
+                                 (if (null? #{symnames -ANAU$bmvAmthP7L7xwqD4}#)
+                                   (#{search -ANAU$bmvAmthP7L7xwqCE}#
+                                     #{sym -ANAU$bmvAmthP7L7xwqDB}#
+                                     (cdr #{subst -ANAU$bmvAmthP7L7xwqDC}#)
+                                     #{marks -ANAU$bmvAmthP7L7xwqDD}#)
+                                   (if (if (eq? (car #{symnames -ANAU$bmvAmthP7L7xwqD4}#)
+                                                #{sym -ANAU$bmvAmthP7L7xwqDB}#)
+                                         (#{same-marks? -ANAU$bmvAmthP7L7xwnNy}#
+                                           #{marks -ANAU$bmvAmthP7L7xwqDD}#
                                            (list-ref
                                              (vector-ref
-                                               #{fst _hoQGWMnyQPAh3k2jhWKHJ}#
+                                               #{fst -ANAU$bmvAmthP7L7xwqDE}#
                                                2)
-                                             #{i _hoQGWMnyQPAh3k2jhWKH$}#))
+                                             #{i -ANAU$bmvAmthP7L7xwqD5}#))
                                          #f)
                                      (values
                                        (list-ref
                                          (vector-ref
-                                           #{fst _hoQGWMnyQPAh3k2jhWKHJ}#
+                                           #{fst -ANAU$bmvAmthP7L7xwqDE}#
                                            3)
-                                         #{i _hoQGWMnyQPAh3k2jhWKH$}#)
-                                       #{marks _hoQGWMnyQPAh3k2jhWKHI}#)
-                                     (#{f _hoQGWMnyQPAh3k2jhWKH7}#
-                                       (cdr #{symnames _hoQGWMnyQPAh3k2jhWKH9}#)
-                                       (#{1+}# #{i _hoQGWMnyQPAh3k2jhWKH$}#)))))))
-                            (#{f _hoQGWMnyQPAh3k2jhWKH7}#
-                              #{symnames _hoQGWMnyQPAh3k2jhWKHL}#
+                                         #{i -ANAU$bmvAmthP7L7xwqD5}#)
+                                       #{marks -ANAU$bmvAmthP7L7xwqDD}#)
+                                     (#{f -ANAU$bmvAmthP7L7xwqD2}#
+                                       (cdr #{symnames -ANAU$bmvAmthP7L7xwqD4}#)
+                                       (#{1+}# #{i -ANAU$bmvAmthP7L7xwqD5}#)))))))
+                            (#{f -ANAU$bmvAmthP7L7xwqD2}#
+                              #{symnames -ANAU$bmvAmthP7L7xwqDG}#
                               0))))))))))
-           (if (symbol? #{id _hoQGWMnyQPAh3k2jhWKGH}#)
-             (let ((#{t _hoQGWMnyQPAh3k2jhWKGM}#
-                     (#{search _hoQGWMnyQPAh3k2jhWKGJ}#
-                       #{id _hoQGWMnyQPAh3k2jhWKGH}#
-                       (cdr #{w _hoQGWMnyQPAh3k2jhWKGI}#)
-                       (car #{w _hoQGWMnyQPAh3k2jhWKGI}#))))
-               (if #{t _hoQGWMnyQPAh3k2jhWKGM}#
-                 #{t _hoQGWMnyQPAh3k2jhWKGM}#
-                 #{id _hoQGWMnyQPAh3k2jhWKGH}#))
-             (if (if (vector? #{id _hoQGWMnyQPAh3k2jhWKGH}#)
-                   (if (= (vector-length #{id _hoQGWMnyQPAh3k2jhWKGH}#)
+           (if (symbol? #{id -ANAU$bmvAmthP7L7xwqCC}#)
+             (let ((#{t -ANAU$bmvAmthP7L7xwqCH}#
+                     (#{search -ANAU$bmvAmthP7L7xwqCE}#
+                       #{id -ANAU$bmvAmthP7L7xwqCC}#
+                       (cdr #{w -ANAU$bmvAmthP7L7xwqCD}#)
+                       (car #{w -ANAU$bmvAmthP7L7xwqCD}#))))
+               (if #{t -ANAU$bmvAmthP7L7xwqCH}#
+                 #{t -ANAU$bmvAmthP7L7xwqCH}#
+                 #{id -ANAU$bmvAmthP7L7xwqCC}#))
+             (if (if (vector? #{id -ANAU$bmvAmthP7L7xwqCC}#)
+                   (if (= (vector-length #{id -ANAU$bmvAmthP7L7xwqCC}#)
                           4)
-                     (eq? (vector-ref #{id _hoQGWMnyQPAh3k2jhWKGH}# 0)
+                     (eq? (vector-ref #{id -ANAU$bmvAmthP7L7xwqCC}# 0)
                           'syntax-object)
                      #f)
                    #f)
-               (let ((#{id _hoQGWMnyQPAh3k2jhWKGb}#
-                       (vector-ref #{id _hoQGWMnyQPAh3k2jhWKGH}# 1))
-                     (#{w1 _hoQGWMnyQPAh3k2jhWKGc}#
-                       (vector-ref #{id _hoQGWMnyQPAh3k2jhWKGH}# 2)))
-                 (let ((#{marks _hoQGWMnyQPAh3k2jhWKGd}#
-                         (let ((#{m1 _hoQGWMnyQPAh3k2jhWKGn}#
-                                 (car #{w _hoQGWMnyQPAh3k2jhWKGI}#))
-                               (#{m2 _hoQGWMnyQPAh3k2jhWKGo}#
-                                 (car #{w1 _hoQGWMnyQPAh3k2jhWKGc}#)))
-                           (if (null? #{m2 _hoQGWMnyQPAh3k2jhWKGo}#)
-                             #{m1 _hoQGWMnyQPAh3k2jhWKGn}#
+               (let ((#{id -ANAU$bmvAmthP7L7xwqCW}#
+                       (vector-ref #{id -ANAU$bmvAmthP7L7xwqCC}# 1))
+                     (#{w1 -ANAU$bmvAmthP7L7xwqCX}#
+                       (vector-ref #{id -ANAU$bmvAmthP7L7xwqCC}# 2)))
+                 (let ((#{marks -ANAU$bmvAmthP7L7xwqCY}#
+                         (let ((#{m1 -ANAU$bmvAmthP7L7xwqCi}#
+                                 (car #{w -ANAU$bmvAmthP7L7xwqCD}#))
+                               (#{m2 -ANAU$bmvAmthP7L7xwqCj}#
+                                 (car #{w1 -ANAU$bmvAmthP7L7xwqCX}#)))
+                           (if (null? #{m2 -ANAU$bmvAmthP7L7xwqCj}#)
+                             #{m1 -ANAU$bmvAmthP7L7xwqCi}#
                              (append
-                               #{m1 _hoQGWMnyQPAh3k2jhWKGn}#
-                               #{m2 _hoQGWMnyQPAh3k2jhWKGo}#)))))
+                               #{m1 -ANAU$bmvAmthP7L7xwqCi}#
+                               #{m2 -ANAU$bmvAmthP7L7xwqCj}#)))))
                    (call-with-values
                      (lambda ()
-                       (#{search _hoQGWMnyQPAh3k2jhWKGJ}#
-                         #{id _hoQGWMnyQPAh3k2jhWKGb}#
-                         (cdr #{w _hoQGWMnyQPAh3k2jhWKGI}#)
-                         #{marks _hoQGWMnyQPAh3k2jhWKGd}#))
-                     (lambda (#{new-id _hoQGWMnyQPAh3k2jhWKG4}#
-                              #{marks _hoQGWMnyQPAh3k2jhWKG5}#)
-                       (if #{new-id _hoQGWMnyQPAh3k2jhWKG4}#
-                         #{new-id _hoQGWMnyQPAh3k2jhWKG4}#
-                         (let ((#{t _hoQGWMnyQPAh3k2jhWKHB}#
-                                 (#{search _hoQGWMnyQPAh3k2jhWKGJ}#
-                                   #{id _hoQGWMnyQPAh3k2jhWKGb}#
-                                   (cdr #{w1 _hoQGWMnyQPAh3k2jhWKGc}#)
-                                   #{marks _hoQGWMnyQPAh3k2jhWKG5}#)))
-                           (if #{t _hoQGWMnyQPAh3k2jhWKHB}#
-                             #{t _hoQGWMnyQPAh3k2jhWKHB}#
-                             #{id _hoQGWMnyQPAh3k2jhWKGb}#)))))))
+                       (#{search -ANAU$bmvAmthP7L7xwqCE}#
+                         #{id -ANAU$bmvAmthP7L7xwqCW}#
+                         (cdr #{w -ANAU$bmvAmthP7L7xwqCD}#)
+                         #{marks -ANAU$bmvAmthP7L7xwqCY}#))
+                     (lambda (#{new-id -ANAU$bmvAmthP7L7xwqCz}#
+                              #{marks -ANAU$bmvAmthP7L7xwqC0}#)
+                       (if #{new-id -ANAU$bmvAmthP7L7xwqCz}#
+                         #{new-id -ANAU$bmvAmthP7L7xwqCz}#
+                         (let ((#{t -ANAU$bmvAmthP7L7xwqC8}#
+                                 (#{search -ANAU$bmvAmthP7L7xwqCE}#
+                                   #{id -ANAU$bmvAmthP7L7xwqCW}#
+                                   (cdr #{w1 -ANAU$bmvAmthP7L7xwqCX}#)
+                                   #{marks -ANAU$bmvAmthP7L7xwqC0}#)))
+                           (if #{t -ANAU$bmvAmthP7L7xwqC8}#
+                             #{t -ANAU$bmvAmthP7L7xwqC8}#
+                             #{id -ANAU$bmvAmthP7L7xwqCW}#)))))))
                (syntax-violation
                  'id-var-name
                  "invalid id"
-                 #{id _hoQGWMnyQPAh3k2jhWKGH}#))))))
-     (#{locally-bound-identifiers _hoQGWMnyQPAh3k2jhWHTV}#
-       (lambda (#{w _hoQGWMnyQPAh3k2jhWKIU}#
-                #{mod _hoQGWMnyQPAh3k2jhWKIV}#)
+                 #{id -ANAU$bmvAmthP7L7xwqCC}#))))))
+     (#{locally-bound-identifiers -ANAU$bmvAmthP7L7xwnN0}#
+       (lambda (#{w -ANAU$bmvAmthP7L7xwqEP}#
+                #{mod -ANAU$bmvAmthP7L7xwqEQ}#)
          (letrec*
-           ((#{scan _hoQGWMnyQPAh3k2jhWKIW}#
-              (lambda (#{subst _hoQGWMnyQPAh3k2jhWKIb}#
-                       #{results _hoQGWMnyQPAh3k2jhWKIc}#)
-                (if (null? #{subst _hoQGWMnyQPAh3k2jhWKIb}#)
-                  #{results _hoQGWMnyQPAh3k2jhWKIc}#
-                  (let ((#{fst _hoQGWMnyQPAh3k2jhWKId}#
-                          (car #{subst _hoQGWMnyQPAh3k2jhWKIb}#)))
-                    (if (eq? #{fst _hoQGWMnyQPAh3k2jhWKId}# 'shift)
-                      (#{scan _hoQGWMnyQPAh3k2jhWKIW}#
-                        (cdr #{subst _hoQGWMnyQPAh3k2jhWKIb}#)
-                        #{results _hoQGWMnyQPAh3k2jhWKIc}#)
-                      (let ((#{symnames _hoQGWMnyQPAh3k2jhWKIf}#
-                              (vector-ref #{fst _hoQGWMnyQPAh3k2jhWKId}# 1))
-                            (#{marks _hoQGWMnyQPAh3k2jhWKIg}#
-                              (vector-ref #{fst _hoQGWMnyQPAh3k2jhWKId}# 2)))
-                        (if (vector? #{symnames _hoQGWMnyQPAh3k2jhWKIf}#)
-                          (#{scan-vector-rib _hoQGWMnyQPAh3k2jhWKIY}#
-                            #{subst _hoQGWMnyQPAh3k2jhWKIb}#
-                            #{symnames _hoQGWMnyQPAh3k2jhWKIf}#
-                            #{marks _hoQGWMnyQPAh3k2jhWKIg}#
-                            #{results _hoQGWMnyQPAh3k2jhWKIc}#)
-                          (#{scan-list-rib _hoQGWMnyQPAh3k2jhWKIX}#
-                            #{subst _hoQGWMnyQPAh3k2jhWKIb}#
-                            #{symnames _hoQGWMnyQPAh3k2jhWKIf}#
-                            #{marks _hoQGWMnyQPAh3k2jhWKIg}#
-                            #{results _hoQGWMnyQPAh3k2jhWKIc}#))))))))
-            (#{scan-list-rib _hoQGWMnyQPAh3k2jhWKIX}#
-              (lambda (#{subst _hoQGWMnyQPAh3k2jhWKKC}#
-                       #{symnames _hoQGWMnyQPAh3k2jhWKKD}#
-                       #{marks _hoQGWMnyQPAh3k2jhWKKE}#
-                       #{results _hoQGWMnyQPAh3k2jhWKKF}#)
+           ((#{scan -ANAU$bmvAmthP7L7xwqER}#
+              (lambda (#{subst -ANAU$bmvAmthP7L7xwqEW}#
+                       #{results -ANAU$bmvAmthP7L7xwqEX}#)
+                (if (null? #{subst -ANAU$bmvAmthP7L7xwqEW}#)
+                  #{results -ANAU$bmvAmthP7L7xwqEX}#
+                  (let ((#{fst -ANAU$bmvAmthP7L7xwqEY}#
+                          (car #{subst -ANAU$bmvAmthP7L7xwqEW}#)))
+                    (if (eq? #{fst -ANAU$bmvAmthP7L7xwqEY}# 'shift)
+                      (#{scan -ANAU$bmvAmthP7L7xwqER}#
+                        (cdr #{subst -ANAU$bmvAmthP7L7xwqEW}#)
+                        #{results -ANAU$bmvAmthP7L7xwqEX}#)
+                      (let ((#{symnames -ANAU$bmvAmthP7L7xwqEa}#
+                              (vector-ref #{fst -ANAU$bmvAmthP7L7xwqEY}# 1))
+                            (#{marks -ANAU$bmvAmthP7L7xwqEb}#
+                              (vector-ref #{fst -ANAU$bmvAmthP7L7xwqEY}# 2)))
+                        (if (vector? #{symnames -ANAU$bmvAmthP7L7xwqEa}#)
+                          (#{scan-vector-rib -ANAU$bmvAmthP7L7xwqET}#
+                            #{subst -ANAU$bmvAmthP7L7xwqEW}#
+                            #{symnames -ANAU$bmvAmthP7L7xwqEa}#
+                            #{marks -ANAU$bmvAmthP7L7xwqEb}#
+                            #{results -ANAU$bmvAmthP7L7xwqEX}#)
+                          (#{scan-list-rib -ANAU$bmvAmthP7L7xwqES}#
+                            #{subst -ANAU$bmvAmthP7L7xwqEW}#
+                            #{symnames -ANAU$bmvAmthP7L7xwqEa}#
+                            #{marks -ANAU$bmvAmthP7L7xwqEb}#
+                            #{results -ANAU$bmvAmthP7L7xwqEX}#))))))))
+            (#{scan-list-rib -ANAU$bmvAmthP7L7xwqES}#
+              (lambda (#{subst -ANAU$bmvAmthP7L7xwqF9}#
+                       #{symnames -ANAU$bmvAmthP7L7xwqF$}#
+                       #{marks -ANAU$bmvAmthP7L7xwqF@}#
+                       #{results -ANAU$bmvAmthP7L7xwqGA}#)
                 (letrec*
-                  ((#{f _hoQGWMnyQPAh3k2jhWKKG}#
-                     (lambda (#{symnames _hoQGWMnyQPAh3k2jhWKLq}#
-                              #{marks _hoQGWMnyQPAh3k2jhWKLr}#
-                              #{results _hoQGWMnyQPAh3k2jhWKLs}#)
-                       (if (null? #{symnames _hoQGWMnyQPAh3k2jhWKLq}#)
-                         (#{scan _hoQGWMnyQPAh3k2jhWKIW}#
-                           (cdr #{subst _hoQGWMnyQPAh3k2jhWKKC}#)
-                           #{results _hoQGWMnyQPAh3k2jhWKLs}#)
-                         (#{f _hoQGWMnyQPAh3k2jhWKKG}#
-                           (cdr #{symnames _hoQGWMnyQPAh3k2jhWKLq}#)
-                           (cdr #{marks _hoQGWMnyQPAh3k2jhWKLr}#)
-                           (cons (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                   (car #{symnames _hoQGWMnyQPAh3k2jhWKLq}#)
-                                   (let ((#{w _hoQGWMnyQPAh3k2jhWKL0}#
-                                           (cons (car #{marks _hoQGWMnyQPAh3k2jhWKLr}#)
-                                                 #{subst _hoQGWMnyQPAh3k2jhWKKC}#)))
+                  ((#{f -ANAU$bmvAmthP7L7xwqGB}#
+                     (lambda (#{symnames -ANAU$bmvAmthP7L7xwqHl}#
+                              #{marks -ANAU$bmvAmthP7L7xwqHm}#
+                              #{results -ANAU$bmvAmthP7L7xwqHn}#)
+                       (if (null? #{symnames -ANAU$bmvAmthP7L7xwqHl}#)
+                         (#{scan -ANAU$bmvAmthP7L7xwqER}#
+                           (cdr #{subst -ANAU$bmvAmthP7L7xwqF9}#)
+                           #{results -ANAU$bmvAmthP7L7xwqHn}#)
+                         (#{f -ANAU$bmvAmthP7L7xwqGB}#
+                           (cdr #{symnames -ANAU$bmvAmthP7L7xwqHl}#)
+                           (cdr #{marks -ANAU$bmvAmthP7L7xwqHm}#)
+                           (cons (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                   (car #{symnames -ANAU$bmvAmthP7L7xwqHl}#)
+                                   (let ((#{w -ANAU$bmvAmthP7L7xwqHv}#
+                                           (cons (car #{marks -ANAU$bmvAmthP7L7xwqHm}#)
+                                                 #{subst -ANAU$bmvAmthP7L7xwqF9}#)))
                                      (cons (cons #f
-                                                 (car #{w _hoQGWMnyQPAh3k2jhWKL0}#))
+                                                 (car #{w -ANAU$bmvAmthP7L7xwqHv}#))
                                            (cons 'shift
-                                                 (cdr #{w _hoQGWMnyQPAh3k2jhWKL0}#))))
-                                   #{mod _hoQGWMnyQPAh3k2jhWKIV}#)
-                                 #{results _hoQGWMnyQPAh3k2jhWKLs}#))))))
-                  (#{f _hoQGWMnyQPAh3k2jhWKKG}#
-                    #{symnames _hoQGWMnyQPAh3k2jhWKKD}#
-                    #{marks _hoQGWMnyQPAh3k2jhWKKE}#
-                    #{results _hoQGWMnyQPAh3k2jhWKKF}#))))
-            (#{scan-vector-rib _hoQGWMnyQPAh3k2jhWKIY}#
-              (lambda (#{subst _hoQGWMnyQPAh3k2jhWKL1}#
-                       #{symnames _hoQGWMnyQPAh3k2jhWKL2}#
-                       #{marks _hoQGWMnyQPAh3k2jhWKL3}#
-                       #{results _hoQGWMnyQPAh3k2jhWKL4}#)
-                (let ((#{n _hoQGWMnyQPAh3k2jhWKL5}#
+                                                 (cdr #{w -ANAU$bmvAmthP7L7xwqHv}#))))
+                                   #{mod -ANAU$bmvAmthP7L7xwqEQ}#)
+                                 #{results -ANAU$bmvAmthP7L7xwqHn}#))))))
+                  (#{f -ANAU$bmvAmthP7L7xwqGB}#
+                    #{symnames -ANAU$bmvAmthP7L7xwqF$}#
+                    #{marks -ANAU$bmvAmthP7L7xwqF@}#
+                    #{results -ANAU$bmvAmthP7L7xwqGA}#))))
+            (#{scan-vector-rib -ANAU$bmvAmthP7L7xwqET}#
+              (lambda (#{subst -ANAU$bmvAmthP7L7xwqHw}#
+                       #{symnames -ANAU$bmvAmthP7L7xwqHx}#
+                       #{marks -ANAU$bmvAmthP7L7xwqHy}#
+                       #{results -ANAU$bmvAmthP7L7xwqHz}#)
+                (let ((#{n -ANAU$bmvAmthP7L7xwqH0}#
                         (vector-length
-                          #{symnames _hoQGWMnyQPAh3k2jhWKL2}#)))
+                          #{symnames -ANAU$bmvAmthP7L7xwqHx}#)))
                   (letrec*
-                    ((#{f _hoQGWMnyQPAh3k2jhWKL6}#
-                       (lambda (#{i _hoQGWMnyQPAh3k2jhWKNN}#
-                                #{results _hoQGWMnyQPAh3k2jhWKNO}#)
-                         (if (= #{i _hoQGWMnyQPAh3k2jhWKNN}#
-                                #{n _hoQGWMnyQPAh3k2jhWKL5}#)
-                           (#{scan _hoQGWMnyQPAh3k2jhWKIW}#
-                             (cdr #{subst _hoQGWMnyQPAh3k2jhWKL1}#)
-                             #{results _hoQGWMnyQPAh3k2jhWKNO}#)
-                           (#{f _hoQGWMnyQPAh3k2jhWKL6}#
-                             (#{1+}# #{i _hoQGWMnyQPAh3k2jhWKNN}#)
-                             (cons (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                    ((#{f -ANAU$bmvAmthP7L7xwqH1}#
+                       (lambda (#{i -ANAU$bmvAmthP7L7xwqJI}#
+                                #{results -ANAU$bmvAmthP7L7xwqJJ}#)
+                         (if (= #{i -ANAU$bmvAmthP7L7xwqJI}#
+                                #{n -ANAU$bmvAmthP7L7xwqH0}#)
+                           (#{scan -ANAU$bmvAmthP7L7xwqER}#
+                             (cdr #{subst -ANAU$bmvAmthP7L7xwqHw}#)
+                             #{results -ANAU$bmvAmthP7L7xwqJJ}#)
+                           (#{f -ANAU$bmvAmthP7L7xwqH1}#
+                             (#{1+}# #{i -ANAU$bmvAmthP7L7xwqJI}#)
+                             (cons (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                                      (vector-ref
-                                       #{symnames _hoQGWMnyQPAh3k2jhWKL2}#
-                                       #{i _hoQGWMnyQPAh3k2jhWKNN}#)
-                                     (let ((#{w _hoQGWMnyQPAh3k2jhWKNW}#
+                                       #{symnames -ANAU$bmvAmthP7L7xwqHx}#
+                                       #{i -ANAU$bmvAmthP7L7xwqJI}#)
+                                     (let ((#{w -ANAU$bmvAmthP7L7xwqJR}#
                                              (cons (vector-ref
-                                                     #{marks _hoQGWMnyQPAh3k2jhWKL3}#
-                                                     #{i _hoQGWMnyQPAh3k2jhWKNN}#)
-                                                   #{subst _hoQGWMnyQPAh3k2jhWKL1}#)))
+                                                     #{marks -ANAU$bmvAmthP7L7xwqHy}#
+                                                     #{i -ANAU$bmvAmthP7L7xwqJI}#)
+                                                   #{subst -ANAU$bmvAmthP7L7xwqHw}#)))
                                        (cons (cons #f
-                                                   (car #{w _hoQGWMnyQPAh3k2jhWKNW}#))
+                                                   (car #{w -ANAU$bmvAmthP7L7xwqJR}#))
                                              (cons 'shift
-                                                   (cdr #{w _hoQGWMnyQPAh3k2jhWKNW}#))))
-                                     #{mod _hoQGWMnyQPAh3k2jhWKIV}#)
-                                   #{results _hoQGWMnyQPAh3k2jhWKNO}#))))))
-                    (#{f _hoQGWMnyQPAh3k2jhWKL6}#
+                                                   (cdr #{w -ANAU$bmvAmthP7L7xwqJR}#))))
+                                     #{mod -ANAU$bmvAmthP7L7xwqEQ}#)
+                                   #{results -ANAU$bmvAmthP7L7xwqJJ}#))))))
+                    (#{f -ANAU$bmvAmthP7L7xwqH1}#
                       0
-                      #{results _hoQGWMnyQPAh3k2jhWKL4}#))))))
-           (#{scan _hoQGWMnyQPAh3k2jhWKIW}#
-             (cdr #{w _hoQGWMnyQPAh3k2jhWKIU}#)
+                      #{results -ANAU$bmvAmthP7L7xwqHz}#))))))
+           (#{scan -ANAU$bmvAmthP7L7xwqER}#
+             (cdr #{w -ANAU$bmvAmthP7L7xwqEP}#)
              '()))))
-     (#{valid-bound-ids? _hoQGWMnyQPAh3k2jhWHTb}#
-       (lambda (#{ids _hoQGWMnyQPAh3k2jhWKNX}#)
+     (#{valid-bound-ids? -ANAU$bmvAmthP7L7xwnN6}#
+       (lambda (#{ids -ANAU$bmvAmthP7L7xwqJS}#)
          (if (letrec*
-               ((#{all-ids? _hoQGWMnyQPAh3k2jhWKNY}#
-                  (lambda (#{ids _hoQGWMnyQPAh3k2jhWKP6}#)
-                    (if (null? #{ids _hoQGWMnyQPAh3k2jhWKP6}#)
-                      (null? #{ids _hoQGWMnyQPAh3k2jhWKP6}#)
-                      (if (let ((#{x _hoQGWMnyQPAh3k2jhWKQF}#
-                                  (car #{ids _hoQGWMnyQPAh3k2jhWKP6}#)))
-                            (if (symbol? #{x _hoQGWMnyQPAh3k2jhWKQF}#)
+               ((#{all-ids? -ANAU$bmvAmthP7L7xwqJT}#
+                  (lambda (#{ids -ANAU$bmvAmthP7L7xwqL1}#)
+                    (if (null? #{ids -ANAU$bmvAmthP7L7xwqL1}#)
+                      (null? #{ids -ANAU$bmvAmthP7L7xwqL1}#)
+                      (if (let ((#{x -ANAU$bmvAmthP7L7xwqMA}#
+                                  (car #{ids -ANAU$bmvAmthP7L7xwqL1}#)))
+                            (if (symbol? #{x -ANAU$bmvAmthP7L7xwqMA}#)
                               #t
-                              (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWKQF}#)
+                              (if (if (vector? #{x -ANAU$bmvAmthP7L7xwqMA}#)
                                     (if (= (vector-length
-                                             #{x _hoQGWMnyQPAh3k2jhWKQF}#)
+                                             #{x -ANAU$bmvAmthP7L7xwqMA}#)
                                            4)
                                       (eq? (vector-ref
-                                             #{x _hoQGWMnyQPAh3k2jhWKQF}#
+                                             #{x -ANAU$bmvAmthP7L7xwqMA}#
                                              0)
                                            'syntax-object)
                                       #f)
                                     #f)
                                 (symbol?
-                                  (vector-ref #{x _hoQGWMnyQPAh3k2jhWKQF}# 1))
+                                  (vector-ref #{x -ANAU$bmvAmthP7L7xwqMA}# 1))
                                 #f)))
-                        (#{all-ids? _hoQGWMnyQPAh3k2jhWKNY}#
-                          (cdr #{ids _hoQGWMnyQPAh3k2jhWKP6}#))
+                        (#{all-ids? -ANAU$bmvAmthP7L7xwqJT}#
+                          (cdr #{ids -ANAU$bmvAmthP7L7xwqL1}#))
                         #f)))))
-               (#{all-ids? _hoQGWMnyQPAh3k2jhWKNY}#
-                 #{ids _hoQGWMnyQPAh3k2jhWKNX}#))
-           (#{distinct-bound-ids? _hoQGWMnyQPAh3k2jhWHTc}#
-             #{ids _hoQGWMnyQPAh3k2jhWKNX}#)
+               (#{all-ids? -ANAU$bmvAmthP7L7xwqJT}#
+                 #{ids -ANAU$bmvAmthP7L7xwqJS}#))
+           (#{distinct-bound-ids? -ANAU$bmvAmthP7L7xwnN7}#
+             #{ids -ANAU$bmvAmthP7L7xwqJS}#)
            #f)))
-     (#{distinct-bound-ids? _hoQGWMnyQPAh3k2jhWHTc}#
-       (lambda (#{ids _hoQGWMnyQPAh3k2jhWKSF}#)
+     (#{distinct-bound-ids? -ANAU$bmvAmthP7L7xwnN7}#
+       (lambda (#{ids -ANAU$bmvAmthP7L7xwqOA}#)
          (letrec*
-           ((#{distinct? _hoQGWMnyQPAh3k2jhWKSG}#
-              (lambda (#{ids _hoQGWMnyQPAh3k2jhWKT2}#)
-                (if (null? #{ids _hoQGWMnyQPAh3k2jhWKT2}#)
-                  (null? #{ids _hoQGWMnyQPAh3k2jhWKT2}#)
-                  (if (not (#{bound-id-member? _hoQGWMnyQPAh3k2jhWHTd}#
-                             (car #{ids _hoQGWMnyQPAh3k2jhWKT2}#)
-                             (cdr #{ids _hoQGWMnyQPAh3k2jhWKT2}#)))
-                    (#{distinct? _hoQGWMnyQPAh3k2jhWKSG}#
-                      (cdr #{ids _hoQGWMnyQPAh3k2jhWKT2}#))
+           ((#{distinct? -ANAU$bmvAmthP7L7xwqOB}#
+              (lambda (#{ids -ANAU$bmvAmthP7L7xwqPx}#)
+                (if (null? #{ids -ANAU$bmvAmthP7L7xwqPx}#)
+                  (null? #{ids -ANAU$bmvAmthP7L7xwqPx}#)
+                  (if (not (#{bound-id-member? -ANAU$bmvAmthP7L7xwnN8}#
+                             (car #{ids -ANAU$bmvAmthP7L7xwqPx}#)
+                             (cdr #{ids -ANAU$bmvAmthP7L7xwqPx}#)))
+                    (#{distinct? -ANAU$bmvAmthP7L7xwqOB}#
+                      (cdr #{ids -ANAU$bmvAmthP7L7xwqPx}#))
                     #f)))))
-           (#{distinct? _hoQGWMnyQPAh3k2jhWKSG}#
-             #{ids _hoQGWMnyQPAh3k2jhWKSF}#))))
-     (#{bound-id-member? _hoQGWMnyQPAh3k2jhWHTd}#
-       (lambda (#{x _hoQGWMnyQPAh3k2jhWKXI}#
-                #{list _hoQGWMnyQPAh3k2jhWKXJ}#)
-         (if (not (null? #{list _hoQGWMnyQPAh3k2jhWKXJ}#))
-           (let ((#{t _hoQGWMnyQPAh3k2jhWKXK}#
-                   (let ((#{j _hoQGWMnyQPAh3k2jhWKYb}#
-                           (car #{list _hoQGWMnyQPAh3k2jhWKXJ}#)))
-                     (if (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWKXI}#)
+           (#{distinct? -ANAU$bmvAmthP7L7xwqOB}#
+             #{ids -ANAU$bmvAmthP7L7xwqOA}#))))
+     (#{bound-id-member? -ANAU$bmvAmthP7L7xwnN8}#
+       (lambda (#{x -ANAU$bmvAmthP7L7xwqTD}#
+                #{list -ANAU$bmvAmthP7L7xwqTE}#)
+         (if (not (null? #{list -ANAU$bmvAmthP7L7xwqTE}#))
+           (let ((#{t -ANAU$bmvAmthP7L7xwqTF}#
+                   (let ((#{j -ANAU$bmvAmthP7L7xwqUW}#
+                           (car #{list -ANAU$bmvAmthP7L7xwqTE}#)))
+                     (if (if (if (vector? #{x -ANAU$bmvAmthP7L7xwqTD}#)
                                (if (= (vector-length
-                                        #{x _hoQGWMnyQPAh3k2jhWKXI}#)
+                                        #{x -ANAU$bmvAmthP7L7xwqTD}#)
                                       4)
                                  (eq? (vector-ref
-                                        #{x _hoQGWMnyQPAh3k2jhWKXI}#
+                                        #{x -ANAU$bmvAmthP7L7xwqTD}#
                                         0)
                                       'syntax-object)
                                  #f)
                                #f)
-                           (if (vector? #{j _hoQGWMnyQPAh3k2jhWKYb}#)
+                           (if (vector? #{j -ANAU$bmvAmthP7L7xwqUW}#)
                              (if (= (vector-length
-                                      #{j _hoQGWMnyQPAh3k2jhWKYb}#)
+                                      #{j -ANAU$bmvAmthP7L7xwqUW}#)
                                     4)
-                               (eq? (vector-ref #{j _hoQGWMnyQPAh3k2jhWKYb}# 0)
+                               (eq? (vector-ref #{j -ANAU$bmvAmthP7L7xwqUW}# 0)
                                     'syntax-object)
                                #f)
                              #f)
                            #f)
-                       (if (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWKXI}# 1)
-                                (vector-ref #{j _hoQGWMnyQPAh3k2jhWKYb}# 1))
-                         (#{same-marks? _hoQGWMnyQPAh3k2jhWHTT}#
-                           (car (vector-ref #{x _hoQGWMnyQPAh3k2jhWKXI}# 2))
-                           (car (vector-ref #{j _hoQGWMnyQPAh3k2jhWKYb}# 2)))
+                       (if (eq? (vector-ref #{x -ANAU$bmvAmthP7L7xwqTD}# 1)
+                                (vector-ref #{j -ANAU$bmvAmthP7L7xwqUW}# 1))
+                         (#{same-marks? -ANAU$bmvAmthP7L7xwnNy}#
+                           (car (vector-ref #{x -ANAU$bmvAmthP7L7xwqTD}# 2))
+                           (car (vector-ref #{j -ANAU$bmvAmthP7L7xwqUW}# 2)))
                          #f)
-                       (eq? #{x _hoQGWMnyQPAh3k2jhWKXI}#
-                            #{j _hoQGWMnyQPAh3k2jhWKYb}#)))))
-             (if #{t _hoQGWMnyQPAh3k2jhWKXK}#
-               #{t _hoQGWMnyQPAh3k2jhWKXK}#
-               (#{bound-id-member? _hoQGWMnyQPAh3k2jhWHTd}#
-                 #{x _hoQGWMnyQPAh3k2jhWKXI}#
-                 (cdr #{list _hoQGWMnyQPAh3k2jhWKXJ}#))))
+                       (eq? #{x -ANAU$bmvAmthP7L7xwqTD}#
+                            #{j -ANAU$bmvAmthP7L7xwqUW}#)))))
+             (if #{t -ANAU$bmvAmthP7L7xwqTF}#
+               #{t -ANAU$bmvAmthP7L7xwqTF}#
+               (#{bound-id-member? -ANAU$bmvAmthP7L7xwnN8}#
+                 #{x -ANAU$bmvAmthP7L7xwqTD}#
+                 (cdr #{list -ANAU$bmvAmthP7L7xwqTE}#))))
            #f)))
-     (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-       (lambda (#{x _hoQGWMnyQPAh3k2jhWKZH}#
-                #{w _hoQGWMnyQPAh3k2jhWKZI}#
-                #{defmod _hoQGWMnyQPAh3k2jhWKZJ}#)
-         (if (if (null? (car #{w _hoQGWMnyQPAh3k2jhWKZI}#))
-               (null? (cdr #{w _hoQGWMnyQPAh3k2jhWKZI}#))
+     (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+       (lambda (#{x -ANAU$bmvAmthP7L7xwqVC}#
+                #{w -ANAU$bmvAmthP7L7xwqVD}#
+                #{defmod -ANAU$bmvAmthP7L7xwqVE}#)
+         (if (if (null? (car #{w -ANAU$bmvAmthP7L7xwqVD}#))
+               (null? (cdr #{w -ANAU$bmvAmthP7L7xwqVD}#))
                #f)
-           #{x _hoQGWMnyQPAh3k2jhWKZH}#
-           (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWKZH}#)
-                 (if (= (vector-length #{x _hoQGWMnyQPAh3k2jhWKZH}#)
+           #{x -ANAU$bmvAmthP7L7xwqVC}#
+           (if (if (vector? #{x -ANAU$bmvAmthP7L7xwqVC}#)
+                 (if (= (vector-length #{x -ANAU$bmvAmthP7L7xwqVC}#)
                         4)
-                   (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWKZH}# 0)
+                   (eq? (vector-ref #{x -ANAU$bmvAmthP7L7xwqVC}# 0)
                         'syntax-object)
                    #f)
                  #f)
-             (let ((#{expression _hoQGWMnyQPAh3k2jhWKZX}#
-                     (vector-ref #{x _hoQGWMnyQPAh3k2jhWKZH}# 1))
-                   (#{wrap _hoQGWMnyQPAh3k2jhWKZY}#
-                     (#{join-wraps _hoQGWMnyQPAh3k2jhWHTR}#
-                       #{w _hoQGWMnyQPAh3k2jhWKZI}#
-                       (vector-ref #{x _hoQGWMnyQPAh3k2jhWKZH}# 2)))
-                   (#{module _hoQGWMnyQPAh3k2jhWKZZ}#
-                     (vector-ref #{x _hoQGWMnyQPAh3k2jhWKZH}# 3)))
+             (let ((#{expression -ANAU$bmvAmthP7L7xwqVS}#
+                     (vector-ref #{x -ANAU$bmvAmthP7L7xwqVC}# 1))
+                   (#{wrap -ANAU$bmvAmthP7L7xwqVT}#
+                     (#{join-wraps -ANAU$bmvAmthP7L7xwnNw}#
+                       #{w -ANAU$bmvAmthP7L7xwqVD}#
+                       (vector-ref #{x -ANAU$bmvAmthP7L7xwqVC}# 2)))
+                   (#{module -ANAU$bmvAmthP7L7xwqVU}#
+                     (vector-ref #{x -ANAU$bmvAmthP7L7xwqVC}# 3)))
                (vector
                  'syntax-object
-                 #{expression _hoQGWMnyQPAh3k2jhWKZX}#
-                 #{wrap _hoQGWMnyQPAh3k2jhWKZY}#
-                 #{module _hoQGWMnyQPAh3k2jhWKZZ}#))
-             (if (null? #{x _hoQGWMnyQPAh3k2jhWKZH}#)
-               #{x _hoQGWMnyQPAh3k2jhWKZH}#
+                 #{expression -ANAU$bmvAmthP7L7xwqVS}#
+                 #{wrap -ANAU$bmvAmthP7L7xwqVT}#
+                 #{module -ANAU$bmvAmthP7L7xwqVU}#))
+             (if (null? #{x -ANAU$bmvAmthP7L7xwqVC}#)
+               #{x -ANAU$bmvAmthP7L7xwqVC}#
                (vector
                  'syntax-object
-                 #{x _hoQGWMnyQPAh3k2jhWKZH}#
-                 #{w _hoQGWMnyQPAh3k2jhWKZI}#
-                 #{defmod _hoQGWMnyQPAh3k2jhWKZJ}#))))))
-     (#{source-wrap _hoQGWMnyQPAh3k2jhWHTf}#
-       (lambda (#{x _hoQGWMnyQPAh3k2jhWKZq}#
-                #{w _hoQGWMnyQPAh3k2jhWKZr}#
-                #{s _hoQGWMnyQPAh3k2jhWKZs}#
-                #{defmod _hoQGWMnyQPAh3k2jhWKZt}#)
-         (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                 #{x -ANAU$bmvAmthP7L7xwqVC}#
+                 #{w -ANAU$bmvAmthP7L7xwqVD}#
+                 #{defmod -ANAU$bmvAmthP7L7xwqVE}#))))))
+     (#{source-wrap -ANAU$bmvAmthP7L7xwnN$}#
+       (lambda (#{x -ANAU$bmvAmthP7L7xwqVl}#
+                #{w -ANAU$bmvAmthP7L7xwqVm}#
+                #{s -ANAU$bmvAmthP7L7xwqVn}#
+                #{defmod -ANAU$bmvAmthP7L7xwqVo}#)
+         (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
            (begin
-             (if (if (pair? #{x _hoQGWMnyQPAh3k2jhWKZq}#)
-                   #{s _hoQGWMnyQPAh3k2jhWKZs}#
+             (if (if (pair? #{x -ANAU$bmvAmthP7L7xwqVl}#)
+                   #{s -ANAU$bmvAmthP7L7xwqVn}#
                    #f)
                (set-source-properties!
-                 #{x _hoQGWMnyQPAh3k2jhWKZq}#
-                 #{s _hoQGWMnyQPAh3k2jhWKZs}#))
-             #{x _hoQGWMnyQPAh3k2jhWKZq}#)
-           #{w _hoQGWMnyQPAh3k2jhWKZr}#
-           #{defmod _hoQGWMnyQPAh3k2jhWKZt}#)))
-     (#{expand-sequence _hoQGWMnyQPAh3k2jhWHTg}#
-       (lambda (#{body _hoQGWMnyQPAh3k2jhWMpK}#
-                #{r _hoQGWMnyQPAh3k2jhWMpL}#
-                #{w _hoQGWMnyQPAh3k2jhWMpM}#
-                #{s _hoQGWMnyQPAh3k2jhWMpN}#
-                #{mod _hoQGWMnyQPAh3k2jhWMpO}#)
-         (#{build-sequence _hoQGWMnyQPAh3k2jhWHSu}#
-           #{s _hoQGWMnyQPAh3k2jhWMpN}#
+                 #{x -ANAU$bmvAmthP7L7xwqVl}#
+                 #{s -ANAU$bmvAmthP7L7xwqVn}#))
+             #{x -ANAU$bmvAmthP7L7xwqVl}#)
+           #{w -ANAU$bmvAmthP7L7xwqVm}#
+           #{defmod -ANAU$bmvAmthP7L7xwqVo}#)))
+     (#{expand-sequence -ANAU$bmvAmthP7L7xwnN@}#
+       (lambda (#{body -ANAU$bmvAmthP7L7xwsvr}#
+                #{r -ANAU$bmvAmthP7L7xwsvs}#
+                #{w -ANAU$bmvAmthP7L7xwsvt}#
+                #{s -ANAU$bmvAmthP7L7xwsvu}#
+                #{mod -ANAU$bmvAmthP7L7xwsvv}#)
+         (#{build-sequence -ANAU$bmvAmthP7L7xwnNN}#
+           #{s -ANAU$bmvAmthP7L7xwsvu}#
            (letrec*
-             ((#{dobody _hoQGWMnyQPAh3k2jhWMqe}#
-                (lambda (#{body _hoQGWMnyQPAh3k2jhWMv8}#
-                         #{r _hoQGWMnyQPAh3k2jhWMv9}#
-                         #{w _hoQGWMnyQPAh3k2jhWMv$}#
-                         #{mod _hoQGWMnyQPAh3k2jhWMv@}#)
-                  (if (null? #{body _hoQGWMnyQPAh3k2jhWMv8}#)
+             ((#{dobody -ANAU$bmvAmthP7L7xwsw@}#
+                (lambda (#{body -ANAU$bmvAmthP7L7xws2d}#
+                         #{r -ANAU$bmvAmthP7L7xws2e}#
+                         #{w -ANAU$bmvAmthP7L7xws2f}#
+                         #{mod -ANAU$bmvAmthP7L7xws2g}#)
+                  (if (null? #{body -ANAU$bmvAmthP7L7xws2d}#)
                     '()
-                    (let ((#{first _hoQGWMnyQPAh3k2jhWMwA}#
-                            (let ((#{e _hoQGWMnyQPAh3k2jhWMwE}#
-                                    (car #{body _hoQGWMnyQPAh3k2jhWMv8}#)))
+                    (let ((#{first -ANAU$bmvAmthP7L7xws2h}#
+                            (let ((#{e -ANAU$bmvAmthP7L7xws2l}#
+                                    (car #{body -ANAU$bmvAmthP7L7xws2d}#)))
                               (call-with-values
                                 (lambda ()
-                                  (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-                                    #{e _hoQGWMnyQPAh3k2jhWMwE}#
-                                    #{r _hoQGWMnyQPAh3k2jhWMv9}#
-                                    #{w _hoQGWMnyQPAh3k2jhWMv$}#
-                                    (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-                                      #{e _hoQGWMnyQPAh3k2jhWMwE}#)
+                                  (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+                                    #{e -ANAU$bmvAmthP7L7xws2l}#
+                                    #{r -ANAU$bmvAmthP7L7xws2e}#
+                                    #{w -ANAU$bmvAmthP7L7xws2f}#
+                                    (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+                                      #{e -ANAU$bmvAmthP7L7xws2l}#)
                                     #f
-                                    #{mod _hoQGWMnyQPAh3k2jhWMv@}#
+                                    #{mod -ANAU$bmvAmthP7L7xws2g}#
                                     #f))
-                                (lambda (#{type _hoQGWMnyQPAh3k2jhWMwL}#
-                                         #{value _hoQGWMnyQPAh3k2jhWMwM}#
-                                         #{e _hoQGWMnyQPAh3k2jhWMwN}#
-                                         #{w _hoQGWMnyQPAh3k2jhWMwO}#
-                                         #{s _hoQGWMnyQPAh3k2jhWMwP}#
-                                         #{mod _hoQGWMnyQPAh3k2jhWMwQ}#)
-                                  (#{expand-expr _hoQGWMnyQPAh3k2jhWHTm}#
-                                    #{type _hoQGWMnyQPAh3k2jhWMwL}#
-                                    #{value _hoQGWMnyQPAh3k2jhWMwM}#
-                                    #{e _hoQGWMnyQPAh3k2jhWMwN}#
-                                    #{r _hoQGWMnyQPAh3k2jhWMv9}#
-                                    #{w _hoQGWMnyQPAh3k2jhWMwO}#
-                                    #{s _hoQGWMnyQPAh3k2jhWMwP}#
-                                    #{mod _hoQGWMnyQPAh3k2jhWMwQ}#))))))
-                      (cons #{first _hoQGWMnyQPAh3k2jhWMwA}#
-                            (#{dobody _hoQGWMnyQPAh3k2jhWMqe}#
-                              (cdr #{body _hoQGWMnyQPAh3k2jhWMv8}#)
-                              #{r _hoQGWMnyQPAh3k2jhWMv9}#
-                              #{w _hoQGWMnyQPAh3k2jhWMv$}#
-                              #{mod _hoQGWMnyQPAh3k2jhWMv@}#)))))))
-             (#{dobody _hoQGWMnyQPAh3k2jhWMqe}#
-               #{body _hoQGWMnyQPAh3k2jhWMpK}#
-               #{r _hoQGWMnyQPAh3k2jhWMpL}#
-               #{w _hoQGWMnyQPAh3k2jhWMpM}#
-               #{mod _hoQGWMnyQPAh3k2jhWMpO}#)))))
-     (#{expand-top-sequence _hoQGWMnyQPAh3k2jhWHTh}#
-       (lambda (#{body _hoQGWMnyQPAh3k2jhWKZ@}#
-                #{r _hoQGWMnyQPAh3k2jhWKaA}#
-                #{w _hoQGWMnyQPAh3k2jhWKaB}#
-                #{s _hoQGWMnyQPAh3k2jhWKaC}#
-                #{m _hoQGWMnyQPAh3k2jhWKaD}#
-                #{esew _hoQGWMnyQPAh3k2jhWKaE}#
-                #{mod _hoQGWMnyQPAh3k2jhWKaF}#)
+                                (lambda (#{type -ANAU$bmvAmthP7L7xws2s}#
+                                         #{value -ANAU$bmvAmthP7L7xws2t}#
+                                         #{e -ANAU$bmvAmthP7L7xws2u}#
+                                         #{w -ANAU$bmvAmthP7L7xws2v}#
+                                         #{s -ANAU$bmvAmthP7L7xws2w}#
+                                         #{mod -ANAU$bmvAmthP7L7xws2x}#)
+                                  (#{expand-expr -ANAU$bmvAmthP7L7xwnOF}#
+                                    #{type -ANAU$bmvAmthP7L7xws2s}#
+                                    #{value -ANAU$bmvAmthP7L7xws2t}#
+                                    #{e -ANAU$bmvAmthP7L7xws2u}#
+                                    #{r -ANAU$bmvAmthP7L7xws2e}#
+                                    #{w -ANAU$bmvAmthP7L7xws2v}#
+                                    #{s -ANAU$bmvAmthP7L7xws2w}#
+                                    #{mod -ANAU$bmvAmthP7L7xws2x}#))))))
+                      (cons #{first -ANAU$bmvAmthP7L7xws2h}#
+                            (#{dobody -ANAU$bmvAmthP7L7xwsw@}#
+                              (cdr #{body -ANAU$bmvAmthP7L7xws2d}#)
+                              #{r -ANAU$bmvAmthP7L7xws2e}#
+                              #{w -ANAU$bmvAmthP7L7xws2f}#
+                              #{mod -ANAU$bmvAmthP7L7xws2g}#)))))))
+             (#{dobody -ANAU$bmvAmthP7L7xwsw@}#
+               #{body -ANAU$bmvAmthP7L7xwsvr}#
+               #{r -ANAU$bmvAmthP7L7xwsvs}#
+               #{w -ANAU$bmvAmthP7L7xwsvt}#
+               #{mod -ANAU$bmvAmthP7L7xwsvv}#)))))
+     (#{expand-top-sequence -ANAU$bmvAmthP7L7xwnOA}#
+       (lambda (#{body -ANAU$bmvAmthP7L7xwqV6}#
+                #{r -ANAU$bmvAmthP7L7xwqV7}#
+                #{w -ANAU$bmvAmthP7L7xwqV8}#
+                #{s -ANAU$bmvAmthP7L7xwqV9}#
+                #{m -ANAU$bmvAmthP7L7xwqV$}#
+                #{esew -ANAU$bmvAmthP7L7xwqV@}#
+                #{mod -ANAU$bmvAmthP7L7xwqWA}#)
          (letrec*
-           ((#{scan _hoQGWMnyQPAh3k2jhWKaG}#
-              (lambda (#{body _hoQGWMnyQPAh3k2jhWKcJ}#
-                       #{r _hoQGWMnyQPAh3k2jhWKcK}#
-                       #{w _hoQGWMnyQPAh3k2jhWKcL}#
-                       #{s _hoQGWMnyQPAh3k2jhWKcM}#
-                       #{m _hoQGWMnyQPAh3k2jhWKcN}#
-                       #{esew _hoQGWMnyQPAh3k2jhWKcO}#
-                       #{mod _hoQGWMnyQPAh3k2jhWKcP}#
-                       #{exps _hoQGWMnyQPAh3k2jhWKcQ}#)
-                (if (null? #{body _hoQGWMnyQPAh3k2jhWKcJ}#)
-                  #{exps _hoQGWMnyQPAh3k2jhWKcQ}#
+           ((#{scan -ANAU$bmvAmthP7L7xwqWB}#
+              (lambda (#{body -ANAU$bmvAmthP7L7xwqYE}#
+                       #{r -ANAU$bmvAmthP7L7xwqYF}#
+                       #{w -ANAU$bmvAmthP7L7xwqYG}#
+                       #{s -ANAU$bmvAmthP7L7xwqYH}#
+                       #{m -ANAU$bmvAmthP7L7xwqYI}#
+                       #{esew -ANAU$bmvAmthP7L7xwqYJ}#
+                       #{mod -ANAU$bmvAmthP7L7xwqYK}#
+                       #{exps -ANAU$bmvAmthP7L7xwqYL}#)
+                (if (null? #{body -ANAU$bmvAmthP7L7xwqYE}#)
+                  #{exps -ANAU$bmvAmthP7L7xwqYL}#
                   (call-with-values
                     (lambda ()
                       (call-with-values
                         (lambda ()
-                          (let ((#{e _hoQGWMnyQPAh3k2jhWKcR}#
-                                  (car #{body _hoQGWMnyQPAh3k2jhWKcJ}#)))
-                            (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-                              #{e _hoQGWMnyQPAh3k2jhWKcR}#
-                              #{r _hoQGWMnyQPAh3k2jhWKcK}#
-                              #{w _hoQGWMnyQPAh3k2jhWKcL}#
-                              (let ((#{t _hoQGWMnyQPAh3k2jhWKcV}#
-                                      (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-                                        #{e _hoQGWMnyQPAh3k2jhWKcR}#)))
-                                (if #{t _hoQGWMnyQPAh3k2jhWKcV}#
-                                  #{t _hoQGWMnyQPAh3k2jhWKcV}#
-                                  #{s _hoQGWMnyQPAh3k2jhWKcM}#))
+                          (let ((#{e -ANAU$bmvAmthP7L7xwqYM}#
+                                  (car #{body -ANAU$bmvAmthP7L7xwqYE}#)))
+                            (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+                              #{e -ANAU$bmvAmthP7L7xwqYM}#
+                              #{r -ANAU$bmvAmthP7L7xwqYF}#
+                              #{w -ANAU$bmvAmthP7L7xwqYG}#
+                              (let ((#{t -ANAU$bmvAmthP7L7xwqYQ}#
+                                      (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+                                        #{e -ANAU$bmvAmthP7L7xwqYM}#)))
+                                (if #{t -ANAU$bmvAmthP7L7xwqYQ}#
+                                  #{t -ANAU$bmvAmthP7L7xwqYQ}#
+                                  #{s -ANAU$bmvAmthP7L7xwqYH}#))
                               #f
-                              #{mod _hoQGWMnyQPAh3k2jhWKcP}#
+                              #{mod -ANAU$bmvAmthP7L7xwqYK}#
                               #f)))
-                        (lambda (#{type _hoQGWMnyQPAh3k2jhWKgA}#
-                                 #{value _hoQGWMnyQPAh3k2jhWKgB}#
-                                 #{e _hoQGWMnyQPAh3k2jhWKgC}#
-                                 #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                 #{s _hoQGWMnyQPAh3k2jhWKgE}#
-                                 #{mod _hoQGWMnyQPAh3k2jhWKgF}#)
-                          (if (eqv? #{type _hoQGWMnyQPAh3k2jhWKgA}#
+                        (lambda (#{type -ANAU$bmvAmthP7L7xwqb7}#
+                                 #{value -ANAU$bmvAmthP7L7xwqb8}#
+                                 #{e -ANAU$bmvAmthP7L7xwqb9}#
+                                 #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                 #{s -ANAU$bmvAmthP7L7xwqb@}#
+                                 #{mod -ANAU$bmvAmthP7L7xwqcA}#)
+                          (if (eqv? #{type -ANAU$bmvAmthP7L7xwqb7}#
                                     'begin-form)
-                            (let ((#{tmp _hoQGWMnyQPAh3k2jhWKgK}#
+                            (let ((#{tmp -ANAU$bmvAmthP7L7xwqcF}#
                                     ($sc-dispatch
-                                      #{e _hoQGWMnyQPAh3k2jhWKgC}#
+                                      #{e -ANAU$bmvAmthP7L7xwqb9}#
                                       '(_))))
-                              (if #{tmp _hoQGWMnyQPAh3k2jhWKgK}#
+                              (if #{tmp -ANAU$bmvAmthP7L7xwqcF}#
                                 (@apply
-                                  (lambda () #{exps _hoQGWMnyQPAh3k2jhWKcQ}#)
-                                  #{tmp _hoQGWMnyQPAh3k2jhWKgK}#)
-                                (let ((#{tmp _hoQGWMnyQPAh3k2jhWKgO}#
+                                  (lambda () #{exps -ANAU$bmvAmthP7L7xwqYL}#)
+                                  #{tmp -ANAU$bmvAmthP7L7xwqcF}#)
+                                (let ((#{tmp -ANAU$bmvAmthP7L7xwqcJ}#
                                         ($sc-dispatch
-                                          #{e _hoQGWMnyQPAh3k2jhWKgC}#
+                                          #{e -ANAU$bmvAmthP7L7xwqb9}#
                                           '(_ any . each-any))))
-                                  (if #{tmp _hoQGWMnyQPAh3k2jhWKgO}#
+                                  (if #{tmp -ANAU$bmvAmthP7L7xwqcJ}#
                                     (@apply
-                                      (lambda (#{e1 _hoQGWMnyQPAh3k2jhWKgS}#
-                                               #{e2 _hoQGWMnyQPAh3k2jhWKgT}#)
-                                        (#{scan _hoQGWMnyQPAh3k2jhWKaG}#
-                                          (cons #{e1 _hoQGWMnyQPAh3k2jhWKgS}#
-                                                #{e2 _hoQGWMnyQPAh3k2jhWKgT}#)
-                                          #{r _hoQGWMnyQPAh3k2jhWKcK}#
-                                          #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                          #{s _hoQGWMnyQPAh3k2jhWKgE}#
-                                          #{m _hoQGWMnyQPAh3k2jhWKcN}#
-                                          #{esew _hoQGWMnyQPAh3k2jhWKcO}#
-                                          #{mod _hoQGWMnyQPAh3k2jhWKgF}#
-                                          #{exps _hoQGWMnyQPAh3k2jhWKcQ}#))
-                                      #{tmp _hoQGWMnyQPAh3k2jhWKgO}#)
+                                      (lambda (#{e1 -ANAU$bmvAmthP7L7xwqcN}#
+                                               #{e2 -ANAU$bmvAmthP7L7xwqcO}#)
+                                        (#{scan -ANAU$bmvAmthP7L7xwqWB}#
+                                          (cons #{e1 -ANAU$bmvAmthP7L7xwqcN}#
+                                                #{e2 -ANAU$bmvAmthP7L7xwqcO}#)
+                                          #{r -ANAU$bmvAmthP7L7xwqYF}#
+                                          #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                          #{s -ANAU$bmvAmthP7L7xwqb@}#
+                                          #{m -ANAU$bmvAmthP7L7xwqYI}#
+                                          #{esew -ANAU$bmvAmthP7L7xwqYJ}#
+                                          #{mod -ANAU$bmvAmthP7L7xwqcA}#
+                                          #{exps -ANAU$bmvAmthP7L7xwqYL}#))
+                                      #{tmp -ANAU$bmvAmthP7L7xwqcJ}#)
                                     (syntax-violation
                                       #f
                                       "source expression failed to match any pattern"
-                                      #{e _hoQGWMnyQPAh3k2jhWKgC}#)))))
-                            (if (eqv? #{type _hoQGWMnyQPAh3k2jhWKgA}#
+                                      #{e -ANAU$bmvAmthP7L7xwqb9}#)))))
+                            (if (eqv? #{type -ANAU$bmvAmthP7L7xwqb7}#
                                       'local-syntax-form)
-                              (#{expand-local-syntax _hoQGWMnyQPAh3k2jhWHTq}#
-                                #{value _hoQGWMnyQPAh3k2jhWKgB}#
-                                #{e _hoQGWMnyQPAh3k2jhWKgC}#
-                                #{r _hoQGWMnyQPAh3k2jhWKcK}#
-                                #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                #{s _hoQGWMnyQPAh3k2jhWKgE}#
-                                #{mod _hoQGWMnyQPAh3k2jhWKgF}#
-                                (lambda (#{body _hoQGWMnyQPAh3k2jhWKgi}#
-                                         #{r _hoQGWMnyQPAh3k2jhWKgj}#
-                                         #{w _hoQGWMnyQPAh3k2jhWKgk}#
-                                         #{s _hoQGWMnyQPAh3k2jhWKgl}#
-                                         #{mod _hoQGWMnyQPAh3k2jhWKgm}#)
-                                  (#{scan _hoQGWMnyQPAh3k2jhWKaG}#
-                                    #{body _hoQGWMnyQPAh3k2jhWKgi}#
-                                    #{r _hoQGWMnyQPAh3k2jhWKgj}#
-                                    #{w _hoQGWMnyQPAh3k2jhWKgk}#
-                                    #{s _hoQGWMnyQPAh3k2jhWKgl}#
-                                    #{m _hoQGWMnyQPAh3k2jhWKcN}#
-                                    #{esew _hoQGWMnyQPAh3k2jhWKcO}#
-                                    #{mod _hoQGWMnyQPAh3k2jhWKgm}#
-                                    #{exps _hoQGWMnyQPAh3k2jhWKcQ}#)))
-                              (if (eqv? #{type _hoQGWMnyQPAh3k2jhWKgA}#
+                              (#{expand-local-syntax -ANAU$bmvAmthP7L7xwnOJ}#
+                                #{value -ANAU$bmvAmthP7L7xwqb8}#
+                                #{e -ANAU$bmvAmthP7L7xwqb9}#
+                                #{r -ANAU$bmvAmthP7L7xwqYF}#
+                                #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                #{s -ANAU$bmvAmthP7L7xwqb@}#
+                                #{mod -ANAU$bmvAmthP7L7xwqcA}#
+                                (lambda (#{body -ANAU$bmvAmthP7L7xwqcd}#
+                                         #{r -ANAU$bmvAmthP7L7xwqce}#
+                                         #{w -ANAU$bmvAmthP7L7xwqcf}#
+                                         #{s -ANAU$bmvAmthP7L7xwqcg}#
+                                         #{mod -ANAU$bmvAmthP7L7xwqch}#)
+                                  (#{scan -ANAU$bmvAmthP7L7xwqWB}#
+                                    #{body -ANAU$bmvAmthP7L7xwqcd}#
+                                    #{r -ANAU$bmvAmthP7L7xwqce}#
+                                    #{w -ANAU$bmvAmthP7L7xwqcf}#
+                                    #{s -ANAU$bmvAmthP7L7xwqcg}#
+                                    #{m -ANAU$bmvAmthP7L7xwqYI}#
+                                    #{esew -ANAU$bmvAmthP7L7xwqYJ}#
+                                    #{mod -ANAU$bmvAmthP7L7xwqch}#
+                                    #{exps -ANAU$bmvAmthP7L7xwqYL}#)))
+                              (if (eqv? #{type -ANAU$bmvAmthP7L7xwqb7}#
                                         'eval-when-form)
-                                (let ((#{tmp _hoQGWMnyQPAh3k2jhWKgr}#
+                                (let ((#{tmp -ANAU$bmvAmthP7L7xwqcm}#
                                         ($sc-dispatch
-                                          #{e _hoQGWMnyQPAh3k2jhWKgC}#
+                                          #{e -ANAU$bmvAmthP7L7xwqb9}#
                                           '(_ each-any any . each-any))))
-                                  (if #{tmp _hoQGWMnyQPAh3k2jhWKgr}#
+                                  (if #{tmp -ANAU$bmvAmthP7L7xwqcm}#
                                     (@apply
-                                      (lambda (#{x _hoQGWMnyQPAh3k2jhWKgv}#
-                                               #{e1 _hoQGWMnyQPAh3k2jhWKgw}#
-                                               #{e2 _hoQGWMnyQPAh3k2jhWKgx}#)
-                                        (let ((#{when-list _hoQGWMnyQPAh3k2jhWKgy}#
-                                                (#{parse-when-list _hoQGWMnyQPAh3k2jhWHTj}#
-                                                  #{e _hoQGWMnyQPAh3k2jhWKgC}#
-                                                  #{x _hoQGWMnyQPAh3k2jhWKgv}#))
-                                              (#{body _hoQGWMnyQPAh3k2jhWKgz}#
-                                                (cons #{e1 _hoQGWMnyQPAh3k2jhWKgw}#
-                                                      #{e2 _hoQGWMnyQPAh3k2jhWKgx}#)))
-                                          (if (eq? #{m _hoQGWMnyQPAh3k2jhWKcN}#
+                                      (lambda (#{x -ANAU$bmvAmthP7L7xwqcq}#
+                                               #{e1 -ANAU$bmvAmthP7L7xwqcr}#
+                                               #{e2 -ANAU$bmvAmthP7L7xwqcs}#)
+                                        (let ((#{when-list -ANAU$bmvAmthP7L7xwqct}#
+                                                (#{parse-when-list -ANAU$bmvAmthP7L7xwnOC}#
+                                                  #{e -ANAU$bmvAmthP7L7xwqb9}#
+                                                  #{x -ANAU$bmvAmthP7L7xwqcq}#))
+                                              (#{body -ANAU$bmvAmthP7L7xwqcu}#
+                                                (cons #{e1 -ANAU$bmvAmthP7L7xwqcr}#
+                                                      #{e2 -ANAU$bmvAmthP7L7xwqcs}#)))
+                                          (if (eq? #{m -ANAU$bmvAmthP7L7xwqYI}#
                                                    'e)
                                             (if (memq 'eval
-                                                      #{when-list _hoQGWMnyQPAh3k2jhWKgy}#)
-                                              (#{scan _hoQGWMnyQPAh3k2jhWKaG}#
-                                                #{body _hoQGWMnyQPAh3k2jhWKgz}#
-                                                #{r _hoQGWMnyQPAh3k2jhWKcK}#
-                                                #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                                #{s _hoQGWMnyQPAh3k2jhWKgE}#
+                                                      #{when-list -ANAU$bmvAmthP7L7xwqct}#)
+                                              (#{scan -ANAU$bmvAmthP7L7xwqWB}#
+                                                #{body -ANAU$bmvAmthP7L7xwqcu}#
+                                                #{r -ANAU$bmvAmthP7L7xwqYF}#
+                                                #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                                #{s -ANAU$bmvAmthP7L7xwqb@}#
                                                 (if (memq 'expand
-                                                          #{when-list _hoQGWMnyQPAh3k2jhWKgy}#)
+                                                          #{when-list -ANAU$bmvAmthP7L7xwqct}#)
                                                   'c&e
                                                   'e)
                                                 '(eval)
-                                                #{mod _hoQGWMnyQPAh3k2jhWKgF}#
-                                                #{exps _hoQGWMnyQPAh3k2jhWKcQ}#)
+                                                #{mod -ANAU$bmvAmthP7L7xwqcA}#
+                                                #{exps -ANAU$bmvAmthP7L7xwqYL}#)
                                               (begin
                                                 (if (memq 'expand
-                                                          #{when-list _hoQGWMnyQPAh3k2jhWKgy}#)
-                                                  (let ((#{x _hoQGWMnyQPAh3k2jhWKiA}#
-                                                          (#{expand-top-sequence _hoQGWMnyQPAh3k2jhWHTh}#
-                                                            #{body _hoQGWMnyQPAh3k2jhWKgz}#
-                                                            #{r _hoQGWMnyQPAh3k2jhWKcK}#
-                                                            #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                                            #{s _hoQGWMnyQPAh3k2jhWKgE}#
+                                                          #{when-list -ANAU$bmvAmthP7L7xwqct}#)
+                                                  (let ((#{x -ANAU$bmvAmthP7L7xwqd7}#
+                                                          (#{expand-top-sequence -ANAU$bmvAmthP7L7xwnOA}#
+                                                            #{body -ANAU$bmvAmthP7L7xwqcu}#
+                                                            #{r -ANAU$bmvAmthP7L7xwqYF}#
+                                                            #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                                            #{s -ANAU$bmvAmthP7L7xwqb@}#
                                                             'e
                                                             '(eval)
-                                                            #{mod _hoQGWMnyQPAh3k2jhWKgF}#)))
+                                                            #{mod -ANAU$bmvAmthP7L7xwqcA}#)))
                                                     (primitive-eval
-                                                      #{x _hoQGWMnyQPAh3k2jhWKiA}#)))
-                                                (values
-                                                  #{exps _hoQGWMnyQPAh3k2jhWKcQ}#)))
+                                                      #{x -ANAU$bmvAmthP7L7xwqd7}#)))
+                                                #{exps -ANAU$bmvAmthP7L7xwqYL}#))
                                             (if (memq 'load
-                                                      #{when-list _hoQGWMnyQPAh3k2jhWKgy}#)
-                                              (if (let ((#{t _hoQGWMnyQPAh3k2jhWKia}#
+                                                      #{when-list -ANAU$bmvAmthP7L7xwqct}#)
+                                              (if (let ((#{t -ANAU$bmvAmthP7L7xwqeV}#
                                                           (memq 'compile
-                                                                #{when-list _hoQGWMnyQPAh3k2jhWKgy}#)))
-                                                    (if #{t _hoQGWMnyQPAh3k2jhWKia}#
-                                                      #{t _hoQGWMnyQPAh3k2jhWKia}#
-                                                      (let ((#{t _hoQGWMnyQPAh3k2jhWKjL}#
+                                                                #{when-list -ANAU$bmvAmthP7L7xwqct}#)))
+                                                    (if #{t -ANAU$bmvAmthP7L7xwqeV}#
+                                                      #{t -ANAU$bmvAmthP7L7xwqeV}#
+                                                      (let ((#{t -ANAU$bmvAmthP7L7xwqfG}#
                                                               (memq 'expand
-                                                                    #{when-list _hoQGWMnyQPAh3k2jhWKgy}#)))
-                                                        (if #{t _hoQGWMnyQPAh3k2jhWKjL}#
-                                                          #{t _hoQGWMnyQPAh3k2jhWKjL}#
-                                                          (if (eq? #{m _hoQGWMnyQPAh3k2jhWKcN}#
+                                                                    #{when-list -ANAU$bmvAmthP7L7xwqct}#)))
+                                                        (if #{t -ANAU$bmvAmthP7L7xwqfG}#
+                                                          #{t -ANAU$bmvAmthP7L7xwqfG}#
+                                                          (if (eq? #{m -ANAU$bmvAmthP7L7xwqYI}#
                                                                    'c&e)
                                                             (memq 'eval
-                                                                  #{when-list _hoQGWMnyQPAh3k2jhWKgy}#)
+                                                                  #{when-list -ANAU$bmvAmthP7L7xwqct}#)
                                                             #f)))))
-                                                (#{scan _hoQGWMnyQPAh3k2jhWKaG}#
-                                                  #{body _hoQGWMnyQPAh3k2jhWKgz}#
-                                                  #{r _hoQGWMnyQPAh3k2jhWKcK}#
-                                                  #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                                  #{s _hoQGWMnyQPAh3k2jhWKgE}#
+                                                (#{scan -ANAU$bmvAmthP7L7xwqWB}#
+                                                  #{body -ANAU$bmvAmthP7L7xwqcu}#
+                                                  #{r -ANAU$bmvAmthP7L7xwqYF}#
+                                                  #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                                  #{s -ANAU$bmvAmthP7L7xwqb@}#
                                                   'c&e
                                                   '(compile load)
-                                                  #{mod _hoQGWMnyQPAh3k2jhWKgF}#
-                                                  #{exps _hoQGWMnyQPAh3k2jhWKcQ}#)
-                                                (if (if (eq? #{m _hoQGWMnyQPAh3k2jhWKcN}#
+                                                  #{mod -ANAU$bmvAmthP7L7xwqcA}#
+                                                  #{exps -ANAU$bmvAmthP7L7xwqYL}#)
+                                                (if (if (eq? #{m -ANAU$bmvAmthP7L7xwqYI}#
                                                              'c)
                                                       #t
-                                                      (eq? #{m _hoQGWMnyQPAh3k2jhWKcN}#
+                                                      (eq? #{m -ANAU$bmvAmthP7L7xwqYI}#
                                                            'c&e))
-                                                  (#{scan _hoQGWMnyQPAh3k2jhWKaG}#
-                                                    #{body _hoQGWMnyQPAh3k2jhWKgz}#
-                                                    #{r _hoQGWMnyQPAh3k2jhWKcK}#
-                                                    #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                                    #{s _hoQGWMnyQPAh3k2jhWKgE}#
+                                                  (#{scan -ANAU$bmvAmthP7L7xwqWB}#
+                                                    #{body -ANAU$bmvAmthP7L7xwqcu}#
+                                                    #{r -ANAU$bmvAmthP7L7xwqYF}#
+                                                    #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                                    #{s -ANAU$bmvAmthP7L7xwqb@}#
                                                     'c
                                                     '(load)
-                                                    #{mod _hoQGWMnyQPAh3k2jhWKgF}#
-                                                    #{exps _hoQGWMnyQPAh3k2jhWKcQ}#)
-                                                  (values
-                                                    #{exps _hoQGWMnyQPAh3k2jhWKcQ}#)))
-                                              (if (let ((#{t _hoQGWMnyQPAh3k2jhWKlM}#
+                                                    #{mod -ANAU$bmvAmthP7L7xwqcA}#
+                                                    #{exps -ANAU$bmvAmthP7L7xwqYL}#)
+                                                  #{exps -ANAU$bmvAmthP7L7xwqYL}#))
+                                              (if (let ((#{t -ANAU$bmvAmthP7L7xwqhH}#
                                                           (memq 'compile
-                                                                #{when-list _hoQGWMnyQPAh3k2jhWKgy}#)))
-                                                    (if #{t _hoQGWMnyQPAh3k2jhWKlM}#
-                                                      #{t _hoQGWMnyQPAh3k2jhWKlM}#
-                                                      (let ((#{t _hoQGWMnyQPAh3k2jhWKl9}#
+                                                                #{when-list -ANAU$bmvAmthP7L7xwqct}#)))
+                                                    (if #{t -ANAU$bmvAmthP7L7xwqhH}#
+                                                      #{t -ANAU$bmvAmthP7L7xwqhH}#
+                                                      (let ((#{t -ANAU$bmvAmthP7L7xwqh4}#
                                                               (memq 'expand
-                                                                    #{when-list _hoQGWMnyQPAh3k2jhWKgy}#)))
-                                                        (if #{t _hoQGWMnyQPAh3k2jhWKl9}#
-                                                          #{t _hoQGWMnyQPAh3k2jhWKl9}#
-                                                          (if (eq? #{m _hoQGWMnyQPAh3k2jhWKcN}#
+                                                                    #{when-list -ANAU$bmvAmthP7L7xwqct}#)))
+                                                        (if #{t -ANAU$bmvAmthP7L7xwqh4}#
+                                                          #{t -ANAU$bmvAmthP7L7xwqh4}#
+                                                          (if (eq? #{m -ANAU$bmvAmthP7L7xwqYI}#
                                                                    'c&e)
                                                             (memq 'eval
-                                                                  #{when-list _hoQGWMnyQPAh3k2jhWKgy}#)
+                                                                  #{when-list -ANAU$bmvAmthP7L7xwqct}#)
                                                             #f)))))
                                                 (begin
-                                                  (let ((#{x _hoQGWMnyQPAh3k2jhWKn5}#
-                                                          (#{expand-top-sequence _hoQGWMnyQPAh3k2jhWHTh}#
-                                                            #{body _hoQGWMnyQPAh3k2jhWKgz}#
-                                                            #{r _hoQGWMnyQPAh3k2jhWKcK}#
-                                                            #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                                            #{s _hoQGWMnyQPAh3k2jhWKgE}#
+                                                  (let ((#{x -ANAU$bmvAmthP7L7xwqj0}#
+                                                          (#{expand-top-sequence -ANAU$bmvAmthP7L7xwnOA}#
+                                                            #{body -ANAU$bmvAmthP7L7xwqcu}#
+                                                            #{r -ANAU$bmvAmthP7L7xwqYF}#
+                                                            #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                                            #{s -ANAU$bmvAmthP7L7xwqb@}#
                                                             'e
                                                             '(eval)
-                                                            #{mod _hoQGWMnyQPAh3k2jhWKgF}#)))
+                                                            #{mod -ANAU$bmvAmthP7L7xwqcA}#)))
                                                     (primitive-eval
-                                                      #{x _hoQGWMnyQPAh3k2jhWKn5}#))
-                                                  (values
-                                                    #{exps _hoQGWMnyQPAh3k2jhWKcQ}#))
-                                                (values
-                                                  #{exps _hoQGWMnyQPAh3k2jhWKcQ}#))))))
-                                      #{tmp _hoQGWMnyQPAh3k2jhWKgr}#)
+                                                      #{x -ANAU$bmvAmthP7L7xwqj0}#))
+                                                  #{exps -ANAU$bmvAmthP7L7xwqYL}#)
+                                                #{exps -ANAU$bmvAmthP7L7xwqYL}#)))))
+                                      #{tmp -ANAU$bmvAmthP7L7xwqcm}#)
                                     (syntax-violation
                                       #f
                                       "source expression failed to match any pattern"
-                                      #{e _hoQGWMnyQPAh3k2jhWKgC}#)))
-                                (if (if (eqv? #{type _hoQGWMnyQPAh3k2jhWKgA}#
+                                      #{e -ANAU$bmvAmthP7L7xwqb9}#)))
+                                (if (if (eqv? #{type -ANAU$bmvAmthP7L7xwqb7}#
                                               'define-syntax-form)
                                       #t
-                                      (eqv? #{type _hoQGWMnyQPAh3k2jhWKgA}#
+                                      (eqv? #{type -ANAU$bmvAmthP7L7xwqb7}#
                                             'define-syntax-parameter-form))
-                                  (let ((#{n _hoQGWMnyQPAh3k2jhWKon}#
-                                          (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                                            #{value _hoQGWMnyQPAh3k2jhWKgB}#
-                                            #{w _hoQGWMnyQPAh3k2jhWKgD}#))
-                                        (#{r _hoQGWMnyQPAh3k2jhWKoo}#
-                                          (#{macros-only-env _hoQGWMnyQPAh3k2jhWHS9}#
-                                            #{r _hoQGWMnyQPAh3k2jhWKcK}#)))
-                                    (if (eqv? #{m _hoQGWMnyQPAh3k2jhWKcN}# 'c)
+                                  (let ((#{n -ANAU$bmvAmthP7L7xwqki}#
+                                          (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                                            #{value -ANAU$bmvAmthP7L7xwqb8}#
+                                            #{w -ANAU$bmvAmthP7L7xwqb$}#))
+                                        (#{r -ANAU$bmvAmthP7L7xwqkj}#
+                                          (#{macros-only-env -ANAU$bmvAmthP7L7xwnNc}#
+                                            #{r -ANAU$bmvAmthP7L7xwqYF}#)))
+                                    (if (eqv? #{m -ANAU$bmvAmthP7L7xwqYI}# 'c)
                                       (if (memq 'compile
-                                                #{esew _hoQGWMnyQPAh3k2jhWKcO}#)
-                                        (let ((#{e _hoQGWMnyQPAh3k2jhWKos}#
-                                                (#{expand-install-global _hoQGWMnyQPAh3k2jhWHTi}#
-                                                  #{n _hoQGWMnyQPAh3k2jhWKon}#
-                                                  (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                                    #{e _hoQGWMnyQPAh3k2jhWKgC}#
-                                                    #{r _hoQGWMnyQPAh3k2jhWKoo}#
-                                                    #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                                    #{mod _hoQGWMnyQPAh3k2jhWKgF}#))))
+                                                #{esew -ANAU$bmvAmthP7L7xwqYJ}#)
+                                        (let ((#{e -ANAU$bmvAmthP7L7xwqkn}#
+                                                (#{expand-install-global -ANAU$bmvAmthP7L7xwnOB}#
+                                                  #{n -ANAU$bmvAmthP7L7xwqki}#
+                                                  (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                                    #{e -ANAU$bmvAmthP7L7xwqb9}#
+                                                    #{r -ANAU$bmvAmthP7L7xwqkj}#
+                                                    #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                                    #{mod -ANAU$bmvAmthP7L7xwqcA}#))))
                                           (begin
-                                            (#{top-level-eval-hook _hoQGWMnyQPAh3k2jhWHSZ}#
-                                              #{e _hoQGWMnyQPAh3k2jhWKos}#
-                                              #{mod _hoQGWMnyQPAh3k2jhWKgF}#)
+                                            (#{top-level-eval-hook -ANAU$bmvAmthP7L7xwnM4}#
+                                              #{e -ANAU$bmvAmthP7L7xwqkn}#
+                                              #{mod -ANAU$bmvAmthP7L7xwqcA}#)
                                             (if (memq 'load
-                                                      #{esew _hoQGWMnyQPAh3k2jhWKcO}#)
-                                              (values
-                                                (cons #{e _hoQGWMnyQPAh3k2jhWKos}#
-                                                      #{exps _hoQGWMnyQPAh3k2jhWKcQ}#))
-                                              (values
-                                                #{exps _hoQGWMnyQPAh3k2jhWKcQ}#))))
+                                                      #{esew -ANAU$bmvAmthP7L7xwqYJ}#)
+                                              (cons #{e -ANAU$bmvAmthP7L7xwqkn}#
+                                                    #{exps -ANAU$bmvAmthP7L7xwqYL}#)
+                                              #{exps -ANAU$bmvAmthP7L7xwqYL}#)))
                                         (if (memq 'load
-                                                  #{esew _hoQGWMnyQPAh3k2jhWKcO}#)
-                                          (values
-                                            (cons (#{expand-install-global _hoQGWMnyQPAh3k2jhWHTi}#
-                                                    #{n _hoQGWMnyQPAh3k2jhWKon}#
-                                                    (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                                      #{e _hoQGWMnyQPAh3k2jhWKgC}#
-                                                      #{r _hoQGWMnyQPAh3k2jhWKoo}#
-                                                      #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                                      #{mod _hoQGWMnyQPAh3k2jhWKgF}#))
-                                                  #{exps _hoQGWMnyQPAh3k2jhWKcQ}#))
-                                          (values
-                                            #{exps _hoQGWMnyQPAh3k2jhWKcQ}#)))
-                                      (if (eqv? #{m _hoQGWMnyQPAh3k2jhWKcN}#
+                                                  #{esew -ANAU$bmvAmthP7L7xwqYJ}#)
+                                          (cons (#{expand-install-global -ANAU$bmvAmthP7L7xwnOB}#
+                                                  #{n -ANAU$bmvAmthP7L7xwqki}#
+                                                  (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                                    #{e -ANAU$bmvAmthP7L7xwqb9}#
+                                                    #{r -ANAU$bmvAmthP7L7xwqkj}#
+                                                    #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                                    #{mod -ANAU$bmvAmthP7L7xwqcA}#))
+                                                #{exps -ANAU$bmvAmthP7L7xwqYL}#)
+                                          #{exps -ANAU$bmvAmthP7L7xwqYL}#))
+                                      (if (eqv? #{m -ANAU$bmvAmthP7L7xwqYI}#
                                                 'c&e)
-                                        (let ((#{e _hoQGWMnyQPAh3k2jhWKvr}#
-                                                (#{expand-install-global _hoQGWMnyQPAh3k2jhWHTi}#
-                                                  #{n _hoQGWMnyQPAh3k2jhWKon}#
-                                                  (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                                    #{e _hoQGWMnyQPAh3k2jhWKgC}#
-                                                    #{r _hoQGWMnyQPAh3k2jhWKoo}#
-                                                    #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                                    #{mod _hoQGWMnyQPAh3k2jhWKgF}#))))
+                                        (let ((#{e -ANAU$bmvAmthP7L7xwqup}#
+                                                (#{expand-install-global -ANAU$bmvAmthP7L7xwnOB}#
+                                                  #{n -ANAU$bmvAmthP7L7xwqki}#
+                                                  (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                                    #{e -ANAU$bmvAmthP7L7xwqb9}#
+                                                    #{r -ANAU$bmvAmthP7L7xwqkj}#
+                                                    #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                                    #{mod -ANAU$bmvAmthP7L7xwqcA}#))))
                                           (begin
-                                            (#{top-level-eval-hook _hoQGWMnyQPAh3k2jhWHSZ}#
-                                              #{e _hoQGWMnyQPAh3k2jhWKvr}#
-                                              #{mod _hoQGWMnyQPAh3k2jhWKgF}#)
-                                            (values
-                                              (cons #{e _hoQGWMnyQPAh3k2jhWKvr}#
-                                                    #{exps _hoQGWMnyQPAh3k2jhWKcQ}#))))
+                                            (#{top-level-eval-hook -ANAU$bmvAmthP7L7xwnM4}#
+                                              #{e -ANAU$bmvAmthP7L7xwqup}#
+                                              #{mod -ANAU$bmvAmthP7L7xwqcA}#)
+                                            (cons #{e -ANAU$bmvAmthP7L7xwqup}#
+                                                  #{exps -ANAU$bmvAmthP7L7xwqYL}#)))
                                         (begin
                                           (if (memq 'eval
-                                                    #{esew _hoQGWMnyQPAh3k2jhWKcO}#)
-                                            (#{top-level-eval-hook _hoQGWMnyQPAh3k2jhWHSZ}#
-                                              (#{expand-install-global _hoQGWMnyQPAh3k2jhWHTi}#
-                                                #{n _hoQGWMnyQPAh3k2jhWKon}#
-                                                (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                                  #{e _hoQGWMnyQPAh3k2jhWKgC}#
-                                                  #{r _hoQGWMnyQPAh3k2jhWKoo}#
-                                                  #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                                  #{mod _hoQGWMnyQPAh3k2jhWKgF}#))
-                                              #{mod _hoQGWMnyQPAh3k2jhWKgF}#))
-                                          (values
-                                            #{exps _hoQGWMnyQPAh3k2jhWKcQ}#)))))
-                                  (if (eqv? #{type _hoQGWMnyQPAh3k2jhWKgA}#
+                                                    #{esew -ANAU$bmvAmthP7L7xwqYJ}#)
+                                            (#{top-level-eval-hook -ANAU$bmvAmthP7L7xwnM4}#
+                                              (#{expand-install-global -ANAU$bmvAmthP7L7xwnOB}#
+                                                #{n -ANAU$bmvAmthP7L7xwqki}#
+                                                (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                                  #{e -ANAU$bmvAmthP7L7xwqb9}#
+                                                  #{r -ANAU$bmvAmthP7L7xwqkj}#
+                                                  #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                                  #{mod -ANAU$bmvAmthP7L7xwqcA}#))
+                                              #{mod -ANAU$bmvAmthP7L7xwqcA}#))
+                                          #{exps -ANAU$bmvAmthP7L7xwqYL}#))))
+                                  (if (eqv? #{type -ANAU$bmvAmthP7L7xwqb7}#
                                             'define-form)
-                                    (let ((#{n _hoQGWMnyQPAh3k2jhWK5m}#
-                                            (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                                              #{value _hoQGWMnyQPAh3k2jhWKgB}#
-                                              #{w _hoQGWMnyQPAh3k2jhWKgD}#)))
-                                      (let ((#{type _hoQGWMnyQPAh3k2jhWK5n}#
-                                              (car (let ((#{t _hoQGWMnyQPAh3k2jhWK5u}#
-                                                           (assq #{n _hoQGWMnyQPAh3k2jhWK5m}#
-                                                                 #{r _hoQGWMnyQPAh3k2jhWKcK}#)))
-                                                     (if #{t _hoQGWMnyQPAh3k2jhWK5u}#
-                                                       (cdr #{t _hoQGWMnyQPAh3k2jhWK5u}#)
+                                    (let ((#{n -ANAU$bmvAmthP7L7xwq5L}#
+                                            (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                                              #{value -ANAU$bmvAmthP7L7xwqb8}#
+                                              #{w -ANAU$bmvAmthP7L7xwqb$}#)))
+                                      (let ((#{type -ANAU$bmvAmthP7L7xwq5M}#
+                                              (car (let ((#{t -ANAU$bmvAmthP7L7xwq5T}#
+                                                           (assq #{n -ANAU$bmvAmthP7L7xwq5L}#
+                                                                 #{r -ANAU$bmvAmthP7L7xwqYF}#)))
+                                                     (if #{t -ANAU$bmvAmthP7L7xwq5T}#
+                                                       (cdr #{t -ANAU$bmvAmthP7L7xwq5T}#)
                                                        (if (symbol?
-                                                             #{n _hoQGWMnyQPAh3k2jhWK5m}#)
-                                                         (let ((#{t _hoQGWMnyQPAh3k2jhWK50}#
-                                                                 (#{get-global-definition-hook _hoQGWMnyQPAh3k2jhWHSc}#
-                                                                   #{n _hoQGWMnyQPAh3k2jhWK5m}#
-                                                                   #{mod _hoQGWMnyQPAh3k2jhWKgF}#)))
-                                                           (if #{t _hoQGWMnyQPAh3k2jhWK50}#
-                                                             #{t _hoQGWMnyQPAh3k2jhWK50}#
+                                                             #{n -ANAU$bmvAmthP7L7xwq5L}#)
+                                                         (let ((#{t -ANAU$bmvAmthP7L7xwq5Z}#
+                                                                 (#{get-global-definition-hook -ANAU$bmvAmthP7L7xwnM7}#
+                                                                   #{n -ANAU$bmvAmthP7L7xwq5L}#
+                                                                   #{mod -ANAU$bmvAmthP7L7xwqcA}#)))
+                                                           (if #{t -ANAU$bmvAmthP7L7xwq5Z}#
+                                                             #{t -ANAU$bmvAmthP7L7xwq5Z}#
                                                              '(global)))
                                                          '(displaced-lexical)))))))
-                                        (if (if (eqv? #{type _hoQGWMnyQPAh3k2jhWK5n}#
+                                        (if (if (eqv? #{type -ANAU$bmvAmthP7L7xwq5M}#
                                                       'global)
                                               #t
-                                              (if (eqv? #{type _hoQGWMnyQPAh3k2jhWK5n}#
+                                              (if (eqv? #{type -ANAU$bmvAmthP7L7xwq5M}#
                                                         'core)
                                                 #t
-                                                (if (eqv? #{type _hoQGWMnyQPAh3k2jhWK5n}#
+                                                (if (eqv? #{type -ANAU$bmvAmthP7L7xwq5M}#
                                                           'macro)
                                                   #t
-                                                  (eqv? #{type _hoQGWMnyQPAh3k2jhWK5n}#
+                                                  (eqv? #{type -ANAU$bmvAmthP7L7xwq5M}#
                                                         'module-ref))))
                                           (begin
-                                            (if (if (if (eq? #{m _hoQGWMnyQPAh3k2jhWKcN}#
+                                            (if (if (if (eq? #{m -ANAU$bmvAmthP7L7xwqYI}#
                                                              'c)
                                                       #t
-                                                      (eq? #{m _hoQGWMnyQPAh3k2jhWKcN}#
+                                                      (eq? #{m -ANAU$bmvAmthP7L7xwqYI}#
                                                            'c&e))
                                                   (if (not (module-local-variable
                                                              (current-module)
-                                                             #{n _hoQGWMnyQPAh3k2jhWK5m}#))
+                                                             #{n -ANAU$bmvAmthP7L7xwq5L}#))
                                                     (current-module)
                                                     #f)
                                                   #f)
-                                              (let ((#{old _hoQGWMnyQPAh3k2jhWK6T}#
+                                              (let ((#{old -ANAU$bmvAmthP7L7xwq54}#
                                                       (module-variable
                                                         (current-module)
-                                                        #{n _hoQGWMnyQPAh3k2jhWK5m}#)))
+                                                        #{n -ANAU$bmvAmthP7L7xwq5L}#)))
                                                 (if (if (variable?
-                                                          #{old _hoQGWMnyQPAh3k2jhWK6T}#)
+                                                          #{old -ANAU$bmvAmthP7L7xwq54}#)
                                                       (variable-bound?
-                                                        #{old _hoQGWMnyQPAh3k2jhWK6T}#)
+                                                        #{old -ANAU$bmvAmthP7L7xwq54}#)
                                                       #f)
                                                   (module-define!
                                                     (current-module)
-                                                    #{n _hoQGWMnyQPAh3k2jhWK5m}#
+                                                    #{n -ANAU$bmvAmthP7L7xwq5L}#
                                                     (variable-ref
-                                                      #{old _hoQGWMnyQPAh3k2jhWK6T}#))
+                                                      #{old -ANAU$bmvAmthP7L7xwq54}#))
                                                   (module-add!
                                                     (current-module)
-                                                    #{n _hoQGWMnyQPAh3k2jhWK5m}#
+                                                    #{n -ANAU$bmvAmthP7L7xwq5L}#
                                                     (make-undefined-variable)))))
-                                            (values
-                                              (cons (if (eq? #{m _hoQGWMnyQPAh3k2jhWKcN}#
-                                                             'c&e)
-                                                      (let ((#{x _hoQGWMnyQPAh3k2jhWK6V}#
-                                                              (#{build-global-definition _hoQGWMnyQPAh3k2jhWHSo}#
-                                                                #{s _hoQGWMnyQPAh3k2jhWKgE}#
-                                                                #{n _hoQGWMnyQPAh3k2jhWK5m}#
-                                                                (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                                                  #{e _hoQGWMnyQPAh3k2jhWKgC}#
-                                                                  #{r _hoQGWMnyQPAh3k2jhWKcK}#
-                                                                  #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                                                  #{mod _hoQGWMnyQPAh3k2jhWKgF}#))))
-                                                        (begin
-                                                          (#{top-level-eval-hook _hoQGWMnyQPAh3k2jhWHSZ}#
-                                                            #{x _hoQGWMnyQPAh3k2jhWK6V}#
-                                                            #{mod _hoQGWMnyQPAh3k2jhWKgF}#)
-                                                          #{x _hoQGWMnyQPAh3k2jhWK6V}#))
-                                                      (lambda ()
-                                                        (#{build-global-definition _hoQGWMnyQPAh3k2jhWHSo}#
-                                                          #{s _hoQGWMnyQPAh3k2jhWKgE}#
-                                                          #{n _hoQGWMnyQPAh3k2jhWK5m}#
-                                                          (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                                            #{e _hoQGWMnyQPAh3k2jhWKgC}#
-                                                            #{r _hoQGWMnyQPAh3k2jhWKcK}#
-                                                            #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                                            #{mod _hoQGWMnyQPAh3k2jhWKgF}#))))
-                                                    #{exps _hoQGWMnyQPAh3k2jhWKcQ}#)))
-                                          (if (eqv? #{type _hoQGWMnyQPAh3k2jhWK5n}#
+                                            (cons (if (eq? #{m -ANAU$bmvAmthP7L7xwqYI}#
+                                                           'c&e)
+                                                    (let ((#{x -ANAU$bmvAmthP7L7xwrAx}#
+                                                            (#{build-global-definition -ANAU$bmvAmthP7L7xwnNH}#
+                                                              #{s -ANAU$bmvAmthP7L7xwqb@}#
+                                                              #{n -ANAU$bmvAmthP7L7xwq5L}#
+                                                              (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                                                #{e -ANAU$bmvAmthP7L7xwqb9}#
+                                                                #{r -ANAU$bmvAmthP7L7xwqYF}#
+                                                                #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                                                #{mod -ANAU$bmvAmthP7L7xwqcA}#))))
+                                                      (begin
+                                                        (#{top-level-eval-hook -ANAU$bmvAmthP7L7xwnM4}#
+                                                          #{x -ANAU$bmvAmthP7L7xwrAx}#
+                                                          #{mod -ANAU$bmvAmthP7L7xwqcA}#)
+                                                        #{x -ANAU$bmvAmthP7L7xwrAx}#))
+                                                    (lambda ()
+                                                      (#{build-global-definition -ANAU$bmvAmthP7L7xwnNH}#
+                                                        #{s -ANAU$bmvAmthP7L7xwqb@}#
+                                                        #{n -ANAU$bmvAmthP7L7xwq5L}#
+                                                        (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                                          #{e -ANAU$bmvAmthP7L7xwqb9}#
+                                                          #{r -ANAU$bmvAmthP7L7xwqYF}#
+                                                          #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                                          #{mod -ANAU$bmvAmthP7L7xwqcA}#))))
+                                                  #{exps -ANAU$bmvAmthP7L7xwqYL}#))
+                                          (if (eqv? #{type -ANAU$bmvAmthP7L7xwq5M}#
                                                     'displaced-lexical)
                                             (syntax-violation
                                               #f
                                               "identifier out of context"
-                                              #{e _hoQGWMnyQPAh3k2jhWKgC}#
-                                              (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                                #{value _hoQGWMnyQPAh3k2jhWKgB}#
-                                                #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                                #{mod _hoQGWMnyQPAh3k2jhWKgF}#))
+                                              #{e -ANAU$bmvAmthP7L7xwqb9}#
+                                              (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                                #{value -ANAU$bmvAmthP7L7xwqb8}#
+                                                #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                                #{mod -ANAU$bmvAmthP7L7xwqcA}#))
                                             (syntax-violation
                                               #f
                                               "cannot define keyword at top level"
-                                              #{e _hoQGWMnyQPAh3k2jhWKgC}#
-                                              (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                                #{value _hoQGWMnyQPAh3k2jhWKgB}#
-                                                #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                                #{mod _hoQGWMnyQPAh3k2jhWKgF}#))))))
-                                    (values
-                                      (cons (if (eq? #{m _hoQGWMnyQPAh3k2jhWKcN}#
-                                                     'c&e)
-                                              (let ((#{x _hoQGWMnyQPAh3k2jhWLBT}#
-                                                      (#{expand-expr _hoQGWMnyQPAh3k2jhWHTm}#
-                                                        #{type _hoQGWMnyQPAh3k2jhWKgA}#
-                                                        #{value _hoQGWMnyQPAh3k2jhWKgB}#
-                                                        #{e _hoQGWMnyQPAh3k2jhWKgC}#
-                                                        #{r _hoQGWMnyQPAh3k2jhWKcK}#
-                                                        #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                                        #{s _hoQGWMnyQPAh3k2jhWKgE}#
-                                                        #{mod _hoQGWMnyQPAh3k2jhWKgF}#)))
-                                                (begin
-                                                  (primitive-eval
-                                                    #{x _hoQGWMnyQPAh3k2jhWLBT}#)
-                                                  #{x _hoQGWMnyQPAh3k2jhWLBT}#))
-                                              (lambda ()
-                                                (#{expand-expr _hoQGWMnyQPAh3k2jhWHTm}#
-                                                  #{type _hoQGWMnyQPAh3k2jhWKgA}#
-                                                  #{value _hoQGWMnyQPAh3k2jhWKgB}#
-                                                  #{e _hoQGWMnyQPAh3k2jhWKgC}#
-                                                  #{r _hoQGWMnyQPAh3k2jhWKcK}#
-                                                  #{w _hoQGWMnyQPAh3k2jhWKgD}#
-                                                  #{s _hoQGWMnyQPAh3k2jhWKgE}#
-                                                  #{mod _hoQGWMnyQPAh3k2jhWKgF}#)))
-                                            #{exps _hoQGWMnyQPAh3k2jhWKcQ}#))))))))))
-                    (lambda (#{exps _hoQGWMnyQPAh3k2jhWLBc}#)
-                      (#{scan _hoQGWMnyQPAh3k2jhWKaG}#
-                        (cdr #{body _hoQGWMnyQPAh3k2jhWKcJ}#)
-                        #{r _hoQGWMnyQPAh3k2jhWKcK}#
-                        #{w _hoQGWMnyQPAh3k2jhWKcL}#
-                        #{s _hoQGWMnyQPAh3k2jhWKcM}#
-                        #{m _hoQGWMnyQPAh3k2jhWKcN}#
-                        #{esew _hoQGWMnyQPAh3k2jhWKcO}#
-                        #{mod _hoQGWMnyQPAh3k2jhWKcP}#
-                        #{exps _hoQGWMnyQPAh3k2jhWLBc}#)))))))
+                                              #{e -ANAU$bmvAmthP7L7xwqb9}#
+                                              (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                                #{value -ANAU$bmvAmthP7L7xwqb8}#
+                                                #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                                #{mod -ANAU$bmvAmthP7L7xwqcA}#))))))
+                                    (cons (if (eq? #{m -ANAU$bmvAmthP7L7xwqYI}#
+                                                   'c&e)
+                                            (let ((#{x -ANAU$bmvAmthP7L7xwrH4}#
+                                                    (#{expand-expr -ANAU$bmvAmthP7L7xwnOF}#
+                                                      #{type -ANAU$bmvAmthP7L7xwqb7}#
+                                                      #{value -ANAU$bmvAmthP7L7xwqb8}#
+                                                      #{e -ANAU$bmvAmthP7L7xwqb9}#
+                                                      #{r -ANAU$bmvAmthP7L7xwqYF}#
+                                                      #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                                      #{s -ANAU$bmvAmthP7L7xwqb@}#
+                                                      #{mod -ANAU$bmvAmthP7L7xwqcA}#)))
+                                              (begin
+                                                (primitive-eval
+                                                  #{x -ANAU$bmvAmthP7L7xwrH4}#)
+                                                #{x -ANAU$bmvAmthP7L7xwrH4}#))
+                                            (lambda ()
+                                              (#{expand-expr -ANAU$bmvAmthP7L7xwnOF}#
+                                                #{type -ANAU$bmvAmthP7L7xwqb7}#
+                                                #{value -ANAU$bmvAmthP7L7xwqb8}#
+                                                #{e -ANAU$bmvAmthP7L7xwqb9}#
+                                                #{r -ANAU$bmvAmthP7L7xwqYF}#
+                                                #{w -ANAU$bmvAmthP7L7xwqb$}#
+                                                #{s -ANAU$bmvAmthP7L7xwqb@}#
+                                                #{mod -ANAU$bmvAmthP7L7xwqcA}#)))
+                                          #{exps -ANAU$bmvAmthP7L7xwqYL}#)))))))))
+                    (lambda (#{exps -ANAU$bmvAmthP7L7xwrH9}#)
+                      (#{scan -ANAU$bmvAmthP7L7xwqWB}#
+                        (cdr #{body -ANAU$bmvAmthP7L7xwqYE}#)
+                        #{r -ANAU$bmvAmthP7L7xwqYF}#
+                        #{w -ANAU$bmvAmthP7L7xwqYG}#
+                        #{s -ANAU$bmvAmthP7L7xwqYH}#
+                        #{m -ANAU$bmvAmthP7L7xwqYI}#
+                        #{esew -ANAU$bmvAmthP7L7xwqYJ}#
+                        #{mod -ANAU$bmvAmthP7L7xwqYK}#
+                        #{exps -ANAU$bmvAmthP7L7xwrH9}#)))))))
            (call-with-values
              (lambda ()
-               (#{scan _hoQGWMnyQPAh3k2jhWKaG}#
-                 #{body _hoQGWMnyQPAh3k2jhWKZ@}#
-                 #{r _hoQGWMnyQPAh3k2jhWKaA}#
-                 #{w _hoQGWMnyQPAh3k2jhWKaB}#
-                 #{s _hoQGWMnyQPAh3k2jhWKaC}#
-                 #{m _hoQGWMnyQPAh3k2jhWKaD}#
-                 #{esew _hoQGWMnyQPAh3k2jhWKaE}#
-                 #{mod _hoQGWMnyQPAh3k2jhWKaF}#
+               (#{scan -ANAU$bmvAmthP7L7xwqWB}#
+                 #{body -ANAU$bmvAmthP7L7xwqV6}#
+                 #{r -ANAU$bmvAmthP7L7xwqV7}#
+                 #{w -ANAU$bmvAmthP7L7xwqV8}#
+                 #{s -ANAU$bmvAmthP7L7xwqV9}#
+                 #{m -ANAU$bmvAmthP7L7xwqV$}#
+                 #{esew -ANAU$bmvAmthP7L7xwqV@}#
+                 #{mod -ANAU$bmvAmthP7L7xwqWA}#
                  '()))
-             (lambda (#{exps _hoQGWMnyQPAh3k2jhWKaJ}#)
-               (if (null? #{exps _hoQGWMnyQPAh3k2jhWKaJ}#)
+             (lambda (#{exps -ANAU$bmvAmthP7L7xwqWE}#)
+               (if (null? #{exps -ANAU$bmvAmthP7L7xwqWE}#)
                  (make-struct/no-tail
                    (vector-ref %expanded-vtables 0)
-                   #{s _hoQGWMnyQPAh3k2jhWKaC}#)
-                 (#{build-sequence _hoQGWMnyQPAh3k2jhWHSu}#
-                   #{s _hoQGWMnyQPAh3k2jhWKaC}#
+                   #{s -ANAU$bmvAmthP7L7xwqV9}#)
+                 (#{build-sequence -ANAU$bmvAmthP7L7xwnNN}#
+                   #{s -ANAU$bmvAmthP7L7xwqV9}#
                    (letrec*
-                     ((#{lp _hoQGWMnyQPAh3k2jhWKax}#
-                        (lambda (#{in _hoQGWMnyQPAh3k2jhWKcF}#
-                                 #{out _hoQGWMnyQPAh3k2jhWKcG}#)
-                          (if (null? #{in _hoQGWMnyQPAh3k2jhWKcF}#)
-                            #{out _hoQGWMnyQPAh3k2jhWKcG}#
-                            (let ((#{e _hoQGWMnyQPAh3k2jhWKcH}#
-                                    (car #{in _hoQGWMnyQPAh3k2jhWKcF}#)))
-                              (#{lp _hoQGWMnyQPAh3k2jhWKax}#
-                                (cdr #{in _hoQGWMnyQPAh3k2jhWKcF}#)
+                     ((#{lp -ANAU$bmvAmthP7L7xwqWs}#
+                        (lambda (#{in -ANAU$bmvAmthP7L7xwqYA}#
+                                 #{out -ANAU$bmvAmthP7L7xwqYB}#)
+                          (if (null? #{in -ANAU$bmvAmthP7L7xwqYA}#)
+                            #{out -ANAU$bmvAmthP7L7xwqYB}#
+                            (let ((#{e -ANAU$bmvAmthP7L7xwqYC}#
+                                    (car #{in -ANAU$bmvAmthP7L7xwqYA}#)))
+                              (#{lp -ANAU$bmvAmthP7L7xwqWs}#
+                                (cdr #{in -ANAU$bmvAmthP7L7xwqYA}#)
                                 (cons (if (procedure?
-                                            #{e _hoQGWMnyQPAh3k2jhWKcH}#)
-                                        (#{e _hoQGWMnyQPAh3k2jhWKcH}#)
-                                        #{e _hoQGWMnyQPAh3k2jhWKcH}#)
-                                      #{out _hoQGWMnyQPAh3k2jhWKcG}#)))))))
-                     (#{lp _hoQGWMnyQPAh3k2jhWKax}#
-                       #{exps _hoQGWMnyQPAh3k2jhWKaJ}#
+                                            #{e -ANAU$bmvAmthP7L7xwqYC}#)
+                                        (#{e -ANAU$bmvAmthP7L7xwqYC}#)
+                                        #{e -ANAU$bmvAmthP7L7xwqYC}#)
+                                      #{out -ANAU$bmvAmthP7L7xwqYB}#)))))))
+                     (#{lp -ANAU$bmvAmthP7L7xwqWs}#
+                       #{exps -ANAU$bmvAmthP7L7xwqWE}#
                        '())))))))))
-     (#{expand-install-global _hoQGWMnyQPAh3k2jhWHTi}#
-       (lambda (#{name _hoQGWMnyQPAh3k2jhWLBd}#
-                #{e _hoQGWMnyQPAh3k2jhWLBe}#)
-         (let ((#{exp _hoQGWMnyQPAh3k2jhWLBk}#
-                 (let ((#{fun-exp _hoQGWMnyQPAh3k2jhWLBu}#
+     (#{expand-install-global -ANAU$bmvAmthP7L7xwnOB}#
+       (lambda (#{name -ANAU$bmvAmthP7L7xwrH$}#
+                #{e -ANAU$bmvAmthP7L7xwrH@}#)
+         (let ((#{exp -ANAU$bmvAmthP7L7xwrIF}#
+                 (let ((#{fun-exp -ANAU$bmvAmthP7L7xwrIP}#
                          (if (equal? (module-name (current-module)) '(guile))
                            (make-struct/no-tail
                              (vector-ref %expanded-vtables 7)
@@ -1559,416 +1547,416 @@
                              '(guile)
                              'make-syntax-transformer
                              #f)))
-                       (#{arg-exps _hoQGWMnyQPAh3k2jhWLBv}#
+                       (#{arg-exps -ANAU$bmvAmthP7L7xwrIQ}#
                          (list (make-struct/no-tail
                                  (vector-ref %expanded-vtables 1)
                                  #f
-                                 #{name _hoQGWMnyQPAh3k2jhWLBd}#)
+                                 #{name -ANAU$bmvAmthP7L7xwrH$}#)
                                (make-struct/no-tail
                                  (vector-ref %expanded-vtables 1)
                                  #f
                                  'macro)
-                               #{e _hoQGWMnyQPAh3k2jhWLBe}#)))
+                               #{e -ANAU$bmvAmthP7L7xwrH@}#)))
                    (make-struct/no-tail
                      (vector-ref %expanded-vtables 11)
                      #f
-                     #{fun-exp _hoQGWMnyQPAh3k2jhWLBu}#
-                     #{arg-exps _hoQGWMnyQPAh3k2jhWLBv}#))))
+                     #{fun-exp -ANAU$bmvAmthP7L7xwrIP}#
+                     #{arg-exps -ANAU$bmvAmthP7L7xwrIQ}#))))
            (begin
-             (if (if (struct? #{exp _hoQGWMnyQPAh3k2jhWLBk}#)
-                   (eq? (struct-vtable #{exp _hoQGWMnyQPAh3k2jhWLBk}#)
+             (if (if (struct? #{exp -ANAU$bmvAmthP7L7xwrIF}#)
+                   (eq? (struct-vtable #{exp -ANAU$bmvAmthP7L7xwrIF}#)
                         (vector-ref %expanded-vtables 13))
                    #f)
-               (let ((#{meta _hoQGWMnyQPAh3k2jhWLCY}#
-                       (struct-ref #{exp _hoQGWMnyQPAh3k2jhWLBk}# 1)))
-                 (if (not (assq 'name #{meta _hoQGWMnyQPAh3k2jhWLCY}#))
-                   (let ((#{v _hoQGWMnyQPAh3k2jhWLCf}#
-                           (cons (cons 'name #{name _hoQGWMnyQPAh3k2jhWLBd}#)
-                                 #{meta _hoQGWMnyQPAh3k2jhWLCY}#)))
+               (let ((#{meta -ANAU$bmvAmthP7L7xwrI5}#
+                       (struct-ref #{exp -ANAU$bmvAmthP7L7xwrIF}# 1)))
+                 (if (not (assq 'name #{meta -ANAU$bmvAmthP7L7xwrI5}#))
+                   (let ((#{v -ANAU$bmvAmthP7L7xwrJA}#
+                           (cons (cons 'name #{name -ANAU$bmvAmthP7L7xwrH$}#)
+                                 #{meta -ANAU$bmvAmthP7L7xwrI5}#)))
                      (struct-set!
-                       #{exp _hoQGWMnyQPAh3k2jhWLBk}#
+                       #{exp -ANAU$bmvAmthP7L7xwrIF}#
                        1
-                       #{v _hoQGWMnyQPAh3k2jhWLCf}#)))))
+                       #{v -ANAU$bmvAmthP7L7xwrJA}#)))))
              (make-struct/no-tail
                (vector-ref %expanded-vtables 9)
                #f
-               #{name _hoQGWMnyQPAh3k2jhWLBd}#
-               #{exp _hoQGWMnyQPAh3k2jhWLBk}#)))))
-     (#{parse-when-list _hoQGWMnyQPAh3k2jhWHTj}#
-       (lambda (#{e _hoQGWMnyQPAh3k2jhWLCq}#
-                #{when-list _hoQGWMnyQPAh3k2jhWLCr}#)
-         (let ((#{result _hoQGWMnyQPAh3k2jhWLCs}#
-                 (#{strip _hoQGWMnyQPAh3k2jhWHTy}#
-                   #{when-list _hoQGWMnyQPAh3k2jhWLCr}#
+               #{name -ANAU$bmvAmthP7L7xwrH$}#
+               #{exp -ANAU$bmvAmthP7L7xwrIF}#)))))
+     (#{parse-when-list -ANAU$bmvAmthP7L7xwnOC}#
+       (lambda (#{e -ANAU$bmvAmthP7L7xwrJL}#
+                #{when-list -ANAU$bmvAmthP7L7xwrJM}#)
+         (let ((#{result -ANAU$bmvAmthP7L7xwrJN}#
+                 (#{strip -ANAU$bmvAmthP7L7xwnOR}#
+                   #{when-list -ANAU$bmvAmthP7L7xwrJM}#
                    '(()))))
            (letrec*
-             ((#{lp _hoQGWMnyQPAh3k2jhWLCt}#
-                (lambda (#{l _hoQGWMnyQPAh3k2jhWLDj}#)
-                  (if (null? #{l _hoQGWMnyQPAh3k2jhWLDj}#)
-                    #{result _hoQGWMnyQPAh3k2jhWLCs}#
-                    (if (let ((#{t _hoQGWMnyQPAh3k2jhWLDl}#
-                                (car #{l _hoQGWMnyQPAh3k2jhWLDj}#)))
-                          (if (eq? #{t _hoQGWMnyQPAh3k2jhWLDl}# 'compile)
+             ((#{lp -ANAU$bmvAmthP7L7xwrJO}#
+                (lambda (#{l -ANAU$bmvAmthP7L7xwrKE}#)
+                  (if (null? #{l -ANAU$bmvAmthP7L7xwrKE}#)
+                    #{result -ANAU$bmvAmthP7L7xwrJN}#
+                    (if (let ((#{t -ANAU$bmvAmthP7L7xwrKG}#
+                                (car #{l -ANAU$bmvAmthP7L7xwrKE}#)))
+                          (if (eq? #{t -ANAU$bmvAmthP7L7xwrKG}# 'compile)
                             #t
-                            (if (eq? #{t _hoQGWMnyQPAh3k2jhWLDl}# 'load)
+                            (if (eq? #{t -ANAU$bmvAmthP7L7xwrKG}# 'load)
                               #t
-                              (if (eq? #{t _hoQGWMnyQPAh3k2jhWLDl}# 'eval)
+                              (if (eq? #{t -ANAU$bmvAmthP7L7xwrKG}# 'eval)
                                 #t
-                                (eq? #{t _hoQGWMnyQPAh3k2jhWLDl}# 'expand)))))
-                      (#{lp _hoQGWMnyQPAh3k2jhWLCt}#
-                        (cdr #{l _hoQGWMnyQPAh3k2jhWLDj}#))
+                                (eq? #{t -ANAU$bmvAmthP7L7xwrKG}# 'expand)))))
+                      (#{lp -ANAU$bmvAmthP7L7xwrJO}#
+                        (cdr #{l -ANAU$bmvAmthP7L7xwrKE}#))
                       (syntax-violation
                         'eval-when
                         "invalid situation"
-                        #{e _hoQGWMnyQPAh3k2jhWLCq}#
-                        (car #{l _hoQGWMnyQPAh3k2jhWLDj}#)))))))
-             (#{lp _hoQGWMnyQPAh3k2jhWLCt}#
-               #{result _hoQGWMnyQPAh3k2jhWLCs}#)))))
-     (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-       (lambda (#{e _hoQGWMnyQPAh3k2jhWLDn}#
-                #{r _hoQGWMnyQPAh3k2jhWLDo}#
-                #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                #{rib _hoQGWMnyQPAh3k2jhWLDr}#
-                #{mod _hoQGWMnyQPAh3k2jhWLDs}#
-                #{for-car? _hoQGWMnyQPAh3k2jhWLDt}#)
-         (if (symbol? #{e _hoQGWMnyQPAh3k2jhWLDn}#)
-           (let ((#{n _hoQGWMnyQPAh3k2jhWLDu}#
-                   (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                     #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                     #{w _hoQGWMnyQPAh3k2jhWLDp}#)))
-             (let ((#{b _hoQGWMnyQPAh3k2jhWLDv}#
-                     (let ((#{t _hoQGWMnyQPAh3k2jhWLD3}#
-                             (assq #{n _hoQGWMnyQPAh3k2jhWLDu}#
-                                   #{r _hoQGWMnyQPAh3k2jhWLDo}#)))
-                       (if #{t _hoQGWMnyQPAh3k2jhWLD3}#
-                         (cdr #{t _hoQGWMnyQPAh3k2jhWLD3}#)
-                         (if (symbol? #{n _hoQGWMnyQPAh3k2jhWLDu}#)
-                           (let ((#{t _hoQGWMnyQPAh3k2jhWLD9}#
-                                   (#{get-global-definition-hook _hoQGWMnyQPAh3k2jhWHSc}#
-                                     #{n _hoQGWMnyQPAh3k2jhWLDu}#
-                                     #{mod _hoQGWMnyQPAh3k2jhWLDs}#)))
-                             (if #{t _hoQGWMnyQPAh3k2jhWLD9}#
-                               #{t _hoQGWMnyQPAh3k2jhWLD9}#
+                        #{e -ANAU$bmvAmthP7L7xwrJL}#
+                        (car #{l -ANAU$bmvAmthP7L7xwrKE}#)))))))
+             (#{lp -ANAU$bmvAmthP7L7xwrJO}#
+               #{result -ANAU$bmvAmthP7L7xwrJN}#)))))
+     (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+       (lambda (#{e -ANAU$bmvAmthP7L7xwrKI}#
+                #{r -ANAU$bmvAmthP7L7xwrKJ}#
+                #{w -ANAU$bmvAmthP7L7xwrKK}#
+                #{s -ANAU$bmvAmthP7L7xwrKL}#
+                #{rib -ANAU$bmvAmthP7L7xwrKM}#
+                #{mod -ANAU$bmvAmthP7L7xwrKN}#
+                #{for-car? -ANAU$bmvAmthP7L7xwrKO}#)
+         (if (symbol? #{e -ANAU$bmvAmthP7L7xwrKI}#)
+           (let ((#{n -ANAU$bmvAmthP7L7xwrKP}#
+                   (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                     #{e -ANAU$bmvAmthP7L7xwrKI}#
+                     #{w -ANAU$bmvAmthP7L7xwrKK}#)))
+             (let ((#{b -ANAU$bmvAmthP7L7xwrKQ}#
+                     (let ((#{t -ANAU$bmvAmthP7L7xwrKY}#
+                             (assq #{n -ANAU$bmvAmthP7L7xwrKP}#
+                                   #{r -ANAU$bmvAmthP7L7xwrKJ}#)))
+                       (if #{t -ANAU$bmvAmthP7L7xwrKY}#
+                         (cdr #{t -ANAU$bmvAmthP7L7xwrKY}#)
+                         (if (symbol? #{n -ANAU$bmvAmthP7L7xwrKP}#)
+                           (let ((#{t -ANAU$bmvAmthP7L7xwrKe}#
+                                   (#{get-global-definition-hook -ANAU$bmvAmthP7L7xwnM7}#
+                                     #{n -ANAU$bmvAmthP7L7xwrKP}#
+                                     #{mod -ANAU$bmvAmthP7L7xwrKN}#)))
+                             (if #{t -ANAU$bmvAmthP7L7xwrKe}#
+                               #{t -ANAU$bmvAmthP7L7xwrKe}#
                                '(global)))
                            '(displaced-lexical))))))
-               (let ((#{type _hoQGWMnyQPAh3k2jhWLDw}#
-                       (car #{b _hoQGWMnyQPAh3k2jhWLDv}#)))
-                 (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLDw}# 'lexical)
+               (let ((#{type -ANAU$bmvAmthP7L7xwrKR}#
+                       (car #{b -ANAU$bmvAmthP7L7xwrKQ}#)))
+                 (if (eqv? #{type -ANAU$bmvAmthP7L7xwrKR}# 'lexical)
                    (values
-                     #{type _hoQGWMnyQPAh3k2jhWLDw}#
-                     (cdr #{b _hoQGWMnyQPAh3k2jhWLDv}#)
-                     #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                     #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                     #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                     #{mod _hoQGWMnyQPAh3k2jhWLDs}#)
-                   (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLDw}# 'global)
+                     #{type -ANAU$bmvAmthP7L7xwrKR}#
+                     (cdr #{b -ANAU$bmvAmthP7L7xwrKQ}#)
+                     #{e -ANAU$bmvAmthP7L7xwrKI}#
+                     #{w -ANAU$bmvAmthP7L7xwrKK}#
+                     #{s -ANAU$bmvAmthP7L7xwrKL}#
+                     #{mod -ANAU$bmvAmthP7L7xwrKN}#)
+                   (if (eqv? #{type -ANAU$bmvAmthP7L7xwrKR}# 'global)
                      (values
-                       #{type _hoQGWMnyQPAh3k2jhWLDw}#
-                       #{n _hoQGWMnyQPAh3k2jhWLDu}#
-                       #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                       #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                       #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                       #{mod _hoQGWMnyQPAh3k2jhWLDs}#)
-                     (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLDw}# 'macro)
-                       (if #{for-car? _hoQGWMnyQPAh3k2jhWLDt}#
+                       #{type -ANAU$bmvAmthP7L7xwrKR}#
+                       #{n -ANAU$bmvAmthP7L7xwrKP}#
+                       #{e -ANAU$bmvAmthP7L7xwrKI}#
+                       #{w -ANAU$bmvAmthP7L7xwrKK}#
+                       #{s -ANAU$bmvAmthP7L7xwrKL}#
+                       #{mod -ANAU$bmvAmthP7L7xwrKN}#)
+                     (if (eqv? #{type -ANAU$bmvAmthP7L7xwrKR}# 'macro)
+                       (if #{for-car? -ANAU$bmvAmthP7L7xwrKO}#
                          (values
-                           #{type _hoQGWMnyQPAh3k2jhWLDw}#
-                           (cdr #{b _hoQGWMnyQPAh3k2jhWLDv}#)
-                           #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                           #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                           #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                           #{mod _hoQGWMnyQPAh3k2jhWLDs}#)
-                         (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-                           (#{expand-macro _hoQGWMnyQPAh3k2jhWHTo}#
-                             (cdr #{b _hoQGWMnyQPAh3k2jhWLDv}#)
-                             #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                             #{r _hoQGWMnyQPAh3k2jhWLDo}#
-                             #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                             #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                             #{rib _hoQGWMnyQPAh3k2jhWLDr}#
-                             #{mod _hoQGWMnyQPAh3k2jhWLDs}#)
-                           #{r _hoQGWMnyQPAh3k2jhWLDo}#
+                           #{type -ANAU$bmvAmthP7L7xwrKR}#
+                           (cdr #{b -ANAU$bmvAmthP7L7xwrKQ}#)
+                           #{e -ANAU$bmvAmthP7L7xwrKI}#
+                           #{w -ANAU$bmvAmthP7L7xwrKK}#
+                           #{s -ANAU$bmvAmthP7L7xwrKL}#
+                           #{mod -ANAU$bmvAmthP7L7xwrKN}#)
+                         (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+                           (#{expand-macro -ANAU$bmvAmthP7L7xwnOH}#
+                             (cdr #{b -ANAU$bmvAmthP7L7xwrKQ}#)
+                             #{e -ANAU$bmvAmthP7L7xwrKI}#
+                             #{r -ANAU$bmvAmthP7L7xwrKJ}#
+                             #{w -ANAU$bmvAmthP7L7xwrKK}#
+                             #{s -ANAU$bmvAmthP7L7xwrKL}#
+                             #{rib -ANAU$bmvAmthP7L7xwrKM}#
+                             #{mod -ANAU$bmvAmthP7L7xwrKN}#)
+                           #{r -ANAU$bmvAmthP7L7xwrKJ}#
                            '(())
-                           #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                           #{rib _hoQGWMnyQPAh3k2jhWLDr}#
-                           #{mod _hoQGWMnyQPAh3k2jhWLDs}#
+                           #{s -ANAU$bmvAmthP7L7xwrKL}#
+                           #{rib -ANAU$bmvAmthP7L7xwrKM}#
+                           #{mod -ANAU$bmvAmthP7L7xwrKN}#
                            #f))
                        (values
-                         #{type _hoQGWMnyQPAh3k2jhWLDw}#
-                         (cdr #{b _hoQGWMnyQPAh3k2jhWLDv}#)
-                         #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                         #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                         #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                         #{mod _hoQGWMnyQPAh3k2jhWLDs}#)))))))
-           (if (pair? #{e _hoQGWMnyQPAh3k2jhWLDn}#)
-             (let ((#{first _hoQGWMnyQPAh3k2jhWLER}#
-                     (car #{e _hoQGWMnyQPAh3k2jhWLDn}#)))
+                         #{type -ANAU$bmvAmthP7L7xwrKR}#
+                         (cdr #{b -ANAU$bmvAmthP7L7xwrKQ}#)
+                         #{e -ANAU$bmvAmthP7L7xwrKI}#
+                         #{w -ANAU$bmvAmthP7L7xwrKK}#
+                         #{s -ANAU$bmvAmthP7L7xwrKL}#
+                         #{mod -ANAU$bmvAmthP7L7xwrKN}#)))))))
+           (if (pair? #{e -ANAU$bmvAmthP7L7xwrKI}#)
+             (let ((#{first -ANAU$bmvAmthP7L7xwrKy}#
+                     (car #{e -ANAU$bmvAmthP7L7xwrKI}#)))
                (call-with-values
                  (lambda ()
-                   (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-                     #{first _hoQGWMnyQPAh3k2jhWLER}#
-                     #{r _hoQGWMnyQPAh3k2jhWLDo}#
-                     #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                     #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                     #{rib _hoQGWMnyQPAh3k2jhWLDr}#
-                     #{mod _hoQGWMnyQPAh3k2jhWLDs}#
+                   (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+                     #{first -ANAU$bmvAmthP7L7xwrKy}#
+                     #{r -ANAU$bmvAmthP7L7xwrKJ}#
+                     #{w -ANAU$bmvAmthP7L7xwrKK}#
+                     #{s -ANAU$bmvAmthP7L7xwrKL}#
+                     #{rib -ANAU$bmvAmthP7L7xwrKM}#
+                     #{mod -ANAU$bmvAmthP7L7xwrKN}#
                      #t))
-                 (lambda (#{ftype _hoQGWMnyQPAh3k2jhWLET}#
-                          #{fval _hoQGWMnyQPAh3k2jhWLEU}#
-                          #{fe _hoQGWMnyQPAh3k2jhWLEV}#
-                          #{fw _hoQGWMnyQPAh3k2jhWLEW}#
-                          #{fs _hoQGWMnyQPAh3k2jhWLEX}#
-                          #{fmod _hoQGWMnyQPAh3k2jhWLEY}#)
-                   (if (eqv? #{ftype _hoQGWMnyQPAh3k2jhWLET}# 'lexical)
+                 (lambda (#{ftype -ANAU$bmvAmthP7L7xwrK0}#
+                          #{fval -ANAU$bmvAmthP7L7xwrK1}#
+                          #{fe -ANAU$bmvAmthP7L7xwrK2}#
+                          #{fw -ANAU$bmvAmthP7L7xwrK3}#
+                          #{fs -ANAU$bmvAmthP7L7xwrK4}#
+                          #{fmod -ANAU$bmvAmthP7L7xwrK5}#)
+                   (if (eqv? #{ftype -ANAU$bmvAmthP7L7xwrK0}# 'lexical)
                      (values
                        'lexical-call
-                       #{fval _hoQGWMnyQPAh3k2jhWLEU}#
-                       #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                       #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                       #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                       #{mod _hoQGWMnyQPAh3k2jhWLDs}#)
-                     (if (eqv? #{ftype _hoQGWMnyQPAh3k2jhWLET}# 'global)
+                       #{fval -ANAU$bmvAmthP7L7xwrK1}#
+                       #{e -ANAU$bmvAmthP7L7xwrKI}#
+                       #{w -ANAU$bmvAmthP7L7xwrKK}#
+                       #{s -ANAU$bmvAmthP7L7xwrKL}#
+                       #{mod -ANAU$bmvAmthP7L7xwrKN}#)
+                     (if (eqv? #{ftype -ANAU$bmvAmthP7L7xwrK0}# 'global)
                        (values
                          'global-call
                          (vector
                            'syntax-object
-                           #{fval _hoQGWMnyQPAh3k2jhWLEU}#
-                           #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                           #{fmod _hoQGWMnyQPAh3k2jhWLEY}#)
-                         #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                         #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                         #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                         #{mod _hoQGWMnyQPAh3k2jhWLDs}#)
-                       (if (eqv? #{ftype _hoQGWMnyQPAh3k2jhWLET}# 'macro)
-                         (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-                           (#{expand-macro _hoQGWMnyQPAh3k2jhWHTo}#
-                             #{fval _hoQGWMnyQPAh3k2jhWLEU}#
-                             #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                             #{r _hoQGWMnyQPAh3k2jhWLDo}#
-                             #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                             #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                             #{rib _hoQGWMnyQPAh3k2jhWLDr}#
-                             #{mod _hoQGWMnyQPAh3k2jhWLDs}#)
-                           #{r _hoQGWMnyQPAh3k2jhWLDo}#
+                           #{fval -ANAU$bmvAmthP7L7xwrK1}#
+                           #{w -ANAU$bmvAmthP7L7xwrKK}#
+                           #{fmod -ANAU$bmvAmthP7L7xwrK5}#)
+                         #{e -ANAU$bmvAmthP7L7xwrKI}#
+                         #{w -ANAU$bmvAmthP7L7xwrKK}#
+                         #{s -ANAU$bmvAmthP7L7xwrKL}#
+                         #{mod -ANAU$bmvAmthP7L7xwrKN}#)
+                       (if (eqv? #{ftype -ANAU$bmvAmthP7L7xwrK0}# 'macro)
+                         (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+                           (#{expand-macro -ANAU$bmvAmthP7L7xwnOH}#
+                             #{fval -ANAU$bmvAmthP7L7xwrK1}#
+                             #{e -ANAU$bmvAmthP7L7xwrKI}#
+                             #{r -ANAU$bmvAmthP7L7xwrKJ}#
+                             #{w -ANAU$bmvAmthP7L7xwrKK}#
+                             #{s -ANAU$bmvAmthP7L7xwrKL}#
+                             #{rib -ANAU$bmvAmthP7L7xwrKM}#
+                             #{mod -ANAU$bmvAmthP7L7xwrKN}#)
+                           #{r -ANAU$bmvAmthP7L7xwrKJ}#
                            '(())
-                           #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                           #{rib _hoQGWMnyQPAh3k2jhWLDr}#
-                           #{mod _hoQGWMnyQPAh3k2jhWLDs}#
-                           #{for-car? _hoQGWMnyQPAh3k2jhWLDt}#)
-                         (if (eqv? #{ftype _hoQGWMnyQPAh3k2jhWLET}#
+                           #{s -ANAU$bmvAmthP7L7xwrKL}#
+                           #{rib -ANAU$bmvAmthP7L7xwrKM}#
+                           #{mod -ANAU$bmvAmthP7L7xwrKN}#
+                           #{for-car? -ANAU$bmvAmthP7L7xwrKO}#)
+                         (if (eqv? #{ftype -ANAU$bmvAmthP7L7xwrK0}#
                                    'module-ref)
                            (call-with-values
                              (lambda ()
-                               (#{fval _hoQGWMnyQPAh3k2jhWLEU}#
-                                 #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                                 #{r _hoQGWMnyQPAh3k2jhWLDo}#
-                                 #{w _hoQGWMnyQPAh3k2jhWLDp}#))
-                             (lambda (#{e _hoQGWMnyQPAh3k2jhWLEt}#
-                                      #{r _hoQGWMnyQPAh3k2jhWLEu}#
-                                      #{w _hoQGWMnyQPAh3k2jhWLEv}#
-                                      #{s _hoQGWMnyQPAh3k2jhWLEw}#
-                                      #{mod _hoQGWMnyQPAh3k2jhWLEx}#)
-                               (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-                                 #{e _hoQGWMnyQPAh3k2jhWLEt}#
-                                 #{r _hoQGWMnyQPAh3k2jhWLEu}#
-                                 #{w _hoQGWMnyQPAh3k2jhWLEv}#
-                                 #{s _hoQGWMnyQPAh3k2jhWLEw}#
-                                 #{rib _hoQGWMnyQPAh3k2jhWLDr}#
-                                 #{mod _hoQGWMnyQPAh3k2jhWLEx}#
-                                 #{for-car? _hoQGWMnyQPAh3k2jhWLDt}#)))
-                           (if (eqv? #{ftype _hoQGWMnyQPAh3k2jhWLET}# 'core)
+                               (#{fval -ANAU$bmvAmthP7L7xwrK1}#
+                                 #{e -ANAU$bmvAmthP7L7xwrKI}#
+                                 #{r -ANAU$bmvAmthP7L7xwrKJ}#
+                                 #{w -ANAU$bmvAmthP7L7xwrKK}#))
+                             (lambda (#{e -ANAU$bmvAmthP7L7xwrLO}#
+                                      #{r -ANAU$bmvAmthP7L7xwrLP}#
+                                      #{w -ANAU$bmvAmthP7L7xwrLQ}#
+                                      #{s -ANAU$bmvAmthP7L7xwrLR}#
+                                      #{mod -ANAU$bmvAmthP7L7xwrLS}#)
+                               (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+                                 #{e -ANAU$bmvAmthP7L7xwrLO}#
+                                 #{r -ANAU$bmvAmthP7L7xwrLP}#
+                                 #{w -ANAU$bmvAmthP7L7xwrLQ}#
+                                 #{s -ANAU$bmvAmthP7L7xwrLR}#
+                                 #{rib -ANAU$bmvAmthP7L7xwrKM}#
+                                 #{mod -ANAU$bmvAmthP7L7xwrLS}#
+                                 #{for-car? -ANAU$bmvAmthP7L7xwrKO}#)))
+                           (if (eqv? #{ftype -ANAU$bmvAmthP7L7xwrK0}# 'core)
                              (values
                                'core-form
-                               #{fval _hoQGWMnyQPAh3k2jhWLEU}#
-                               #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                               #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                               #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                               #{mod _hoQGWMnyQPAh3k2jhWLDs}#)
-                             (if (eqv? #{ftype _hoQGWMnyQPAh3k2jhWLET}#
+                               #{fval -ANAU$bmvAmthP7L7xwrK1}#
+                               #{e -ANAU$bmvAmthP7L7xwrKI}#
+                               #{w -ANAU$bmvAmthP7L7xwrKK}#
+                               #{s -ANAU$bmvAmthP7L7xwrKL}#
+                               #{mod -ANAU$bmvAmthP7L7xwrKN}#)
+                             (if (eqv? #{ftype -ANAU$bmvAmthP7L7xwrK0}#
                                        'local-syntax)
                                (values
                                  'local-syntax-form
-                                 #{fval _hoQGWMnyQPAh3k2jhWLEU}#
-                                 #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                                 #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                                 #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                                 #{mod _hoQGWMnyQPAh3k2jhWLDs}#)
-                               (if (eqv? #{ftype _hoQGWMnyQPAh3k2jhWLET}#
+                                 #{fval -ANAU$bmvAmthP7L7xwrK1}#
+                                 #{e -ANAU$bmvAmthP7L7xwrKI}#
+                                 #{w -ANAU$bmvAmthP7L7xwrKK}#
+                                 #{s -ANAU$bmvAmthP7L7xwrKL}#
+                                 #{mod -ANAU$bmvAmthP7L7xwrKN}#)
+                               (if (eqv? #{ftype -ANAU$bmvAmthP7L7xwrK0}#
                                          'begin)
                                  (values
                                    'begin-form
                                    #f
-                                   #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                                   #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                                   #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                                   #{mod _hoQGWMnyQPAh3k2jhWLDs}#)
-                                 (if (eqv? #{ftype _hoQGWMnyQPAh3k2jhWLET}#
+                                   #{e -ANAU$bmvAmthP7L7xwrKI}#
+                                   #{w -ANAU$bmvAmthP7L7xwrKK}#
+                                   #{s -ANAU$bmvAmthP7L7xwrKL}#
+                                   #{mod -ANAU$bmvAmthP7L7xwrKN}#)
+                                 (if (eqv? #{ftype -ANAU$bmvAmthP7L7xwrK0}#
                                            'eval-when)
                                    (values
                                      'eval-when-form
                                      #f
-                                     #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                                     #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                                     #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                                     #{mod _hoQGWMnyQPAh3k2jhWLDs}#)
-                                   (if (eqv? #{ftype _hoQGWMnyQPAh3k2jhWLET}#
+                                     #{e -ANAU$bmvAmthP7L7xwrKI}#
+                                     #{w -ANAU$bmvAmthP7L7xwrKK}#
+                                     #{s -ANAU$bmvAmthP7L7xwrKL}#
+                                     #{mod -ANAU$bmvAmthP7L7xwrKN}#)
+                                   (if (eqv? #{ftype -ANAU$bmvAmthP7L7xwrK0}#
                                              'define)
-                                     (let ((#{tmp _hoQGWMnyQPAh3k2jhWLFC}#
+                                     (let ((#{tmp -ANAU$bmvAmthP7L7xwrLj}#
                                              ($sc-dispatch
-                                               #{e _hoQGWMnyQPAh3k2jhWLDn}#
+                                               #{e -ANAU$bmvAmthP7L7xwrKI}#
                                                '(_ any any))))
-                                       (if (if #{tmp _hoQGWMnyQPAh3k2jhWLFC}#
+                                       (if (if #{tmp -ANAU$bmvAmthP7L7xwrLj}#
                                              (@apply
-                                               (lambda (#{name _hoQGWMnyQPAh3k2jhWLFG}#
-                                                        #{val _hoQGWMnyQPAh3k2jhWLFH}#)
+                                               (lambda (#{name -ANAU$bmvAmthP7L7xwrLn}#
+                                                        #{val -ANAU$bmvAmthP7L7xwrLo}#)
                                                  (if (symbol?
-                                                       #{name _hoQGWMnyQPAh3k2jhWLFG}#)
+                                                       #{name -ANAU$bmvAmthP7L7xwrLn}#)
                                                    #t
                                                    (if (if (vector?
-                                                             #{name _hoQGWMnyQPAh3k2jhWLFG}#)
+                                                             #{name -ANAU$bmvAmthP7L7xwrLn}#)
                                                          (if (= (vector-length
-                                                                  #{name _hoQGWMnyQPAh3k2jhWLFG}#)
+                                                                  #{name -ANAU$bmvAmthP7L7xwrLn}#)
                                                                 4)
                                                            (eq? (vector-ref
-                                                                  #{name _hoQGWMnyQPAh3k2jhWLFG}#
+                                                                  #{name -ANAU$bmvAmthP7L7xwrLn}#
                                                                   0)
                                                                 'syntax-object)
                                                            #f)
                                                          #f)
                                                      (symbol?
                                                        (vector-ref
-                                                         #{name _hoQGWMnyQPAh3k2jhWLFG}#
+                                                         #{name -ANAU$bmvAmthP7L7xwrLn}#
                                                          1))
                                                      #f)))
-                                               #{tmp _hoQGWMnyQPAh3k2jhWLFC}#)
+                                               #{tmp -ANAU$bmvAmthP7L7xwrLj}#)
                                              #f)
                                          (@apply
-                                           (lambda (#{name _hoQGWMnyQPAh3k2jhWLFi}#
-                                                    #{val _hoQGWMnyQPAh3k2jhWLFj}#)
+                                           (lambda (#{name -ANAU$bmvAmthP7L7xwrMD}#
+                                                    #{val -ANAU$bmvAmthP7L7xwrME}#)
                                              (values
                                                'define-form
-                                               #{name _hoQGWMnyQPAh3k2jhWLFi}#
-                                               #{val _hoQGWMnyQPAh3k2jhWLFj}#
-                                               #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                                               #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                                               #{mod _hoQGWMnyQPAh3k2jhWLDs}#))
-                                           #{tmp _hoQGWMnyQPAh3k2jhWLFC}#)
-                                         (let ((#{tmp _hoQGWMnyQPAh3k2jhWLFk}#
+                                               #{name -ANAU$bmvAmthP7L7xwrMD}#
+                                               #{val -ANAU$bmvAmthP7L7xwrME}#
+                                               #{w -ANAU$bmvAmthP7L7xwrKK}#
+                                               #{s -ANAU$bmvAmthP7L7xwrKL}#
+                                               #{mod -ANAU$bmvAmthP7L7xwrKN}#))
+                                           #{tmp -ANAU$bmvAmthP7L7xwrLj}#)
+                                         (let ((#{tmp -ANAU$bmvAmthP7L7xwrMF}#
                                                  ($sc-dispatch
-                                                   #{e _hoQGWMnyQPAh3k2jhWLDn}#
+                                                   #{e -ANAU$bmvAmthP7L7xwrKI}#
                                                    '(_ (any . any)
                                                        any
                                                        .
                                                        each-any))))
-                                           (if (if #{tmp _hoQGWMnyQPAh3k2jhWLFk}#
+                                           (if (if #{tmp -ANAU$bmvAmthP7L7xwrMF}#
                                                  (@apply
-                                                   (lambda (#{name _hoQGWMnyQPAh3k2jhWLFo}#
-                                                            #{args _hoQGWMnyQPAh3k2jhWLFp}#
-                                                            #{e1 _hoQGWMnyQPAh3k2jhWLFq}#
-                                                            #{e2 _hoQGWMnyQPAh3k2jhWLFr}#)
+                                                   (lambda (#{name -ANAU$bmvAmthP7L7xwrMJ}#
+                                                            #{args -ANAU$bmvAmthP7L7xwrMK}#
+                                                            #{e1 -ANAU$bmvAmthP7L7xwrML}#
+                                                            #{e2 -ANAU$bmvAmthP7L7xwrMM}#)
                                                      (if (if (symbol?
-                                                               #{name _hoQGWMnyQPAh3k2jhWLFo}#)
+                                                               #{name -ANAU$bmvAmthP7L7xwrMJ}#)
                                                            #t
                                                            (if (if (vector?
-                                                                     #{name _hoQGWMnyQPAh3k2jhWLFo}#)
+                                                                     #{name -ANAU$bmvAmthP7L7xwrMJ}#)
                                                                  (if (= (vector-length
-                                                                          #{name _hoQGWMnyQPAh3k2jhWLFo}#)
+                                                                          #{name -ANAU$bmvAmthP7L7xwrMJ}#)
                                                                         4)
                                                                    (eq? (vector-ref
-                                                                          #{name _hoQGWMnyQPAh3k2jhWLFo}#
+                                                                          #{name -ANAU$bmvAmthP7L7xwrMJ}#
                                                                           0)
                                                                         'syntax-object)
                                                                    #f)
                                                                  #f)
                                                              (symbol?
                                                                (vector-ref
-                                                                 #{name _hoQGWMnyQPAh3k2jhWLFo}#
+                                                                 #{name -ANAU$bmvAmthP7L7xwrMJ}#
                                                                  1))
                                                              #f))
-                                                       (#{valid-bound-ids? _hoQGWMnyQPAh3k2jhWHTb}#
+                                                       (#{valid-bound-ids? -ANAU$bmvAmthP7L7xwnN6}#
                                                          (letrec*
-                                                           ((#{lvl _hoQGWMnyQPAh3k2jhWLIA}#
-                                                              (lambda (#{vars _hoQGWMnyQPAh3k2jhWLIC}#
-                                                                       #{ls _hoQGWMnyQPAh3k2jhWLID}#
-                                                                       #{w _hoQGWMnyQPAh3k2jhWLIE}#)
-                                                                (if (pair? #{vars _hoQGWMnyQPAh3k2jhWLIC}#)
-                                                                  (#{lvl _hoQGWMnyQPAh3k2jhWLIA}#
-                                                                    (cdr #{vars _hoQGWMnyQPAh3k2jhWLIC}#)
-                                                                    (cons (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                                                            (car #{vars _hoQGWMnyQPAh3k2jhWLIC}#)
-                                                                            #{w _hoQGWMnyQPAh3k2jhWLIE}#
+                                                           ((#{lvl -ANAU$bmvAmthP7L7xwrOh}#
+                                                              (lambda (#{vars -ANAU$bmvAmthP7L7xwrOj}#
+                                                                       #{ls -ANAU$bmvAmthP7L7xwrOk}#
+                                                                       #{w -ANAU$bmvAmthP7L7xwrOl}#)
+                                                                (if (pair? #{vars -ANAU$bmvAmthP7L7xwrOj}#)
+                                                                  (#{lvl -ANAU$bmvAmthP7L7xwrOh}#
+                                                                    (cdr #{vars -ANAU$bmvAmthP7L7xwrOj}#)
+                                                                    (cons (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                                                            (car #{vars -ANAU$bmvAmthP7L7xwrOj}#)
+                                                                            #{w -ANAU$bmvAmthP7L7xwrOl}#
                                                                             #f)
-                                                                          #{ls _hoQGWMnyQPAh3k2jhWLID}#)
-                                                                    #{w _hoQGWMnyQPAh3k2jhWLIE}#)
+                                                                          #{ls -ANAU$bmvAmthP7L7xwrOk}#)
+                                                                    #{w -ANAU$bmvAmthP7L7xwrOl}#)
                                                                   (if (if (symbol?
-                                                                            #{vars _hoQGWMnyQPAh3k2jhWLIC}#)
+                                                                            #{vars -ANAU$bmvAmthP7L7xwrOj}#)
                                                                         #t
                                                                         (if (if (vector?
-                                                                                  #{vars _hoQGWMnyQPAh3k2jhWLIC}#)
+                                                                                  #{vars -ANAU$bmvAmthP7L7xwrOj}#)
                                                                               (if (= (vector-length
-                                                                                       #{vars _hoQGWMnyQPAh3k2jhWLIC}#)
+                                                                                       #{vars -ANAU$bmvAmthP7L7xwrOj}#)
                                                                                      4)
                                                                                 (eq? (vector-ref
-                                                                                       #{vars _hoQGWMnyQPAh3k2jhWLIC}#
+                                                                                       #{vars -ANAU$bmvAmthP7L7xwrOj}#
                                                                                        0)
                                                                                      'syntax-object)
                                                                                 #f)
                                                                               #f)
                                                                           (symbol?
                                                                             (vector-ref
-                                                                              #{vars _hoQGWMnyQPAh3k2jhWLIC}#
+                                                                              #{vars -ANAU$bmvAmthP7L7xwrOj}#
                                                                               1))
                                                                           #f))
-                                                                    (cons (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                                                            #{vars _hoQGWMnyQPAh3k2jhWLIC}#
-                                                                            #{w _hoQGWMnyQPAh3k2jhWLIE}#
+                                                                    (cons (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                                                            #{vars -ANAU$bmvAmthP7L7xwrOj}#
+                                                                            #{w -ANAU$bmvAmthP7L7xwrOl}#
                                                                             #f)
-                                                                          #{ls _hoQGWMnyQPAh3k2jhWLID}#)
-                                                                    (if (null? #{vars _hoQGWMnyQPAh3k2jhWLIC}#)
-                                                                      #{ls _hoQGWMnyQPAh3k2jhWLID}#
+                                                                          #{ls -ANAU$bmvAmthP7L7xwrOk}#)
+                                                                    (if (null? #{vars -ANAU$bmvAmthP7L7xwrOj}#)
+                                                                      #{ls -ANAU$bmvAmthP7L7xwrOk}#
                                                                       (if (if (vector?
-                                                                                #{vars _hoQGWMnyQPAh3k2jhWLIC}#)
+                                                                                #{vars -ANAU$bmvAmthP7L7xwrOj}#)
                                                                             (if (= (vector-length
-                                                                                     #{vars _hoQGWMnyQPAh3k2jhWLIC}#)
+                                                                                     #{vars -ANAU$bmvAmthP7L7xwrOj}#)
                                                                                    4)
                                                                               (eq? (vector-ref
-                                                                                     #{vars _hoQGWMnyQPAh3k2jhWLIC}#
+                                                                                     #{vars -ANAU$bmvAmthP7L7xwrOj}#
                                                                                      0)
                                                                                    'syntax-object)
                                                                               #f)
                                                                             #f)
-                                                                        (#{lvl _hoQGWMnyQPAh3k2jhWLIA}#
+                                                                        (#{lvl -ANAU$bmvAmthP7L7xwrOh}#
                                                                           (vector-ref
-                                                                            #{vars _hoQGWMnyQPAh3k2jhWLIC}#
+                                                                            #{vars -ANAU$bmvAmthP7L7xwrOj}#
                                                                             1)
-                                                                          #{ls _hoQGWMnyQPAh3k2jhWLID}#
-                                                                          (#{join-wraps _hoQGWMnyQPAh3k2jhWHTR}#
-                                                                            #{w _hoQGWMnyQPAh3k2jhWLIE}#
+                                                                          #{ls -ANAU$bmvAmthP7L7xwrOk}#
+                                                                          (#{join-wraps -ANAU$bmvAmthP7L7xwnNw}#
+                                                                            #{w -ANAU$bmvAmthP7L7xwrOl}#
                                                                             (vector-ref
-                                                                              #{vars _hoQGWMnyQPAh3k2jhWLIC}#
+                                                                              #{vars -ANAU$bmvAmthP7L7xwrOj}#
                                                                               2)))
-                                                                        (cons #{vars _hoQGWMnyQPAh3k2jhWLIC}#
-                                                                              #{ls _hoQGWMnyQPAh3k2jhWLID}#))))))))
-                                                           (#{lvl _hoQGWMnyQPAh3k2jhWLIA}#
-                                                             #{args _hoQGWMnyQPAh3k2jhWLFp}#
+                                                                        (cons #{vars -ANAU$bmvAmthP7L7xwrOj}#
+                                                                              #{ls -ANAU$bmvAmthP7L7xwrOk}#))))))))
+                                                           (#{lvl -ANAU$bmvAmthP7L7xwrOh}#
+                                                             #{args -ANAU$bmvAmthP7L7xwrMK}#
                                                              '()
                                                              '(()))))
                                                        #f))
-                                                   #{tmp _hoQGWMnyQPAh3k2jhWLFk}#)
+                                                   #{tmp -ANAU$bmvAmthP7L7xwrMF}#)
                                                  #f)
                                              (@apply
-                                               (lambda (#{name _hoQGWMnyQPAh3k2jhWLIw}#
-                                                        #{args _hoQGWMnyQPAh3k2jhWLIx}#
-                                                        #{e1 _hoQGWMnyQPAh3k2jhWLIy}#
-                                                        #{e2 _hoQGWMnyQPAh3k2jhWLIz}#)
+                                               (lambda (#{name -ANAU$bmvAmthP7L7xwrPR}#
+                                                        #{args -ANAU$bmvAmthP7L7xwrPS}#
+                                                        #{e1 -ANAU$bmvAmthP7L7xwrPT}#
+                                                        #{e2 -ANAU$bmvAmthP7L7xwrPU}#)
                                                  (values
                                                    'define-form
-                                                   (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                                     #{name _hoQGWMnyQPAh3k2jhWLIw}#
-                                                     #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                                                     #{mod _hoQGWMnyQPAh3k2jhWLDs}#)
-                                                   (let ((#{e _hoQGWMnyQPAh3k2jhWLI5}#
+                                                   (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                                     #{name -ANAU$bmvAmthP7L7xwrPR}#
+                                                     #{w -ANAU$bmvAmthP7L7xwrKK}#
+                                                     #{mod -ANAU$bmvAmthP7L7xwrKN}#)
+                                                   (let ((#{e -ANAU$bmvAmthP7L7xwrPa}#
                                                            (cons '#(syntax-object
                                                                     lambda
                                                                     ((top)
@@ -1981,10 +1969,10 @@
                                                                          (top)
                                                                          (top)
                                                                          (top))
-                                                                       #("29f"
-                                                                         "29g"
-                                                                         "29h"
-                                                                         "29i"))
+                                                                       #("l7"
+                                                                         "l8"
+                                                                         "l9"
+                                                                         "la"))
                                                                      #(ribcage
                                                                        ()
                                                                        ()
@@ -2006,12 +1994,12 @@
                                                                          (top)
                                                                          (top)
                                                                          (top))
-                                                                       #("28w"
-                                                                         "28x"
-                                                                         "28y"
-                                                                         "28z"
-                                                                         "290"
-                                                                         "291"))
+                                                                       #("ko"
+                                                                         "kp"
+                                                                         "kq"
+                                                                         "kr"
+                                                                         "ks"
+                                                                         "kt"))
                                                                      #(ribcage
                                                                        ()
                                                                        ()
@@ -2019,7 +2007,7 @@
                                                                      #(ribcage
                                                                        #(first)
                                                                        #((top))
-                                                                       #("28v"))
+                                                                       #("kn"))
                                                                      #(ribcage
                                                                        ()
                                                                        ()
@@ -2047,13 +2035,13 @@
                                                                          (top)
                                                                          (top)
                                                                          (top))
-                                                                       #("28l"
-                                                                         "28m"
-                                                                         "28n"
-                                                                         "28o"
-                                                                         "28p"
-                                                                         "28q"
-                                                                         "28r"))
+                                                                       #("kd"
+                                                                         "ke"
+                                                                         "kf"
+                                                                         "kg"
+                                                                         "kh"
+                                                                         "ki"
+                                                                         "kj"))
                                                                      #(ribcage
                                                                        (lambda-var-list
                                                                          gen-var
@@ -2335,146 +2323,146 @@
                                                                         (top)
                                                                         (top)
                                                                         (top))
-                                                                       ("1tt"
-                                                                        "1ts"
-                                                                        "1tr"
-                                                                        "1tq"
-                                                                        "1tp"
-                                                                        "1to"
-                                                                        "1tn"
-                                                                        "1tm"
-                                                                        "1tl"
-                                                                        "1tk"
-                                                                        "1tj"
-                                                                        "1ti"
-                                                                        "1th"
-                                                                        "1tg"
-                                                                        "1tf"
-                                                                        "1te"
-                                                                        "1td"
-                                                                        "1tc"
-                                                                        "1tb"
-                                                                        "1ta"
-                                                                        "1t9"
-                                                                        "1t8"
-                                                                        "1t7"
-                                                                        "1t6"
-                                                                        "1t5"
-                                                                        "1t4"
-                                                                        "1t3"
-                                                                        "1t2"
-                                                                        "1t1"
-                                                                        "1t0"
-                                                                        "1sz"
-                                                                        "1sy"
-                                                                        "1sx"
-                                                                        "1sw"
-                                                                        "1sv"
-                                                                        "1su"
-                                                                        "1st"
-                                                                        "1ss"
-                                                                        "1sr"
-                                                                        "1sq"
-                                                                        "1sp"
-                                                                        "1so"
-                                                                        "1sn"
-                                                                        "1sm"
-                                                                        "1sl"
-                                                                        "1sk"
-                                                                        "1sj"
-                                                                        "1si"
-                                                                        "1sh"
-                                                                        "1sg"
-                                                                        "1sf"
-                                                                        "1se"
-                                                                        "1sd"
-                                                                        "1sc"
-                                                                        "1sb"
-                                                                        "1sa"
-                                                                        "1s9"
-                                                                        "1s8"
-                                                                        "1s7"
-                                                                        "1s6"
-                                                                        "1s5"
-                                                                        "1s4"
-                                                                        "1s3"
-                                                                        "1s2"
-                                                                        "1s1"
-                                                                        "1s0"
-                                                                        "1rz"
-                                                                        "1ry"
-                                                                        "1rx"
-                                                                        "1rw"
-                                                                        "1rv"
-                                                                        "1ru"
-                                                                        "1rt"
-                                                                        "1rs"
-                                                                        "1rr"
-                                                                        "1rq"
-                                                                        "1rp"
-                                                                        "1ro"
-                                                                        "1rn"
-                                                                        "1rm"
-                                                                        "1rl"
-                                                                        "1rk"
-                                                                        "1rj"
-                                                                        "1ri"
-                                                                        "1rh"
-                                                                        "1rg"
-                                                                        "1rf"
-                                                                        "1re"
-                                                                        "1rd"
-                                                                        "1rc"
-                                                                        "1rb"
-                                                                        "1ra"
-                                                                        "1r9"
-                                                                        "1r8"
-                                                                        "1r7"
-                                                                        "1r6"
-                                                                        "1r5"
-                                                                        "1r4"
-                                                                        "1r3"
-                                                                        "1r2"
-                                                                        "1r1"
-                                                                        "1r0"
-                                                                        "1qz"
-                                                                        "1qy"
-                                                                        "1qx"
-                                                                        "1qw"
-                                                                        "1qv"
-                                                                        "1qu"
-                                                                        "1qt"
-                                                                        "1qs"
-                                                                        "1qr"
-                                                                        "1qq"
-                                                                        "1qp"
-                                                                        "1qo"
-                                                                        "1qn"
-                                                                        "1qm"
-                                                                        "1ql"
-                                                                        "1qk"
-                                                                        "1qj"
-                                                                        "1qi"
-                                                                        "1qh"
-                                                                        "1qg"
-                                                                        "1qf"
-                                                                        "1qe"
-                                                                        "1qd"
-                                                                        "1qc"
-                                                                        "1qb"
-                                                                        "1qa"
-                                                                        "1q9"
-                                                                        "1q8"
-                                                                        "1q7"
-                                                                        "1q6"
-                                                                        "1q5"
-                                                                        "1q4"
-                                                                        "1q3"
-                                                                        "1q2"
-                                                                        "1q1"
-                                                                        "1q0"
-                                                                        "1pz"
-                                                                        "1py"))
+                                                                       ("5l"
+                                                                        "5k"
+                                                                        "5j"
+                                                                        "5i"
+                                                                        "5h"
+                                                                        "5g"
+                                                                        "5f"
+                                                                        "5e"
+                                                                        "5d"
+                                                                        "5c"
+                                                                        "5b"
+                                                                        "5a"
+                                                                        "59"
+                                                                        "58"
+                                                                        "57"
+                                                                        "56"
+                                                                        "55"
+                                                                        "54"
+                                                                        "53"
+                                                                        "52"
+                                                                        "51"
+                                                                        "50"
+                                                                        "4z"
+                                                                        "4y"
+                                                                        "4x"
+                                                                        "4w"
+                                                                        "4v"
+                                                                        "4u"
+                                                                        "4t"
+                                                                        "4s"
+                                                                        "4r"
+                                                                        "4q"
+                                                                        "4p"
+                                                                        "4o"
+                                                                        "4n"
+                                                                        "4m"
+                                                                        "4l"
+                                                                        "4k"
+                                                                        "4j"
+                                                                        "4i"
+                                                                        "4h"
+                                                                        "4g"
+                                                                        "4f"
+                                                                        "4e"
+                                                                        "4d"
+                                                                        "4c"
+                                                                        "4b"
+                                                                        "4a"
+                                                                        "49"
+                                                                        "48"
+                                                                        "47"
+                                                                        "46"
+                                                                        "45"
+                                                                        "44"
+                                                                        "43"
+                                                                        "42"
+                                                                        "41"
+                                                                        "40"
+                                                                        "3z"
+                                                                        "3y"
+                                                                        "3x"
+                                                                        "3w"
+                                                                        "3v"
+                                                                        "3u"
+                                                                        "3t"
+                                                                        "3s"
+                                                                        "3r"
+                                                                        "3q"
+                                                                        "3p"
+                                                                        "3o"
+                                                                        "3n"
+                                                                        "3m"
+                                                                        "3l"
+                                                                        "3k"
+                                                                        "3j"
+                                                                        "3i"
+                                                                        "3h"
+                                                                        "3g"
+                                                                        "3f"
+                                                                        "3e"
+                                                                        "3d"
+                                                                        "3c"
+                                                                        "3b"
+                                                                        "3a"
+                                                                        "39"
+                                                                        "38"
+                                                                        "37"
+                                                                        "36"
+                                                                        "35"
+                                                                        "34"
+                                                                        "33"
+                                                                        "32"
+                                                                        "31"
+                                                                        "30"
+                                                                        "2z"
+                                                                        "2y"
+                                                                        "2x"
+                                                                        "2w"
+                                                                        "2v"
+                                                                        "2u"
+                                                                        "2t"
+                                                                        "2s"
+                                                                        "2r"
+                                                                        "2q"
+                                                                        "2p"
+                                                                        "2o"
+                                                                        "2n"
+                                                                        "2m"
+                                                                        "2l"
+                                                                        "2k"
+                                                                        "2j"
+                                                                        "2i"
+                                                                        "2h"
+                                                                        "2g"
+                                                                        "2f"
+                                                                        "2e"
+                                                                        "2d"
+                                                                        "2c"
+                                                                        "2b"
+                                                                        "2a"
+                                                                        "29"
+                                                                        "28"
+                                                                        "27"
+                                                                        "26"
+                                                                        "25"
+                                                                        "24"
+                                                                        "23"
+                                                                        "22"
+                                                                        "21"
+                                                                        "20"
+                                                                        "1z"
+                                                                        "1y"
+                                                                        "1x"
+                                                                        "1w"
+                                                                        "1v"
+                                                                        "1u"
+                                                                        "1t"
+                                                                        "1s"
+                                                                        "1r"
+                                                                        "1q"))
                                                                      #(ribcage
                                                                        (define-structure
                                                                          define-expansion-accessors
@@ -2482,72 +2470,72 @@
                                                                        ((top)
                                                                         (top)
                                                                         (top))
-                                                                       ("1og"
-                                                                        "1of"
-                                                                        "1oe")))
+                                                                       ("8"
+                                                                        "7"
+                                                                        "6")))
                                                                     (hygiene
                                                                       guile))
-                                                                 (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                                                   (cons #{args _hoQGWMnyQPAh3k2jhWLIx}#
-                                                                         (cons #{e1 _hoQGWMnyQPAh3k2jhWLIy}#
-                                                                               #{e2 _hoQGWMnyQPAh3k2jhWLIz}#))
-                                                                   #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                                                                   #{mod _hoQGWMnyQPAh3k2jhWLDs}#))))
+                                                                 (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                                                   (cons #{args -ANAU$bmvAmthP7L7xwrPS}#
+                                                                         (cons #{e1 -ANAU$bmvAmthP7L7xwrPT}#
+                                                                               #{e2 -ANAU$bmvAmthP7L7xwrPU}#))
+                                                                   #{w -ANAU$bmvAmthP7L7xwrKK}#
+                                                                   #{mod -ANAU$bmvAmthP7L7xwrKN}#))))
                                                      (begin
-                                                       (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWLI5}#)
-                                                             #{s _hoQGWMnyQPAh3k2jhWLDq}#
+                                                       (if (if (pair? #{e -ANAU$bmvAmthP7L7xwrPa}#)
+                                                             #{s -ANAU$bmvAmthP7L7xwrKL}#
                                                              #f)
                                                          (set-source-properties!
-                                                           #{e _hoQGWMnyQPAh3k2jhWLI5}#
-                                                           #{s _hoQGWMnyQPAh3k2jhWLDq}#))
-                                                       #{e _hoQGWMnyQPAh3k2jhWLI5}#))
+                                                           #{e -ANAU$bmvAmthP7L7xwrPa}#
+                                                           #{s -ANAU$bmvAmthP7L7xwrKL}#))
+                                                       #{e -ANAU$bmvAmthP7L7xwrPa}#))
                                                    '(())
-                                                   #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                                                   #{mod _hoQGWMnyQPAh3k2jhWLDs}#))
-                                               #{tmp _hoQGWMnyQPAh3k2jhWLFk}#)
-                                             (let ((#{tmp _hoQGWMnyQPAh3k2jhWLJA}#
+                                                   #{s -ANAU$bmvAmthP7L7xwrKL}#
+                                                   #{mod -ANAU$bmvAmthP7L7xwrKN}#))
+                                               #{tmp -ANAU$bmvAmthP7L7xwrMF}#)
+                                             (let ((#{tmp -ANAU$bmvAmthP7L7xwrPh}#
                                                      ($sc-dispatch
-                                                       #{e _hoQGWMnyQPAh3k2jhWLDn}#
+                                                       #{e -ANAU$bmvAmthP7L7xwrKI}#
                                                        '(_ any))))
-                                               (if (if #{tmp _hoQGWMnyQPAh3k2jhWLJA}#
+                                               (if (if #{tmp -ANAU$bmvAmthP7L7xwrPh}#
                                                      (@apply
-                                                       (lambda (#{name _hoQGWMnyQPAh3k2jhWLJE}#)
+                                                       (lambda (#{name -ANAU$bmvAmthP7L7xwrPl}#)
                                                          (if (symbol?
-                                                               #{name _hoQGWMnyQPAh3k2jhWLJE}#)
+                                                               #{name -ANAU$bmvAmthP7L7xwrPl}#)
                                                            #t
                                                            (if (if (vector?
-                                                                     #{name _hoQGWMnyQPAh3k2jhWLJE}#)
+                                                                     #{name -ANAU$bmvAmthP7L7xwrPl}#)
                                                                  (if (= (vector-length
-                                                                          #{name _hoQGWMnyQPAh3k2jhWLJE}#)
+                                                                          #{name -ANAU$bmvAmthP7L7xwrPl}#)
                                                                         4)
                                                                    (eq? (vector-ref
-                                                                          #{name _hoQGWMnyQPAh3k2jhWLJE}#
+                                                                          #{name -ANAU$bmvAmthP7L7xwrPl}#
                                                                           0)
                                                                         'syntax-object)
                                                                    #f)
                                                                  #f)
                                                              (symbol?
                                                                (vector-ref
-                                                                 #{name _hoQGWMnyQPAh3k2jhWLJE}#
+                                                                 #{name -ANAU$bmvAmthP7L7xwrPl}#
                                                                  1))
                                                              #f)))
-                                                       #{tmp _hoQGWMnyQPAh3k2jhWLJA}#)
+                                                       #{tmp -ANAU$bmvAmthP7L7xwrPh}#)
                                                      #f)
                                                  (@apply
-                                                   (lambda (#{name _hoQGWMnyQPAh3k2jhWLJf}#)
+                                                   (lambda (#{name -ANAU$bmvAmthP7L7xwrQA}#)
                                                      (values
                                                        'define-form
-                                                       (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                                         #{name _hoQGWMnyQPAh3k2jhWLJf}#
-                                                         #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                                                         #{mod _hoQGWMnyQPAh3k2jhWLDs}#)
+                                                       (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                                         #{name -ANAU$bmvAmthP7L7xwrQA}#
+                                                         #{w -ANAU$bmvAmthP7L7xwrKK}#
+                                                         #{mod -ANAU$bmvAmthP7L7xwrKN}#)
                                                        '(#(syntax-object
                                                            if
                                                            ((top)
                                                             #(ribcage
                                                               #(name)
                                                               #((top))
-                                                              #("29k"))
+                                                              #("lc"))
                                                             #(ribcage () () ())
                                                             #(ribcage () () ())
                                                             #(ribcage
@@ -2563,17 +2551,17 @@
                                                                 (top)
                                                                 (top)
                                                                 (top))
-                                                              #("28w"
-                                                                "28x"
-                                                                "28y"
-                                                                "28z"
-                                                                "290"
-                                                                "291"))
+                                                              #("ko"
+                                                                "kp"
+                                                                "kq"
+                                                                "kr"
+                                                                "ks"
+                                                                "kt"))
                                                             #(ribcage () () ())
                                                             #(ribcage
                                                               #(first)
                                                               #((top))
-                                                              #("28v"))
+                                                              #("kn"))
                                                             #(ribcage () () ())
                                                             #(ribcage () () ())
                                                             #(ribcage () () ())
@@ -2592,13 +2580,13 @@
                                                                 (top)
                                                                 (top)
                                                                 (top))
-                                                              #("28l"
-                                                                "28m"
-                                                                "28n"
-                                                                "28o"
-                                                                "28p"
-                                                                "28q"
-                                                                "28r"))
+                                                              #("kd"
+                                                                "ke"
+                                                                "kf"
+                                                                "kg"
+                                                                "kh"
+                                                                "ki"
+                                                                "kj"))
                                                             #(ribcage
                                                               (lambda-var-list
                                                                 gen-var
@@ -2880,146 +2868,146 @@
                                                                (top)
                                                                (top)
                                                                (top))
-                                                              ("1tt"
-                                                               "1ts"
-                                                               "1tr"
-                                                               "1tq"
-                                                               "1tp"
-                                                               "1to"
-                                                               "1tn"
-                                                               "1tm"
-                                                               "1tl"
-                                                               "1tk"
-                                                               "1tj"
-                                                               "1ti"
-                                                               "1th"
-                                                               "1tg"
-                                                               "1tf"
-                                                               "1te"
-                                                               "1td"
-                                                               "1tc"
-                                                               "1tb"
-                                                               "1ta"
-                                                               "1t9"
-                                                               "1t8"
-                                                               "1t7"
-                                                               "1t6"
-                                                               "1t5"
-                                                               "1t4"
-                                                               "1t3"
-                                                               "1t2"
-                                                               "1t1"
-                                                               "1t0"
-                                                               "1sz"
-                                                               "1sy"
-                                                               "1sx"
-                                                               "1sw"
-                                                               "1sv"
-                                                               "1su"
-                                                               "1st"
-                                                               "1ss"
-                                                               "1sr"
-                                                               "1sq"
-                                                               "1sp"
-                                                               "1so"
-                                                               "1sn"
-                                                               "1sm"
-                                                               "1sl"
-                                                               "1sk"
-                                                               "1sj"
-                                                               "1si"
-                                                               "1sh"
-                                                               "1sg"
-                                                               "1sf"
-                                                               "1se"
-                                                               "1sd"
-                                                               "1sc"
-                                                               "1sb"
-                                                               "1sa"
-                                                               "1s9"
-                                                               "1s8"
-                                                               "1s7"
-                                                               "1s6"
-                                                               "1s5"
-                                                               "1s4"
-                                                               "1s3"
-                                                               "1s2"
-                                                               "1s1"
-                                                               "1s0"
-                                                               "1rz"
-                                                               "1ry"
-                                                               "1rx"
-                                                               "1rw"
-                                                               "1rv"
-                                                               "1ru"
-                                                               "1rt"
-                                                               "1rs"
-                                                               "1rr"
-                                                               "1rq"
-                                                               "1rp"
-                                                               "1ro"
-                                                               "1rn"
-                                                               "1rm"
-                                                               "1rl"
-                                                               "1rk"
-                                                               "1rj"
-                                                               "1ri"
-                                                               "1rh"
-                                                               "1rg"
-                                                               "1rf"
-                                                               "1re"
-                                                               "1rd"
-                                                               "1rc"
-                                                               "1rb"
-                                                               "1ra"
-                                                               "1r9"
-                                                               "1r8"
-                                                               "1r7"
-                                                               "1r6"
-                                                               "1r5"
-                                                               "1r4"
-                                                               "1r3"
-                                                               "1r2"
-                                                               "1r1"
-                                                               "1r0"
-                                                               "1qz"
-                                                               "1qy"
-                                                               "1qx"
-                                                               "1qw"
-                                                               "1qv"
-                                                               "1qu"
-                                                               "1qt"
-                                                               "1qs"
-                                                               "1qr"
-                                                               "1qq"
-                                                               "1qp"
-                                                               "1qo"
-                                                               "1qn"
-                                                               "1qm"
-                                                               "1ql"
-                                                               "1qk"
-                                                               "1qj"
-                                                               "1qi"
-                                                               "1qh"
-                                                               "1qg"
-                                                               "1qf"
-                                                               "1qe"
-                                                               "1qd"
-                                                               "1qc"
-                                                               "1qb"
-                                                               "1qa"
-                                                               "1q9"
-                                                               "1q8"
-                                                               "1q7"
-                                                               "1q6"
-                                                               "1q5"
-                                                               "1q4"
-                                                               "1q3"
-                                                               "1q2"
-                                                               "1q1"
-                                                               "1q0"
-                                                               "1pz"
-                                                               "1py"))
+                                                              ("5l"
+                                                               "5k"
+                                                               "5j"
+                                                               "5i"
+                                                               "5h"
+                                                               "5g"
+                                                               "5f"
+                                                               "5e"
+                                                               "5d"
+                                                               "5c"
+                                                               "5b"
+                                                               "5a"
+                                                               "59"
+                                                               "58"
+                                                               "57"
+                                                               "56"
+                                                               "55"
+                                                               "54"
+                                                               "53"
+                                                               "52"
+                                                               "51"
+                                                               "50"
+                                                               "4z"
+                                                               "4y"
+                                                               "4x"
+                                                               "4w"
+                                                               "4v"
+                                                               "4u"
+                                                               "4t"
+                                                               "4s"
+                                                               "4r"
+                                                               "4q"
+                                                               "4p"
+                                                               "4o"
+                                                               "4n"
+                                                               "4m"
+                                                               "4l"
+                                                               "4k"
+                                                               "4j"
+                                                               "4i"
+                                                               "4h"
+                                                               "4g"
+                                                               "4f"
+                                                               "4e"
+                                                               "4d"
+                                                               "4c"
+                                                               "4b"
+                                                               "4a"
+                                                               "49"
+                                                               "48"
+                                                               "47"
+                                                               "46"
+                                                               "45"
+                                                               "44"
+                                                               "43"
+                                                               "42"
+                                                               "41"
+                                                               "40"
+                                                               "3z"
+                                                               "3y"
+                                                               "3x"
+                                                               "3w"
+                                                               "3v"
+                                                               "3u"
+                                                               "3t"
+                                                               "3s"
+                                                               "3r"
+                                                               "3q"
+                                                               "3p"
+                                                               "3o"
+                                                               "3n"
+                                                               "3m"
+                                                               "3l"
+                                                               "3k"
+                                                               "3j"
+                                                               "3i"
+                                                               "3h"
+                                                               "3g"
+                                                               "3f"
+                                                               "3e"
+                                                               "3d"
+                                                               "3c"
+                                                               "3b"
+                                                               "3a"
+                                                               "39"
+                                                               "38"
+                                                               "37"
+                                                               "36"
+                                                               "35"
+                                                               "34"
+                                                               "33"
+                                                               "32"
+                                                               "31"
+                                                               "30"
+                                                               "2z"
+                                                               "2y"
+                                                               "2x"
+                                                               "2w"
+                                                               "2v"
+                                                               "2u"
+                                                               "2t"
+                                                               "2s"
+                                                               "2r"
+                                                               "2q"
+                                                               "2p"
+                                                               "2o"
+                                                               "2n"
+                                                               "2m"
+                                                               "2l"
+                                                               "2k"
+                                                               "2j"
+                                                               "2i"
+                                                               "2h"
+                                                               "2g"
+                                                               "2f"
+                                                               "2e"
+                                                               "2d"
+                                                               "2c"
+                                                               "2b"
+                                                               "2a"
+                                                               "29"
+                                                               "28"
+                                                               "27"
+                                                               "26"
+                                                               "25"
+                                                               "24"
+                                                               "23"
+                                                               "22"
+                                                               "21"
+                                                               "20"
+                                                               "1z"
+                                                               "1y"
+                                                               "1x"
+                                                               "1w"
+                                                               "1v"
+                                                               "1u"
+                                                               "1t"
+                                                               "1s"
+                                                               "1r"
+                                                               "1q"))
                                                             #(ribcage
                                                               (define-structure
                                                                 define-expansion-accessors
@@ -3027,9 +3015,7 @@
                                                               ((top)
                                                                (top)
                                                                (top))
-                                                              ("1og"
-                                                               "1of"
-                                                               "1oe")))
+                                                              ("8" "7" "6")))
                                                            (hygiene guile))
                                                          #(syntax-object
                                                            #f
@@ -3037,7 +3023,7 @@
                                                             #(ribcage
                                                               #(name)
                                                               #((top))
-                                                              #("29k"))
+                                                              #("lc"))
                                                             #(ribcage () () ())
                                                             #(ribcage () () ())
                                                             #(ribcage
@@ -3053,17 +3039,17 @@
                                                                 (top)
                                                                 (top)
                                                                 (top))
-                                                              #("28w"
-                                                                "28x"
-                                                                "28y"
-                                                                "28z"
-                                                                "290"
-                                                                "291"))
+                                                              #("ko"
+                                                                "kp"
+                                                                "kq"
+                                                                "kr"
+                                                                "ks"
+                                                                "kt"))
                                                             #(ribcage () () ())
                                                             #(ribcage
                                                               #(first)
                                                               #((top))
-                                                              #("28v"))
+                                                              #("kn"))
                                                             #(ribcage () () ())
                                                             #(ribcage () () ())
                                                             #(ribcage () () ())
@@ -3082,13 +3068,13 @@
                                                                 (top)
                                                                 (top)
                                                                 (top))
-                                                              #("28l"
-                                                                "28m"
-                                                                "28n"
-                                                                "28o"
-                                                                "28p"
-                                                                "28q"
-                                                                "28r"))
+                                                              #("kd"
+                                                                "ke"
+                                                                "kf"
+                                                                "kg"
+                                                                "kh"
+                                                                "ki"
+                                                                "kj"))
                                                             #(ribcage
                                                               (lambda-var-list
                                                                 gen-var
@@ -3370,146 +3356,146 @@
                                                                (top)
                                                                (top)
                                                                (top))
-                                                              ("1tt"
-                                                               "1ts"
-                                                               "1tr"
-                                                               "1tq"
-                                                               "1tp"
-                                                               "1to"
-                                                               "1tn"
-                                                               "1tm"
-                                                               "1tl"
-                                                               "1tk"
-                                                               "1tj"
-                                                               "1ti"
-                                                               "1th"
-                                                               "1tg"
-                                                               "1tf"
-                                                               "1te"
-                                                               "1td"
-                                                               "1tc"
-                                                               "1tb"
-                                                               "1ta"
-                                                               "1t9"
-                                                               "1t8"
-                                                               "1t7"
-                                                               "1t6"
-                                                               "1t5"
-                                                               "1t4"
-                                                               "1t3"
-                                                               "1t2"
-                                                               "1t1"
-                                                               "1t0"
-                                                               "1sz"
-                                                               "1sy"
-                                                               "1sx"
-                                                               "1sw"
-                                                               "1sv"
-                                                               "1su"
-                                                               "1st"
-                                                               "1ss"
-                                                               "1sr"
-                                                               "1sq"
-                                                               "1sp"
-                                                               "1so"
-                                                               "1sn"
-                                                               "1sm"
-                                                               "1sl"
-                                                               "1sk"
-                                                               "1sj"
-                                                               "1si"
-                                                               "1sh"
-                                                               "1sg"
-                                                               "1sf"
-                                                               "1se"
-                                                               "1sd"
-                                                               "1sc"
-                                                               "1sb"
-                                                               "1sa"
-                                                               "1s9"
-                                                               "1s8"
-                                                               "1s7"
-                                                               "1s6"
-                                                               "1s5"
-                                                               "1s4"
-                                                               "1s3"
-                                                               "1s2"
-                                                               "1s1"
-                                                               "1s0"
-                                                               "1rz"
-                                                               "1ry"
-                                                               "1rx"
-                                                               "1rw"
-                                                               "1rv"
-                                                               "1ru"
-                                                               "1rt"
-                                                               "1rs"
-                                                               "1rr"
-                                                               "1rq"
-                                                               "1rp"
-                                                               "1ro"
-                                                               "1rn"
-                                                               "1rm"
-                                                               "1rl"
-                                                               "1rk"
-                                                               "1rj"
-                                                               "1ri"
-                                                               "1rh"
-                                                               "1rg"
-                                                               "1rf"
-                                                               "1re"
-                                                               "1rd"
-                                                               "1rc"
-                                                               "1rb"
-                                                               "1ra"
-                                                               "1r9"
-                                                               "1r8"
-                                                               "1r7"
-                                                               "1r6"
-                                                               "1r5"
-                                                               "1r4"
-                                                               "1r3"
-                                                               "1r2"
-                                                               "1r1"
-                                                               "1r0"
-                                                               "1qz"
-                                                               "1qy"
-                                                               "1qx"
-                                                               "1qw"
-                                                               "1qv"
-                                                               "1qu"
-                                                               "1qt"
-                                                               "1qs"
-                                                               "1qr"
-                                                               "1qq"
-                                                               "1qp"
-                                                               "1qo"
-                                                               "1qn"
-                                                               "1qm"
-                                                               "1ql"
-                                                               "1qk"
-                                                               "1qj"
-                                                               "1qi"
-                                                               "1qh"
-                                                               "1qg"
-                                                               "1qf"
-                                                               "1qe"
-                                                               "1qd"
-                                                               "1qc"
-                                                               "1qb"
-                                                               "1qa"
-                                                               "1q9"
-                                                               "1q8"
-                                                               "1q7"
-                                                               "1q6"
-                                                               "1q5"
-                                                               "1q4"
-                                                               "1q3"
-                                                               "1q2"
-                                                               "1q1"
-                                                               "1q0"
-                                                               "1pz"
-                                                               "1py"))
+                                                              ("5l"
+                                                               "5k"
+                                                               "5j"
+                                                               "5i"
+                                                               "5h"
+                                                               "5g"
+                                                               "5f"
+                                                               "5e"
+                                                               "5d"
+                                                               "5c"
+                                                               "5b"
+                                                               "5a"
+                                                               "59"
+                                                               "58"
+                                                               "57"
+                                                               "56"
+                                                               "55"
+                                                               "54"
+                                                               "53"
+                                                               "52"
+                                                               "51"
+                                                               "50"
+                                                               "4z"
+                                                               "4y"
+                                                               "4x"
+                                                               "4w"
+                                                               "4v"
+                                                               "4u"
+                                                               "4t"
+                                                               "4s"
+                                                               "4r"
+                                                               "4q"
+                                                               "4p"
+                                                               "4o"
+                                                               "4n"
+                                                               "4m"
+                                                               "4l"
+                                                               "4k"
+                                                               "4j"
+                                                               "4i"
+                                                               "4h"
+                                                               "4g"
+                                                               "4f"
+                                                               "4e"
+                                                               "4d"
+                                                               "4c"
+                                                               "4b"
+                                                               "4a"
+                                                               "49"
+                                                               "48"
+                                                               "47"
+                                                               "46"
+                                                               "45"
+                                                               "44"
+                                                               "43"
+                                                               "42"
+                                                               "41"
+                                                               "40"
+                                                               "3z"
+                                                               "3y"
+                                                               "3x"
+                                                               "3w"
+                                                               "3v"
+                                                               "3u"
+                                                               "3t"
+                                                               "3s"
+                                                               "3r"
+                                                               "3q"
+                                                               "3p"
+                                                               "3o"
+                                                               "3n"
+                                                               "3m"
+                                                               "3l"
+                                                               "3k"
+                                                               "3j"
+                                                               "3i"
+                                                               "3h"
+                                                               "3g"
+                                                               "3f"
+                                                               "3e"
+                                                               "3d"
+                                                               "3c"
+                                                               "3b"
+                                                               "3a"
+                                                               "39"
+                                                               "38"
+                                                               "37"
+                                                               "36"
+                                                               "35"
+                                                               "34"
+                                                               "33"
+                                                               "32"
+                                                               "31"
+                                                               "30"
+                                                               "2z"
+                                                               "2y"
+                                                               "2x"
+                                                               "2w"
+                                                               "2v"
+                                                               "2u"
+                                                               "2t"
+                                                               "2s"
+                                                               "2r"
+                                                               "2q"
+                                                               "2p"
+                                                               "2o"
+                                                               "2n"
+                                                               "2m"
+                                                               "2l"
+                                                               "2k"
+                                                               "2j"
+                                                               "2i"
+                                                               "2h"
+                                                               "2g"
+                                                               "2f"
+                                                               "2e"
+                                                               "2d"
+                                                               "2c"
+                                                               "2b"
+                                                               "2a"
+                                                               "29"
+                                                               "28"
+                                                               "27"
+                                                               "26"
+                                                               "25"
+                                                               "24"
+                                                               "23"
+                                                               "22"
+                                                               "21"
+                                                               "20"
+                                                               "1z"
+                                                               "1y"
+                                                               "1x"
+                                                               "1w"
+                                                               "1v"
+                                                               "1u"
+                                                               "1t"
+                                                               "1s"
+                                                               "1r"
+                                                               "1q"))
                                                             #(ribcage
                                                               (define-structure
                                                                 define-expansion-accessors
@@ -3517,9 +3503,7 @@
                                                               ((top)
                                                                (top)
                                                                (top))
-                                                              ("1og"
-                                                               "1of"
-                                                               "1oe")))
+                                                              ("8" "7" "6")))
                                                            (hygiene guile))
                                                          #(syntax-object
                                                            #f
@@ -3527,7 +3511,7 @@
                                                             #(ribcage
                                                               #(name)
                                                               #((top))
-                                                              #("29k"))
+                                                              #("lc"))
                                                             #(ribcage () () ())
                                                             #(ribcage () () ())
                                                             #(ribcage
@@ -3543,17 +3527,17 @@
                                                                 (top)
                                                                 (top)
                                                                 (top))
-                                                              #("28w"
-                                                                "28x"
-                                                                "28y"
-                                                                "28z"
-                                                                "290"
-                                                                "291"))
+                                                              #("ko"
+                                                                "kp"
+                                                                "kq"
+                                                                "kr"
+                                                                "ks"
+                                                                "kt"))
                                                             #(ribcage () () ())
                                                             #(ribcage
                                                               #(first)
                                                               #((top))
-                                                              #("28v"))
+                                                              #("kn"))
                                                             #(ribcage () () ())
                                                             #(ribcage () () ())
                                                             #(ribcage () () ())
@@ -3572,13 +3556,13 @@
                                                                 (top)
                                                                 (top)
                                                                 (top))
-                                                              #("28l"
-                                                                "28m"
-                                                                "28n"
-                                                                "28o"
-                                                                "28p"
-                                                                "28q"
-                                                                "28r"))
+                                                              #("kd"
+                                                                "ke"
+                                                                "kf"
+                                                                "kg"
+                                                                "kh"
+                                                                "ki"
+                                                                "kj"))
                                                             #(ribcage
                                                               (lambda-var-list
                                                                 gen-var
@@ -3860,146 +3844,146 @@
                                                                (top)
                                                                (top)
                                                                (top))
-                                                              ("1tt"
-                                                               "1ts"
-                                                               "1tr"
-                                                               "1tq"
-                                                               "1tp"
-                                                               "1to"
-                                                               "1tn"
-                                                               "1tm"
-                                                               "1tl"
-                                                               "1tk"
-                                                               "1tj"
-                                                               "1ti"
-                                                               "1th"
-                                                               "1tg"
-                                                               "1tf"
-                                                               "1te"
-                                                               "1td"
-                                                               "1tc"
-                                                               "1tb"
-                                                               "1ta"
-                                                               "1t9"
-                                                               "1t8"
-                                                               "1t7"
-                                                               "1t6"
-                                                               "1t5"
-                                                               "1t4"
-                                                               "1t3"
-                                                               "1t2"
-                                                               "1t1"
-                                                               "1t0"
-                                                               "1sz"
-                                                               "1sy"
-                                                               "1sx"
-                                                               "1sw"
-                                                               "1sv"
-                                                               "1su"
-                                                               "1st"
-                                                               "1ss"
-                                                               "1sr"
-                                                               "1sq"
-                                                               "1sp"
-                                                               "1so"
-                                                               "1sn"
-                                                               "1sm"
-                                                               "1sl"
-                                                               "1sk"
-                                                               "1sj"
-                                                               "1si"
-                                                               "1sh"
-                                                               "1sg"
-                                                               "1sf"
-                                                               "1se"
-                                                               "1sd"
-                                                               "1sc"
-                                                               "1sb"
-                                                               "1sa"
-                                                               "1s9"
-                                                               "1s8"
-                                                               "1s7"
-                                                               "1s6"
-                                                               "1s5"
-                                                               "1s4"
-                                                               "1s3"
-                                                               "1s2"
-                                                               "1s1"
-                                                               "1s0"
-                                                               "1rz"
-                                                               "1ry"
-                                                               "1rx"
-                                                               "1rw"
-                                                               "1rv"
-                                                               "1ru"
-                                                               "1rt"
-                                                               "1rs"
-                                                               "1rr"
-                                                               "1rq"
-                                                               "1rp"
-                                                               "1ro"
-                                                               "1rn"
-                                                               "1rm"
-                                                               "1rl"
-                                                               "1rk"
-                                                               "1rj"
-                                                               "1ri"
-                                                               "1rh"
-                                                               "1rg"
-                                                               "1rf"
-                                                               "1re"
-                                                               "1rd"
-                                                               "1rc"
-                                                               "1rb"
-                                                               "1ra"
-                                                               "1r9"
-                                                               "1r8"
-                                                               "1r7"
-                                                               "1r6"
-                                                               "1r5"
-                                                               "1r4"
-                                                               "1r3"
-                                                               "1r2"
-                                                               "1r1"
-                                                               "1r0"
-                                                               "1qz"
-                                                               "1qy"
-                                                               "1qx"
-                                                               "1qw"
-                                                               "1qv"
-                                                               "1qu"
-                                                               "1qt"
-                                                               "1qs"
-                                                               "1qr"
-                                                               "1qq"
-                                                               "1qp"
-                                                               "1qo"
-                                                               "1qn"
-                                                               "1qm"
-                                                               "1ql"
-                                                               "1qk"
-                                                               "1qj"
-                                                               "1qi"
-                                                               "1qh"
-                                                               "1qg"
-                                                               "1qf"
-                                                               "1qe"
-                                                               "1qd"
-                                                               "1qc"
-                                                               "1qb"
-                                                               "1qa"
-                                                               "1q9"
-                                                               "1q8"
-                                                               "1q7"
-                                                               "1q6"
-                                                               "1q5"
-                                                               "1q4"
-                                                               "1q3"
-                                                               "1q2"
-                                                               "1q1"
-                                                               "1q0"
-                                                               "1pz"
-                                                               "1py"))
+                                                              ("5l"
+                                                               "5k"
+                                                               "5j"
+                                                               "5i"
+                                                               "5h"
+                                                               "5g"
+                                                               "5f"
+                                                               "5e"
+                                                               "5d"
+                                                               "5c"
+                                                               "5b"
+                                                               "5a"
+                                                               "59"
+                                                               "58"
+                                                               "57"
+                                                               "56"
+                                                               "55"
+                                                               "54"
+                                                               "53"
+                                                               "52"
+                                                               "51"
+                                                               "50"
+                                                               "4z"
+                                                               "4y"
+                                                               "4x"
+                                                               "4w"
+                                                               "4v"
+                                                               "4u"
+                                                               "4t"
+                                                               "4s"
+                                                               "4r"
+                                                               "4q"
+                                                               "4p"
+                                                               "4o"
+                                                               "4n"
+                                                               "4m"
+                                                               "4l"
+                                                               "4k"
+                                                               "4j"
+                                                               "4i"
+                                                               "4h"
+                                                               "4g"
+                                                               "4f"
+                                                               "4e"
+                                                               "4d"
+                                                               "4c"
+                                                               "4b"
+                                                               "4a"
+                                                               "49"
+                                                               "48"
+                                                               "47"
+                                                               "46"
+                                                               "45"
+                                                               "44"
+                                                               "43"
+                                                               "42"
+                                                               "41"
+                                                               "40"
+                                                               "3z"
+                                                               "3y"
+                                                               "3x"
+                                                               "3w"
+                                                               "3v"
+                                                               "3u"
+                                                               "3t"
+                                                               "3s"
+                                                               "3r"
+                                                               "3q"
+                                                               "3p"
+                                                               "3o"
+                                                               "3n"
+                                                               "3m"
+                                                               "3l"
+                                                               "3k"
+                                                               "3j"
+                                                               "3i"
+                                                               "3h"
+                                                               "3g"
+                                                               "3f"
+                                                               "3e"
+                                                               "3d"
+                                                               "3c"
+                                                               "3b"
+                                                               "3a"
+                                                               "39"
+                                                               "38"
+                                                               "37"
+                                                               "36"
+                                                               "35"
+                                                               "34"
+                                                               "33"
+                                                               "32"
+                                                               "31"
+                                                               "30"
+                                                               "2z"
+                                                               "2y"
+                                                               "2x"
+                                                               "2w"
+                                                               "2v"
+                                                               "2u"
+                                                               "2t"
+                                                               "2s"
+                                                               "2r"
+                                                               "2q"
+                                                               "2p"
+                                                               "2o"
+                                                               "2n"
+                                                               "2m"
+                                                               "2l"
+                                                               "2k"
+                                                               "2j"
+                                                               "2i"
+                                                               "2h"
+                                                               "2g"
+                                                               "2f"
+                                                               "2e"
+                                                               "2d"
+                                                               "2c"
+                                                               "2b"
+                                                               "2a"
+                                                               "29"
+                                                               "28"
+                                                               "27"
+                                                               "26"
+                                                               "25"
+                                                               "24"
+                                                               "23"
+                                                               "22"
+                                                               "21"
+                                                               "20"
+                                                               "1z"
+                                                               "1y"
+                                                               "1x"
+                                                               "1w"
+                                                               "1v"
+                                                               "1u"
+                                                               "1t"
+                                                               "1s"
+                                                               "1r"
+                                                               "1q"))
                                                             #(ribcage
                                                               (define-structure
                                                                 define-expansion-accessors
@@ -4007,363 +3991,361 @@
                                                               ((top)
                                                                (top)
                                                                (top))
-                                                              ("1og"
-                                                               "1of"
-                                                               "1oe")))
+                                                              ("8" "7" "6")))
                                                            (hygiene guile)))
                                                        '(())
-                                                       #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                                                       #{mod _hoQGWMnyQPAh3k2jhWLDs}#))
-                                                   #{tmp _hoQGWMnyQPAh3k2jhWLJA}#)
+                                                       #{s -ANAU$bmvAmthP7L7xwrKL}#
+                                                       #{mod -ANAU$bmvAmthP7L7xwrKN}#))
+                                                   #{tmp -ANAU$bmvAmthP7L7xwrPh}#)
                                                  (syntax-violation
                                                    #f
                                                    "source expression failed to match any pattern"
-                                                   #{e _hoQGWMnyQPAh3k2jhWLDn}#)))))))
-                                     (if (eqv? #{ftype _hoQGWMnyQPAh3k2jhWLET}#
+                                                   #{e -ANAU$bmvAmthP7L7xwrKI}#)))))))
+                                     (if (eqv? #{ftype -ANAU$bmvAmthP7L7xwrK0}#
                                                'define-syntax)
-                                       (let ((#{tmp _hoQGWMnyQPAh3k2jhWLJy}#
+                                       (let ((#{tmp -ANAU$bmvAmthP7L7xwrQT}#
                                                ($sc-dispatch
-                                                 #{e _hoQGWMnyQPAh3k2jhWLDn}#
+                                                 #{e -ANAU$bmvAmthP7L7xwrKI}#
                                                  '(_ any any))))
-                                         (if (if #{tmp _hoQGWMnyQPAh3k2jhWLJy}#
+                                         (if (if #{tmp -ANAU$bmvAmthP7L7xwrQT}#
                                                (@apply
-                                                 (lambda (#{name _hoQGWMnyQPAh3k2jhWLJ2}#
-                                                          #{val _hoQGWMnyQPAh3k2jhWLJ3}#)
+                                                 (lambda (#{name -ANAU$bmvAmthP7L7xwrQX}#
+                                                          #{val -ANAU$bmvAmthP7L7xwrQY}#)
                                                    (if (symbol?
-                                                         #{name _hoQGWMnyQPAh3k2jhWLJ2}#)
+                                                         #{name -ANAU$bmvAmthP7L7xwrQX}#)
                                                      #t
                                                      (if (if (vector?
-                                                               #{name _hoQGWMnyQPAh3k2jhWLJ2}#)
+                                                               #{name -ANAU$bmvAmthP7L7xwrQX}#)
                                                            (if (= (vector-length
-                                                                    #{name _hoQGWMnyQPAh3k2jhWLJ2}#)
+                                                                    #{name -ANAU$bmvAmthP7L7xwrQX}#)
                                                                   4)
                                                              (eq? (vector-ref
-                                                                    #{name _hoQGWMnyQPAh3k2jhWLJ2}#
+                                                                    #{name -ANAU$bmvAmthP7L7xwrQX}#
                                                                     0)
                                                                   'syntax-object)
                                                              #f)
                                                            #f)
                                                        (symbol?
                                                          (vector-ref
-                                                           #{name _hoQGWMnyQPAh3k2jhWLJ2}#
+                                                           #{name -ANAU$bmvAmthP7L7xwrQX}#
                                                            1))
                                                        #f)))
-                                                 #{tmp _hoQGWMnyQPAh3k2jhWLJy}#)
+                                                 #{tmp -ANAU$bmvAmthP7L7xwrQT}#)
                                                #f)
                                            (@apply
-                                             (lambda (#{name _hoQGWMnyQPAh3k2jhWLKS}#
-                                                      #{val _hoQGWMnyQPAh3k2jhWLKT}#)
+                                             (lambda (#{name -ANAU$bmvAmthP7L7xwrQz}#
+                                                      #{val -ANAU$bmvAmthP7L7xwrQ0}#)
                                                (values
                                                  'define-syntax-form
-                                                 #{name _hoQGWMnyQPAh3k2jhWLKS}#
-                                                 #{val _hoQGWMnyQPAh3k2jhWLKT}#
-                                                 #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                                                 #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                                                 #{mod _hoQGWMnyQPAh3k2jhWLDs}#))
-                                             #{tmp _hoQGWMnyQPAh3k2jhWLJy}#)
+                                                 #{name -ANAU$bmvAmthP7L7xwrQz}#
+                                                 #{val -ANAU$bmvAmthP7L7xwrQ0}#
+                                                 #{w -ANAU$bmvAmthP7L7xwrKK}#
+                                                 #{s -ANAU$bmvAmthP7L7xwrKL}#
+                                                 #{mod -ANAU$bmvAmthP7L7xwrKN}#))
+                                             #{tmp -ANAU$bmvAmthP7L7xwrQT}#)
                                            (syntax-violation
                                              #f
                                              "source expression failed to match any pattern"
-                                             #{e _hoQGWMnyQPAh3k2jhWLDn}#)))
-                                       (if (eqv? #{ftype _hoQGWMnyQPAh3k2jhWLET}#
+                                             #{e -ANAU$bmvAmthP7L7xwrKI}#)))
+                                       (if (eqv? #{ftype -ANAU$bmvAmthP7L7xwrK0}#
                                                  'define-syntax-parameter)
-                                         (let ((#{tmp _hoQGWMnyQPAh3k2jhWLKe}#
+                                         (let ((#{tmp -ANAU$bmvAmthP7L7xwrQ@}#
                                                  ($sc-dispatch
-                                                   #{e _hoQGWMnyQPAh3k2jhWLDn}#
+                                                   #{e -ANAU$bmvAmthP7L7xwrKI}#
                                                    '(_ any any))))
-                                           (if (if #{tmp _hoQGWMnyQPAh3k2jhWLKe}#
+                                           (if (if #{tmp -ANAU$bmvAmthP7L7xwrQ@}#
                                                  (@apply
-                                                   (lambda (#{name _hoQGWMnyQPAh3k2jhWLKi}#
-                                                            #{val _hoQGWMnyQPAh3k2jhWLKj}#)
+                                                   (lambda (#{name -ANAU$bmvAmthP7L7xwrRD}#
+                                                            #{val -ANAU$bmvAmthP7L7xwrRE}#)
                                                      (if (symbol?
-                                                           #{name _hoQGWMnyQPAh3k2jhWLKi}#)
+                                                           #{name -ANAU$bmvAmthP7L7xwrRD}#)
                                                        #t
                                                        (if (if (vector?
-                                                                 #{name _hoQGWMnyQPAh3k2jhWLKi}#)
+                                                                 #{name -ANAU$bmvAmthP7L7xwrRD}#)
                                                              (if (= (vector-length
-                                                                      #{name _hoQGWMnyQPAh3k2jhWLKi}#)
+                                                                      #{name -ANAU$bmvAmthP7L7xwrRD}#)
                                                                     4)
                                                                (eq? (vector-ref
-                                                                      #{name _hoQGWMnyQPAh3k2jhWLKi}#
+                                                                      #{name -ANAU$bmvAmthP7L7xwrRD}#
                                                                       0)
                                                                     'syntax-object)
                                                                #f)
                                                              #f)
                                                          (symbol?
                                                            (vector-ref
-                                                             #{name _hoQGWMnyQPAh3k2jhWLKi}#
+                                                             #{name -ANAU$bmvAmthP7L7xwrRD}#
                                                              1))
                                                          #f)))
-                                                   #{tmp _hoQGWMnyQPAh3k2jhWLKe}#)
+                                                   #{tmp -ANAU$bmvAmthP7L7xwrQ@}#)
                                                  #f)
                                              (@apply
-                                               (lambda (#{name _hoQGWMnyQPAh3k2jhWLK$}#
-                                                        #{val _hoQGWMnyQPAh3k2jhWLK@}#)
+                                               (lambda (#{name -ANAU$bmvAmthP7L7xwrRf}#
+                                                        #{val -ANAU$bmvAmthP7L7xwrRg}#)
                                                  (values
                                                    'define-syntax-parameter-form
-                                                   #{name _hoQGWMnyQPAh3k2jhWLK$}#
-                                                   #{val _hoQGWMnyQPAh3k2jhWLK@}#
-                                                   #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                                                   #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                                                   #{mod _hoQGWMnyQPAh3k2jhWLDs}#))
-                                               #{tmp _hoQGWMnyQPAh3k2jhWLKe}#)
+                                                   #{name -ANAU$bmvAmthP7L7xwrRf}#
+                                                   #{val -ANAU$bmvAmthP7L7xwrRg}#
+                                                   #{w -ANAU$bmvAmthP7L7xwrKK}#
+                                                   #{s -ANAU$bmvAmthP7L7xwrKL}#
+                                                   #{mod -ANAU$bmvAmthP7L7xwrKN}#))
+                                               #{tmp -ANAU$bmvAmthP7L7xwrQ@}#)
                                              (syntax-violation
                                                #f
                                                "source expression failed to match any pattern"
-                                               #{e _hoQGWMnyQPAh3k2jhWLDn}#)))
+                                               #{e -ANAU$bmvAmthP7L7xwrKI}#)))
                                          (values
                                            'call
                                            #f
-                                           #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                                           #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                                           #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                                           #{mod _hoQGWMnyQPAh3k2jhWLDs}#)))))))))))))))
-             (if (if (vector? #{e _hoQGWMnyQPAh3k2jhWLDn}#)
-                   (if (= (vector-length #{e _hoQGWMnyQPAh3k2jhWLDn}#)
+                                           #{e -ANAU$bmvAmthP7L7xwrKI}#
+                                           #{w -ANAU$bmvAmthP7L7xwrKK}#
+                                           #{s -ANAU$bmvAmthP7L7xwrKL}#
+                                           #{mod -ANAU$bmvAmthP7L7xwrKN}#)))))))))))))))
+             (if (if (vector? #{e -ANAU$bmvAmthP7L7xwrKI}#)
+                   (if (= (vector-length #{e -ANAU$bmvAmthP7L7xwrKI}#)
                           4)
-                     (eq? (vector-ref #{e _hoQGWMnyQPAh3k2jhWLDn}# 0)
+                     (eq? (vector-ref #{e -ANAU$bmvAmthP7L7xwrKI}# 0)
                           'syntax-object)
                      #f)
                    #f)
-               (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-                 (vector-ref #{e _hoQGWMnyQPAh3k2jhWLDn}# 1)
-                 #{r _hoQGWMnyQPAh3k2jhWLDo}#
-                 (#{join-wraps _hoQGWMnyQPAh3k2jhWHTR}#
-                   #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                   (vector-ref #{e _hoQGWMnyQPAh3k2jhWLDn}# 2))
-                 (let ((#{t _hoQGWMnyQPAh3k2jhWLLa}#
-                         (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-                           #{e _hoQGWMnyQPAh3k2jhWLDn}#)))
-                   (if #{t _hoQGWMnyQPAh3k2jhWLLa}#
-                     #{t _hoQGWMnyQPAh3k2jhWLLa}#
-                     #{s _hoQGWMnyQPAh3k2jhWLDq}#))
-                 #{rib _hoQGWMnyQPAh3k2jhWLDr}#
-                 (let ((#{t _hoQGWMnyQPAh3k2jhWLPF}#
-                         (vector-ref #{e _hoQGWMnyQPAh3k2jhWLDn}# 3)))
-                   (if #{t _hoQGWMnyQPAh3k2jhWLPF}#
-                     #{t _hoQGWMnyQPAh3k2jhWLPF}#
-                     #{mod _hoQGWMnyQPAh3k2jhWLDs}#))
-                 #{for-car? _hoQGWMnyQPAh3k2jhWLDt}#)
-               (if (self-evaluating? #{e _hoQGWMnyQPAh3k2jhWLDn}#)
+               (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+                 (vector-ref #{e -ANAU$bmvAmthP7L7xwrKI}# 1)
+                 #{r -ANAU$bmvAmthP7L7xwrKJ}#
+                 (#{join-wraps -ANAU$bmvAmthP7L7xwnNw}#
+                   #{w -ANAU$bmvAmthP7L7xwrKK}#
+                   (vector-ref #{e -ANAU$bmvAmthP7L7xwrKI}# 2))
+                 (let ((#{t -ANAU$bmvAmthP7L7xwrR7}#
+                         (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+                           #{e -ANAU$bmvAmthP7L7xwrKI}#)))
+                   (if #{t -ANAU$bmvAmthP7L7xwrR7}#
+                     #{t -ANAU$bmvAmthP7L7xwrR7}#
+                     #{s -ANAU$bmvAmthP7L7xwrKL}#))
+                 #{rib -ANAU$bmvAmthP7L7xwrKM}#
+                 (let ((#{t -ANAU$bmvAmthP7L7xwrVm}#
+                         (vector-ref #{e -ANAU$bmvAmthP7L7xwrKI}# 3)))
+                   (if #{t -ANAU$bmvAmthP7L7xwrVm}#
+                     #{t -ANAU$bmvAmthP7L7xwrVm}#
+                     #{mod -ANAU$bmvAmthP7L7xwrKN}#))
+                 #{for-car? -ANAU$bmvAmthP7L7xwrKO}#)
+               (if (self-evaluating? #{e -ANAU$bmvAmthP7L7xwrKI}#)
                  (values
                    'constant
                    #f
-                   #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                   #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                   #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                   #{mod _hoQGWMnyQPAh3k2jhWLDs}#)
+                   #{e -ANAU$bmvAmthP7L7xwrKI}#
+                   #{w -ANAU$bmvAmthP7L7xwrKK}#
+                   #{s -ANAU$bmvAmthP7L7xwrKL}#
+                   #{mod -ANAU$bmvAmthP7L7xwrKN}#)
                  (values
                    'other
                    #f
-                   #{e _hoQGWMnyQPAh3k2jhWLDn}#
-                   #{w _hoQGWMnyQPAh3k2jhWLDp}#
-                   #{s _hoQGWMnyQPAh3k2jhWLDq}#
-                   #{mod _hoQGWMnyQPAh3k2jhWLDs}#)))))))
-     (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-       (lambda (#{e _hoQGWMnyQPAh3k2jhWLPO}#
-                #{r _hoQGWMnyQPAh3k2jhWLPP}#
-                #{w _hoQGWMnyQPAh3k2jhWLPQ}#
-                #{mod _hoQGWMnyQPAh3k2jhWLPR}#)
+                   #{e -ANAU$bmvAmthP7L7xwrKI}#
+                   #{w -ANAU$bmvAmthP7L7xwrKK}#
+                   #{s -ANAU$bmvAmthP7L7xwrKL}#
+                   #{mod -ANAU$bmvAmthP7L7xwrKN}#)))))))
+     (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+       (lambda (#{e -ANAU$bmvAmthP7L7xwrVv}#
+                #{r -ANAU$bmvAmthP7L7xwrVw}#
+                #{w -ANAU$bmvAmthP7L7xwrVx}#
+                #{mod -ANAU$bmvAmthP7L7xwrVy}#)
          (call-with-values
            (lambda ()
-             (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-               #{e _hoQGWMnyQPAh3k2jhWLPO}#
-               #{r _hoQGWMnyQPAh3k2jhWLPP}#
-               #{w _hoQGWMnyQPAh3k2jhWLPQ}#
-               (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-                 #{e _hoQGWMnyQPAh3k2jhWLPO}#)
+             (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+               #{e -ANAU$bmvAmthP7L7xwrVv}#
+               #{r -ANAU$bmvAmthP7L7xwrVw}#
+               #{w -ANAU$bmvAmthP7L7xwrVx}#
+               (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+                 #{e -ANAU$bmvAmthP7L7xwrVv}#)
                #f
-               #{mod _hoQGWMnyQPAh3k2jhWLPR}#
+               #{mod -ANAU$bmvAmthP7L7xwrVy}#
                #f))
-           (lambda (#{type _hoQGWMnyQPAh3k2jhWLRs}#
-                    #{value _hoQGWMnyQPAh3k2jhWLRt}#
-                    #{e _hoQGWMnyQPAh3k2jhWLRu}#
-                    #{w _hoQGWMnyQPAh3k2jhWLRv}#
-                    #{s _hoQGWMnyQPAh3k2jhWLRw}#
-                    #{mod _hoQGWMnyQPAh3k2jhWLRx}#)
-             (#{expand-expr _hoQGWMnyQPAh3k2jhWHTm}#
-               #{type _hoQGWMnyQPAh3k2jhWLRs}#
-               #{value _hoQGWMnyQPAh3k2jhWLRt}#
-               #{e _hoQGWMnyQPAh3k2jhWLRu}#
-               #{r _hoQGWMnyQPAh3k2jhWLPP}#
-               #{w _hoQGWMnyQPAh3k2jhWLRv}#
-               #{s _hoQGWMnyQPAh3k2jhWLRw}#
-               #{mod _hoQGWMnyQPAh3k2jhWLRx}#)))))
-     (#{expand-expr _hoQGWMnyQPAh3k2jhWHTm}#
-       (lambda (#{type _hoQGWMnyQPAh3k2jhWLR0}#
-                #{value _hoQGWMnyQPAh3k2jhWLR1}#
-                #{e _hoQGWMnyQPAh3k2jhWLR2}#
-                #{r _hoQGWMnyQPAh3k2jhWLR3}#
-                #{w _hoQGWMnyQPAh3k2jhWLR4}#
-                #{s _hoQGWMnyQPAh3k2jhWLR5}#
-                #{mod _hoQGWMnyQPAh3k2jhWLR6}#)
-         (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}# 'lexical)
+           (lambda (#{type -ANAU$bmvAmthP7L7xwrYN}#
+                    #{value -ANAU$bmvAmthP7L7xwrYO}#
+                    #{e -ANAU$bmvAmthP7L7xwrYP}#
+                    #{w -ANAU$bmvAmthP7L7xwrYQ}#
+                    #{s -ANAU$bmvAmthP7L7xwrYR}#
+                    #{mod -ANAU$bmvAmthP7L7xwrYS}#)
+             (#{expand-expr -ANAU$bmvAmthP7L7xwnOF}#
+               #{type -ANAU$bmvAmthP7L7xwrYN}#
+               #{value -ANAU$bmvAmthP7L7xwrYO}#
+               #{e -ANAU$bmvAmthP7L7xwrYP}#
+               #{r -ANAU$bmvAmthP7L7xwrVw}#
+               #{w -ANAU$bmvAmthP7L7xwrYQ}#
+               #{s -ANAU$bmvAmthP7L7xwrYR}#
+               #{mod -ANAU$bmvAmthP7L7xwrYS}#)))))
+     (#{expand-expr -ANAU$bmvAmthP7L7xwnOF}#
+       (lambda (#{type -ANAU$bmvAmthP7L7xwrYV}#
+                #{value -ANAU$bmvAmthP7L7xwrYW}#
+                #{e -ANAU$bmvAmthP7L7xwrYX}#
+                #{r -ANAU$bmvAmthP7L7xwrYY}#
+                #{w -ANAU$bmvAmthP7L7xwrYZ}#
+                #{s -ANAU$bmvAmthP7L7xwrYa}#
+                #{mod -ANAU$bmvAmthP7L7xwrYb}#)
+         (if (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}# 'lexical)
            (make-struct/no-tail
              (vector-ref %expanded-vtables 3)
-             #{s _hoQGWMnyQPAh3k2jhWLR5}#
-             #{e _hoQGWMnyQPAh3k2jhWLR2}#
-             #{value _hoQGWMnyQPAh3k2jhWLR1}#)
-           (if (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}# 'core)
+             #{s -ANAU$bmvAmthP7L7xwrYa}#
+             #{e -ANAU$bmvAmthP7L7xwrYX}#
+             #{value -ANAU$bmvAmthP7L7xwrYW}#)
+           (if (if (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}# 'core)
                  #t
-                 (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}# 'core-form))
-             (#{value _hoQGWMnyQPAh3k2jhWLR1}#
-               #{e _hoQGWMnyQPAh3k2jhWLR2}#
-               #{r _hoQGWMnyQPAh3k2jhWLR3}#
-               #{w _hoQGWMnyQPAh3k2jhWLR4}#
-               #{s _hoQGWMnyQPAh3k2jhWLR5}#
-               #{mod _hoQGWMnyQPAh3k2jhWLR6}#)
-             (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}#
+                 (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}# 'core-form))
+             (#{value -ANAU$bmvAmthP7L7xwrYW}#
+               #{e -ANAU$bmvAmthP7L7xwrYX}#
+               #{r -ANAU$bmvAmthP7L7xwrYY}#
+               #{w -ANAU$bmvAmthP7L7xwrYZ}#
+               #{s -ANAU$bmvAmthP7L7xwrYa}#
+               #{mod -ANAU$bmvAmthP7L7xwrYb}#)
+             (if (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}#
                        'module-ref)
                (call-with-values
                  (lambda ()
-                   (#{value _hoQGWMnyQPAh3k2jhWLR1}#
-                     #{e _hoQGWMnyQPAh3k2jhWLR2}#
-                     #{r _hoQGWMnyQPAh3k2jhWLR3}#
-                     #{w _hoQGWMnyQPAh3k2jhWLR4}#))
-                 (lambda (#{e _hoQGWMnyQPAh3k2jhWLSU}#
-                          #{r _hoQGWMnyQPAh3k2jhWLSV}#
-                          #{w _hoQGWMnyQPAh3k2jhWLSW}#
-                          #{s _hoQGWMnyQPAh3k2jhWLSX}#
-                          #{mod _hoQGWMnyQPAh3k2jhWLSY}#)
-                   (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                     #{e _hoQGWMnyQPAh3k2jhWLSU}#
-                     #{r _hoQGWMnyQPAh3k2jhWLSV}#
-                     #{w _hoQGWMnyQPAh3k2jhWLSW}#
-                     #{mod _hoQGWMnyQPAh3k2jhWLSY}#)))
-               (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}#
+                   (#{value -ANAU$bmvAmthP7L7xwrYW}#
+                     #{e -ANAU$bmvAmthP7L7xwrYX}#
+                     #{r -ANAU$bmvAmthP7L7xwrYY}#
+                     #{w -ANAU$bmvAmthP7L7xwrYZ}#))
+                 (lambda (#{e -ANAU$bmvAmthP7L7xwrY1}#
+                          #{r -ANAU$bmvAmthP7L7xwrY2}#
+                          #{w -ANAU$bmvAmthP7L7xwrY3}#
+                          #{s -ANAU$bmvAmthP7L7xwrY4}#
+                          #{mod -ANAU$bmvAmthP7L7xwrY5}#)
+                   (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                     #{e -ANAU$bmvAmthP7L7xwrY1}#
+                     #{r -ANAU$bmvAmthP7L7xwrY2}#
+                     #{w -ANAU$bmvAmthP7L7xwrY3}#
+                     #{mod -ANAU$bmvAmthP7L7xwrY5}#)))
+               (if (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}#
                          'lexical-call)
-                 (#{expand-application _hoQGWMnyQPAh3k2jhWHTn}#
-                   (let ((#{id _hoQGWMnyQPAh3k2jhWLTj}#
-                           (car #{e _hoQGWMnyQPAh3k2jhWLR2}#)))
-                     (#{build-lexical-reference _hoQGWMnyQPAh3k2jhWHSj}#
+                 (#{expand-application -ANAU$bmvAmthP7L7xwnOG}#
+                   (let ((#{id -ANAU$bmvAmthP7L7xwraE}#
+                           (car #{e -ANAU$bmvAmthP7L7xwrYX}#)))
+                     (#{build-lexical-reference -ANAU$bmvAmthP7L7xwnNC}#
                        'fun
-                       (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-                         #{id _hoQGWMnyQPAh3k2jhWLTj}#)
-                       (if (if (vector? #{id _hoQGWMnyQPAh3k2jhWLTj}#)
+                       (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+                         #{id -ANAU$bmvAmthP7L7xwraE}#)
+                       (if (if (vector? #{id -ANAU$bmvAmthP7L7xwraE}#)
                              (if (= (vector-length
-                                      #{id _hoQGWMnyQPAh3k2jhWLTj}#)
+                                      #{id -ANAU$bmvAmthP7L7xwraE}#)
                                     4)
                                (eq? (vector-ref
-                                      #{id _hoQGWMnyQPAh3k2jhWLTj}#
+                                      #{id -ANAU$bmvAmthP7L7xwraE}#
                                       0)
                                     'syntax-object)
                                #f)
                              #f)
-                         (syntax->datum #{id _hoQGWMnyQPAh3k2jhWLTj}#)
-                         #{id _hoQGWMnyQPAh3k2jhWLTj}#)
-                       #{value _hoQGWMnyQPAh3k2jhWLR1}#))
-                   #{e _hoQGWMnyQPAh3k2jhWLR2}#
-                   #{r _hoQGWMnyQPAh3k2jhWLR3}#
-                   #{w _hoQGWMnyQPAh3k2jhWLR4}#
-                   #{s _hoQGWMnyQPAh3k2jhWLR5}#
-                   #{mod _hoQGWMnyQPAh3k2jhWLR6}#)
-                 (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}#
+                         (syntax->datum #{id -ANAU$bmvAmthP7L7xwraE}#)
+                         #{id -ANAU$bmvAmthP7L7xwraE}#)
+                       #{value -ANAU$bmvAmthP7L7xwrYW}#))
+                   #{e -ANAU$bmvAmthP7L7xwrYX}#
+                   #{r -ANAU$bmvAmthP7L7xwrYY}#
+                   #{w -ANAU$bmvAmthP7L7xwrYZ}#
+                   #{s -ANAU$bmvAmthP7L7xwrYa}#
+                   #{mod -ANAU$bmvAmthP7L7xwrYb}#)
+                 (if (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}#
                            'global-call)
-                   (#{expand-application _hoQGWMnyQPAh3k2jhWHTn}#
-                     (#{build-global-reference _hoQGWMnyQPAh3k2jhWHSm}#
-                       (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-                         (car #{e _hoQGWMnyQPAh3k2jhWLR2}#))
-                       (if (if (vector? #{value _hoQGWMnyQPAh3k2jhWLR1}#)
+                   (#{expand-application -ANAU$bmvAmthP7L7xwnOG}#
+                     (#{build-global-reference -ANAU$bmvAmthP7L7xwnNF}#
+                       (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+                         (car #{e -ANAU$bmvAmthP7L7xwrYX}#))
+                       (if (if (vector? #{value -ANAU$bmvAmthP7L7xwrYW}#)
                              (if (= (vector-length
-                                      #{value _hoQGWMnyQPAh3k2jhWLR1}#)
+                                      #{value -ANAU$bmvAmthP7L7xwrYW}#)
                                     4)
                                (eq? (vector-ref
-                                      #{value _hoQGWMnyQPAh3k2jhWLR1}#
+                                      #{value -ANAU$bmvAmthP7L7xwrYW}#
                                       0)
                                     'syntax-object)
                                #f)
                              #f)
-                         (vector-ref #{value _hoQGWMnyQPAh3k2jhWLR1}# 1)
-                         #{value _hoQGWMnyQPAh3k2jhWLR1}#)
-                       (if (if (vector? #{value _hoQGWMnyQPAh3k2jhWLR1}#)
+                         (vector-ref #{value -ANAU$bmvAmthP7L7xwrYW}# 1)
+                         #{value -ANAU$bmvAmthP7L7xwrYW}#)
+                       (if (if (vector? #{value -ANAU$bmvAmthP7L7xwrYW}#)
                              (if (= (vector-length
-                                      #{value _hoQGWMnyQPAh3k2jhWLR1}#)
+                                      #{value -ANAU$bmvAmthP7L7xwrYW}#)
                                     4)
                                (eq? (vector-ref
-                                      #{value _hoQGWMnyQPAh3k2jhWLR1}#
+                                      #{value -ANAU$bmvAmthP7L7xwrYW}#
                                       0)
                                     'syntax-object)
                                #f)
                              #f)
-                         (vector-ref #{value _hoQGWMnyQPAh3k2jhWLR1}# 3)
-                         #{mod _hoQGWMnyQPAh3k2jhWLR6}#))
-                     #{e _hoQGWMnyQPAh3k2jhWLR2}#
-                     #{r _hoQGWMnyQPAh3k2jhWLR3}#
-                     #{w _hoQGWMnyQPAh3k2jhWLR4}#
-                     #{s _hoQGWMnyQPAh3k2jhWLR5}#
-                     #{mod _hoQGWMnyQPAh3k2jhWLR6}#)
-                   (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}# 'constant)
-                     (let ((#{exp _hoQGWMnyQPAh3k2jhWLY0}#
-                             (#{strip _hoQGWMnyQPAh3k2jhWHTy}#
-                               (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                         (vector-ref #{value -ANAU$bmvAmthP7L7xwrYW}# 3)
+                         #{mod -ANAU$bmvAmthP7L7xwrYb}#))
+                     #{e -ANAU$bmvAmthP7L7xwrYX}#
+                     #{r -ANAU$bmvAmthP7L7xwrYY}#
+                     #{w -ANAU$bmvAmthP7L7xwrYZ}#
+                     #{s -ANAU$bmvAmthP7L7xwrYa}#
+                     #{mod -ANAU$bmvAmthP7L7xwrYb}#)
+                   (if (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}# 'constant)
+                     (let ((#{exp -ANAU$bmvAmthP7L7xwrfV}#
+                             (#{strip -ANAU$bmvAmthP7L7xwnOR}#
+                               (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                                  (begin
-                                   (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWLR2}#)
-                                         #{s _hoQGWMnyQPAh3k2jhWLR5}#
+                                   (if (if (pair? #{e -ANAU$bmvAmthP7L7xwrYX}#)
+                                         #{s -ANAU$bmvAmthP7L7xwrYa}#
                                          #f)
                                      (set-source-properties!
-                                       #{e _hoQGWMnyQPAh3k2jhWLR2}#
-                                       #{s _hoQGWMnyQPAh3k2jhWLR5}#))
-                                   #{e _hoQGWMnyQPAh3k2jhWLR2}#)
-                                 #{w _hoQGWMnyQPAh3k2jhWLR4}#
-                                 #{mod _hoQGWMnyQPAh3k2jhWLR6}#)
+                                       #{e -ANAU$bmvAmthP7L7xwrYX}#
+                                       #{s -ANAU$bmvAmthP7L7xwrYa}#))
+                                   #{e -ANAU$bmvAmthP7L7xwrYX}#)
+                                 #{w -ANAU$bmvAmthP7L7xwrYZ}#
+                                 #{mod -ANAU$bmvAmthP7L7xwrYb}#)
                                '(()))))
                        (make-struct/no-tail
                          (vector-ref %expanded-vtables 1)
-                         #{s _hoQGWMnyQPAh3k2jhWLR5}#
-                         #{exp _hoQGWMnyQPAh3k2jhWLY0}#))
-                     (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}# 'global)
-                       (#{analyze-variable _hoQGWMnyQPAh3k2jhWHSl}#
-                         #{mod _hoQGWMnyQPAh3k2jhWLR6}#
-                         #{value _hoQGWMnyQPAh3k2jhWLR1}#
-                         (lambda (#{mod _hoQGWMnyQPAh3k2jhWLZY}#
-                                  #{var _hoQGWMnyQPAh3k2jhWLZZ}#
-                                  #{public? _hoQGWMnyQPAh3k2jhWLZa}#)
+                         #{s -ANAU$bmvAmthP7L7xwrYa}#
+                         #{exp -ANAU$bmvAmthP7L7xwrfV}#))
+                     (if (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}# 'global)
+                       (#{analyze-variable -ANAU$bmvAmthP7L7xwnNE}#
+                         #{mod -ANAU$bmvAmthP7L7xwrYb}#
+                         #{value -ANAU$bmvAmthP7L7xwrYW}#
+                         (lambda (#{mod -ANAU$bmvAmthP7L7xwrf5}#
+                                  #{var -ANAU$bmvAmthP7L7xwrf6}#
+                                  #{public? -ANAU$bmvAmthP7L7xwrf7}#)
                            (make-struct/no-tail
                              (vector-ref %expanded-vtables 5)
-                             #{s _hoQGWMnyQPAh3k2jhWLR5}#
-                             #{mod _hoQGWMnyQPAh3k2jhWLZY}#
-                             #{var _hoQGWMnyQPAh3k2jhWLZZ}#
-                             #{public? _hoQGWMnyQPAh3k2jhWLZa}#))
-                         (lambda (#{var _hoQGWMnyQPAh3k2jhWLZj}#)
+                             #{s -ANAU$bmvAmthP7L7xwrYa}#
+                             #{mod -ANAU$bmvAmthP7L7xwrf5}#
+                             #{var -ANAU$bmvAmthP7L7xwrf6}#
+                             #{public? -ANAU$bmvAmthP7L7xwrf7}#))
+                         (lambda (#{var -ANAU$bmvAmthP7L7xwrgE}#)
                            (make-struct/no-tail
                              (vector-ref %expanded-vtables 7)
-                             #{s _hoQGWMnyQPAh3k2jhWLR5}#
-                             #{var _hoQGWMnyQPAh3k2jhWLZj}#)))
-                       (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}# 'call)
-                         (#{expand-application _hoQGWMnyQPAh3k2jhWHTn}#
-                           (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                             (car #{e _hoQGWMnyQPAh3k2jhWLR2}#)
-                             #{r _hoQGWMnyQPAh3k2jhWLR3}#
-                             #{w _hoQGWMnyQPAh3k2jhWLR4}#
-                             #{mod _hoQGWMnyQPAh3k2jhWLR6}#)
-                           #{e _hoQGWMnyQPAh3k2jhWLR2}#
-                           #{r _hoQGWMnyQPAh3k2jhWLR3}#
-                           #{w _hoQGWMnyQPAh3k2jhWLR4}#
-                           #{s _hoQGWMnyQPAh3k2jhWLR5}#
-                           #{mod _hoQGWMnyQPAh3k2jhWLR6}#)
-                         (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}#
+                             #{s -ANAU$bmvAmthP7L7xwrYa}#
+                             #{var -ANAU$bmvAmthP7L7xwrgE}#)))
+                       (if (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}# 'call)
+                         (#{expand-application -ANAU$bmvAmthP7L7xwnOG}#
+                           (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                             (car #{e -ANAU$bmvAmthP7L7xwrYX}#)
+                             #{r -ANAU$bmvAmthP7L7xwrYY}#
+                             #{w -ANAU$bmvAmthP7L7xwrYZ}#
+                             #{mod -ANAU$bmvAmthP7L7xwrYb}#)
+                           #{e -ANAU$bmvAmthP7L7xwrYX}#
+                           #{r -ANAU$bmvAmthP7L7xwrYY}#
+                           #{w -ANAU$bmvAmthP7L7xwrYZ}#
+                           #{s -ANAU$bmvAmthP7L7xwrYa}#
+                           #{mod -ANAU$bmvAmthP7L7xwrYb}#)
+                         (if (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}#
                                    'begin-form)
-                           (let ((#{tmp _hoQGWMnyQPAh3k2jhWLau}#
+                           (let ((#{tmp -ANAU$bmvAmthP7L7xwrhP}#
                                    ($sc-dispatch
-                                     #{e _hoQGWMnyQPAh3k2jhWLR2}#
+                                     #{e -ANAU$bmvAmthP7L7xwrYX}#
                                      '(_ any . each-any))))
-                             (if #{tmp _hoQGWMnyQPAh3k2jhWLau}#
+                             (if #{tmp -ANAU$bmvAmthP7L7xwrhP}#
                                (@apply
-                                 (lambda (#{e1 _hoQGWMnyQPAh3k2jhWLay}#
-                                          #{e2 _hoQGWMnyQPAh3k2jhWLaz}#)
-                                   (#{expand-sequence _hoQGWMnyQPAh3k2jhWHTg}#
-                                     (cons #{e1 _hoQGWMnyQPAh3k2jhWLay}#
-                                           #{e2 _hoQGWMnyQPAh3k2jhWLaz}#)
-                                     #{r _hoQGWMnyQPAh3k2jhWLR3}#
-                                     #{w _hoQGWMnyQPAh3k2jhWLR4}#
-                                     #{s _hoQGWMnyQPAh3k2jhWLR5}#
-                                     #{mod _hoQGWMnyQPAh3k2jhWLR6}#))
-                                 #{tmp _hoQGWMnyQPAh3k2jhWLau}#)
-                               (let ((#{tmp _hoQGWMnyQPAh3k2jhWLcK}#
+                                 (lambda (#{e1 -ANAU$bmvAmthP7L7xwrhT}#
+                                          #{e2 -ANAU$bmvAmthP7L7xwrhU}#)
+                                   (#{expand-sequence -ANAU$bmvAmthP7L7xwnN@}#
+                                     (cons #{e1 -ANAU$bmvAmthP7L7xwrhT}#
+                                           #{e2 -ANAU$bmvAmthP7L7xwrhU}#)
+                                     #{r -ANAU$bmvAmthP7L7xwrYY}#
+                                     #{w -ANAU$bmvAmthP7L7xwrYZ}#
+                                     #{s -ANAU$bmvAmthP7L7xwrYa}#
+                                     #{mod -ANAU$bmvAmthP7L7xwrYb}#))
+                                 #{tmp -ANAU$bmvAmthP7L7xwrhP}#)
+                               (let ((#{tmp -ANAU$bmvAmthP7L7xwrir}#
                                        ($sc-dispatch
-                                         #{e _hoQGWMnyQPAh3k2jhWLR2}#
+                                         #{e -ANAU$bmvAmthP7L7xwrYX}#
                                          '(_))))
-                                 (if #{tmp _hoQGWMnyQPAh3k2jhWLcK}#
+                                 (if #{tmp -ANAU$bmvAmthP7L7xwrir}#
                                    (@apply
                                      (lambda ()
                                        (if (include-deprecated-features)
@@ -4376,914 +4358,914 @@
                                          (syntax-violation
                                            #f
                                            "sequence of zero expressions"
-                                           (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                                           (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                                              (begin
-                                               (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWLR2}#)
-                                                     #{s _hoQGWMnyQPAh3k2jhWLR5}#
+                                               (if (if (pair? #{e -ANAU$bmvAmthP7L7xwrYX}#)
+                                                     #{s -ANAU$bmvAmthP7L7xwrYa}#
                                                      #f)
                                                  (set-source-properties!
-                                                   #{e _hoQGWMnyQPAh3k2jhWLR2}#
-                                                   #{s _hoQGWMnyQPAh3k2jhWLR5}#))
-                                               #{e _hoQGWMnyQPAh3k2jhWLR2}#)
-                                             #{w _hoQGWMnyQPAh3k2jhWLR4}#
-                                             #{mod _hoQGWMnyQPAh3k2jhWLR6}#))))
-                                     #{tmp _hoQGWMnyQPAh3k2jhWLcK}#)
+                                                   #{e -ANAU$bmvAmthP7L7xwrYX}#
+                                                   #{s -ANAU$bmvAmthP7L7xwrYa}#))
+                                               #{e -ANAU$bmvAmthP7L7xwrYX}#)
+                                             #{w -ANAU$bmvAmthP7L7xwrYZ}#
+                                             #{mod -ANAU$bmvAmthP7L7xwrYb}#))))
+                                     #{tmp -ANAU$bmvAmthP7L7xwrir}#)
                                    (syntax-violation
                                      #f
                                      "source expression failed to match any pattern"
-                                     #{e _hoQGWMnyQPAh3k2jhWLR2}#)))))
-                           (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}#
+                                     #{e -ANAU$bmvAmthP7L7xwrYX}#)))))
+                           (if (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}#
                                      'local-syntax-form)
-                             (#{expand-local-syntax _hoQGWMnyQPAh3k2jhWHTq}#
-                               #{value _hoQGWMnyQPAh3k2jhWLR1}#
-                               #{e _hoQGWMnyQPAh3k2jhWLR2}#
-                               #{r _hoQGWMnyQPAh3k2jhWLR3}#
-                               #{w _hoQGWMnyQPAh3k2jhWLR4}#
-                               #{s _hoQGWMnyQPAh3k2jhWLR5}#
-                               #{mod _hoQGWMnyQPAh3k2jhWLR6}#
-                               #{expand-sequence _hoQGWMnyQPAh3k2jhWHTg}#)
-                             (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}#
+                             (#{expand-local-syntax -ANAU$bmvAmthP7L7xwnOJ}#
+                               #{value -ANAU$bmvAmthP7L7xwrYW}#
+                               #{e -ANAU$bmvAmthP7L7xwrYX}#
+                               #{r -ANAU$bmvAmthP7L7xwrYY}#
+                               #{w -ANAU$bmvAmthP7L7xwrYZ}#
+                               #{s -ANAU$bmvAmthP7L7xwrYa}#
+                               #{mod -ANAU$bmvAmthP7L7xwrYb}#
+                               #{expand-sequence -ANAU$bmvAmthP7L7xwnN@}#)
+                             (if (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}#
                                        'eval-when-form)
-                               (let ((#{tmp _hoQGWMnyQPAh3k2jhWLd5}#
+                               (let ((#{tmp -ANAU$bmvAmthP7L7xwrka}#
                                        ($sc-dispatch
-                                         #{e _hoQGWMnyQPAh3k2jhWLR2}#
+                                         #{e -ANAU$bmvAmthP7L7xwrYX}#
                                          '(_ each-any any . each-any))))
-                                 (if #{tmp _hoQGWMnyQPAh3k2jhWLd5}#
+                                 (if #{tmp -ANAU$bmvAmthP7L7xwrka}#
                                    (@apply
-                                     (lambda (#{x _hoQGWMnyQPAh3k2jhWLd9}#
-                                              #{e1 _hoQGWMnyQPAh3k2jhWLd$}#
-                                              #{e2 _hoQGWMnyQPAh3k2jhWLd@}#)
-                                       (let ((#{when-list _hoQGWMnyQPAh3k2jhWLeA}#
-                                               (#{parse-when-list _hoQGWMnyQPAh3k2jhWHTj}#
-                                                 #{e _hoQGWMnyQPAh3k2jhWLR2}#
-                                                 #{x _hoQGWMnyQPAh3k2jhWLd9}#)))
+                                     (lambda (#{x -ANAU$bmvAmthP7L7xwrke}#
+                                              #{e1 -ANAU$bmvAmthP7L7xwrkf}#
+                                              #{e2 -ANAU$bmvAmthP7L7xwrkg}#)
+                                       (let ((#{when-list -ANAU$bmvAmthP7L7xwrkh}#
+                                               (#{parse-when-list -ANAU$bmvAmthP7L7xwnOC}#
+                                                 #{e -ANAU$bmvAmthP7L7xwrYX}#
+                                                 #{x -ANAU$bmvAmthP7L7xwrke}#)))
                                          (if (memq 'eval
-                                                   #{when-list _hoQGWMnyQPAh3k2jhWLeA}#)
-                                           (#{expand-sequence _hoQGWMnyQPAh3k2jhWHTg}#
-                                             (cons #{e1 _hoQGWMnyQPAh3k2jhWLd$}#
-                                                   #{e2 _hoQGWMnyQPAh3k2jhWLd@}#)
-                                             #{r _hoQGWMnyQPAh3k2jhWLR3}#
-                                             #{w _hoQGWMnyQPAh3k2jhWLR4}#
-                                             #{s _hoQGWMnyQPAh3k2jhWLR5}#
-                                             #{mod _hoQGWMnyQPAh3k2jhWLR6}#)
+                                                   #{when-list -ANAU$bmvAmthP7L7xwrkh}#)
+                                           (#{expand-sequence -ANAU$bmvAmthP7L7xwnN@}#
+                                             (cons #{e1 -ANAU$bmvAmthP7L7xwrkf}#
+                                                   #{e2 -ANAU$bmvAmthP7L7xwrkg}#)
+                                             #{r -ANAU$bmvAmthP7L7xwrYY}#
+                                             #{w -ANAU$bmvAmthP7L7xwrYZ}#
+                                             #{s -ANAU$bmvAmthP7L7xwrYa}#
+                                             #{mod -ANAU$bmvAmthP7L7xwrYb}#)
                                            (make-struct/no-tail
                                              (vector-ref %expanded-vtables 0)
                                              #f))))
-                                     #{tmp _hoQGWMnyQPAh3k2jhWLd5}#)
+                                     #{tmp -ANAU$bmvAmthP7L7xwrka}#)
                                    (syntax-violation
                                      #f
                                      "source expression failed to match any pattern"
-                                     #{e _hoQGWMnyQPAh3k2jhWLR2}#)))
-                               (if (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}#
+                                     #{e -ANAU$bmvAmthP7L7xwrYX}#)))
+                               (if (if (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}#
                                              'define-form)
                                      #t
-                                     (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}#
+                                     (if (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}#
                                                'define-syntax-form)
                                        #t
-                                       (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}#
+                                       (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}#
                                              'define-syntax-parameter-form)))
                                  (syntax-violation
                                    #f
                                    "definition in expression context"
-                                   #{e _hoQGWMnyQPAh3k2jhWLR2}#
-                                   (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                     #{value _hoQGWMnyQPAh3k2jhWLR1}#
-                                     #{w _hoQGWMnyQPAh3k2jhWLR4}#
-                                     #{mod _hoQGWMnyQPAh3k2jhWLR6}#))
-                                 (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}#
+                                   #{e -ANAU$bmvAmthP7L7xwrYX}#
+                                   (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                     #{value -ANAU$bmvAmthP7L7xwrYW}#
+                                     #{w -ANAU$bmvAmthP7L7xwrYZ}#
+                                     #{mod -ANAU$bmvAmthP7L7xwrYb}#))
+                                 (if (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}#
                                            'syntax)
                                    (syntax-violation
                                      #f
                                      "reference to pattern variable outside syntax form"
-                                     (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                                     (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                                        (begin
-                                         (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWLR2}#)
-                                               #{s _hoQGWMnyQPAh3k2jhWLR5}#
+                                         (if (if (pair? #{e -ANAU$bmvAmthP7L7xwrYX}#)
+                                               #{s -ANAU$bmvAmthP7L7xwrYa}#
                                                #f)
                                            (set-source-properties!
-                                             #{e _hoQGWMnyQPAh3k2jhWLR2}#
-                                             #{s _hoQGWMnyQPAh3k2jhWLR5}#))
-                                         #{e _hoQGWMnyQPAh3k2jhWLR2}#)
-                                       #{w _hoQGWMnyQPAh3k2jhWLR4}#
-                                       #{mod _hoQGWMnyQPAh3k2jhWLR6}#))
-                                   (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLR0}#
+                                             #{e -ANAU$bmvAmthP7L7xwrYX}#
+                                             #{s -ANAU$bmvAmthP7L7xwrYa}#))
+                                         #{e -ANAU$bmvAmthP7L7xwrYX}#)
+                                       #{w -ANAU$bmvAmthP7L7xwrYZ}#
+                                       #{mod -ANAU$bmvAmthP7L7xwrYb}#))
+                                   (if (eqv? #{type -ANAU$bmvAmthP7L7xwrYV}#
                                              'displaced-lexical)
                                      (syntax-violation
                                        #f
                                        "reference to identifier outside its scope"
-                                       (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                                       (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                                          (begin
-                                           (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWLR2}#)
-                                                 #{s _hoQGWMnyQPAh3k2jhWLR5}#
+                                           (if (if (pair? #{e -ANAU$bmvAmthP7L7xwrYX}#)
+                                                 #{s -ANAU$bmvAmthP7L7xwrYa}#
                                                  #f)
                                              (set-source-properties!
-                                               #{e _hoQGWMnyQPAh3k2jhWLR2}#
-                                               #{s _hoQGWMnyQPAh3k2jhWLR5}#))
-                                           #{e _hoQGWMnyQPAh3k2jhWLR2}#)
-                                         #{w _hoQGWMnyQPAh3k2jhWLR4}#
-                                         #{mod _hoQGWMnyQPAh3k2jhWLR6}#))
+                                               #{e -ANAU$bmvAmthP7L7xwrYX}#
+                                               #{s -ANAU$bmvAmthP7L7xwrYa}#))
+                                           #{e -ANAU$bmvAmthP7L7xwrYX}#)
+                                         #{w -ANAU$bmvAmthP7L7xwrYZ}#
+                                         #{mod -ANAU$bmvAmthP7L7xwrYb}#))
                                      (syntax-violation
                                        #f
                                        "unexpected syntax"
-                                       (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                                       (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                                          (begin
-                                           (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWLR2}#)
-                                                 #{s _hoQGWMnyQPAh3k2jhWLR5}#
+                                           (if (if (pair? #{e -ANAU$bmvAmthP7L7xwrYX}#)
+                                                 #{s -ANAU$bmvAmthP7L7xwrYa}#
                                                  #f)
                                              (set-source-properties!
-                                               #{e _hoQGWMnyQPAh3k2jhWLR2}#
-                                               #{s _hoQGWMnyQPAh3k2jhWLR5}#))
-                                           #{e _hoQGWMnyQPAh3k2jhWLR2}#)
-                                         #{w _hoQGWMnyQPAh3k2jhWLR4}#
-                                         #{mod _hoQGWMnyQPAh3k2jhWLR6}#))))))))))))))))))
-     (#{expand-application _hoQGWMnyQPAh3k2jhWHTn}#
-       (lambda (#{x _hoQGWMnyQPAh3k2jhWLhw}#
-                #{e _hoQGWMnyQPAh3k2jhWLhx}#
-                #{r _hoQGWMnyQPAh3k2jhWLhy}#
-                #{w _hoQGWMnyQPAh3k2jhWLhz}#
-                #{s _hoQGWMnyQPAh3k2jhWLh0}#
-                #{mod _hoQGWMnyQPAh3k2jhWLh1}#)
-         (let ((#{tmp _hoQGWMnyQPAh3k2jhWLh3}#
+                                               #{e -ANAU$bmvAmthP7L7xwrYX}#
+                                               #{s -ANAU$bmvAmthP7L7xwrYa}#))
+                                           #{e -ANAU$bmvAmthP7L7xwrYX}#)
+                                         #{w -ANAU$bmvAmthP7L7xwrYZ}#
+                                         #{mod -ANAU$bmvAmthP7L7xwrYb}#))))))))))))))))))
+     (#{expand-application -ANAU$bmvAmthP7L7xwnOG}#
+       (lambda (#{x -ANAU$bmvAmthP7L7xwroR}#
+                #{e -ANAU$bmvAmthP7L7xwroS}#
+                #{r -ANAU$bmvAmthP7L7xwroT}#
+                #{w -ANAU$bmvAmthP7L7xwroU}#
+                #{s -ANAU$bmvAmthP7L7xwroV}#
+                #{mod -ANAU$bmvAmthP7L7xwroW}#)
+         (let ((#{tmp -ANAU$bmvAmthP7L7xwroY}#
                  ($sc-dispatch
-                   #{e _hoQGWMnyQPAh3k2jhWLhx}#
+                   #{e -ANAU$bmvAmthP7L7xwroS}#
                    '(any . each-any))))
-           (if #{tmp _hoQGWMnyQPAh3k2jhWLh3}#
+           (if #{tmp -ANAU$bmvAmthP7L7xwroY}#
              (@apply
-               (lambda (#{e0 _hoQGWMnyQPAh3k2jhWLh7}#
-                        #{e1 _hoQGWMnyQPAh3k2jhWLh8}#)
-                 (#{build-application _hoQGWMnyQPAh3k2jhWHSg}#
-                   #{s _hoQGWMnyQPAh3k2jhWLh0}#
-                   #{x _hoQGWMnyQPAh3k2jhWLhw}#
-                   (map (lambda (#{e _hoQGWMnyQPAh3k2jhWLjM}#)
-                          (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                            #{e _hoQGWMnyQPAh3k2jhWLjM}#
-                            #{r _hoQGWMnyQPAh3k2jhWLhy}#
-                            #{w _hoQGWMnyQPAh3k2jhWLhz}#
-                            #{mod _hoQGWMnyQPAh3k2jhWLh1}#))
-                        #{e1 _hoQGWMnyQPAh3k2jhWLh8}#)))
-               #{tmp _hoQGWMnyQPAh3k2jhWLh3}#)
+               (lambda (#{e0 -ANAU$bmvAmthP7L7xwroc}#
+                        #{e1 -ANAU$bmvAmthP7L7xwrod}#)
+                 (#{build-application -ANAU$bmvAmthP7L7xwnM@}#
+                   #{s -ANAU$bmvAmthP7L7xwroV}#
+                   #{x -ANAU$bmvAmthP7L7xwroR}#
+                   (map (lambda (#{e -ANAU$bmvAmthP7L7xwrpt}#)
+                          (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                            #{e -ANAU$bmvAmthP7L7xwrpt}#
+                            #{r -ANAU$bmvAmthP7L7xwroT}#
+                            #{w -ANAU$bmvAmthP7L7xwroU}#
+                            #{mod -ANAU$bmvAmthP7L7xwroW}#))
+                        #{e1 -ANAU$bmvAmthP7L7xwrod}#)))
+               #{tmp -ANAU$bmvAmthP7L7xwroY}#)
              (syntax-violation
                #f
                "source expression failed to match any pattern"
-               #{e _hoQGWMnyQPAh3k2jhWLhx}#)))))
-     (#{expand-macro _hoQGWMnyQPAh3k2jhWHTo}#
-       (lambda (#{p _hoQGWMnyQPAh3k2jhWLkY}#
-                #{e _hoQGWMnyQPAh3k2jhWLkZ}#
-                #{r _hoQGWMnyQPAh3k2jhWLka}#
-                #{w _hoQGWMnyQPAh3k2jhWLkb}#
-                #{s _hoQGWMnyQPAh3k2jhWLkc}#
-                #{rib _hoQGWMnyQPAh3k2jhWLkd}#
-                #{mod _hoQGWMnyQPAh3k2jhWLke}#)
+               #{e -ANAU$bmvAmthP7L7xwroS}#)))))
+     (#{expand-macro -ANAU$bmvAmthP7L7xwnOH}#
+       (lambda (#{p -ANAU$bmvAmthP7L7xwrq5}#
+                #{e -ANAU$bmvAmthP7L7xwrq6}#
+                #{r -ANAU$bmvAmthP7L7xwrq7}#
+                #{w -ANAU$bmvAmthP7L7xwrq8}#
+                #{s -ANAU$bmvAmthP7L7xwrq9}#
+                #{rib -ANAU$bmvAmthP7L7xwrq$}#
+                #{mod -ANAU$bmvAmthP7L7xwrq@}#)
          (letrec*
-           ((#{rebuild-macro-output _hoQGWMnyQPAh3k2jhWLkf}#
-              (lambda (#{x _hoQGWMnyQPAh3k2jhWLlA}#
-                       #{m _hoQGWMnyQPAh3k2jhWLlB}#)
-                (if (pair? #{x _hoQGWMnyQPAh3k2jhWLlA}#)
-                  (let ((#{e _hoQGWMnyQPAh3k2jhWLlF}#
-                          (cons (#{rebuild-macro-output _hoQGWMnyQPAh3k2jhWLkf}#
-                                  (car #{x _hoQGWMnyQPAh3k2jhWLlA}#)
-                                  #{m _hoQGWMnyQPAh3k2jhWLlB}#)
-                                (#{rebuild-macro-output _hoQGWMnyQPAh3k2jhWLkf}#
-                                  (cdr #{x _hoQGWMnyQPAh3k2jhWLlA}#)
-                                  #{m _hoQGWMnyQPAh3k2jhWLlB}#))))
+           ((#{rebuild-macro-output -ANAU$bmvAmthP7L7xwrrA}#
+              (lambda (#{x -ANAU$bmvAmthP7L7xwrrh}#
+                       #{m -ANAU$bmvAmthP7L7xwrri}#)
+                (if (pair? #{x -ANAU$bmvAmthP7L7xwrrh}#)
+                  (let ((#{e -ANAU$bmvAmthP7L7xwrrm}#
+                          (cons (#{rebuild-macro-output -ANAU$bmvAmthP7L7xwrrA}#
+                                  (car #{x -ANAU$bmvAmthP7L7xwrrh}#)
+                                  #{m -ANAU$bmvAmthP7L7xwrri}#)
+                                (#{rebuild-macro-output -ANAU$bmvAmthP7L7xwrrA}#
+                                  (cdr #{x -ANAU$bmvAmthP7L7xwrrh}#)
+                                  #{m -ANAU$bmvAmthP7L7xwrri}#))))
                     (begin
-                      (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWLlF}#)
-                            #{s _hoQGWMnyQPAh3k2jhWLkc}#
+                      (if (if (pair? #{e -ANAU$bmvAmthP7L7xwrrm}#)
+                            #{s -ANAU$bmvAmthP7L7xwrq9}#
                             #f)
                         (set-source-properties!
-                          #{e _hoQGWMnyQPAh3k2jhWLlF}#
-                          #{s _hoQGWMnyQPAh3k2jhWLkc}#))
-                      #{e _hoQGWMnyQPAh3k2jhWLlF}#))
-                  (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWLlA}#)
-                        (if (= (vector-length #{x _hoQGWMnyQPAh3k2jhWLlA}#)
+                          #{e -ANAU$bmvAmthP7L7xwrrm}#
+                          #{s -ANAU$bmvAmthP7L7xwrq9}#))
+                      #{e -ANAU$bmvAmthP7L7xwrrm}#))
+                  (if (if (vector? #{x -ANAU$bmvAmthP7L7xwrrh}#)
+                        (if (= (vector-length #{x -ANAU$bmvAmthP7L7xwrrh}#)
                                4)
-                          (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWLlA}# 0)
+                          (eq? (vector-ref #{x -ANAU$bmvAmthP7L7xwrrh}# 0)
                                'syntax-object)
                           #f)
                         #f)
-                    (let ((#{w _hoQGWMnyQPAh3k2jhWLlV}#
-                            (vector-ref #{x _hoQGWMnyQPAh3k2jhWLlA}# 2)))
-                      (let ((#{ms _hoQGWMnyQPAh3k2jhWLlW}#
-                              (car #{w _hoQGWMnyQPAh3k2jhWLlV}#))
-                            (#{s _hoQGWMnyQPAh3k2jhWLlX}#
-                              (cdr #{w _hoQGWMnyQPAh3k2jhWLlV}#)))
-                        (if (if (pair? #{ms _hoQGWMnyQPAh3k2jhWLlW}#)
-                              (eq? (car #{ms _hoQGWMnyQPAh3k2jhWLlW}#) #f)
+                    (let ((#{w -ANAU$bmvAmthP7L7xwrr2}#
+                            (vector-ref #{x -ANAU$bmvAmthP7L7xwrrh}# 2)))
+                      (let ((#{ms -ANAU$bmvAmthP7L7xwrr3}#
+                              (car #{w -ANAU$bmvAmthP7L7xwrr2}#))
+                            (#{s -ANAU$bmvAmthP7L7xwrr4}#
+                              (cdr #{w -ANAU$bmvAmthP7L7xwrr2}#)))
+                        (if (if (pair? #{ms -ANAU$bmvAmthP7L7xwrr3}#)
+                              (eq? (car #{ms -ANAU$bmvAmthP7L7xwrr3}#) #f)
                               #f)
-                          (let ((#{expression _hoQGWMnyQPAh3k2jhWLlf}#
-                                  (vector-ref #{x _hoQGWMnyQPAh3k2jhWLlA}# 1))
-                                (#{wrap _hoQGWMnyQPAh3k2jhWLlg}#
-                                  (cons (cdr #{ms _hoQGWMnyQPAh3k2jhWLlW}#)
-                                        (if #{rib _hoQGWMnyQPAh3k2jhWLkd}#
-                                          (cons #{rib _hoQGWMnyQPAh3k2jhWLkd}#
-                                                (cdr #{s _hoQGWMnyQPAh3k2jhWLlX}#))
-                                          (cdr #{s _hoQGWMnyQPAh3k2jhWLlX}#))))
-                                (#{module _hoQGWMnyQPAh3k2jhWLlh}#
-                                  (vector-ref #{x _hoQGWMnyQPAh3k2jhWLlA}# 3)))
+                          (let ((#{expression -ANAU$bmvAmthP7L7xwrsA}#
+                                  (vector-ref #{x -ANAU$bmvAmthP7L7xwrrh}# 1))
+                                (#{wrap -ANAU$bmvAmthP7L7xwrsB}#
+                                  (cons (cdr #{ms -ANAU$bmvAmthP7L7xwrr3}#)
+                                        (if #{rib -ANAU$bmvAmthP7L7xwrq$}#
+                                          (cons #{rib -ANAU$bmvAmthP7L7xwrq$}#
+                                                (cdr #{s -ANAU$bmvAmthP7L7xwrr4}#))
+                                          (cdr #{s -ANAU$bmvAmthP7L7xwrr4}#))))
+                                (#{module -ANAU$bmvAmthP7L7xwrsC}#
+                                  (vector-ref #{x -ANAU$bmvAmthP7L7xwrrh}# 3)))
                             (vector
                               'syntax-object
-                              #{expression _hoQGWMnyQPAh3k2jhWLlf}#
-                              #{wrap _hoQGWMnyQPAh3k2jhWLlg}#
-                              #{module _hoQGWMnyQPAh3k2jhWLlh}#))
-                          (let ((#{expression _hoQGWMnyQPAh3k2jhWLlr}#
-                                  (let ((#{e _hoQGWMnyQPAh3k2jhWLlw}#
+                              #{expression -ANAU$bmvAmthP7L7xwrsA}#
+                              #{wrap -ANAU$bmvAmthP7L7xwrsB}#
+                              #{module -ANAU$bmvAmthP7L7xwrsC}#))
+                          (let ((#{expression -ANAU$bmvAmthP7L7xwrsM}#
+                                  (let ((#{e -ANAU$bmvAmthP7L7xwrsR}#
                                           (vector-ref
-                                            #{x _hoQGWMnyQPAh3k2jhWLlA}#
+                                            #{x -ANAU$bmvAmthP7L7xwrrh}#
                                             1)))
                                     (begin
-                                      (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWLlw}#)
-                                            #{s _hoQGWMnyQPAh3k2jhWLlX}#
+                                      (if (if (pair? #{e -ANAU$bmvAmthP7L7xwrsR}#)
+                                            #{s -ANAU$bmvAmthP7L7xwrr4}#
                                             #f)
                                         (set-source-properties!
-                                          #{e _hoQGWMnyQPAh3k2jhWLlw}#
-                                          #{s _hoQGWMnyQPAh3k2jhWLlX}#))
-                                      #{e _hoQGWMnyQPAh3k2jhWLlw}#)))
-                                (#{wrap _hoQGWMnyQPAh3k2jhWLls}#
-                                  (cons (cons #{m _hoQGWMnyQPAh3k2jhWLlB}#
-                                              #{ms _hoQGWMnyQPAh3k2jhWLlW}#)
-                                        (if #{rib _hoQGWMnyQPAh3k2jhWLkd}#
-                                          (cons #{rib _hoQGWMnyQPAh3k2jhWLkd}#
+                                          #{e -ANAU$bmvAmthP7L7xwrsR}#
+                                          #{s -ANAU$bmvAmthP7L7xwrr4}#))
+                                      #{e -ANAU$bmvAmthP7L7xwrsR}#)))
+                                (#{wrap -ANAU$bmvAmthP7L7xwrsN}#
+                                  (cons (cons #{m -ANAU$bmvAmthP7L7xwrri}#
+                                              #{ms -ANAU$bmvAmthP7L7xwrr3}#)
+                                        (if #{rib -ANAU$bmvAmthP7L7xwrq$}#
+                                          (cons #{rib -ANAU$bmvAmthP7L7xwrq$}#
                                                 (cons 'shift
-                                                      #{s _hoQGWMnyQPAh3k2jhWLlX}#))
+                                                      #{s -ANAU$bmvAmthP7L7xwrr4}#))
                                           (cons 'shift
-                                                #{s _hoQGWMnyQPAh3k2jhWLlX}#))))
-                                (#{module _hoQGWMnyQPAh3k2jhWLlt}#
-                                  (vector-ref #{x _hoQGWMnyQPAh3k2jhWLlA}# 3)))
+                                                #{s -ANAU$bmvAmthP7L7xwrr4}#))))
+                                (#{module -ANAU$bmvAmthP7L7xwrsO}#
+                                  (vector-ref #{x -ANAU$bmvAmthP7L7xwrrh}# 3)))
                             (vector
                               'syntax-object
-                              #{expression _hoQGWMnyQPAh3k2jhWLlr}#
-                              #{wrap _hoQGWMnyQPAh3k2jhWLls}#
-                              #{module _hoQGWMnyQPAh3k2jhWLlt}#)))))
-                    (if (vector? #{x _hoQGWMnyQPAh3k2jhWLlA}#)
-                      (let ((#{n _hoQGWMnyQPAh3k2jhWLl8}#
-                              (vector-length #{x _hoQGWMnyQPAh3k2jhWLlA}#)))
-                        (let ((#{v _hoQGWMnyQPAh3k2jhWLl9}#
-                                (let ((#{e _hoQGWMnyQPAh3k2jhWLmF}#
+                              #{expression -ANAU$bmvAmthP7L7xwrsM}#
+                              #{wrap -ANAU$bmvAmthP7L7xwrsN}#
+                              #{module -ANAU$bmvAmthP7L7xwrsO}#)))))
+                    (if (vector? #{x -ANAU$bmvAmthP7L7xwrrh}#)
+                      (let ((#{n -ANAU$bmvAmthP7L7xwrsd}#
+                              (vector-length #{x -ANAU$bmvAmthP7L7xwrrh}#)))
+                        (let ((#{v -ANAU$bmvAmthP7L7xwrse}#
+                                (let ((#{e -ANAU$bmvAmthP7L7xwrsm}#
                                         (make-vector
-                                          #{n _hoQGWMnyQPAh3k2jhWLl8}#)))
+                                          #{n -ANAU$bmvAmthP7L7xwrsd}#)))
                                   (begin
-                                    (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWLmF}#)
-                                          #{x _hoQGWMnyQPAh3k2jhWLlA}#
+                                    (if (if (pair? #{e -ANAU$bmvAmthP7L7xwrsm}#)
+                                          #{x -ANAU$bmvAmthP7L7xwrrh}#
                                           #f)
                                       (set-source-properties!
-                                        #{e _hoQGWMnyQPAh3k2jhWLmF}#
-                                        #{x _hoQGWMnyQPAh3k2jhWLlA}#))
-                                    #{e _hoQGWMnyQPAh3k2jhWLmF}#))))
+                                        #{e -ANAU$bmvAmthP7L7xwrsm}#
+                                        #{x -ANAU$bmvAmthP7L7xwrrh}#))
+                                    #{e -ANAU$bmvAmthP7L7xwrsm}#))))
                           (letrec*
-                            ((#{loop _hoQGWMnyQPAh3k2jhWLl$}#
-                               (lambda (#{i _hoQGWMnyQPAh3k2jhWLmy}#)
-                                 (if (= #{i _hoQGWMnyQPAh3k2jhWLmy}#
-                                        #{n _hoQGWMnyQPAh3k2jhWLl8}#)
-                                   #{v _hoQGWMnyQPAh3k2jhWLl9}#
+                            ((#{loop -ANAU$bmvAmthP7L7xwrsf}#
+                               (lambda (#{i -ANAU$bmvAmthP7L7xwrtT}#)
+                                 (if (= #{i -ANAU$bmvAmthP7L7xwrtT}#
+                                        #{n -ANAU$bmvAmthP7L7xwrsd}#)
+                                   #{v -ANAU$bmvAmthP7L7xwrse}#
                                    (begin
                                      (vector-set!
-                                       #{v _hoQGWMnyQPAh3k2jhWLl9}#
-                                       #{i _hoQGWMnyQPAh3k2jhWLmy}#
-                                       (#{rebuild-macro-output _hoQGWMnyQPAh3k2jhWLkf}#
+                                       #{v -ANAU$bmvAmthP7L7xwrse}#
+                                       #{i -ANAU$bmvAmthP7L7xwrtT}#
+                                       (#{rebuild-macro-output -ANAU$bmvAmthP7L7xwrrA}#
                                          (vector-ref
-                                           #{x _hoQGWMnyQPAh3k2jhWLlA}#
-                                           #{i _hoQGWMnyQPAh3k2jhWLmy}#)
-                                         #{m _hoQGWMnyQPAh3k2jhWLlB}#))
-                                     (#{loop _hoQGWMnyQPAh3k2jhWLl$}#
-                                       (#{1+}# #{i _hoQGWMnyQPAh3k2jhWLmy}#)))))))
-                            (#{loop _hoQGWMnyQPAh3k2jhWLl$}# 0))))
-                      (if (symbol? #{x _hoQGWMnyQPAh3k2jhWLlA}#)
+                                           #{x -ANAU$bmvAmthP7L7xwrrh}#
+                                           #{i -ANAU$bmvAmthP7L7xwrtT}#)
+                                         #{m -ANAU$bmvAmthP7L7xwrri}#))
+                                     (#{loop -ANAU$bmvAmthP7L7xwrsf}#
+                                       (#{1+}# #{i -ANAU$bmvAmthP7L7xwrtT}#)))))))
+                            (#{loop -ANAU$bmvAmthP7L7xwrsf}# 0))))
+                      (if (symbol? #{x -ANAU$bmvAmthP7L7xwrrh}#)
                         (syntax-violation
                           #f
                           "encountered raw symbol in macro output"
-                          (let ((#{s _hoQGWMnyQPAh3k2jhWLm4}#
-                                  (cdr #{w _hoQGWMnyQPAh3k2jhWLkb}#)))
-                            (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                          (let ((#{s -ANAU$bmvAmthP7L7xwrtZ}#
+                                  (cdr #{w -ANAU$bmvAmthP7L7xwrq8}#)))
+                            (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                               (begin
-                                (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWLkZ}#)
-                                      #{s _hoQGWMnyQPAh3k2jhWLm4}#
+                                (if (if (pair? #{e -ANAU$bmvAmthP7L7xwrq6}#)
+                                      #{s -ANAU$bmvAmthP7L7xwrtZ}#
                                       #f)
                                   (set-source-properties!
-                                    #{e _hoQGWMnyQPAh3k2jhWLkZ}#
-                                    #{s _hoQGWMnyQPAh3k2jhWLm4}#))
-                                #{e _hoQGWMnyQPAh3k2jhWLkZ}#)
-                              #{w _hoQGWMnyQPAh3k2jhWLkb}#
-                              #{mod _hoQGWMnyQPAh3k2jhWLke}#))
-                          #{x _hoQGWMnyQPAh3k2jhWLlA}#)
+                                    #{e -ANAU$bmvAmthP7L7xwrq6}#
+                                    #{s -ANAU$bmvAmthP7L7xwrtZ}#))
+                                #{e -ANAU$bmvAmthP7L7xwrq6}#)
+                              #{w -ANAU$bmvAmthP7L7xwrq8}#
+                              #{mod -ANAU$bmvAmthP7L7xwrq@}#))
+                          #{x -ANAU$bmvAmthP7L7xwrrh}#)
                         (begin
-                          (if (if (pair? #{x _hoQGWMnyQPAh3k2jhWLlA}#)
-                                #{s _hoQGWMnyQPAh3k2jhWLkc}#
+                          (if (if (pair? #{x -ANAU$bmvAmthP7L7xwrrh}#)
+                                #{s -ANAU$bmvAmthP7L7xwrq9}#
                                 #f)
                             (set-source-properties!
-                              #{x _hoQGWMnyQPAh3k2jhWLlA}#
-                              #{s _hoQGWMnyQPAh3k2jhWLkc}#))
-                          #{x _hoQGWMnyQPAh3k2jhWLlA}#))))))))
+                              #{x -ANAU$bmvAmthP7L7xwrrh}#
+                              #{s -ANAU$bmvAmthP7L7xwrq9}#))
+                          #{x -ANAU$bmvAmthP7L7xwrrh}#))))))))
            (with-fluids
-             ((#{transformer-environment _hoQGWMnyQPAh3k2jhWHTX}#
-                (lambda (#{k _hoQGWMnyQPAh3k2jhWLkg}#)
-                  (#{k _hoQGWMnyQPAh3k2jhWLkg}#
-                    #{e _hoQGWMnyQPAh3k2jhWLkZ}#
-                    #{r _hoQGWMnyQPAh3k2jhWLka}#
-                    #{w _hoQGWMnyQPAh3k2jhWLkb}#
-                    #{s _hoQGWMnyQPAh3k2jhWLkc}#
-                    #{rib _hoQGWMnyQPAh3k2jhWLkd}#
-                    #{mod _hoQGWMnyQPAh3k2jhWLke}#))))
-             (#{rebuild-macro-output _hoQGWMnyQPAh3k2jhWLkf}#
-               (#{p _hoQGWMnyQPAh3k2jhWLkY}#
-                 (let ((#{w _hoQGWMnyQPAh3k2jhWLkn}#
-                         (cons (cons #f (car #{w _hoQGWMnyQPAh3k2jhWLkb}#))
+             ((#{transformer-environment -ANAU$bmvAmthP7L7xwnN2}#
+                (lambda (#{k -ANAU$bmvAmthP7L7xwrrB}#)
+                  (#{k -ANAU$bmvAmthP7L7xwrrB}#
+                    #{e -ANAU$bmvAmthP7L7xwrq6}#
+                    #{r -ANAU$bmvAmthP7L7xwrq7}#
+                    #{w -ANAU$bmvAmthP7L7xwrq8}#
+                    #{s -ANAU$bmvAmthP7L7xwrq9}#
+                    #{rib -ANAU$bmvAmthP7L7xwrq$}#
+                    #{mod -ANAU$bmvAmthP7L7xwrq@}#))))
+             (#{rebuild-macro-output -ANAU$bmvAmthP7L7xwrrA}#
+               (#{p -ANAU$bmvAmthP7L7xwrq5}#
+                 (let ((#{w -ANAU$bmvAmthP7L7xwrrI}#
+                         (cons (cons #f (car #{w -ANAU$bmvAmthP7L7xwrq8}#))
                                (cons 'shift
-                                     (cdr #{w _hoQGWMnyQPAh3k2jhWLkb}#)))))
-                   (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                                     (cdr #{w -ANAU$bmvAmthP7L7xwrq8}#)))))
+                   (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                      (begin
-                       (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWLkZ}#)
-                             #{s _hoQGWMnyQPAh3k2jhWLkc}#
+                       (if (if (pair? #{e -ANAU$bmvAmthP7L7xwrq6}#)
+                             #{s -ANAU$bmvAmthP7L7xwrq9}#
                              #f)
                          (set-source-properties!
-                           #{e _hoQGWMnyQPAh3k2jhWLkZ}#
-                           #{s _hoQGWMnyQPAh3k2jhWLkc}#))
-                       #{e _hoQGWMnyQPAh3k2jhWLkZ}#)
-                     #{w _hoQGWMnyQPAh3k2jhWLkn}#
-                     #{mod _hoQGWMnyQPAh3k2jhWLke}#)))
+                           #{e -ANAU$bmvAmthP7L7xwrq6}#
+                           #{s -ANAU$bmvAmthP7L7xwrq9}#))
+                       #{e -ANAU$bmvAmthP7L7xwrq6}#)
+                     #{w -ANAU$bmvAmthP7L7xwrrI}#
+                     #{mod -ANAU$bmvAmthP7L7xwrq@}#)))
                (gensym "m"))))))
-     (#{expand-body _hoQGWMnyQPAh3k2jhWHTp}#
-       (lambda (#{body _hoQGWMnyQPAh3k2jhWLnY}#
-                #{outer-form _hoQGWMnyQPAh3k2jhWLnZ}#
-                #{r _hoQGWMnyQPAh3k2jhWLna}#
-                #{w _hoQGWMnyQPAh3k2jhWLnb}#
-                #{mod _hoQGWMnyQPAh3k2jhWLnc}#)
-         (let ((#{r _hoQGWMnyQPAh3k2jhWLnd}#
+     (#{expand-body -ANAU$bmvAmthP7L7xwnOI}#
+       (lambda (#{body -ANAU$bmvAmthP7L7xwrt5}#
+                #{outer-form -ANAU$bmvAmthP7L7xwrt6}#
+                #{r -ANAU$bmvAmthP7L7xwrt7}#
+                #{w -ANAU$bmvAmthP7L7xwrt8}#
+                #{mod -ANAU$bmvAmthP7L7xwrt9}#)
+         (let ((#{r -ANAU$bmvAmthP7L7xwrt$}#
                  (cons '("placeholder" placeholder)
-                       #{r _hoQGWMnyQPAh3k2jhWLna}#)))
-           (let ((#{ribcage _hoQGWMnyQPAh3k2jhWLne}#
+                       #{r -ANAU$bmvAmthP7L7xwrt7}#)))
+           (let ((#{ribcage -ANAU$bmvAmthP7L7xwrt@}#
                    (vector 'ribcage '() '() '())))
-             (let ((#{w _hoQGWMnyQPAh3k2jhWLnf}#
-                     (cons (car #{w _hoQGWMnyQPAh3k2jhWLnb}#)
-                           (cons #{ribcage _hoQGWMnyQPAh3k2jhWLne}#
-                                 (cdr #{w _hoQGWMnyQPAh3k2jhWLnb}#)))))
+             (let ((#{w -ANAU$bmvAmthP7L7xwruA}#
+                     (cons (car #{w -ANAU$bmvAmthP7L7xwrt8}#)
+                           (cons #{ribcage -ANAU$bmvAmthP7L7xwrt@}#
+                                 (cdr #{w -ANAU$bmvAmthP7L7xwrt8}#)))))
                (letrec*
-                 ((#{parse _hoQGWMnyQPAh3k2jhWLng}#
-                    (lambda (#{body _hoQGWMnyQPAh3k2jhWLnt}#
-                             #{ids _hoQGWMnyQPAh3k2jhWLnu}#
-                             #{labels _hoQGWMnyQPAh3k2jhWLnv}#
-                             #{var-ids _hoQGWMnyQPAh3k2jhWLnw}#
-                             #{vars _hoQGWMnyQPAh3k2jhWLnx}#
-                             #{vals _hoQGWMnyQPAh3k2jhWLny}#
-                             #{bindings _hoQGWMnyQPAh3k2jhWLnz}#)
-                      (if (null? #{body _hoQGWMnyQPAh3k2jhWLnt}#)
+                 ((#{parse -ANAU$bmvAmthP7L7xwruB}#
+                    (lambda (#{body -ANAU$bmvAmthP7L7xwruO}#
+                             #{ids -ANAU$bmvAmthP7L7xwruP}#
+                             #{labels -ANAU$bmvAmthP7L7xwruQ}#
+                             #{var-ids -ANAU$bmvAmthP7L7xwruR}#
+                             #{vars -ANAU$bmvAmthP7L7xwruS}#
+                             #{vals -ANAU$bmvAmthP7L7xwruT}#
+                             #{bindings -ANAU$bmvAmthP7L7xwruU}#)
+                      (if (null? #{body -ANAU$bmvAmthP7L7xwruO}#)
                         (syntax-violation
                           #f
                           "no expressions in body"
-                          #{outer-form _hoQGWMnyQPAh3k2jhWLnZ}#)
-                        (let ((#{e _hoQGWMnyQPAh3k2jhWLn0}#
-                                (cdr (car #{body _hoQGWMnyQPAh3k2jhWLnt}#)))
-                              (#{er _hoQGWMnyQPAh3k2jhWLn1}#
-                                (car (car #{body _hoQGWMnyQPAh3k2jhWLnt}#))))
+                          #{outer-form -ANAU$bmvAmthP7L7xwrt6}#)
+                        (let ((#{e -ANAU$bmvAmthP7L7xwruV}#
+                                (cdr (car #{body -ANAU$bmvAmthP7L7xwruO}#)))
+                              (#{er -ANAU$bmvAmthP7L7xwruW}#
+                                (car (car #{body -ANAU$bmvAmthP7L7xwruO}#))))
                           (call-with-values
                             (lambda ()
-                              (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-                                #{e _hoQGWMnyQPAh3k2jhWLn0}#
-                                #{er _hoQGWMnyQPAh3k2jhWLn1}#
+                              (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+                                #{e -ANAU$bmvAmthP7L7xwruV}#
+                                #{er -ANAU$bmvAmthP7L7xwruW}#
                                 '(())
-                                (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-                                  #{er _hoQGWMnyQPAh3k2jhWLn1}#)
-                                #{ribcage _hoQGWMnyQPAh3k2jhWLne}#
-                                #{mod _hoQGWMnyQPAh3k2jhWLnc}#
+                                (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+                                  #{er -ANAU$bmvAmthP7L7xwruW}#)
+                                #{ribcage -ANAU$bmvAmthP7L7xwrt@}#
+                                #{mod -ANAU$bmvAmthP7L7xwrt9}#
                                 #f))
-                            (lambda (#{type _hoQGWMnyQPAh3k2jhWLqS}#
-                                     #{value _hoQGWMnyQPAh3k2jhWLqT}#
-                                     #{e _hoQGWMnyQPAh3k2jhWLqU}#
-                                     #{w _hoQGWMnyQPAh3k2jhWLqV}#
-                                     #{s _hoQGWMnyQPAh3k2jhWLqW}#
-                                     #{mod _hoQGWMnyQPAh3k2jhWLqX}#)
-                              (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLqS}#
+                            (lambda (#{type -ANAU$bmvAmthP7L7xwrwz}#
+                                     #{value -ANAU$bmvAmthP7L7xwrw0}#
+                                     #{e -ANAU$bmvAmthP7L7xwrw1}#
+                                     #{w -ANAU$bmvAmthP7L7xwrw2}#
+                                     #{s -ANAU$bmvAmthP7L7xwrw3}#
+                                     #{mod -ANAU$bmvAmthP7L7xwrw4}#)
+                              (if (eqv? #{type -ANAU$bmvAmthP7L7xwrwz}#
                                         'define-form)
-                                (let ((#{id _hoQGWMnyQPAh3k2jhWLqb}#
-                                        (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                          #{value _hoQGWMnyQPAh3k2jhWLqT}#
-                                          #{w _hoQGWMnyQPAh3k2jhWLqV}#
-                                          #{mod _hoQGWMnyQPAh3k2jhWLqX}#))
-                                      (#{label _hoQGWMnyQPAh3k2jhWLqc}#
-                                        (#{gen-label _hoQGWMnyQPAh3k2jhWHTD}#)))
-                                  (let ((#{var _hoQGWMnyQPAh3k2jhWLqd}#
-                                          (let ((#{id _hoQGWMnyQPAh3k2jhWLrX}#
+                                (let ((#{id -ANAU$bmvAmthP7L7xwrw8}#
+                                        (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                          #{value -ANAU$bmvAmthP7L7xwrw0}#
+                                          #{w -ANAU$bmvAmthP7L7xwrw2}#
+                                          #{mod -ANAU$bmvAmthP7L7xwrw4}#))
+                                      (#{label -ANAU$bmvAmthP7L7xwrw9}#
+                                        (#{gen-label -ANAU$bmvAmthP7L7xwnNi}#)))
+                                  (let ((#{var -ANAU$bmvAmthP7L7xwrw$}#
+                                          (let ((#{id -ANAU$bmvAmthP7L7xwrx4}#
                                                   (if (if (vector?
-                                                            #{id _hoQGWMnyQPAh3k2jhWLqb}#)
+                                                            #{id -ANAU$bmvAmthP7L7xwrw8}#)
                                                         (if (= (vector-length
-                                                                 #{id _hoQGWMnyQPAh3k2jhWLqb}#)
+                                                                 #{id -ANAU$bmvAmthP7L7xwrw8}#)
                                                                4)
                                                           (eq? (vector-ref
-                                                                 #{id _hoQGWMnyQPAh3k2jhWLqb}#
+                                                                 #{id -ANAU$bmvAmthP7L7xwrw8}#
                                                                  0)
                                                                'syntax-object)
                                                           #f)
                                                         #f)
                                                     (vector-ref
-                                                      #{id _hoQGWMnyQPAh3k2jhWLqb}#
+                                                      #{id -ANAU$bmvAmthP7L7xwrw8}#
                                                       1)
-                                                    #{id _hoQGWMnyQPAh3k2jhWLqb}#)))
+                                                    #{id -ANAU$bmvAmthP7L7xwrw8}#)))
                                             (gensym
                                               (string-append
                                                 (symbol->string
-                                                  #{id _hoQGWMnyQPAh3k2jhWLrX}#)
+                                                  #{id -ANAU$bmvAmthP7L7xwrx4}#)
                                                 " ")))))
                                     (begin
-                                      (let ((#{update _hoQGWMnyQPAh3k2jhWLrN}#
+                                      (let ((#{update -ANAU$bmvAmthP7L7xwrxu}#
                                               (cons (vector-ref
-                                                      #{id _hoQGWMnyQPAh3k2jhWLqb}#
+                                                      #{id -ANAU$bmvAmthP7L7xwrw8}#
                                                       1)
                                                     (vector-ref
-                                                      #{ribcage _hoQGWMnyQPAh3k2jhWLne}#
+                                                      #{ribcage -ANAU$bmvAmthP7L7xwrt@}#
                                                       1))))
                                         (vector-set!
-                                          #{ribcage _hoQGWMnyQPAh3k2jhWLne}#
+                                          #{ribcage -ANAU$bmvAmthP7L7xwrt@}#
                                           1
-                                          #{update _hoQGWMnyQPAh3k2jhWLrN}#))
-                                      (let ((#{update _hoQGWMnyQPAh3k2jhWLrP}#
+                                          #{update -ANAU$bmvAmthP7L7xwrxu}#))
+                                      (let ((#{update -ANAU$bmvAmthP7L7xwrxw}#
                                               (cons (car (vector-ref
-                                                           #{id _hoQGWMnyQPAh3k2jhWLqb}#
+                                                           #{id -ANAU$bmvAmthP7L7xwrw8}#
                                                            2))
                                                     (vector-ref
-                                                      #{ribcage _hoQGWMnyQPAh3k2jhWLne}#
+                                                      #{ribcage -ANAU$bmvAmthP7L7xwrt@}#
                                                       2))))
                                         (vector-set!
-                                          #{ribcage _hoQGWMnyQPAh3k2jhWLne}#
+                                          #{ribcage -ANAU$bmvAmthP7L7xwrt@}#
                                           2
-                                          #{update _hoQGWMnyQPAh3k2jhWLrP}#))
-                                      (let ((#{update _hoQGWMnyQPAh3k2jhWLrR}#
-                                              (cons #{label _hoQGWMnyQPAh3k2jhWLqc}#
+                                          #{update -ANAU$bmvAmthP7L7xwrxw}#))
+                                      (let ((#{update -ANAU$bmvAmthP7L7xwrxy}#
+                                              (cons #{label -ANAU$bmvAmthP7L7xwrw9}#
                                                     (vector-ref
-                                                      #{ribcage _hoQGWMnyQPAh3k2jhWLne}#
+                                                      #{ribcage -ANAU$bmvAmthP7L7xwrt@}#
                                                       3))))
                                         (vector-set!
-                                          #{ribcage _hoQGWMnyQPAh3k2jhWLne}#
+                                          #{ribcage -ANAU$bmvAmthP7L7xwrt@}#
                                           3
-                                          #{update _hoQGWMnyQPAh3k2jhWLrR}#))
-                                      (#{parse _hoQGWMnyQPAh3k2jhWLng}#
-                                        (cdr #{body _hoQGWMnyQPAh3k2jhWLnt}#)
-                                        (cons #{id _hoQGWMnyQPAh3k2jhWLqb}#
-                                              #{ids _hoQGWMnyQPAh3k2jhWLnu}#)
-                                        (cons #{label _hoQGWMnyQPAh3k2jhWLqc}#
-                                              #{labels _hoQGWMnyQPAh3k2jhWLnv}#)
-                                        (cons #{id _hoQGWMnyQPAh3k2jhWLqb}#
-                                              #{var-ids _hoQGWMnyQPAh3k2jhWLnw}#)
-                                        (cons #{var _hoQGWMnyQPAh3k2jhWLqd}#
-                                              #{vars _hoQGWMnyQPAh3k2jhWLnx}#)
-                                        (cons (cons #{er _hoQGWMnyQPAh3k2jhWLn1}#
-                                                    (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                                      #{e _hoQGWMnyQPAh3k2jhWLqU}#
-                                                      #{w _hoQGWMnyQPAh3k2jhWLqV}#
-                                                      #{mod _hoQGWMnyQPAh3k2jhWLqX}#))
-                                              #{vals _hoQGWMnyQPAh3k2jhWLny}#)
+                                          #{update -ANAU$bmvAmthP7L7xwrxy}#))
+                                      (#{parse -ANAU$bmvAmthP7L7xwruB}#
+                                        (cdr #{body -ANAU$bmvAmthP7L7xwruO}#)
+                                        (cons #{id -ANAU$bmvAmthP7L7xwrw8}#
+                                              #{ids -ANAU$bmvAmthP7L7xwruP}#)
+                                        (cons #{label -ANAU$bmvAmthP7L7xwrw9}#
+                                              #{labels -ANAU$bmvAmthP7L7xwruQ}#)
+                                        (cons #{id -ANAU$bmvAmthP7L7xwrw8}#
+                                              #{var-ids -ANAU$bmvAmthP7L7xwruR}#)
+                                        (cons #{var -ANAU$bmvAmthP7L7xwrw$}#
+                                              #{vars -ANAU$bmvAmthP7L7xwruS}#)
+                                        (cons (cons #{er -ANAU$bmvAmthP7L7xwruW}#
+                                                    (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                                      #{e -ANAU$bmvAmthP7L7xwrw1}#
+                                                      #{w -ANAU$bmvAmthP7L7xwrw2}#
+                                                      #{mod -ANAU$bmvAmthP7L7xwrw4}#))
+                                              #{vals -ANAU$bmvAmthP7L7xwruT}#)
                                         (cons (cons 'lexical
-                                                    #{var _hoQGWMnyQPAh3k2jhWLqd}#)
-                                              #{bindings _hoQGWMnyQPAh3k2jhWLnz}#)))))
-                                (if (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLqS}#
+                                                    #{var -ANAU$bmvAmthP7L7xwrw$}#)
+                                              #{bindings -ANAU$bmvAmthP7L7xwruU}#)))))
+                                (if (if (eqv? #{type -ANAU$bmvAmthP7L7xwrwz}#
                                               'define-syntax-form)
                                       #t
-                                      (eqv? #{type _hoQGWMnyQPAh3k2jhWLqS}#
+                                      (eqv? #{type -ANAU$bmvAmthP7L7xwrwz}#
                                             'define-syntax-parameter-form))
-                                  (let ((#{id _hoQGWMnyQPAh3k2jhWLr4}#
-                                          (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                            #{value _hoQGWMnyQPAh3k2jhWLqT}#
-                                            #{w _hoQGWMnyQPAh3k2jhWLqV}#
-                                            #{mod _hoQGWMnyQPAh3k2jhWLqX}#))
-                                        (#{label _hoQGWMnyQPAh3k2jhWLr5}#
-                                          (#{gen-label _hoQGWMnyQPAh3k2jhWHTD}#)))
+                                  (let ((#{id -ANAU$bmvAmthP7L7xwryZ}#
+                                          (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                            #{value -ANAU$bmvAmthP7L7xwrw0}#
+                                            #{w -ANAU$bmvAmthP7L7xwrw2}#
+                                            #{mod -ANAU$bmvAmthP7L7xwrw4}#))
+                                        (#{label -ANAU$bmvAmthP7L7xwrya}#
+                                          (#{gen-label -ANAU$bmvAmthP7L7xwnNi}#)))
                                     (begin
-                                      (let ((#{update _hoQGWMnyQPAh3k2jhWLsp}#
+                                      (let ((#{update -ANAU$bmvAmthP7L7xwrzK}#
                                               (cons (vector-ref
-                                                      #{id _hoQGWMnyQPAh3k2jhWLr4}#
+                                                      #{id -ANAU$bmvAmthP7L7xwryZ}#
                                                       1)
                                                     (vector-ref
-                                                      #{ribcage _hoQGWMnyQPAh3k2jhWLne}#
+                                                      #{ribcage -ANAU$bmvAmthP7L7xwrt@}#
                                                       1))))
                                         (vector-set!
-                                          #{ribcage _hoQGWMnyQPAh3k2jhWLne}#
+                                          #{ribcage -ANAU$bmvAmthP7L7xwrt@}#
                                           1
-                                          #{update _hoQGWMnyQPAh3k2jhWLsp}#))
-                                      (let ((#{update _hoQGWMnyQPAh3k2jhWLsr}#
+                                          #{update -ANAU$bmvAmthP7L7xwrzK}#))
+                                      (let ((#{update -ANAU$bmvAmthP7L7xwrzM}#
                                               (cons (car (vector-ref
-                                                           #{id _hoQGWMnyQPAh3k2jhWLr4}#
+                                                           #{id -ANAU$bmvAmthP7L7xwryZ}#
                                                            2))
                                                     (vector-ref
-                                                      #{ribcage _hoQGWMnyQPAh3k2jhWLne}#
+                                                      #{ribcage -ANAU$bmvAmthP7L7xwrt@}#
                                                       2))))
                                         (vector-set!
-                                          #{ribcage _hoQGWMnyQPAh3k2jhWLne}#
+                                          #{ribcage -ANAU$bmvAmthP7L7xwrt@}#
                                           2
-                                          #{update _hoQGWMnyQPAh3k2jhWLsr}#))
-                                      (let ((#{update _hoQGWMnyQPAh3k2jhWLst}#
-                                              (cons #{label _hoQGWMnyQPAh3k2jhWLr5}#
+                                          #{update -ANAU$bmvAmthP7L7xwrzM}#))
+                                      (let ((#{update -ANAU$bmvAmthP7L7xwrzO}#
+                                              (cons #{label -ANAU$bmvAmthP7L7xwrya}#
                                                     (vector-ref
-                                                      #{ribcage _hoQGWMnyQPAh3k2jhWLne}#
+                                                      #{ribcage -ANAU$bmvAmthP7L7xwrt@}#
                                                       3))))
                                         (vector-set!
-                                          #{ribcage _hoQGWMnyQPAh3k2jhWLne}#
+                                          #{ribcage -ANAU$bmvAmthP7L7xwrt@}#
                                           3
-                                          #{update _hoQGWMnyQPAh3k2jhWLst}#))
-                                      (#{parse _hoQGWMnyQPAh3k2jhWLng}#
-                                        (cdr #{body _hoQGWMnyQPAh3k2jhWLnt}#)
-                                        (cons #{id _hoQGWMnyQPAh3k2jhWLr4}#
-                                              #{ids _hoQGWMnyQPAh3k2jhWLnu}#)
-                                        (cons #{label _hoQGWMnyQPAh3k2jhWLr5}#
-                                              #{labels _hoQGWMnyQPAh3k2jhWLnv}#)
-                                        #{var-ids _hoQGWMnyQPAh3k2jhWLnw}#
-                                        #{vars _hoQGWMnyQPAh3k2jhWLnx}#
-                                        #{vals _hoQGWMnyQPAh3k2jhWLny}#
+                                          #{update -ANAU$bmvAmthP7L7xwrzO}#))
+                                      (#{parse -ANAU$bmvAmthP7L7xwruB}#
+                                        (cdr #{body -ANAU$bmvAmthP7L7xwruO}#)
+                                        (cons #{id -ANAU$bmvAmthP7L7xwryZ}#
+                                              #{ids -ANAU$bmvAmthP7L7xwruP}#)
+                                        (cons #{label -ANAU$bmvAmthP7L7xwrya}#
+                                              #{labels -ANAU$bmvAmthP7L7xwruQ}#)
+                                        #{var-ids -ANAU$bmvAmthP7L7xwruR}#
+                                        #{vars -ANAU$bmvAmthP7L7xwruS}#
+                                        #{vals -ANAU$bmvAmthP7L7xwruT}#
                                         (cons (cons 'macro
-                                                    (cons #{er _hoQGWMnyQPAh3k2jhWLn1}#
-                                                          (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                                            #{e _hoQGWMnyQPAh3k2jhWLqU}#
-                                                            #{w _hoQGWMnyQPAh3k2jhWLqV}#
-                                                            #{mod _hoQGWMnyQPAh3k2jhWLqX}#)))
-                                              #{bindings _hoQGWMnyQPAh3k2jhWLnz}#))))
-                                  (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLqS}#
+                                                    (cons #{er -ANAU$bmvAmthP7L7xwruW}#
+                                                          (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                                            #{e -ANAU$bmvAmthP7L7xwrw1}#
+                                                            #{w -ANAU$bmvAmthP7L7xwrw2}#
+                                                            #{mod -ANAU$bmvAmthP7L7xwrw4}#)))
+                                              #{bindings -ANAU$bmvAmthP7L7xwruU}#))))
+                                  (if (eqv? #{type -ANAU$bmvAmthP7L7xwrwz}#
                                             'begin-form)
-                                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWLs1}#
+                                    (let ((#{tmp -ANAU$bmvAmthP7L7xwrzW}#
                                             ($sc-dispatch
-                                              #{e _hoQGWMnyQPAh3k2jhWLqU}#
+                                              #{e -ANAU$bmvAmthP7L7xwrw1}#
                                               '(_ . each-any))))
-                                      (if #{tmp _hoQGWMnyQPAh3k2jhWLs1}#
+                                      (if #{tmp -ANAU$bmvAmthP7L7xwrzW}#
                                         (@apply
-                                          (lambda (#{e1 _hoQGWMnyQPAh3k2jhWLs5}#)
-                                            (#{parse _hoQGWMnyQPAh3k2jhWLng}#
+                                          (lambda (#{e1 -ANAU$bmvAmthP7L7xwrza}#)
+                                            (#{parse -ANAU$bmvAmthP7L7xwruB}#
                                               (letrec*
-                                                ((#{f _hoQGWMnyQPAh3k2jhWLs6}#
-                                                   (lambda (#{forms _hoQGWMnyQPAh3k2jhWLt5}#)
-                                                     (if (null? #{forms _hoQGWMnyQPAh3k2jhWLt5}#)
-                                                       (cdr #{body _hoQGWMnyQPAh3k2jhWLnt}#)
-                                                       (cons (cons #{er _hoQGWMnyQPAh3k2jhWLn1}#
-                                                                   (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                                                     (car #{forms _hoQGWMnyQPAh3k2jhWLt5}#)
-                                                                     #{w _hoQGWMnyQPAh3k2jhWLqV}#
-                                                                     #{mod _hoQGWMnyQPAh3k2jhWLqX}#))
-                                                             (#{f _hoQGWMnyQPAh3k2jhWLs6}#
-                                                               (cdr #{forms _hoQGWMnyQPAh3k2jhWLt5}#)))))))
-                                                (#{f _hoQGWMnyQPAh3k2jhWLs6}#
-                                                  #{e1 _hoQGWMnyQPAh3k2jhWLs5}#))
-                                              #{ids _hoQGWMnyQPAh3k2jhWLnu}#
-                                              #{labels _hoQGWMnyQPAh3k2jhWLnv}#
-                                              #{var-ids _hoQGWMnyQPAh3k2jhWLnw}#
-                                              #{vars _hoQGWMnyQPAh3k2jhWLnx}#
-                                              #{vals _hoQGWMnyQPAh3k2jhWLny}#
-                                              #{bindings _hoQGWMnyQPAh3k2jhWLnz}#))
-                                          #{tmp _hoQGWMnyQPAh3k2jhWLs1}#)
+                                                ((#{f -ANAU$bmvAmthP7L7xwrzb}#
+                                                   (lambda (#{forms -ANAU$bmvAmthP7L7xwr0a}#)
+                                                     (if (null? #{forms -ANAU$bmvAmthP7L7xwr0a}#)
+                                                       (cdr #{body -ANAU$bmvAmthP7L7xwruO}#)
+                                                       (cons (cons #{er -ANAU$bmvAmthP7L7xwruW}#
+                                                                   (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                                                     (car #{forms -ANAU$bmvAmthP7L7xwr0a}#)
+                                                                     #{w -ANAU$bmvAmthP7L7xwrw2}#
+                                                                     #{mod -ANAU$bmvAmthP7L7xwrw4}#))
+                                                             (#{f -ANAU$bmvAmthP7L7xwrzb}#
+                                                               (cdr #{forms -ANAU$bmvAmthP7L7xwr0a}#)))))))
+                                                (#{f -ANAU$bmvAmthP7L7xwrzb}#
+                                                  #{e1 -ANAU$bmvAmthP7L7xwrza}#))
+                                              #{ids -ANAU$bmvAmthP7L7xwruP}#
+                                              #{labels -ANAU$bmvAmthP7L7xwruQ}#
+                                              #{var-ids -ANAU$bmvAmthP7L7xwruR}#
+                                              #{vars -ANAU$bmvAmthP7L7xwruS}#
+                                              #{vals -ANAU$bmvAmthP7L7xwruT}#
+                                              #{bindings -ANAU$bmvAmthP7L7xwruU}#))
+                                          #{tmp -ANAU$bmvAmthP7L7xwrzW}#)
                                         (syntax-violation
                                           #f
                                           "source expression failed to match any pattern"
-                                          #{e _hoQGWMnyQPAh3k2jhWLqU}#)))
-                                    (if (eqv? #{type _hoQGWMnyQPAh3k2jhWLqS}#
+                                          #{e -ANAU$bmvAmthP7L7xwrw1}#)))
+                                    (if (eqv? #{type -ANAU$bmvAmthP7L7xwrwz}#
                                               'local-syntax-form)
-                                      (#{expand-local-syntax _hoQGWMnyQPAh3k2jhWHTq}#
-                                        #{value _hoQGWMnyQPAh3k2jhWLqT}#
-                                        #{e _hoQGWMnyQPAh3k2jhWLqU}#
-                                        #{er _hoQGWMnyQPAh3k2jhWLn1}#
-                                        #{w _hoQGWMnyQPAh3k2jhWLqV}#
-                                        #{s _hoQGWMnyQPAh3k2jhWLqW}#
-                                        #{mod _hoQGWMnyQPAh3k2jhWLqX}#
-                                        (lambda (#{forms _hoQGWMnyQPAh3k2jhWLuH}#
-                                                 #{er _hoQGWMnyQPAh3k2jhWLuI}#
-                                                 #{w _hoQGWMnyQPAh3k2jhWLuJ}#
-                                                 #{s _hoQGWMnyQPAh3k2jhWLuK}#
-                                                 #{mod _hoQGWMnyQPAh3k2jhWLuL}#)
-                                          (#{parse _hoQGWMnyQPAh3k2jhWLng}#
+                                      (#{expand-local-syntax -ANAU$bmvAmthP7L7xwnOJ}#
+                                        #{value -ANAU$bmvAmthP7L7xwrw0}#
+                                        #{e -ANAU$bmvAmthP7L7xwrw1}#
+                                        #{er -ANAU$bmvAmthP7L7xwruW}#
+                                        #{w -ANAU$bmvAmthP7L7xwrw2}#
+                                        #{s -ANAU$bmvAmthP7L7xwrw3}#
+                                        #{mod -ANAU$bmvAmthP7L7xwrw4}#
+                                        (lambda (#{forms -ANAU$bmvAmthP7L7xwr0o}#
+                                                 #{er -ANAU$bmvAmthP7L7xwr0p}#
+                                                 #{w -ANAU$bmvAmthP7L7xwr0q}#
+                                                 #{s -ANAU$bmvAmthP7L7xwr0r}#
+                                                 #{mod -ANAU$bmvAmthP7L7xwr0s}#)
+                                          (#{parse -ANAU$bmvAmthP7L7xwruB}#
                                             (letrec*
-                                              ((#{f _hoQGWMnyQPAh3k2jhWLuM}#
-                                                 (lambda (#{forms _hoQGWMnyQPAh3k2jhWLvL}#)
-                                                   (if (null? #{forms _hoQGWMnyQPAh3k2jhWLvL}#)
-                                                     (cdr #{body _hoQGWMnyQPAh3k2jhWLnt}#)
-                                                     (cons (cons #{er _hoQGWMnyQPAh3k2jhWLuI}#
-                                                                 (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                                                   (car #{forms _hoQGWMnyQPAh3k2jhWLvL}#)
-                                                                   #{w _hoQGWMnyQPAh3k2jhWLuJ}#
-                                                                   #{mod _hoQGWMnyQPAh3k2jhWLuL}#))
-                                                           (#{f _hoQGWMnyQPAh3k2jhWLuM}#
-                                                             (cdr #{forms _hoQGWMnyQPAh3k2jhWLvL}#)))))))
-                                              (#{f _hoQGWMnyQPAh3k2jhWLuM}#
-                                                #{forms _hoQGWMnyQPAh3k2jhWLuH}#))
-                                            #{ids _hoQGWMnyQPAh3k2jhWLnu}#
-                                            #{labels _hoQGWMnyQPAh3k2jhWLnv}#
-                                            #{var-ids _hoQGWMnyQPAh3k2jhWLnw}#
-                                            #{vars _hoQGWMnyQPAh3k2jhWLnx}#
-                                            #{vals _hoQGWMnyQPAh3k2jhWLny}#
-                                            #{bindings _hoQGWMnyQPAh3k2jhWLnz}#)))
-                                      (if (null? #{ids _hoQGWMnyQPAh3k2jhWLnu}#)
-                                        (#{build-sequence _hoQGWMnyQPAh3k2jhWHSu}#
+                                              ((#{f -ANAU$bmvAmthP7L7xwr0t}#
+                                                 (lambda (#{forms -ANAU$bmvAmthP7L7xwr1s}#)
+                                                   (if (null? #{forms -ANAU$bmvAmthP7L7xwr1s}#)
+                                                     (cdr #{body -ANAU$bmvAmthP7L7xwruO}#)
+                                                     (cons (cons #{er -ANAU$bmvAmthP7L7xwr0p}#
+                                                                 (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                                                   (car #{forms -ANAU$bmvAmthP7L7xwr1s}#)
+                                                                   #{w -ANAU$bmvAmthP7L7xwr0q}#
+                                                                   #{mod -ANAU$bmvAmthP7L7xwr0s}#))
+                                                           (#{f -ANAU$bmvAmthP7L7xwr0t}#
+                                                             (cdr #{forms -ANAU$bmvAmthP7L7xwr1s}#)))))))
+                                              (#{f -ANAU$bmvAmthP7L7xwr0t}#
+                                                #{forms -ANAU$bmvAmthP7L7xwr0o}#))
+                                            #{ids -ANAU$bmvAmthP7L7xwruP}#
+                                            #{labels -ANAU$bmvAmthP7L7xwruQ}#
+                                            #{var-ids -ANAU$bmvAmthP7L7xwruR}#
+                                            #{vars -ANAU$bmvAmthP7L7xwruS}#
+                                            #{vals -ANAU$bmvAmthP7L7xwruT}#
+                                            #{bindings -ANAU$bmvAmthP7L7xwruU}#)))
+                                      (if (null? #{ids -ANAU$bmvAmthP7L7xwruP}#)
+                                        (#{build-sequence -ANAU$bmvAmthP7L7xwnNN}#
                                           #f
-                                          (map (lambda (#{x _hoQGWMnyQPAh3k2jhWLwM}#)
-                                                 (let ((#{e _hoQGWMnyQPAh3k2jhWLwQ}#
-                                                         (cdr #{x _hoQGWMnyQPAh3k2jhWLwM}#))
-                                                       (#{r _hoQGWMnyQPAh3k2jhWLwR}#
-                                                         (car #{x _hoQGWMnyQPAh3k2jhWLwM}#)))
+                                          (map (lambda (#{x -ANAU$bmvAmthP7L7xwr2t}#)
+                                                 (let ((#{e -ANAU$bmvAmthP7L7xwr2x}#
+                                                         (cdr #{x -ANAU$bmvAmthP7L7xwr2t}#))
+                                                       (#{r -ANAU$bmvAmthP7L7xwr2y}#
+                                                         (car #{x -ANAU$bmvAmthP7L7xwr2t}#)))
                                                    (call-with-values
                                                      (lambda ()
-                                                       (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-                                                         #{e _hoQGWMnyQPAh3k2jhWLwQ}#
-                                                         #{r _hoQGWMnyQPAh3k2jhWLwR}#
+                                                       (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+                                                         #{e -ANAU$bmvAmthP7L7xwr2x}#
+                                                         #{r -ANAU$bmvAmthP7L7xwr2y}#
                                                          '(())
-                                                         (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-                                                           #{e _hoQGWMnyQPAh3k2jhWLwQ}#)
+                                                         (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+                                                           #{e -ANAU$bmvAmthP7L7xwr2x}#)
                                                          #f
-                                                         #{mod _hoQGWMnyQPAh3k2jhWLqX}#
+                                                         #{mod -ANAU$bmvAmthP7L7xwrw4}#
                                                          #f))
-                                                     (lambda (#{type _hoQGWMnyQPAh3k2jhWLwV}#
-                                                              #{value _hoQGWMnyQPAh3k2jhWLwW}#
-                                                              #{e _hoQGWMnyQPAh3k2jhWLwX}#
-                                                              #{w _hoQGWMnyQPAh3k2jhWLwY}#
-                                                              #{s _hoQGWMnyQPAh3k2jhWLwZ}#
-                                                              #{mod _hoQGWMnyQPAh3k2jhWLwa}#)
-                                                       (#{expand-expr _hoQGWMnyQPAh3k2jhWHTm}#
-                                                         #{type _hoQGWMnyQPAh3k2jhWLwV}#
-                                                         #{value _hoQGWMnyQPAh3k2jhWLwW}#
-                                                         #{e _hoQGWMnyQPAh3k2jhWLwX}#
-                                                         #{r _hoQGWMnyQPAh3k2jhWLwR}#
-                                                         #{w _hoQGWMnyQPAh3k2jhWLwY}#
-                                                         #{s _hoQGWMnyQPAh3k2jhWLwZ}#
-                                                         #{mod _hoQGWMnyQPAh3k2jhWLwa}#)))))
-                                               (cons (cons #{er _hoQGWMnyQPAh3k2jhWLn1}#
-                                                           (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                                                     (lambda (#{type -ANAU$bmvAmthP7L7xwr22}#
+                                                              #{value -ANAU$bmvAmthP7L7xwr23}#
+                                                              #{e -ANAU$bmvAmthP7L7xwr24}#
+                                                              #{w -ANAU$bmvAmthP7L7xwr25}#
+                                                              #{s -ANAU$bmvAmthP7L7xwr26}#
+                                                              #{mod -ANAU$bmvAmthP7L7xwr27}#)
+                                                       (#{expand-expr -ANAU$bmvAmthP7L7xwnOF}#
+                                                         #{type -ANAU$bmvAmthP7L7xwr22}#
+                                                         #{value -ANAU$bmvAmthP7L7xwr23}#
+                                                         #{e -ANAU$bmvAmthP7L7xwr24}#
+                                                         #{r -ANAU$bmvAmthP7L7xwr2y}#
+                                                         #{w -ANAU$bmvAmthP7L7xwr25}#
+                                                         #{s -ANAU$bmvAmthP7L7xwr26}#
+                                                         #{mod -ANAU$bmvAmthP7L7xwr27}#)))))
+                                               (cons (cons #{er -ANAU$bmvAmthP7L7xwruW}#
+                                                           (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                                                              (begin
-                                                               (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWLqU}#)
-                                                                     #{s _hoQGWMnyQPAh3k2jhWLqW}#
+                                                               (if (if (pair? #{e -ANAU$bmvAmthP7L7xwrw1}#)
+                                                                     #{s -ANAU$bmvAmthP7L7xwrw3}#
                                                                      #f)
                                                                  (set-source-properties!
-                                                                   #{e _hoQGWMnyQPAh3k2jhWLqU}#
-                                                                   #{s _hoQGWMnyQPAh3k2jhWLqW}#))
-                                                               #{e _hoQGWMnyQPAh3k2jhWLqU}#)
-                                                             #{w _hoQGWMnyQPAh3k2jhWLqV}#
-                                                             #{mod _hoQGWMnyQPAh3k2jhWLqX}#))
-                                                     (cdr #{body _hoQGWMnyQPAh3k2jhWLnt}#))))
+                                                                   #{e -ANAU$bmvAmthP7L7xwrw1}#
+                                                                   #{s -ANAU$bmvAmthP7L7xwrw3}#))
+                                                               #{e -ANAU$bmvAmthP7L7xwrw1}#)
+                                                             #{w -ANAU$bmvAmthP7L7xwrw2}#
+                                                             #{mod -ANAU$bmvAmthP7L7xwrw4}#))
+                                                     (cdr #{body -ANAU$bmvAmthP7L7xwruO}#))))
                                         (begin
-                                          (if (not (#{valid-bound-ids? _hoQGWMnyQPAh3k2jhWHTb}#
-                                                     #{ids _hoQGWMnyQPAh3k2jhWLnu}#))
+                                          (if (not (#{valid-bound-ids? -ANAU$bmvAmthP7L7xwnN6}#
+                                                     #{ids -ANAU$bmvAmthP7L7xwruP}#))
                                             (syntax-violation
                                               #f
                                               "invalid or duplicate identifier in definition"
-                                              #{outer-form _hoQGWMnyQPAh3k2jhWLnZ}#))
+                                              #{outer-form -ANAU$bmvAmthP7L7xwrt6}#))
                                           (letrec*
-                                            ((#{loop _hoQGWMnyQPAh3k2jhWLx@}#
-                                               (lambda (#{bs _hoQGWMnyQPAh3k2jhWLyC}#
-                                                        #{er-cache _hoQGWMnyQPAh3k2jhWLyD}#
-                                                        #{r-cache _hoQGWMnyQPAh3k2jhWLyE}#)
-                                                 (if (not (null? #{bs _hoQGWMnyQPAh3k2jhWLyC}#))
-                                                   (let ((#{b _hoQGWMnyQPAh3k2jhWLyF}#
-                                                           (car #{bs _hoQGWMnyQPAh3k2jhWLyC}#)))
-                                                     (if (eq? (car #{b _hoQGWMnyQPAh3k2jhWLyF}#)
+                                            ((#{loop -ANAU$bmvAmthP7L7xwr4g}#
+                                               (lambda (#{bs -ANAU$bmvAmthP7L7xwr4j}#
+                                                        #{er-cache -ANAU$bmvAmthP7L7xwr4k}#
+                                                        #{r-cache -ANAU$bmvAmthP7L7xwr4l}#)
+                                                 (if (not (null? #{bs -ANAU$bmvAmthP7L7xwr4j}#))
+                                                   (let ((#{b -ANAU$bmvAmthP7L7xwr4m}#
+                                                           (car #{bs -ANAU$bmvAmthP7L7xwr4j}#)))
+                                                     (if (eq? (car #{b -ANAU$bmvAmthP7L7xwr4m}#)
                                                               'macro)
-                                                       (let ((#{er _hoQGWMnyQPAh3k2jhWLyH}#
-                                                               (car (cdr #{b _hoQGWMnyQPAh3k2jhWLyF}#))))
-                                                         (let ((#{r-cache _hoQGWMnyQPAh3k2jhWLyI}#
-                                                                 (if (eq? #{er _hoQGWMnyQPAh3k2jhWLyH}#
-                                                                          #{er-cache _hoQGWMnyQPAh3k2jhWLyD}#)
-                                                                   #{r-cache _hoQGWMnyQPAh3k2jhWLyE}#
-                                                                   (#{macros-only-env _hoQGWMnyQPAh3k2jhWHS9}#
-                                                                     #{er _hoQGWMnyQPAh3k2jhWLyH}#))))
+                                                       (let ((#{er -ANAU$bmvAmthP7L7xwr4o}#
+                                                               (car (cdr #{b -ANAU$bmvAmthP7L7xwr4m}#))))
+                                                         (let ((#{r-cache -ANAU$bmvAmthP7L7xwr4p}#
+                                                                 (if (eq? #{er -ANAU$bmvAmthP7L7xwr4o}#
+                                                                          #{er-cache -ANAU$bmvAmthP7L7xwr4k}#)
+                                                                   #{r-cache -ANAU$bmvAmthP7L7xwr4l}#
+                                                                   (#{macros-only-env -ANAU$bmvAmthP7L7xwnNc}#
+                                                                     #{er -ANAU$bmvAmthP7L7xwr4o}#))))
                                                            (begin
                                                              (set-cdr!
-                                                               #{b _hoQGWMnyQPAh3k2jhWLyF}#
-                                                               (#{eval-local-transformer _hoQGWMnyQPAh3k2jhWHTr}#
-                                                                 (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                                                   (cdr (cdr #{b _hoQGWMnyQPAh3k2jhWLyF}#))
-                                                                   #{r-cache _hoQGWMnyQPAh3k2jhWLyI}#
+                                                               #{b -ANAU$bmvAmthP7L7xwr4m}#
+                                                               (#{eval-local-transformer -ANAU$bmvAmthP7L7xwnOK}#
+                                                                 (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                                                   (cdr (cdr #{b -ANAU$bmvAmthP7L7xwr4m}#))
+                                                                   #{r-cache -ANAU$bmvAmthP7L7xwr4p}#
                                                                    '(())
-                                                                   #{mod _hoQGWMnyQPAh3k2jhWLqX}#)
-                                                                 #{mod _hoQGWMnyQPAh3k2jhWLqX}#))
-                                                             (#{loop _hoQGWMnyQPAh3k2jhWLx@}#
-                                                               (cdr #{bs _hoQGWMnyQPAh3k2jhWLyC}#)
-                                                               #{er _hoQGWMnyQPAh3k2jhWLyH}#
-                                                               #{r-cache _hoQGWMnyQPAh3k2jhWLyI}#))))
-                                                       (#{loop _hoQGWMnyQPAh3k2jhWLx@}#
-                                                         (cdr #{bs _hoQGWMnyQPAh3k2jhWLyC}#)
-                                                         #{er-cache _hoQGWMnyQPAh3k2jhWLyD}#
-                                                         #{r-cache _hoQGWMnyQPAh3k2jhWLyE}#)))))))
-                                            (#{loop _hoQGWMnyQPAh3k2jhWLx@}#
-                                              #{bindings _hoQGWMnyQPAh3k2jhWLnz}#
+                                                                   #{mod -ANAU$bmvAmthP7L7xwrw4}#)
+                                                                 #{mod -ANAU$bmvAmthP7L7xwrw4}#))
+                                                             (#{loop -ANAU$bmvAmthP7L7xwr4g}#
+                                                               (cdr #{bs -ANAU$bmvAmthP7L7xwr4j}#)
+                                                               #{er -ANAU$bmvAmthP7L7xwr4o}#
+                                                               #{r-cache -ANAU$bmvAmthP7L7xwr4p}#))))
+                                                       (#{loop -ANAU$bmvAmthP7L7xwr4g}#
+                                                         (cdr #{bs -ANAU$bmvAmthP7L7xwr4j}#)
+                                                         #{er-cache -ANAU$bmvAmthP7L7xwr4k}#
+                                                         #{r-cache -ANAU$bmvAmthP7L7xwr4l}#)))))))
+                                            (#{loop -ANAU$bmvAmthP7L7xwr4g}#
+                                              #{bindings -ANAU$bmvAmthP7L7xwruU}#
                                               #f
                                               #f))
                                           (set-cdr!
-                                            #{r _hoQGWMnyQPAh3k2jhWLnd}#
-                                            (#{extend-env _hoQGWMnyQPAh3k2jhWHS7}#
-                                              #{labels _hoQGWMnyQPAh3k2jhWLnv}#
-                                              #{bindings _hoQGWMnyQPAh3k2jhWLnz}#
-                                              (cdr #{r _hoQGWMnyQPAh3k2jhWLnd}#)))
-                                          (#{build-letrec _hoQGWMnyQPAh3k2jhWHSx}#
+                                            #{r -ANAU$bmvAmthP7L7xwrt$}#
+                                            (#{extend-env -ANAU$bmvAmthP7L7xwnNa}#
+                                              #{labels -ANAU$bmvAmthP7L7xwruQ}#
+                                              #{bindings -ANAU$bmvAmthP7L7xwruU}#
+                                              (cdr #{r -ANAU$bmvAmthP7L7xwrt$}#)))
+                                          (#{build-letrec -ANAU$bmvAmthP7L7xwnNQ}#
                                             #f
                                             #t
                                             (reverse
                                               (map syntax->datum
-                                                   #{var-ids _hoQGWMnyQPAh3k2jhWLnw}#))
+                                                   #{var-ids -ANAU$bmvAmthP7L7xwruR}#))
                                             (reverse
-                                              #{vars _hoQGWMnyQPAh3k2jhWLnx}#)
-                                            (map (lambda (#{x _hoQGWMnyQPAh3k2jhWL3f}#)
-                                                   (let ((#{e _hoQGWMnyQPAh3k2jhWL3j}#
-                                                           (cdr #{x _hoQGWMnyQPAh3k2jhWL3f}#))
-                                                         (#{r _hoQGWMnyQPAh3k2jhWL3k}#
-                                                           (car #{x _hoQGWMnyQPAh3k2jhWL3f}#)))
+                                              #{vars -ANAU$bmvAmthP7L7xwruS}#)
+                                            (map (lambda (#{x -ANAU$bmvAmthP7L7xwr$A}#)
+                                                   (let ((#{e -ANAU$bmvAmthP7L7xwr$E}#
+                                                           (cdr #{x -ANAU$bmvAmthP7L7xwr$A}#))
+                                                         (#{r -ANAU$bmvAmthP7L7xwr$F}#
+                                                           (car #{x -ANAU$bmvAmthP7L7xwr$A}#)))
                                                      (call-with-values
                                                        (lambda ()
-                                                         (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-                                                           #{e _hoQGWMnyQPAh3k2jhWL3j}#
-                                                           #{r _hoQGWMnyQPAh3k2jhWL3k}#
+                                                         (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+                                                           #{e -ANAU$bmvAmthP7L7xwr$E}#
+                                                           #{r -ANAU$bmvAmthP7L7xwr$F}#
                                                            '(())
-                                                           (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-                                                             #{e _hoQGWMnyQPAh3k2jhWL3j}#)
+                                                           (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+                                                             #{e -ANAU$bmvAmthP7L7xwr$E}#)
                                                            #f
-                                                           #{mod _hoQGWMnyQPAh3k2jhWLqX}#
+                                                           #{mod -ANAU$bmvAmthP7L7xwrw4}#
                                                            #f))
-                                                       (lambda (#{type _hoQGWMnyQPAh3k2jhWL3o}#
-                                                                #{value _hoQGWMnyQPAh3k2jhWL3p}#
-                                                                #{e _hoQGWMnyQPAh3k2jhWL3q}#
-                                                                #{w _hoQGWMnyQPAh3k2jhWL3r}#
-                                                                #{s _hoQGWMnyQPAh3k2jhWL3s}#
-                                                                #{mod _hoQGWMnyQPAh3k2jhWL3t}#)
-                                                         (#{expand-expr _hoQGWMnyQPAh3k2jhWHTm}#
-                                                           #{type _hoQGWMnyQPAh3k2jhWL3o}#
-                                                           #{value _hoQGWMnyQPAh3k2jhWL3p}#
-                                                           #{e _hoQGWMnyQPAh3k2jhWL3q}#
-                                                           #{r _hoQGWMnyQPAh3k2jhWL3k}#
-                                                           #{w _hoQGWMnyQPAh3k2jhWL3r}#
-                                                           #{s _hoQGWMnyQPAh3k2jhWL3s}#
-                                                           #{mod _hoQGWMnyQPAh3k2jhWL3t}#)))))
+                                                       (lambda (#{type -ANAU$bmvAmthP7L7xwr$J}#
+                                                                #{value -ANAU$bmvAmthP7L7xwr$K}#
+                                                                #{e -ANAU$bmvAmthP7L7xwr$L}#
+                                                                #{w -ANAU$bmvAmthP7L7xwr$M}#
+                                                                #{s -ANAU$bmvAmthP7L7xwr$N}#
+                                                                #{mod -ANAU$bmvAmthP7L7xwr$O}#)
+                                                         (#{expand-expr -ANAU$bmvAmthP7L7xwnOF}#
+                                                           #{type -ANAU$bmvAmthP7L7xwr$J}#
+                                                           #{value -ANAU$bmvAmthP7L7xwr$K}#
+                                                           #{e -ANAU$bmvAmthP7L7xwr$L}#
+                                                           #{r -ANAU$bmvAmthP7L7xwr$F}#
+                                                           #{w -ANAU$bmvAmthP7L7xwr$M}#
+                                                           #{s -ANAU$bmvAmthP7L7xwr$N}#
+                                                           #{mod -ANAU$bmvAmthP7L7xwr$O}#)))))
                                                  (reverse
-                                                   #{vals _hoQGWMnyQPAh3k2jhWLny}#))
-                                            (let ((#{exps _hoQGWMnyQPAh3k2jhWL3z}#
-                                                    (map (lambda (#{x _hoQGWMnyQPAh3k2jhWL30}#)
-                                                           (let ((#{e _hoQGWMnyQPAh3k2jhWL33}#
-                                                                   (cdr #{x _hoQGWMnyQPAh3k2jhWL30}#))
-                                                                 (#{r _hoQGWMnyQPAh3k2jhWL34}#
-                                                                   (car #{x _hoQGWMnyQPAh3k2jhWL30}#)))
+                                                   #{vals -ANAU$bmvAmthP7L7xwruT}#))
+                                            (let ((#{exps -ANAU$bmvAmthP7L7xwr$U}#
+                                                    (map (lambda (#{x -ANAU$bmvAmthP7L7xwr$V}#)
+                                                           (let ((#{e -ANAU$bmvAmthP7L7xwr$Y}#
+                                                                   (cdr #{x -ANAU$bmvAmthP7L7xwr$V}#))
+                                                                 (#{r -ANAU$bmvAmthP7L7xwr$Z}#
+                                                                   (car #{x -ANAU$bmvAmthP7L7xwr$V}#)))
                                                              (call-with-values
                                                                (lambda ()
-                                                                 (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-                                                                   #{e _hoQGWMnyQPAh3k2jhWL33}#
-                                                                   #{r _hoQGWMnyQPAh3k2jhWL34}#
+                                                                 (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+                                                                   #{e -ANAU$bmvAmthP7L7xwr$Y}#
+                                                                   #{r -ANAU$bmvAmthP7L7xwr$Z}#
                                                                    '(())
-                                                                   (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-                                                                     #{e _hoQGWMnyQPAh3k2jhWL33}#)
+                                                                   (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+                                                                     #{e -ANAU$bmvAmthP7L7xwr$Y}#)
                                                                    #f
-                                                                   #{mod _hoQGWMnyQPAh3k2jhWLqX}#
+                                                                   #{mod -ANAU$bmvAmthP7L7xwrw4}#
                                                                    #f))
-                                                               (lambda (#{type _hoQGWMnyQPAh3k2jhWL38}#
-                                                                        #{value _hoQGWMnyQPAh3k2jhWL39}#
-                                                                        #{e _hoQGWMnyQPAh3k2jhWL3$}#
-                                                                        #{w _hoQGWMnyQPAh3k2jhWL3@}#
-                                                                        #{s _hoQGWMnyQPAh3k2jhWL4A}#
-                                                                        #{mod _hoQGWMnyQPAh3k2jhWL4B}#)
-                                                                 (#{expand-expr _hoQGWMnyQPAh3k2jhWHTm}#
-                                                                   #{type _hoQGWMnyQPAh3k2jhWL38}#
-                                                                   #{value _hoQGWMnyQPAh3k2jhWL39}#
-                                                                   #{e _hoQGWMnyQPAh3k2jhWL3$}#
-                                                                   #{r _hoQGWMnyQPAh3k2jhWL34}#
-                                                                   #{w _hoQGWMnyQPAh3k2jhWL3@}#
-                                                                   #{s _hoQGWMnyQPAh3k2jhWL4A}#
-                                                                   #{mod _hoQGWMnyQPAh3k2jhWL4B}#)))))
-                                                         (cons (cons #{er _hoQGWMnyQPAh3k2jhWLn1}#
-                                                                     (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                                                               (lambda (#{type -ANAU$bmvAmthP7L7xwr$d}#
+                                                                        #{value -ANAU$bmvAmthP7L7xwr$e}#
+                                                                        #{e -ANAU$bmvAmthP7L7xwr$f}#
+                                                                        #{w -ANAU$bmvAmthP7L7xwr$g}#
+                                                                        #{s -ANAU$bmvAmthP7L7xwr$h}#
+                                                                        #{mod -ANAU$bmvAmthP7L7xwr$i}#)
+                                                                 (#{expand-expr -ANAU$bmvAmthP7L7xwnOF}#
+                                                                   #{type -ANAU$bmvAmthP7L7xwr$d}#
+                                                                   #{value -ANAU$bmvAmthP7L7xwr$e}#
+                                                                   #{e -ANAU$bmvAmthP7L7xwr$f}#
+                                                                   #{r -ANAU$bmvAmthP7L7xwr$Z}#
+                                                                   #{w -ANAU$bmvAmthP7L7xwr$g}#
+                                                                   #{s -ANAU$bmvAmthP7L7xwr$h}#
+                                                                   #{mod -ANAU$bmvAmthP7L7xwr$i}#)))))
+                                                         (cons (cons #{er -ANAU$bmvAmthP7L7xwruW}#
+                                                                     (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                                                                        (begin
-                                                                         (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWLqU}#)
-                                                                               #{s _hoQGWMnyQPAh3k2jhWLqW}#
+                                                                         (if (if (pair? #{e -ANAU$bmvAmthP7L7xwrw1}#)
+                                                                               #{s -ANAU$bmvAmthP7L7xwrw3}#
                                                                                #f)
                                                                            (set-source-properties!
-                                                                             #{e _hoQGWMnyQPAh3k2jhWLqU}#
-                                                                             #{s _hoQGWMnyQPAh3k2jhWLqW}#))
-                                                                         #{e _hoQGWMnyQPAh3k2jhWLqU}#)
-                                                                       #{w _hoQGWMnyQPAh3k2jhWLqV}#
-                                                                       #{mod _hoQGWMnyQPAh3k2jhWLqX}#))
-                                                               (cdr #{body _hoQGWMnyQPAh3k2jhWLnt}#)))))
-                                              (if (null? (cdr #{exps _hoQGWMnyQPAh3k2jhWL3z}#))
-                                                (car #{exps _hoQGWMnyQPAh3k2jhWL3z}#)
+                                                                             #{e -ANAU$bmvAmthP7L7xwrw1}#
+                                                                             #{s -ANAU$bmvAmthP7L7xwrw3}#))
+                                                                         #{e -ANAU$bmvAmthP7L7xwrw1}#)
+                                                                       #{w -ANAU$bmvAmthP7L7xwrw2}#
+                                                                       #{mod -ANAU$bmvAmthP7L7xwrw4}#))
+                                                               (cdr #{body -ANAU$bmvAmthP7L7xwruO}#)))))
+                                              (if (null? (cdr #{exps -ANAU$bmvAmthP7L7xwr$U}#))
+                                                (car #{exps -ANAU$bmvAmthP7L7xwr$U}#)
                                                 (make-struct/no-tail
                                                   (vector-ref
                                                     %expanded-vtables
                                                     12)
                                                   #f
-                                                  #{exps _hoQGWMnyQPAh3k2jhWL3z}#)))))))))))))))))
-                 (#{parse _hoQGWMnyQPAh3k2jhWLng}#
-                   (map (lambda (#{x _hoQGWMnyQPAh3k2jhWLnj}#)
-                          (cons #{r _hoQGWMnyQPAh3k2jhWLnd}#
-                                (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                  #{x _hoQGWMnyQPAh3k2jhWLnj}#
-                                  #{w _hoQGWMnyQPAh3k2jhWLnf}#
-                                  #{mod _hoQGWMnyQPAh3k2jhWLnc}#)))
-                        #{body _hoQGWMnyQPAh3k2jhWLnY}#)
+                                                  #{exps -ANAU$bmvAmthP7L7xwr$U}#)))))))))))))))))
+                 (#{parse -ANAU$bmvAmthP7L7xwruB}#
+                   (map (lambda (#{x -ANAU$bmvAmthP7L7xwruE}#)
+                          (cons #{r -ANAU$bmvAmthP7L7xwrt$}#
+                                (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                  #{x -ANAU$bmvAmthP7L7xwruE}#
+                                  #{w -ANAU$bmvAmthP7L7xwruA}#
+                                  #{mod -ANAU$bmvAmthP7L7xwrt9}#)))
+                        #{body -ANAU$bmvAmthP7L7xwrt5}#)
                    '()
                    '()
                    '()
                    '()
                    '()
                    '())))))))
-     (#{expand-local-syntax _hoQGWMnyQPAh3k2jhWHTq}#
-       (lambda (#{rec? _hoQGWMnyQPAh3k2jhWL4b}#
-                #{e _hoQGWMnyQPAh3k2jhWL4c}#
-                #{r _hoQGWMnyQPAh3k2jhWL4d}#
-                #{w _hoQGWMnyQPAh3k2jhWL4e}#
-                #{s _hoQGWMnyQPAh3k2jhWL4f}#
-                #{mod _hoQGWMnyQPAh3k2jhWL4g}#
-                #{k _hoQGWMnyQPAh3k2jhWL4h}#)
-         (let ((#{tmp _hoQGWMnyQPAh3k2jhWL4j}#
+     (#{expand-local-syntax -ANAU$bmvAmthP7L7xwnOJ}#
+       (lambda (#{rec? -ANAU$bmvAmthP7L7xwr$8}#
+                #{e -ANAU$bmvAmthP7L7xwr$9}#
+                #{r -ANAU$bmvAmthP7L7xwr$$}#
+                #{w -ANAU$bmvAmthP7L7xwr$@}#
+                #{s -ANAU$bmvAmthP7L7xwr@A}#
+                #{mod -ANAU$bmvAmthP7L7xwr@B}#
+                #{k -ANAU$bmvAmthP7L7xwr@C}#)
+         (let ((#{tmp -ANAU$bmvAmthP7L7xwr@E}#
                  ($sc-dispatch
-                   #{e _hoQGWMnyQPAh3k2jhWL4c}#
+                   #{e -ANAU$bmvAmthP7L7xwr$9}#
                    '(_ #(each (any any)) any . each-any))))
-           (if #{tmp _hoQGWMnyQPAh3k2jhWL4j}#
+           (if #{tmp -ANAU$bmvAmthP7L7xwr@E}#
              (@apply
-               (lambda (#{id _hoQGWMnyQPAh3k2jhWL4n}#
-                        #{val _hoQGWMnyQPAh3k2jhWL4o}#
-                        #{e1 _hoQGWMnyQPAh3k2jhWL4p}#
-                        #{e2 _hoQGWMnyQPAh3k2jhWL4q}#)
-                 (if (not (#{valid-bound-ids? _hoQGWMnyQPAh3k2jhWHTb}#
-                            #{id _hoQGWMnyQPAh3k2jhWL4n}#))
+               (lambda (#{id -ANAU$bmvAmthP7L7xwr@I}#
+                        #{val -ANAU$bmvAmthP7L7xwr@J}#
+                        #{e1 -ANAU$bmvAmthP7L7xwr@K}#
+                        #{e2 -ANAU$bmvAmthP7L7xwr@L}#)
+                 (if (not (#{valid-bound-ids? -ANAU$bmvAmthP7L7xwnN6}#
+                            #{id -ANAU$bmvAmthP7L7xwr@I}#))
                    (syntax-violation
                      #f
                      "duplicate bound keyword"
-                     #{e _hoQGWMnyQPAh3k2jhWL4c}#)
-                   (let ((#{labels _hoQGWMnyQPAh3k2jhWL6E}#
-                           (#{gen-labels _hoQGWMnyQPAh3k2jhWHTE}#
-                             #{id _hoQGWMnyQPAh3k2jhWL4n}#)))
-                     (let ((#{new-w _hoQGWMnyQPAh3k2jhWL6F}#
-                             (#{make-binding-wrap _hoQGWMnyQPAh3k2jhWHTP}#
-                               #{id _hoQGWMnyQPAh3k2jhWL4n}#
-                               #{labels _hoQGWMnyQPAh3k2jhWL6E}#
-                               #{w _hoQGWMnyQPAh3k2jhWL4e}#)))
-                       (#{k _hoQGWMnyQPAh3k2jhWL4h}#
-                         (cons #{e1 _hoQGWMnyQPAh3k2jhWL4p}#
-                               #{e2 _hoQGWMnyQPAh3k2jhWL4q}#)
-                         (#{extend-env _hoQGWMnyQPAh3k2jhWHS7}#
-                           #{labels _hoQGWMnyQPAh3k2jhWL6E}#
-                           (let ((#{trans-r _hoQGWMnyQPAh3k2jhWL6l}#
-                                   (#{macros-only-env _hoQGWMnyQPAh3k2jhWHS9}#
-                                     #{r _hoQGWMnyQPAh3k2jhWL4d}#)))
+                     #{e -ANAU$bmvAmthP7L7xwr$9}#)
+                   (let ((#{labels -ANAU$bmvAmthP7L7xwsAl}#
+                           (#{gen-labels -ANAU$bmvAmthP7L7xwnNj}#
+                             #{id -ANAU$bmvAmthP7L7xwr@I}#)))
+                     (let ((#{new-w -ANAU$bmvAmthP7L7xwsAm}#
+                             (#{make-binding-wrap -ANAU$bmvAmthP7L7xwnNu}#
+                               #{id -ANAU$bmvAmthP7L7xwr@I}#
+                               #{labels -ANAU$bmvAmthP7L7xwsAl}#
+                               #{w -ANAU$bmvAmthP7L7xwr$@}#)))
+                       (#{k -ANAU$bmvAmthP7L7xwr@C}#
+                         (cons #{e1 -ANAU$bmvAmthP7L7xwr@K}#
+                               #{e2 -ANAU$bmvAmthP7L7xwr@L}#)
+                         (#{extend-env -ANAU$bmvAmthP7L7xwnNa}#
+                           #{labels -ANAU$bmvAmthP7L7xwsAl}#
+                           (let ((#{trans-r -ANAU$bmvAmthP7L7xwsBG}#
+                                   (#{macros-only-env -ANAU$bmvAmthP7L7xwnNc}#
+                                     #{r -ANAU$bmvAmthP7L7xwr$$}#)))
                              (begin
-                               (if #{rec? _hoQGWMnyQPAh3k2jhWL4b}#
-                                 #{new-w _hoQGWMnyQPAh3k2jhWL6F}#
-                                 #{w _hoQGWMnyQPAh3k2jhWL4e}#)
-                               (map (lambda (#{x _hoQGWMnyQPAh3k2jhWL6m}#)
+                               (if #{rec? -ANAU$bmvAmthP7L7xwr$8}#
+                                 #{new-w -ANAU$bmvAmthP7L7xwsAm}#
+                                 #{w -ANAU$bmvAmthP7L7xwr$@}#)
+                               (map (lambda (#{x -ANAU$bmvAmthP7L7xwsBH}#)
                                       (cons 'macro
-                                            (#{eval-local-transformer _hoQGWMnyQPAh3k2jhWHTr}#
-                                              (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                                #{x _hoQGWMnyQPAh3k2jhWL6m}#
-                                                #{trans-r _hoQGWMnyQPAh3k2jhWL6l}#
+                                            (#{eval-local-transformer -ANAU$bmvAmthP7L7xwnOK}#
+                                              (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                                #{x -ANAU$bmvAmthP7L7xwsBH}#
+                                                #{trans-r -ANAU$bmvAmthP7L7xwsBG}#
                                                 (values
-                                                  (if #{rec? _hoQGWMnyQPAh3k2jhWL4b}#
-                                                    #{new-w _hoQGWMnyQPAh3k2jhWL6F}#
-                                                    #{w _hoQGWMnyQPAh3k2jhWL4e}#))
-                                                #{mod _hoQGWMnyQPAh3k2jhWL4g}#)
-                                              #{mod _hoQGWMnyQPAh3k2jhWL4g}#)))
-                                    #{val _hoQGWMnyQPAh3k2jhWL4o}#)))
-                           #{r _hoQGWMnyQPAh3k2jhWL4d}#)
-                         #{new-w _hoQGWMnyQPAh3k2jhWL6F}#
-                         #{s _hoQGWMnyQPAh3k2jhWL4f}#
-                         #{mod _hoQGWMnyQPAh3k2jhWL4g}#)))))
-               #{tmp _hoQGWMnyQPAh3k2jhWL4j}#)
+                                                  (if #{rec? -ANAU$bmvAmthP7L7xwr$8}#
+                                                    #{new-w -ANAU$bmvAmthP7L7xwsAm}#
+                                                    #{w -ANAU$bmvAmthP7L7xwr$@}#))
+                                                #{mod -ANAU$bmvAmthP7L7xwr@B}#)
+                                              #{mod -ANAU$bmvAmthP7L7xwr@B}#)))
+                                    #{val -ANAU$bmvAmthP7L7xwr@J}#)))
+                           #{r -ANAU$bmvAmthP7L7xwr$$}#)
+                         #{new-w -ANAU$bmvAmthP7L7xwsAm}#
+                         #{s -ANAU$bmvAmthP7L7xwr@A}#
+                         #{mod -ANAU$bmvAmthP7L7xwr@B}#)))))
+               #{tmp -ANAU$bmvAmthP7L7xwr@E}#)
              (syntax-violation
                #f
                "bad local syntax definition"
-               (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+               (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                  (begin
-                   (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWL4c}#)
-                         #{s _hoQGWMnyQPAh3k2jhWL4f}#
+                   (if (if (pair? #{e -ANAU$bmvAmthP7L7xwr$9}#)
+                         #{s -ANAU$bmvAmthP7L7xwr@A}#
                          #f)
                      (set-source-properties!
-                       #{e _hoQGWMnyQPAh3k2jhWL4c}#
-                       #{s _hoQGWMnyQPAh3k2jhWL4f}#))
-                   #{e _hoQGWMnyQPAh3k2jhWL4c}#)
-                 #{w _hoQGWMnyQPAh3k2jhWL4e}#
-                 #{mod _hoQGWMnyQPAh3k2jhWL4g}#))))))
-     (#{eval-local-transformer _hoQGWMnyQPAh3k2jhWHTr}#
-       (lambda (#{expanded _hoQGWMnyQPAh3k2jhWL$6}#
-                #{mod _hoQGWMnyQPAh3k2jhWL$7}#)
-         (let ((#{p _hoQGWMnyQPAh3k2jhWL$8}#
+                       #{e -ANAU$bmvAmthP7L7xwr$9}#
+                       #{s -ANAU$bmvAmthP7L7xwr@A}#))
+                   #{e -ANAU$bmvAmthP7L7xwr$9}#)
+                 #{w -ANAU$bmvAmthP7L7xwr$@}#
+                 #{mod -ANAU$bmvAmthP7L7xwr@B}#))))))
+     (#{eval-local-transformer -ANAU$bmvAmthP7L7xwnOK}#
+       (lambda (#{expanded -ANAU$bmvAmthP7L7xwsFb}#
+                #{mod -ANAU$bmvAmthP7L7xwsFc}#)
+         (let ((#{p -ANAU$bmvAmthP7L7xwsFd}#
                  (primitive-eval
-                   #{expanded _hoQGWMnyQPAh3k2jhWL$6}#)))
-           (if (procedure? #{p _hoQGWMnyQPAh3k2jhWL$8}#)
-             #{p _hoQGWMnyQPAh3k2jhWL$8}#
+                   #{expanded -ANAU$bmvAmthP7L7xwsFb}#)))
+           (if (procedure? #{p -ANAU$bmvAmthP7L7xwsFd}#)
+             #{p -ANAU$bmvAmthP7L7xwsFd}#
              (syntax-violation
                #f
                "nonprocedure transformer"
-               #{p _hoQGWMnyQPAh3k2jhWL$8}#)))))
-     (#{ellipsis? _hoQGWMnyQPAh3k2jhWHTt}#
-       (lambda (#{x _hoQGWMnyQPAh3k2jhWHeC}#)
-         (if (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWHeC}#)
-                   (if (= (vector-length #{x _hoQGWMnyQPAh3k2jhWHeC}#)
+               #{p -ANAU$bmvAmthP7L7xwsFd}#)))))
+     (#{ellipsis? -ANAU$bmvAmthP7L7xwnOM}#
+       (lambda (#{x -ANAU$bmvAmthP7L7xwnYh}#)
+         (if (if (if (vector? #{x -ANAU$bmvAmthP7L7xwnYh}#)
+                   (if (= (vector-length #{x -ANAU$bmvAmthP7L7xwnYh}#)
                           4)
-                     (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWHeC}# 0)
+                     (eq? (vector-ref #{x -ANAU$bmvAmthP7L7xwnYh}# 0)
                           'syntax-object)
                      #f)
                    #f)
                (symbol?
-                 (vector-ref #{x _hoQGWMnyQPAh3k2jhWHeC}# 1))
+                 (vector-ref #{x -ANAU$bmvAmthP7L7xwnYh}# 1))
                #f)
-           (if (eq? (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWHeC}#)
-                          (if (= (vector-length #{x _hoQGWMnyQPAh3k2jhWHeC}#)
+           (if (eq? (if (if (vector? #{x -ANAU$bmvAmthP7L7xwnYh}#)
+                          (if (= (vector-length #{x -ANAU$bmvAmthP7L7xwnYh}#)
                                  4)
-                            (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWHeC}# 0)
+                            (eq? (vector-ref #{x -ANAU$bmvAmthP7L7xwnYh}# 0)
                                  'syntax-object)
                             #f)
                           #f)
-                      (vector-ref #{x _hoQGWMnyQPAh3k2jhWHeC}# 1)
-                      #{x _hoQGWMnyQPAh3k2jhWHeC}#)
+                      (vector-ref #{x -ANAU$bmvAmthP7L7xwnYh}# 1)
+                      #{x -ANAU$bmvAmthP7L7xwnYh}#)
                     (if (if (= (vector-length
                                  '#(syntax-object
                                     ...
                                     ((top)
                                      #(ribcage () () ())
                                      #(ribcage () () ())
-                                     #(ribcage #(x) #((top)) #("2de"))
+                                     #(ribcage #(x) #((top)) #("p6"))
                                      #(ribcage
                                        (lambda-var-list
                                          gen-var
@@ -5565,152 +5547,152 @@
                                         (top)
                                         (top)
                                         (top))
-                                       ("1tt"
-                                        "1ts"
-                                        "1tr"
-                                        "1tq"
-                                        "1tp"
-                                        "1to"
-                                        "1tn"
-                                        "1tm"
-                                        "1tl"
-                                        "1tk"
-                                        "1tj"
-                                        "1ti"
-                                        "1th"
-                                        "1tg"
-                                        "1tf"
-                                        "1te"
-                                        "1td"
-                                        "1tc"
-                                        "1tb"
-                                        "1ta"
-                                        "1t9"
-                                        "1t8"
-                                        "1t7"
-                                        "1t6"
-                                        "1t5"
-                                        "1t4"
-                                        "1t3"
-                                        "1t2"
-                                        "1t1"
-                                        "1t0"
-                                        "1sz"
-                                        "1sy"
-                                        "1sx"
-                                        "1sw"
-                                        "1sv"
-                                        "1su"
-                                        "1st"
-                                        "1ss"
-                                        "1sr"
-                                        "1sq"
-                                        "1sp"
-                                        "1so"
-                                        "1sn"
-                                        "1sm"
-                                        "1sl"
-                                        "1sk"
-                                        "1sj"
-                                        "1si"
-                                        "1sh"
-                                        "1sg"
-                                        "1sf"
-                                        "1se"
-                                        "1sd"
-                                        "1sc"
-                                        "1sb"
-                                        "1sa"
-                                        "1s9"
-                                        "1s8"
-                                        "1s7"
-                                        "1s6"
-                                        "1s5"
-                                        "1s4"
-                                        "1s3"
-                                        "1s2"
-                                        "1s1"
-                                        "1s0"
-                                        "1rz"
-                                        "1ry"
-                                        "1rx"
-                                        "1rw"
-                                        "1rv"
-                                        "1ru"
-                                        "1rt"
-                                        "1rs"
-                                        "1rr"
-                                        "1rq"
-                                        "1rp"
-                                        "1ro"
-                                        "1rn"
-                                        "1rm"
-                                        "1rl"
-                                        "1rk"
-                                        "1rj"
-                                        "1ri"
-                                        "1rh"
-                                        "1rg"
-                                        "1rf"
-                                        "1re"
-                                        "1rd"
-                                        "1rc"
-                                        "1rb"
-                                        "1ra"
-                                        "1r9"
-                                        "1r8"
-                                        "1r7"
-                                        "1r6"
-                                        "1r5"
-                                        "1r4"
-                                        "1r3"
-                                        "1r2"
-                                        "1r1"
-                                        "1r0"
-                                        "1qz"
-                                        "1qy"
-                                        "1qx"
-                                        "1qw"
-                                        "1qv"
-                                        "1qu"
-                                        "1qt"
-                                        "1qs"
-                                        "1qr"
-                                        "1qq"
-                                        "1qp"
-                                        "1qo"
-                                        "1qn"
-                                        "1qm"
-                                        "1ql"
-                                        "1qk"
-                                        "1qj"
-                                        "1qi"
-                                        "1qh"
-                                        "1qg"
-                                        "1qf"
-                                        "1qe"
-                                        "1qd"
-                                        "1qc"
-                                        "1qb"
-                                        "1qa"
-                                        "1q9"
-                                        "1q8"
-                                        "1q7"
-                                        "1q6"
-                                        "1q5"
-                                        "1q4"
-                                        "1q3"
-                                        "1q2"
-                                        "1q1"
-                                        "1q0"
-                                        "1pz"
-                                        "1py"))
+                                       ("5l"
+                                        "5k"
+                                        "5j"
+                                        "5i"
+                                        "5h"
+                                        "5g"
+                                        "5f"
+                                        "5e"
+                                        "5d"
+                                        "5c"
+                                        "5b"
+                                        "5a"
+                                        "59"
+                                        "58"
+                                        "57"
+                                        "56"
+                                        "55"
+                                        "54"
+                                        "53"
+                                        "52"
+                                        "51"
+                                        "50"
+                                        "4z"
+                                        "4y"
+                                        "4x"
+                                        "4w"
+                                        "4v"
+                                        "4u"
+                                        "4t"
+                                        "4s"
+                                        "4r"
+                                        "4q"
+                                        "4p"
+                                        "4o"
+                                        "4n"
+                                        "4m"
+                                        "4l"
+                                        "4k"
+                                        "4j"
+                                        "4i"
+                                        "4h"
+                                        "4g"
+                                        "4f"
+                                        "4e"
+                                        "4d"
+                                        "4c"
+                                        "4b"
+                                        "4a"
+                                        "49"
+                                        "48"
+                                        "47"
+                                        "46"
+                                        "45"
+                                        "44"
+                                        "43"
+                                        "42"
+                                        "41"
+                                        "40"
+                                        "3z"
+                                        "3y"
+                                        "3x"
+                                        "3w"
+                                        "3v"
+                                        "3u"
+                                        "3t"
+                                        "3s"
+                                        "3r"
+                                        "3q"
+                                        "3p"
+                                        "3o"
+                                        "3n"
+                                        "3m"
+                                        "3l"
+                                        "3k"
+                                        "3j"
+                                        "3i"
+                                        "3h"
+                                        "3g"
+                                        "3f"
+                                        "3e"
+                                        "3d"
+                                        "3c"
+                                        "3b"
+                                        "3a"
+                                        "39"
+                                        "38"
+                                        "37"
+                                        "36"
+                                        "35"
+                                        "34"
+                                        "33"
+                                        "32"
+                                        "31"
+                                        "30"
+                                        "2z"
+                                        "2y"
+                                        "2x"
+                                        "2w"
+                                        "2v"
+                                        "2u"
+                                        "2t"
+                                        "2s"
+                                        "2r"
+                                        "2q"
+                                        "2p"
+                                        "2o"
+                                        "2n"
+                                        "2m"
+                                        "2l"
+                                        "2k"
+                                        "2j"
+                                        "2i"
+                                        "2h"
+                                        "2g"
+                                        "2f"
+                                        "2e"
+                                        "2d"
+                                        "2c"
+                                        "2b"
+                                        "2a"
+                                        "29"
+                                        "28"
+                                        "27"
+                                        "26"
+                                        "25"
+                                        "24"
+                                        "23"
+                                        "22"
+                                        "21"
+                                        "20"
+                                        "1z"
+                                        "1y"
+                                        "1x"
+                                        "1w"
+                                        "1v"
+                                        "1u"
+                                        "1t"
+                                        "1s"
+                                        "1r"
+                                        "1q"))
                                      #(ribcage
                                        (define-structure
                                          define-expansion-accessors
                                          define-expansion-constructors)
                                        ((top) (top) (top))
-                                       ("1og" "1of" "1oe")))
+                                       ("8" "7" "6")))
                                     (hygiene guile)))
                                4)
                           #t
@@ -5721,7 +5703,7 @@
                          ((top)
                           #(ribcage () () ())
                           #(ribcage () () ())
-                          #(ribcage #(x) #((top)) #("2de"))
+                          #(ribcage #(x) #((top)) #("p6"))
                           #(ribcage
                             (lambda-var-list
                               gen-var
@@ -6003,163 +5985,163 @@
                              (top)
                              (top)
                              (top))
-                            ("1tt"
-                             "1ts"
-                             "1tr"
-                             "1tq"
-                             "1tp"
-                             "1to"
-                             "1tn"
-                             "1tm"
-                             "1tl"
-                             "1tk"
-                             "1tj"
-                             "1ti"
-                             "1th"
-                             "1tg"
-                             "1tf"
-                             "1te"
-                             "1td"
-                             "1tc"
-                             "1tb"
-                             "1ta"
-                             "1t9"
-                             "1t8"
-                             "1t7"
-                             "1t6"
-                             "1t5"
-                             "1t4"
-                             "1t3"
-                             "1t2"
-                             "1t1"
-                             "1t0"
-                             "1sz"
-                             "1sy"
-                             "1sx"
-                             "1sw"
-                             "1sv"
-                             "1su"
-                             "1st"
-                             "1ss"
-                             "1sr"
-                             "1sq"
-                             "1sp"
-                             "1so"
-                             "1sn"
-                             "1sm"
-                             "1sl"
-                             "1sk"
-                             "1sj"
-                             "1si"
-                             "1sh"
-                             "1sg"
-                             "1sf"
-                             "1se"
-                             "1sd"
-                             "1sc"
-                             "1sb"
-                             "1sa"
-                             "1s9"
-                             "1s8"
-                             "1s7"
-                             "1s6"
-                             "1s5"
-                             "1s4"
-                             "1s3"
-                             "1s2"
-                             "1s1"
-                             "1s0"
-                             "1rz"
-                             "1ry"
-                             "1rx"
-                             "1rw"
-                             "1rv"
-                             "1ru"
-                             "1rt"
-                             "1rs"
-                             "1rr"
-                             "1rq"
-                             "1rp"
-                             "1ro"
-                             "1rn"
-                             "1rm"
-                             "1rl"
-                             "1rk"
-                             "1rj"
-                             "1ri"
-                             "1rh"
-                             "1rg"
-                             "1rf"
-                             "1re"
-                             "1rd"
-                             "1rc"
-                             "1rb"
-                             "1ra"
-                             "1r9"
-                             "1r8"
-                             "1r7"
-                             "1r6"
-                             "1r5"
-                             "1r4"
-                             "1r3"
-                             "1r2"
-                             "1r1"
-                             "1r0"
-                             "1qz"
-                             "1qy"
-                             "1qx"
-                             "1qw"
-                             "1qv"
-                             "1qu"
-                             "1qt"
-                             "1qs"
-                             "1qr"
-                             "1qq"
-                             "1qp"
-                             "1qo"
-                             "1qn"
-                             "1qm"
-                             "1ql"
-                             "1qk"
-                             "1qj"
-                             "1qi"
-                             "1qh"
-                             "1qg"
-                             "1qf"
-                             "1qe"
-                             "1qd"
-                             "1qc"
-                             "1qb"
-                             "1qa"
-                             "1q9"
-                             "1q8"
-                             "1q7"
-                             "1q6"
-                             "1q5"
-                             "1q4"
-                             "1q3"
-                             "1q2"
-                             "1q1"
-                             "1q0"
-                             "1pz"
-                             "1py"))
+                            ("5l"
+                             "5k"
+                             "5j"
+                             "5i"
+                             "5h"
+                             "5g"
+                             "5f"
+                             "5e"
+                             "5d"
+                             "5c"
+                             "5b"
+                             "5a"
+                             "59"
+                             "58"
+                             "57"
+                             "56"
+                             "55"
+                             "54"
+                             "53"
+                             "52"
+                             "51"
+                             "50"
+                             "4z"
+                             "4y"
+                             "4x"
+                             "4w"
+                             "4v"
+                             "4u"
+                             "4t"
+                             "4s"
+                             "4r"
+                             "4q"
+                             "4p"
+                             "4o"
+                             "4n"
+                             "4m"
+                             "4l"
+                             "4k"
+                             "4j"
+                             "4i"
+                             "4h"
+                             "4g"
+                             "4f"
+                             "4e"
+                             "4d"
+                             "4c"
+                             "4b"
+                             "4a"
+                             "49"
+                             "48"
+                             "47"
+                             "46"
+                             "45"
+                             "44"
+                             "43"
+                             "42"
+                             "41"
+                             "40"
+                             "3z"
+                             "3y"
+                             "3x"
+                             "3w"
+                             "3v"
+                             "3u"
+                             "3t"
+                             "3s"
+                             "3r"
+                             "3q"
+                             "3p"
+                             "3o"
+                             "3n"
+                             "3m"
+                             "3l"
+                             "3k"
+                             "3j"
+                             "3i"
+                             "3h"
+                             "3g"
+                             "3f"
+                             "3e"
+                             "3d"
+                             "3c"
+                             "3b"
+                             "3a"
+                             "39"
+                             "38"
+                             "37"
+                             "36"
+                             "35"
+                             "34"
+                             "33"
+                             "32"
+                             "31"
+                             "30"
+                             "2z"
+                             "2y"
+                             "2x"
+                             "2w"
+                             "2v"
+                             "2u"
+                             "2t"
+                             "2s"
+                             "2r"
+                             "2q"
+                             "2p"
+                             "2o"
+                             "2n"
+                             "2m"
+                             "2l"
+                             "2k"
+                             "2j"
+                             "2i"
+                             "2h"
+                             "2g"
+                             "2f"
+                             "2e"
+                             "2d"
+                             "2c"
+                             "2b"
+                             "2a"
+                             "29"
+                             "28"
+                             "27"
+                             "26"
+                             "25"
+                             "24"
+                             "23"
+                             "22"
+                             "21"
+                             "20"
+                             "1z"
+                             "1y"
+                             "1x"
+                             "1w"
+                             "1v"
+                             "1u"
+                             "1t"
+                             "1s"
+                             "1r"
+                             "1q"))
                           #(ribcage
                             (define-structure
                               define-expansion-accessors
                               define-expansion-constructors)
                             ((top) (top) (top))
-                            ("1og" "1of" "1oe")))
+                            ("8" "7" "6")))
                          (hygiene guile))))
-             (eq? (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                    #{x _hoQGWMnyQPAh3k2jhWHeC}#
+             (eq? (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                    #{x -ANAU$bmvAmthP7L7xwnYh}#
                     '(()))
-                  (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
+                  (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
                     '#(syntax-object
                        ...
                        ((top)
                         #(ribcage () () ())
                         #(ribcage () () ())
-                        #(ribcage #(x) #((top)) #("2de"))
+                        #(ribcage #(x) #((top)) #("p6"))
                         #(ribcage
                           (lambda-var-list
                             gen-var
@@ -6441,539 +6423,539 @@
                            (top)
                            (top)
                            (top))
-                          ("1tt"
-                           "1ts"
-                           "1tr"
-                           "1tq"
-                           "1tp"
-                           "1to"
-                           "1tn"
-                           "1tm"
-                           "1tl"
-                           "1tk"
-                           "1tj"
-                           "1ti"
-                           "1th"
-                           "1tg"
-                           "1tf"
-                           "1te"
-                           "1td"
-                           "1tc"
-                           "1tb"
-                           "1ta"
-                           "1t9"
-                           "1t8"
-                           "1t7"
-                           "1t6"
-                           "1t5"
-                           "1t4"
-                           "1t3"
-                           "1t2"
-                           "1t1"
-                           "1t0"
-                           "1sz"
-                           "1sy"
-                           "1sx"
-                           "1sw"
-                           "1sv"
-                           "1su"
-                           "1st"
-                           "1ss"
-                           "1sr"
-                           "1sq"
-                           "1sp"
-                           "1so"
-                           "1sn"
-                           "1sm"
-                           "1sl"
-                           "1sk"
-                           "1sj"
-                           "1si"
-                           "1sh"
-                           "1sg"
-                           "1sf"
-                           "1se"
-                           "1sd"
-                           "1sc"
-                           "1sb"
-                           "1sa"
-                           "1s9"
-                           "1s8"
-                           "1s7"
-                           "1s6"
-                           "1s5"
-                           "1s4"
-                           "1s3"
-                           "1s2"
-                           "1s1"
-                           "1s0"
-                           "1rz"
-                           "1ry"
-                           "1rx"
-                           "1rw"
-                           "1rv"
-                           "1ru"
-                           "1rt"
-                           "1rs"
-                           "1rr"
-                           "1rq"
-                           "1rp"
-                           "1ro"
-                           "1rn"
-                           "1rm"
-                           "1rl"
-                           "1rk"
-                           "1rj"
-                           "1ri"
-                           "1rh"
-                           "1rg"
-                           "1rf"
-                           "1re"
-                           "1rd"
-                           "1rc"
-                           "1rb"
-                           "1ra"
-                           "1r9"
-                           "1r8"
-                           "1r7"
-                           "1r6"
-                           "1r5"
-                           "1r4"
-                           "1r3"
-                           "1r2"
-                           "1r1"
-                           "1r0"
-                           "1qz"
-                           "1qy"
-                           "1qx"
-                           "1qw"
-                           "1qv"
-                           "1qu"
-                           "1qt"
-                           "1qs"
-                           "1qr"
-                           "1qq"
-                           "1qp"
-                           "1qo"
-                           "1qn"
-                           "1qm"
-                           "1ql"
-                           "1qk"
-                           "1qj"
-                           "1qi"
-                           "1qh"
-                           "1qg"
-                           "1qf"
-                           "1qe"
-                           "1qd"
-                           "1qc"
-                           "1qb"
-                           "1qa"
-                           "1q9"
-                           "1q8"
-                           "1q7"
-                           "1q6"
-                           "1q5"
-                           "1q4"
-                           "1q3"
-                           "1q2"
-                           "1q1"
-                           "1q0"
-                           "1pz"
-                           "1py"))
+                          ("5l"
+                           "5k"
+                           "5j"
+                           "5i"
+                           "5h"
+                           "5g"
+                           "5f"
+                           "5e"
+                           "5d"
+                           "5c"
+                           "5b"
+                           "5a"
+                           "59"
+                           "58"
+                           "57"
+                           "56"
+                           "55"
+                           "54"
+                           "53"
+                           "52"
+                           "51"
+                           "50"
+                           "4z"
+                           "4y"
+                           "4x"
+                           "4w"
+                           "4v"
+                           "4u"
+                           "4t"
+                           "4s"
+                           "4r"
+                           "4q"
+                           "4p"
+                           "4o"
+                           "4n"
+                           "4m"
+                           "4l"
+                           "4k"
+                           "4j"
+                           "4i"
+                           "4h"
+                           "4g"
+                           "4f"
+                           "4e"
+                           "4d"
+                           "4c"
+                           "4b"
+                           "4a"
+                           "49"
+                           "48"
+                           "47"
+                           "46"
+                           "45"
+                           "44"
+                           "43"
+                           "42"
+                           "41"
+                           "40"
+                           "3z"
+                           "3y"
+                           "3x"
+                           "3w"
+                           "3v"
+                           "3u"
+                           "3t"
+                           "3s"
+                           "3r"
+                           "3q"
+                           "3p"
+                           "3o"
+                           "3n"
+                           "3m"
+                           "3l"
+                           "3k"
+                           "3j"
+                           "3i"
+                           "3h"
+                           "3g"
+                           "3f"
+                           "3e"
+                           "3d"
+                           "3c"
+                           "3b"
+                           "3a"
+                           "39"
+                           "38"
+                           "37"
+                           "36"
+                           "35"
+                           "34"
+                           "33"
+                           "32"
+                           "31"
+                           "30"
+                           "2z"
+                           "2y"
+                           "2x"
+                           "2w"
+                           "2v"
+                           "2u"
+                           "2t"
+                           "2s"
+                           "2r"
+                           "2q"
+                           "2p"
+                           "2o"
+                           "2n"
+                           "2m"
+                           "2l"
+                           "2k"
+                           "2j"
+                           "2i"
+                           "2h"
+                           "2g"
+                           "2f"
+                           "2e"
+                           "2d"
+                           "2c"
+                           "2b"
+                           "2a"
+                           "29"
+                           "28"
+                           "27"
+                           "26"
+                           "25"
+                           "24"
+                           "23"
+                           "22"
+                           "21"
+                           "20"
+                           "1z"
+                           "1y"
+                           "1x"
+                           "1w"
+                           "1v"
+                           "1u"
+                           "1t"
+                           "1s"
+                           "1r"
+                           "1q"))
                         #(ribcage
                           (define-structure
                             define-expansion-accessors
                             define-expansion-constructors)
                           ((top) (top) (top))
-                          ("1og" "1of" "1oe")))
+                          ("8" "7" "6")))
                        (hygiene guile))
                     '(())))
              #f)
            #f)))
-     (#{lambda-formals _hoQGWMnyQPAh3k2jhWHTu}#
-       (lambda (#{orig-args _hoQGWMnyQPAh3k2jhWL@B}#)
+     (#{lambda-formals -ANAU$bmvAmthP7L7xwnON}#
+       (lambda (#{orig-args -ANAU$bmvAmthP7L7xwsFi}#)
          (letrec*
-           ((#{req _hoQGWMnyQPAh3k2jhWL@C}#
-              (lambda (#{args _hoQGWMnyQPAh3k2jhWL@G}#
-                       #{rreq _hoQGWMnyQPAh3k2jhWL@H}#)
-                (let ((#{tmp _hoQGWMnyQPAh3k2jhWL@J}#
+           ((#{req -ANAU$bmvAmthP7L7xwsFj}#
+              (lambda (#{args -ANAU$bmvAmthP7L7xwsFn}#
+                       #{rreq -ANAU$bmvAmthP7L7xwsFo}#)
+                (let ((#{tmp -ANAU$bmvAmthP7L7xwsFq}#
                         ($sc-dispatch
-                          #{args _hoQGWMnyQPAh3k2jhWL@G}#
+                          #{args -ANAU$bmvAmthP7L7xwsFn}#
                           '())))
-                  (if #{tmp _hoQGWMnyQPAh3k2jhWL@J}#
+                  (if #{tmp -ANAU$bmvAmthP7L7xwsFq}#
                     (@apply
                       (lambda ()
-                        (#{check _hoQGWMnyQPAh3k2jhWL@D}#
-                          (reverse #{rreq _hoQGWMnyQPAh3k2jhWL@H}#)
+                        (#{check -ANAU$bmvAmthP7L7xwsFk}#
+                          (reverse #{rreq -ANAU$bmvAmthP7L7xwsFo}#)
                           #f))
-                      #{tmp _hoQGWMnyQPAh3k2jhWL@J}#)
-                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWMBE}#
+                      #{tmp -ANAU$bmvAmthP7L7xwsFq}#)
+                    (let ((#{tmp -ANAU$bmvAmthP7L7xwsHl}#
                             ($sc-dispatch
-                              #{args _hoQGWMnyQPAh3k2jhWL@G}#
+                              #{args -ANAU$bmvAmthP7L7xwsFn}#
                               '(any . any))))
-                      (if (if #{tmp _hoQGWMnyQPAh3k2jhWMBE}#
+                      (if (if #{tmp -ANAU$bmvAmthP7L7xwsHl}#
                             (@apply
-                              (lambda (#{a _hoQGWMnyQPAh3k2jhWMBI}#
-                                       #{b _hoQGWMnyQPAh3k2jhWMBJ}#)
-                                (if (symbol? #{a _hoQGWMnyQPAh3k2jhWMBI}#)
+                              (lambda (#{a -ANAU$bmvAmthP7L7xwsHp}#
+                                       #{b -ANAU$bmvAmthP7L7xwsHq}#)
+                                (if (symbol? #{a -ANAU$bmvAmthP7L7xwsHp}#)
                                   #t
                                   (if (if (vector?
-                                            #{a _hoQGWMnyQPAh3k2jhWMBI}#)
+                                            #{a -ANAU$bmvAmthP7L7xwsHp}#)
                                         (if (= (vector-length
-                                                 #{a _hoQGWMnyQPAh3k2jhWMBI}#)
+                                                 #{a -ANAU$bmvAmthP7L7xwsHp}#)
                                                4)
                                           (eq? (vector-ref
-                                                 #{a _hoQGWMnyQPAh3k2jhWMBI}#
+                                                 #{a -ANAU$bmvAmthP7L7xwsHp}#
                                                  0)
                                                'syntax-object)
                                           #f)
                                         #f)
                                     (symbol?
                                       (vector-ref
-                                        #{a _hoQGWMnyQPAh3k2jhWMBI}#
+                                        #{a -ANAU$bmvAmthP7L7xwsHp}#
                                         1))
                                     #f)))
-                              #{tmp _hoQGWMnyQPAh3k2jhWMBE}#)
+                              #{tmp -ANAU$bmvAmthP7L7xwsHl}#)
                             #f)
                         (@apply
-                          (lambda (#{a _hoQGWMnyQPAh3k2jhWMBk}#
-                                   #{b _hoQGWMnyQPAh3k2jhWMBl}#)
-                            (#{req _hoQGWMnyQPAh3k2jhWL@C}#
-                              #{b _hoQGWMnyQPAh3k2jhWMBl}#
-                              (cons #{a _hoQGWMnyQPAh3k2jhWMBk}#
-                                    #{rreq _hoQGWMnyQPAh3k2jhWL@H}#)))
-                          #{tmp _hoQGWMnyQPAh3k2jhWMBE}#)
-                        (let ((#{tmp _hoQGWMnyQPAh3k2jhWMBm}#
-                                (list #{args _hoQGWMnyQPAh3k2jhWL@G}#)))
+                          (lambda (#{a -ANAU$bmvAmthP7L7xwsIF}#
+                                   #{b -ANAU$bmvAmthP7L7xwsIG}#)
+                            (#{req -ANAU$bmvAmthP7L7xwsFj}#
+                              #{b -ANAU$bmvAmthP7L7xwsIG}#
+                              (cons #{a -ANAU$bmvAmthP7L7xwsIF}#
+                                    #{rreq -ANAU$bmvAmthP7L7xwsFo}#)))
+                          #{tmp -ANAU$bmvAmthP7L7xwsHl}#)
+                        (let ((#{tmp -ANAU$bmvAmthP7L7xwsIH}#
+                                (list #{args -ANAU$bmvAmthP7L7xwsFn}#)))
                           (if (@apply
-                                (lambda (#{r _hoQGWMnyQPAh3k2jhWMBo}#)
-                                  (if (symbol? #{r _hoQGWMnyQPAh3k2jhWMBo}#)
+                                (lambda (#{r -ANAU$bmvAmthP7L7xwsIJ}#)
+                                  (if (symbol? #{r -ANAU$bmvAmthP7L7xwsIJ}#)
                                     #t
                                     (if (if (vector?
-                                              #{r _hoQGWMnyQPAh3k2jhWMBo}#)
+                                              #{r -ANAU$bmvAmthP7L7xwsIJ}#)
                                           (if (= (vector-length
-                                                   #{r _hoQGWMnyQPAh3k2jhWMBo}#)
+                                                   #{r -ANAU$bmvAmthP7L7xwsIJ}#)
                                                  4)
                                             (eq? (vector-ref
-                                                   #{r _hoQGWMnyQPAh3k2jhWMBo}#
+                                                   #{r -ANAU$bmvAmthP7L7xwsIJ}#
                                                    0)
                                                  'syntax-object)
                                             #f)
                                           #f)
                                       (symbol?
                                         (vector-ref
-                                          #{r _hoQGWMnyQPAh3k2jhWMBo}#
+                                          #{r -ANAU$bmvAmthP7L7xwsIJ}#
                                           1))
                                       #f)))
-                                #{tmp _hoQGWMnyQPAh3k2jhWMBm}#)
+                                #{tmp -ANAU$bmvAmthP7L7xwsIH}#)
                             (@apply
-                              (lambda (#{r _hoQGWMnyQPAh3k2jhWMCG}#)
-                                (#{check _hoQGWMnyQPAh3k2jhWL@D}#
-                                  (reverse #{rreq _hoQGWMnyQPAh3k2jhWL@H}#)
-                                  #{r _hoQGWMnyQPAh3k2jhWMCG}#))
-                              #{tmp _hoQGWMnyQPAh3k2jhWMBm}#)
+                              (lambda (#{r -ANAU$bmvAmthP7L7xwsIn}#)
+                                (#{check -ANAU$bmvAmthP7L7xwsFk}#
+                                  (reverse #{rreq -ANAU$bmvAmthP7L7xwsFo}#)
+                                  #{r -ANAU$bmvAmthP7L7xwsIn}#))
+                              #{tmp -ANAU$bmvAmthP7L7xwsIH}#)
                             (syntax-violation
                               'lambda
                               "invalid argument list"
-                              #{orig-args _hoQGWMnyQPAh3k2jhWL@B}#
-                              #{args _hoQGWMnyQPAh3k2jhWL@G}#)))))))))
-            (#{check _hoQGWMnyQPAh3k2jhWL@D}#
-              (lambda (#{req _hoQGWMnyQPAh3k2jhWMEJ}#
-                       #{rest _hoQGWMnyQPAh3k2jhWMEK}#)
-                (if (#{distinct-bound-ids? _hoQGWMnyQPAh3k2jhWHTc}#
-                      (if #{rest _hoQGWMnyQPAh3k2jhWMEK}#
-                        (cons #{rest _hoQGWMnyQPAh3k2jhWMEK}#
-                              #{req _hoQGWMnyQPAh3k2jhWMEJ}#)
-                        #{req _hoQGWMnyQPAh3k2jhWMEJ}#))
+                              #{orig-args -ANAU$bmvAmthP7L7xwsFi}#
+                              #{args -ANAU$bmvAmthP7L7xwsFn}#)))))))))
+            (#{check -ANAU$bmvAmthP7L7xwsFk}#
+              (lambda (#{req -ANAU$bmvAmthP7L7xwsKq}#
+                       #{rest -ANAU$bmvAmthP7L7xwsKr}#)
+                (if (#{distinct-bound-ids? -ANAU$bmvAmthP7L7xwnN7}#
+                      (if #{rest -ANAU$bmvAmthP7L7xwsKr}#
+                        (cons #{rest -ANAU$bmvAmthP7L7xwsKr}#
+                              #{req -ANAU$bmvAmthP7L7xwsKq}#)
+                        #{req -ANAU$bmvAmthP7L7xwsKq}#))
                   (values
-                    #{req _hoQGWMnyQPAh3k2jhWMEJ}#
+                    #{req -ANAU$bmvAmthP7L7xwsKq}#
                     #f
-                    #{rest _hoQGWMnyQPAh3k2jhWMEK}#
+                    #{rest -ANAU$bmvAmthP7L7xwsKr}#
                     #f)
                   (syntax-violation
                     'lambda
                     "duplicate identifier in argument list"
-                    #{orig-args _hoQGWMnyQPAh3k2jhWL@B}#)))))
-           (#{req _hoQGWMnyQPAh3k2jhWL@C}#
-             #{orig-args _hoQGWMnyQPAh3k2jhWL@B}#
+                    #{orig-args -ANAU$bmvAmthP7L7xwsFi}#)))))
+           (#{req -ANAU$bmvAmthP7L7xwsFj}#
+             #{orig-args -ANAU$bmvAmthP7L7xwsFi}#
              '()))))
-     (#{expand-simple-lambda _hoQGWMnyQPAh3k2jhWHTv}#
-       (lambda (#{e _hoQGWMnyQPAh3k2jhWMF$}#
-                #{r _hoQGWMnyQPAh3k2jhWMF@}#
-                #{w _hoQGWMnyQPAh3k2jhWMGA}#
-                #{s _hoQGWMnyQPAh3k2jhWMGB}#
-                #{mod _hoQGWMnyQPAh3k2jhWMGC}#
-                #{req _hoQGWMnyQPAh3k2jhWMGD}#
-                #{rest _hoQGWMnyQPAh3k2jhWMGE}#
-                #{meta _hoQGWMnyQPAh3k2jhWMGF}#
-                #{body _hoQGWMnyQPAh3k2jhWMGG}#)
-         (let ((#{ids _hoQGWMnyQPAh3k2jhWMGH}#
-                 (if #{rest _hoQGWMnyQPAh3k2jhWMGE}#
+     (#{expand-simple-lambda -ANAU$bmvAmthP7L7xwnOO}#
+       (lambda (#{e -ANAU$bmvAmthP7L7xwsMf}#
+                #{r -ANAU$bmvAmthP7L7xwsMg}#
+                #{w -ANAU$bmvAmthP7L7xwsMh}#
+                #{s -ANAU$bmvAmthP7L7xwsMi}#
+                #{mod -ANAU$bmvAmthP7L7xwsMj}#
+                #{req -ANAU$bmvAmthP7L7xwsMk}#
+                #{rest -ANAU$bmvAmthP7L7xwsMl}#
+                #{meta -ANAU$bmvAmthP7L7xwsMm}#
+                #{body -ANAU$bmvAmthP7L7xwsMn}#)
+         (let ((#{ids -ANAU$bmvAmthP7L7xwsMo}#
+                 (if #{rest -ANAU$bmvAmthP7L7xwsMl}#
                    (append
-                     #{req _hoQGWMnyQPAh3k2jhWMGD}#
-                     (list #{rest _hoQGWMnyQPAh3k2jhWMGE}#))
-                   #{req _hoQGWMnyQPAh3k2jhWMGD}#)))
-           (let ((#{vars _hoQGWMnyQPAh3k2jhWMGI}#
-                   (map #{gen-var _hoQGWMnyQPAh3k2jhWHTz}#
-                        #{ids _hoQGWMnyQPAh3k2jhWMGH}#)))
-             (let ((#{labels _hoQGWMnyQPAh3k2jhWMGJ}#
-                     (#{gen-labels _hoQGWMnyQPAh3k2jhWHTE}#
-                       #{ids _hoQGWMnyQPAh3k2jhWMGH}#)))
-               (#{build-simple-lambda _hoQGWMnyQPAh3k2jhWHSp}#
-                 #{s _hoQGWMnyQPAh3k2jhWMGB}#
+                     #{req -ANAU$bmvAmthP7L7xwsMk}#
+                     (list #{rest -ANAU$bmvAmthP7L7xwsMl}#))
+                   #{req -ANAU$bmvAmthP7L7xwsMk}#)))
+           (let ((#{vars -ANAU$bmvAmthP7L7xwsMp}#
+                   (map #{gen-var -ANAU$bmvAmthP7L7xwnOS}#
+                        #{ids -ANAU$bmvAmthP7L7xwsMo}#)))
+             (let ((#{labels -ANAU$bmvAmthP7L7xwsMq}#
+                     (#{gen-labels -ANAU$bmvAmthP7L7xwnNj}#
+                       #{ids -ANAU$bmvAmthP7L7xwsMo}#)))
+               (#{build-simple-lambda -ANAU$bmvAmthP7L7xwnNI}#
+                 #{s -ANAU$bmvAmthP7L7xwsMi}#
                  (map syntax->datum
-                      #{req _hoQGWMnyQPAh3k2jhWMGD}#)
-                 (if #{rest _hoQGWMnyQPAh3k2jhWMGE}#
-                   (syntax->datum #{rest _hoQGWMnyQPAh3k2jhWMGE}#)
+                      #{req -ANAU$bmvAmthP7L7xwsMk}#)
+                 (if #{rest -ANAU$bmvAmthP7L7xwsMl}#
+                   (syntax->datum #{rest -ANAU$bmvAmthP7L7xwsMl}#)
                    #f)
-                 #{vars _hoQGWMnyQPAh3k2jhWMGI}#
-                 #{meta _hoQGWMnyQPAh3k2jhWMGF}#
-                 (#{expand-body _hoQGWMnyQPAh3k2jhWHTp}#
-                   #{body _hoQGWMnyQPAh3k2jhWMGG}#
-                   (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                 #{vars -ANAU$bmvAmthP7L7xwsMp}#
+                 #{meta -ANAU$bmvAmthP7L7xwsMm}#
+                 (#{expand-body -ANAU$bmvAmthP7L7xwnOI}#
+                   #{body -ANAU$bmvAmthP7L7xwsMn}#
+                   (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                      (begin
-                       (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWMF$}#)
-                             #{s _hoQGWMnyQPAh3k2jhWMGB}#
+                       (if (if (pair? #{e -ANAU$bmvAmthP7L7xwsMf}#)
+                             #{s -ANAU$bmvAmthP7L7xwsMi}#
                              #f)
                          (set-source-properties!
-                           #{e _hoQGWMnyQPAh3k2jhWMF$}#
-                           #{s _hoQGWMnyQPAh3k2jhWMGB}#))
-                       #{e _hoQGWMnyQPAh3k2jhWMF$}#)
-                     #{w _hoQGWMnyQPAh3k2jhWMGA}#
-                     #{mod _hoQGWMnyQPAh3k2jhWMGC}#)
-                   (#{extend-var-env _hoQGWMnyQPAh3k2jhWHS8}#
-                     #{labels _hoQGWMnyQPAh3k2jhWMGJ}#
-                     #{vars _hoQGWMnyQPAh3k2jhWMGI}#
-                     #{r _hoQGWMnyQPAh3k2jhWMF@}#)
-                   (#{make-binding-wrap _hoQGWMnyQPAh3k2jhWHTP}#
-                     #{ids _hoQGWMnyQPAh3k2jhWMGH}#
-                     #{labels _hoQGWMnyQPAh3k2jhWMGJ}#
-                     #{w _hoQGWMnyQPAh3k2jhWMGA}#)
-                   #{mod _hoQGWMnyQPAh3k2jhWMGC}#)))))))
-     (#{lambda*-formals _hoQGWMnyQPAh3k2jhWHTw}#
-       (lambda (#{orig-args _hoQGWMnyQPAh3k2jhWMKZ}#)
+                           #{e -ANAU$bmvAmthP7L7xwsMf}#
+                           #{s -ANAU$bmvAmthP7L7xwsMi}#))
+                       #{e -ANAU$bmvAmthP7L7xwsMf}#)
+                     #{w -ANAU$bmvAmthP7L7xwsMh}#
+                     #{mod -ANAU$bmvAmthP7L7xwsMj}#)
+                   (#{extend-var-env -ANAU$bmvAmthP7L7xwnNb}#
+                     #{labels -ANAU$bmvAmthP7L7xwsMq}#
+                     #{vars -ANAU$bmvAmthP7L7xwsMp}#
+                     #{r -ANAU$bmvAmthP7L7xwsMg}#)
+                   (#{make-binding-wrap -ANAU$bmvAmthP7L7xwnNu}#
+                     #{ids -ANAU$bmvAmthP7L7xwsMo}#
+                     #{labels -ANAU$bmvAmthP7L7xwsMq}#
+                     #{w -ANAU$bmvAmthP7L7xwsMh}#)
+                   #{mod -ANAU$bmvAmthP7L7xwsMj}#)))))))
+     (#{lambda*-formals -ANAU$bmvAmthP7L7xwnOP}#
+       (lambda (#{orig-args -ANAU$bmvAmthP7L7xwsQ6}#)
          (letrec*
-           ((#{req _hoQGWMnyQPAh3k2jhWMKa}#
-              (lambda (#{args _hoQGWMnyQPAh3k2jhWMKh}#
-                       #{rreq _hoQGWMnyQPAh3k2jhWMKi}#)
-                (let ((#{tmp _hoQGWMnyQPAh3k2jhWMKk}#
+           ((#{req -ANAU$bmvAmthP7L7xwsQ7}#
+              (lambda (#{args -ANAU$bmvAmthP7L7xwsRC}#
+                       #{rreq -ANAU$bmvAmthP7L7xwsRD}#)
+                (let ((#{tmp -ANAU$bmvAmthP7L7xwsRF}#
                         ($sc-dispatch
-                          #{args _hoQGWMnyQPAh3k2jhWMKh}#
+                          #{args -ANAU$bmvAmthP7L7xwsRC}#
                           '())))
-                  (if #{tmp _hoQGWMnyQPAh3k2jhWMKk}#
+                  (if #{tmp -ANAU$bmvAmthP7L7xwsRF}#
                     (@apply
                       (lambda ()
-                        (#{check _hoQGWMnyQPAh3k2jhWMKe}#
-                          (reverse #{rreq _hoQGWMnyQPAh3k2jhWMKi}#)
+                        (#{check -ANAU$bmvAmthP7L7xwsQ@}#
+                          (reverse #{rreq -ANAU$bmvAmthP7L7xwsRD}#)
                           '()
                           #f
                           '()))
-                      #{tmp _hoQGWMnyQPAh3k2jhWMKk}#)
-                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWMKq}#
+                      #{tmp -ANAU$bmvAmthP7L7xwsRF}#)
+                    (let ((#{tmp -ANAU$bmvAmthP7L7xwsRL}#
                             ($sc-dispatch
-                              #{args _hoQGWMnyQPAh3k2jhWMKh}#
+                              #{args -ANAU$bmvAmthP7L7xwsRC}#
                               '(any . any))))
-                      (if (if #{tmp _hoQGWMnyQPAh3k2jhWMKq}#
+                      (if (if #{tmp -ANAU$bmvAmthP7L7xwsRL}#
                             (@apply
-                              (lambda (#{a _hoQGWMnyQPAh3k2jhWMKu}#
-                                       #{b _hoQGWMnyQPAh3k2jhWMKv}#)
-                                (if (symbol? #{a _hoQGWMnyQPAh3k2jhWMKu}#)
+                              (lambda (#{a -ANAU$bmvAmthP7L7xwsRP}#
+                                       #{b -ANAU$bmvAmthP7L7xwsRQ}#)
+                                (if (symbol? #{a -ANAU$bmvAmthP7L7xwsRP}#)
                                   #t
                                   (if (if (vector?
-                                            #{a _hoQGWMnyQPAh3k2jhWMKu}#)
+                                            #{a -ANAU$bmvAmthP7L7xwsRP}#)
                                         (if (= (vector-length
-                                                 #{a _hoQGWMnyQPAh3k2jhWMKu}#)
+                                                 #{a -ANAU$bmvAmthP7L7xwsRP}#)
                                                4)
                                           (eq? (vector-ref
-                                                 #{a _hoQGWMnyQPAh3k2jhWMKu}#
+                                                 #{a -ANAU$bmvAmthP7L7xwsRP}#
                                                  0)
                                                'syntax-object)
                                           #f)
                                         #f)
                                     (symbol?
                                       (vector-ref
-                                        #{a _hoQGWMnyQPAh3k2jhWMKu}#
+                                        #{a -ANAU$bmvAmthP7L7xwsRP}#
                                         1))
                                     #f)))
-                              #{tmp _hoQGWMnyQPAh3k2jhWMKq}#)
+                              #{tmp -ANAU$bmvAmthP7L7xwsRL}#)
                             #f)
                         (@apply
-                          (lambda (#{a _hoQGWMnyQPAh3k2jhWMLK}#
-                                   #{b _hoQGWMnyQPAh3k2jhWMLL}#)
-                            (#{req _hoQGWMnyQPAh3k2jhWMKa}#
-                              #{b _hoQGWMnyQPAh3k2jhWMLL}#
-                              (cons #{a _hoQGWMnyQPAh3k2jhWMLK}#
-                                    #{rreq _hoQGWMnyQPAh3k2jhWMKi}#)))
-                          #{tmp _hoQGWMnyQPAh3k2jhWMKq}#)
-                        (let ((#{tmp _hoQGWMnyQPAh3k2jhWMLM}#
+                          (lambda (#{a -ANAU$bmvAmthP7L7xwsRr}#
+                                   #{b -ANAU$bmvAmthP7L7xwsRs}#)
+                            (#{req -ANAU$bmvAmthP7L7xwsQ7}#
+                              #{b -ANAU$bmvAmthP7L7xwsRs}#
+                              (cons #{a -ANAU$bmvAmthP7L7xwsRr}#
+                                    #{rreq -ANAU$bmvAmthP7L7xwsRD}#)))
+                          #{tmp -ANAU$bmvAmthP7L7xwsRL}#)
+                        (let ((#{tmp -ANAU$bmvAmthP7L7xwsRt}#
                                 ($sc-dispatch
-                                  #{args _hoQGWMnyQPAh3k2jhWMKh}#
+                                  #{args -ANAU$bmvAmthP7L7xwsRC}#
                                   '(any . any))))
-                          (if (if #{tmp _hoQGWMnyQPAh3k2jhWMLM}#
+                          (if (if #{tmp -ANAU$bmvAmthP7L7xwsRt}#
                                 (@apply
-                                  (lambda (#{a _hoQGWMnyQPAh3k2jhWMLQ}#
-                                           #{b _hoQGWMnyQPAh3k2jhWMLR}#)
+                                  (lambda (#{a -ANAU$bmvAmthP7L7xwsRx}#
+                                           #{b -ANAU$bmvAmthP7L7xwsRy}#)
                                     (eq? (syntax->datum
-                                           #{a _hoQGWMnyQPAh3k2jhWMLQ}#)
+                                           #{a -ANAU$bmvAmthP7L7xwsRx}#)
                                          #:optional))
-                                  #{tmp _hoQGWMnyQPAh3k2jhWMLM}#)
+                                  #{tmp -ANAU$bmvAmthP7L7xwsRt}#)
                                 #f)
                             (@apply
-                              (lambda (#{a _hoQGWMnyQPAh3k2jhWMLS}#
-                                       #{b _hoQGWMnyQPAh3k2jhWMLT}#)
-                                (#{opt _hoQGWMnyQPAh3k2jhWMKb}#
-                                  #{b _hoQGWMnyQPAh3k2jhWMLT}#
-                                  (reverse #{rreq _hoQGWMnyQPAh3k2jhWMKi}#)
+                              (lambda (#{a -ANAU$bmvAmthP7L7xwsRz}#
+                                       #{b -ANAU$bmvAmthP7L7xwsR0}#)
+                                (#{opt -ANAU$bmvAmthP7L7xwsQ8}#
+                                  #{b -ANAU$bmvAmthP7L7xwsR0}#
+                                  (reverse #{rreq -ANAU$bmvAmthP7L7xwsRD}#)
                                   '()))
-                              #{tmp _hoQGWMnyQPAh3k2jhWMLM}#)
-                            (let ((#{tmp _hoQGWMnyQPAh3k2jhWMLW}#
+                              #{tmp -ANAU$bmvAmthP7L7xwsRt}#)
+                            (let ((#{tmp -ANAU$bmvAmthP7L7xwsR3}#
                                     ($sc-dispatch
-                                      #{args _hoQGWMnyQPAh3k2jhWMKh}#
+                                      #{args -ANAU$bmvAmthP7L7xwsRC}#
                                       '(any . any))))
-                              (if (if #{tmp _hoQGWMnyQPAh3k2jhWMLW}#
+                              (if (if #{tmp -ANAU$bmvAmthP7L7xwsR3}#
                                     (@apply
-                                      (lambda (#{a _hoQGWMnyQPAh3k2jhWMLa}#
-                                               #{b _hoQGWMnyQPAh3k2jhWMLb}#)
+                                      (lambda (#{a -ANAU$bmvAmthP7L7xwsR7}#
+                                               #{b -ANAU$bmvAmthP7L7xwsR8}#)
                                         (eq? (syntax->datum
-                                               #{a _hoQGWMnyQPAh3k2jhWMLa}#)
+                                               #{a -ANAU$bmvAmthP7L7xwsR7}#)
                                              #:key))
-                                      #{tmp _hoQGWMnyQPAh3k2jhWMLW}#)
+                                      #{tmp -ANAU$bmvAmthP7L7xwsR3}#)
                                     #f)
                                 (@apply
-                                  (lambda (#{a _hoQGWMnyQPAh3k2jhWMLc}#
-                                           #{b _hoQGWMnyQPAh3k2jhWMLd}#)
-                                    (#{key _hoQGWMnyQPAh3k2jhWMKc}#
-                                      #{b _hoQGWMnyQPAh3k2jhWMLd}#
-                                      (reverse #{rreq _hoQGWMnyQPAh3k2jhWMKi}#)
+                                  (lambda (#{a -ANAU$bmvAmthP7L7xwsR9}#
+                                           #{b -ANAU$bmvAmthP7L7xwsR$}#)
+                                    (#{key -ANAU$bmvAmthP7L7xwsQ9}#
+                                      #{b -ANAU$bmvAmthP7L7xwsR$}#
+                                      (reverse #{rreq -ANAU$bmvAmthP7L7xwsRD}#)
                                       '()
                                       '()))
-                                  #{tmp _hoQGWMnyQPAh3k2jhWMLW}#)
-                                (let ((#{tmp _hoQGWMnyQPAh3k2jhWMLg}#
+                                  #{tmp -ANAU$bmvAmthP7L7xwsR3}#)
+                                (let ((#{tmp -ANAU$bmvAmthP7L7xwsSB}#
                                         ($sc-dispatch
-                                          #{args _hoQGWMnyQPAh3k2jhWMKh}#
+                                          #{args -ANAU$bmvAmthP7L7xwsRC}#
                                           '(any any))))
-                                  (if (if #{tmp _hoQGWMnyQPAh3k2jhWMLg}#
+                                  (if (if #{tmp -ANAU$bmvAmthP7L7xwsSB}#
                                         (@apply
-                                          (lambda (#{a _hoQGWMnyQPAh3k2jhWMLk}#
-                                                   #{b _hoQGWMnyQPAh3k2jhWMLl}#)
+                                          (lambda (#{a -ANAU$bmvAmthP7L7xwsSF}#
+                                                   #{b -ANAU$bmvAmthP7L7xwsSG}#)
                                             (eq? (syntax->datum
-                                                   #{a _hoQGWMnyQPAh3k2jhWMLk}#)
+                                                   #{a -ANAU$bmvAmthP7L7xwsSF}#)
                                                  #:rest))
-                                          #{tmp _hoQGWMnyQPAh3k2jhWMLg}#)
+                                          #{tmp -ANAU$bmvAmthP7L7xwsSB}#)
                                         #f)
                                     (@apply
-                                      (lambda (#{a _hoQGWMnyQPAh3k2jhWMLm}#
-                                               #{b _hoQGWMnyQPAh3k2jhWMLn}#)
-                                        (#{rest _hoQGWMnyQPAh3k2jhWMKd}#
-                                          #{b _hoQGWMnyQPAh3k2jhWMLn}#
+                                      (lambda (#{a -ANAU$bmvAmthP7L7xwsSH}#
+                                               #{b -ANAU$bmvAmthP7L7xwsSI}#)
+                                        (#{rest -ANAU$bmvAmthP7L7xwsQ$}#
+                                          #{b -ANAU$bmvAmthP7L7xwsSI}#
                                           (reverse
-                                            #{rreq _hoQGWMnyQPAh3k2jhWMKi}#)
+                                            #{rreq -ANAU$bmvAmthP7L7xwsRD}#)
                                           '()
                                           '()))
-                                      #{tmp _hoQGWMnyQPAh3k2jhWMLg}#)
-                                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWMLq}#
-                                            (list #{args _hoQGWMnyQPAh3k2jhWMKh}#)))
+                                      #{tmp -ANAU$bmvAmthP7L7xwsSB}#)
+                                    (let ((#{tmp -ANAU$bmvAmthP7L7xwsSL}#
+                                            (list #{args -ANAU$bmvAmthP7L7xwsRC}#)))
                                       (if (@apply
-                                            (lambda (#{r _hoQGWMnyQPAh3k2jhWMLs}#)
+                                            (lambda (#{r -ANAU$bmvAmthP7L7xwsSN}#)
                                               (if (symbol?
-                                                    #{r _hoQGWMnyQPAh3k2jhWMLs}#)
+                                                    #{r -ANAU$bmvAmthP7L7xwsSN}#)
                                                 #t
                                                 (if (if (vector?
-                                                          #{r _hoQGWMnyQPAh3k2jhWMLs}#)
+                                                          #{r -ANAU$bmvAmthP7L7xwsSN}#)
                                                       (if (= (vector-length
-                                                               #{r _hoQGWMnyQPAh3k2jhWMLs}#)
+                                                               #{r -ANAU$bmvAmthP7L7xwsSN}#)
                                                              4)
                                                         (eq? (vector-ref
-                                                               #{r _hoQGWMnyQPAh3k2jhWMLs}#
+                                                               #{r -ANAU$bmvAmthP7L7xwsSN}#
                                                                0)
                                                              'syntax-object)
                                                         #f)
                                                       #f)
                                                   (symbol?
                                                     (vector-ref
-                                                      #{r _hoQGWMnyQPAh3k2jhWMLs}#
+                                                      #{r -ANAU$bmvAmthP7L7xwsSN}#
                                                       1))
                                                   #f)))
-                                            #{tmp _hoQGWMnyQPAh3k2jhWMLq}#)
+                                            #{tmp -ANAU$bmvAmthP7L7xwsSL}#)
                                         (@apply
-                                          (lambda (#{r _hoQGWMnyQPAh3k2jhWMMK}#)
-                                            (#{rest _hoQGWMnyQPAh3k2jhWMKd}#
-                                              #{r _hoQGWMnyQPAh3k2jhWMMK}#
+                                          (lambda (#{r -ANAU$bmvAmthP7L7xwsSr}#)
+                                            (#{rest -ANAU$bmvAmthP7L7xwsQ$}#
+                                              #{r -ANAU$bmvAmthP7L7xwsSr}#
                                               (reverse
-                                                #{rreq _hoQGWMnyQPAh3k2jhWMKi}#)
+                                                #{rreq -ANAU$bmvAmthP7L7xwsRD}#)
                                               '()
                                               '()))
-                                          #{tmp _hoQGWMnyQPAh3k2jhWMLq}#)
+                                          #{tmp -ANAU$bmvAmthP7L7xwsSL}#)
                                         (syntax-violation
                                           'lambda*
                                           "invalid argument list"
-                                          #{orig-args _hoQGWMnyQPAh3k2jhWMKZ}#
-                                          #{args _hoQGWMnyQPAh3k2jhWMKh}#)))))))))))))))
-            (#{opt _hoQGWMnyQPAh3k2jhWMKb}#
-              (lambda (#{args _hoQGWMnyQPAh3k2jhWMMd}#
-                       #{req _hoQGWMnyQPAh3k2jhWMMe}#
-                       #{ropt _hoQGWMnyQPAh3k2jhWMMf}#)
-                (let ((#{tmp _hoQGWMnyQPAh3k2jhWMMh}#
+                                          #{orig-args -ANAU$bmvAmthP7L7xwsQ6}#
+                                          #{args -ANAU$bmvAmthP7L7xwsRC}#)))))))))))))))
+            (#{opt -ANAU$bmvAmthP7L7xwsQ8}#
+              (lambda (#{args -ANAU$bmvAmthP7L7xwsS$}#
+                       #{req -ANAU$bmvAmthP7L7xwsS@}#
+                       #{ropt -ANAU$bmvAmthP7L7xwsTA}#)
+                (let ((#{tmp -ANAU$bmvAmthP7L7xwsTC}#
                         ($sc-dispatch
-                          #{args _hoQGWMnyQPAh3k2jhWMMd}#
+                          #{args -ANAU$bmvAmthP7L7xwsS$}#
                           '())))
-                  (if #{tmp _hoQGWMnyQPAh3k2jhWMMh}#
+                  (if #{tmp -ANAU$bmvAmthP7L7xwsTC}#
                     (@apply
                       (lambda ()
-                        (#{check _hoQGWMnyQPAh3k2jhWMKe}#
-                          #{req _hoQGWMnyQPAh3k2jhWMMe}#
-                          (reverse #{ropt _hoQGWMnyQPAh3k2jhWMMf}#)
+                        (#{check -ANAU$bmvAmthP7L7xwsQ@}#
+                          #{req -ANAU$bmvAmthP7L7xwsS@}#
+                          (reverse #{ropt -ANAU$bmvAmthP7L7xwsTA}#)
                           #f
                           '()))
-                      #{tmp _hoQGWMnyQPAh3k2jhWMMh}#)
-                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWMMn}#
+                      #{tmp -ANAU$bmvAmthP7L7xwsTC}#)
+                    (let ((#{tmp -ANAU$bmvAmthP7L7xwsTI}#
                             ($sc-dispatch
-                              #{args _hoQGWMnyQPAh3k2jhWMMd}#
+                              #{args -ANAU$bmvAmthP7L7xwsS$}#
                               '(any . any))))
-                      (if (if #{tmp _hoQGWMnyQPAh3k2jhWMMn}#
+                      (if (if #{tmp -ANAU$bmvAmthP7L7xwsTI}#
                             (@apply
-                              (lambda (#{a _hoQGWMnyQPAh3k2jhWMMr}#
-                                       #{b _hoQGWMnyQPAh3k2jhWMMs}#)
-                                (if (symbol? #{a _hoQGWMnyQPAh3k2jhWMMr}#)
+                              (lambda (#{a -ANAU$bmvAmthP7L7xwsTM}#
+                                       #{b -ANAU$bmvAmthP7L7xwsTN}#)
+                                (if (symbol? #{a -ANAU$bmvAmthP7L7xwsTM}#)
                                   #t
                                   (if (if (vector?
-                                            #{a _hoQGWMnyQPAh3k2jhWMMr}#)
+                                            #{a -ANAU$bmvAmthP7L7xwsTM}#)
                                         (if (= (vector-length
-                                                 #{a _hoQGWMnyQPAh3k2jhWMMr}#)
+                                                 #{a -ANAU$bmvAmthP7L7xwsTM}#)
                                                4)
                                           (eq? (vector-ref
-                                                 #{a _hoQGWMnyQPAh3k2jhWMMr}#
+                                                 #{a -ANAU$bmvAmthP7L7xwsTM}#
                                                  0)
                                                'syntax-object)
                                           #f)
                                         #f)
                                     (symbol?
                                       (vector-ref
-                                        #{a _hoQGWMnyQPAh3k2jhWMMr}#
+                                        #{a -ANAU$bmvAmthP7L7xwsTM}#
                                         1))
                                     #f)))
-                              #{tmp _hoQGWMnyQPAh3k2jhWMMn}#)
+                              #{tmp -ANAU$bmvAmthP7L7xwsTI}#)
                             #f)
                         (@apply
-                          (lambda (#{a _hoQGWMnyQPAh3k2jhWMNH}#
-                                   #{b _hoQGWMnyQPAh3k2jhWMNI}#)
-                            (#{opt _hoQGWMnyQPAh3k2jhWMKb}#
-                              #{b _hoQGWMnyQPAh3k2jhWMNI}#
-                              #{req _hoQGWMnyQPAh3k2jhWMMe}#
-                              (cons (cons #{a _hoQGWMnyQPAh3k2jhWMNH}#
+                          (lambda (#{a -ANAU$bmvAmthP7L7xwsTo}#
+                                   #{b -ANAU$bmvAmthP7L7xwsTp}#)
+                            (#{opt -ANAU$bmvAmthP7L7xwsQ8}#
+                              #{b -ANAU$bmvAmthP7L7xwsTp}#
+                              #{req -ANAU$bmvAmthP7L7xwsS@}#
+                              (cons (cons #{a -ANAU$bmvAmthP7L7xwsTo}#
                                           '(#(syntax-object
                                               #f
                                               ((top)
                                                #(ribcage
                                                  #(a b)
                                                  #((top) (top))
-                                                 #("2f1" "2f2"))
+                                                 #("qt" "qu"))
                                                #(ribcage () () ())
                                                #(ribcage
                                                  #(args req ropt)
                                                  #((top) (top) (top))
-                                                 #("2ew" "2ex" "2ey"))
+                                                 #("qo" "qp" "qq"))
                                                #(ribcage
                                                  (check rest key opt req)
                                                  ((top)
@@ -6981,15 +6963,11 @@
                                                   (top)
                                                   (top)
                                                   (top))
-                                                 ("2ea"
-                                                  "2e9"
-                                                  "2e8"
-                                                  "2e7"
-                                                  "2e6"))
+                                                 ("q2" "q1" "q0" "pz" "py"))
                                                #(ribcage
                                                  #(orig-args)
                                                  #((top))
-                                                 #("2e5"))
+                                                 #("px"))
                                                #(ribcage
                                                  (lambda-var-list
                                                    gen-var
@@ -7271,338 +7249,338 @@
                                                   (top)
                                                   (top)
                                                   (top))
-                                                 ("1tt"
-                                                  "1ts"
-                                                  "1tr"
-                                                  "1tq"
-                                                  "1tp"
-                                                  "1to"
-                                                  "1tn"
-                                                  "1tm"
-                                                  "1tl"
-                                                  "1tk"
-                                                  "1tj"
-                                                  "1ti"
-                                                  "1th"
-                                                  "1tg"
-                                                  "1tf"
-                                                  "1te"
-                                                  "1td"
-                                                  "1tc"
-                                                  "1tb"
-                                                  "1ta"
-                                                  "1t9"
-                                                  "1t8"
-                                                  "1t7"
-                                                  "1t6"
-                                                  "1t5"
-                                                  "1t4"
-                                                  "1t3"
-                                                  "1t2"
-                                                  "1t1"
-                                                  "1t0"
-                                                  "1sz"
-                                                  "1sy"
-                                                  "1sx"
-                                                  "1sw"
-                                                  "1sv"
-                                                  "1su"
-                                                  "1st"
-                                                  "1ss"
-                                                  "1sr"
-                                                  "1sq"
-                                                  "1sp"
-                                                  "1so"
-                                                  "1sn"
-                                                  "1sm"
-                                                  "1sl"
-                                                  "1sk"
-                                                  "1sj"
-                                                  "1si"
-                                                  "1sh"
-                                                  "1sg"
-                                                  "1sf"
-                                                  "1se"
-                                                  "1sd"
-                                                  "1sc"
-                                                  "1sb"
-                                                  "1sa"
-                                                  "1s9"
-                                                  "1s8"
-                                                  "1s7"
-                                                  "1s6"
-                                                  "1s5"
-                                                  "1s4"
-                                                  "1s3"
-                                                  "1s2"
-                                                  "1s1"
-                                                  "1s0"
-                                                  "1rz"
-                                                  "1ry"
-                                                  "1rx"
-                                                  "1rw"
-                                                  "1rv"
-                                                  "1ru"
-                                                  "1rt"
-                                                  "1rs"
-                                                  "1rr"
-                                                  "1rq"
-                                                  "1rp"
-                                                  "1ro"
-                                                  "1rn"
-                                                  "1rm"
-                                                  "1rl"
-                                                  "1rk"
-                                                  "1rj"
-                                                  "1ri"
-                                                  "1rh"
-                                                  "1rg"
-                                                  "1rf"
-                                                  "1re"
-                                                  "1rd"
-                                                  "1rc"
-                                                  "1rb"
-                                                  "1ra"
-                                                  "1r9"
-                                                  "1r8"
-                                                  "1r7"
-                                                  "1r6"
-                                                  "1r5"
-                                                  "1r4"
-                                                  "1r3"
-                                                  "1r2"
-                                                  "1r1"
-                                                  "1r0"
-                                                  "1qz"
-                                                  "1qy"
-                                                  "1qx"
-                                                  "1qw"
-                                                  "1qv"
-                                                  "1qu"
-                                                  "1qt"
-                                                  "1qs"
-                                                  "1qr"
-                                                  "1qq"
-                                                  "1qp"
-                                                  "1qo"
-                                                  "1qn"
-                                                  "1qm"
-                                                  "1ql"
-                                                  "1qk"
-                                                  "1qj"
-                                                  "1qi"
-                                                  "1qh"
-                                                  "1qg"
-                                                  "1qf"
-                                                  "1qe"
-                                                  "1qd"
-                                                  "1qc"
-                                                  "1qb"
-                                                  "1qa"
-                                                  "1q9"
-                                                  "1q8"
-                                                  "1q7"
-                                                  "1q6"
-                                                  "1q5"
-                                                  "1q4"
-                                                  "1q3"
-                                                  "1q2"
-                                                  "1q1"
-                                                  "1q0"
-                                                  "1pz"
-                                                  "1py"))
+                                                 ("5l"
+                                                  "5k"
+                                                  "5j"
+                                                  "5i"
+                                                  "5h"
+                                                  "5g"
+                                                  "5f"
+                                                  "5e"
+                                                  "5d"
+                                                  "5c"
+                                                  "5b"
+                                                  "5a"
+                                                  "59"
+                                                  "58"
+                                                  "57"
+                                                  "56"
+                                                  "55"
+                                                  "54"
+                                                  "53"
+                                                  "52"
+                                                  "51"
+                                                  "50"
+                                                  "4z"
+                                                  "4y"
+                                                  "4x"
+                                                  "4w"
+                                                  "4v"
+                                                  "4u"
+                                                  "4t"
+                                                  "4s"
+                                                  "4r"
+                                                  "4q"
+                                                  "4p"
+                                                  "4o"
+                                                  "4n"
+                                                  "4m"
+                                                  "4l"
+                                                  "4k"
+                                                  "4j"
+                                                  "4i"
+                                                  "4h"
+                                                  "4g"
+                                                  "4f"
+                                                  "4e"
+                                                  "4d"
+                                                  "4c"
+                                                  "4b"
+                                                  "4a"
+                                                  "49"
+                                                  "48"
+                                                  "47"
+                                                  "46"
+                                                  "45"
+                                                  "44"
+                                                  "43"
+                                                  "42"
+                                                  "41"
+                                                  "40"
+                                                  "3z"
+                                                  "3y"
+                                                  "3x"
+                                                  "3w"
+                                                  "3v"
+                                                  "3u"
+                                                  "3t"
+                                                  "3s"
+                                                  "3r"
+                                                  "3q"
+                                                  "3p"
+                                                  "3o"
+                                                  "3n"
+                                                  "3m"
+                                                  "3l"
+                                                  "3k"
+                                                  "3j"
+                                                  "3i"
+                                                  "3h"
+                                                  "3g"
+                                                  "3f"
+                                                  "3e"
+                                                  "3d"
+                                                  "3c"
+                                                  "3b"
+                                                  "3a"
+                                                  "39"
+                                                  "38"
+                                                  "37"
+                                                  "36"
+                                                  "35"
+                                                  "34"
+                                                  "33"
+                                                  "32"
+                                                  "31"
+                                                  "30"
+                                                  "2z"
+                                                  "2y"
+                                                  "2x"
+                                                  "2w"
+                                                  "2v"
+                                                  "2u"
+                                                  "2t"
+                                                  "2s"
+                                                  "2r"
+                                                  "2q"
+                                                  "2p"
+                                                  "2o"
+                                                  "2n"
+                                                  "2m"
+                                                  "2l"
+                                                  "2k"
+                                                  "2j"
+                                                  "2i"
+                                                  "2h"
+                                                  "2g"
+                                                  "2f"
+                                                  "2e"
+                                                  "2d"
+                                                  "2c"
+                                                  "2b"
+                                                  "2a"
+                                                  "29"
+                                                  "28"
+                                                  "27"
+                                                  "26"
+                                                  "25"
+                                                  "24"
+                                                  "23"
+                                                  "22"
+                                                  "21"
+                                                  "20"
+                                                  "1z"
+                                                  "1y"
+                                                  "1x"
+                                                  "1w"
+                                                  "1v"
+                                                  "1u"
+                                                  "1t"
+                                                  "1s"
+                                                  "1r"
+                                                  "1q"))
                                                #(ribcage
                                                  (define-structure
                                                    define-expansion-accessors
                                                    define-expansion-constructors)
                                                  ((top) (top) (top))
-                                                 ("1og" "1of" "1oe")))
+                                                 ("8" "7" "6")))
                                               (hygiene guile))))
-                                    #{ropt _hoQGWMnyQPAh3k2jhWMMf}#)))
-                          #{tmp _hoQGWMnyQPAh3k2jhWMMn}#)
-                        (let ((#{tmp _hoQGWMnyQPAh3k2jhWMNJ}#
+                                    #{ropt -ANAU$bmvAmthP7L7xwsTA}#)))
+                          #{tmp -ANAU$bmvAmthP7L7xwsTI}#)
+                        (let ((#{tmp -ANAU$bmvAmthP7L7xwsTq}#
                                 ($sc-dispatch
-                                  #{args _hoQGWMnyQPAh3k2jhWMMd}#
+                                  #{args -ANAU$bmvAmthP7L7xwsS$}#
                                   '((any any) . any))))
-                          (if (if #{tmp _hoQGWMnyQPAh3k2jhWMNJ}#
+                          (if (if #{tmp -ANAU$bmvAmthP7L7xwsTq}#
                                 (@apply
-                                  (lambda (#{a _hoQGWMnyQPAh3k2jhWMNN}#
-                                           #{init _hoQGWMnyQPAh3k2jhWMNO}#
-                                           #{b _hoQGWMnyQPAh3k2jhWMNP}#)
-                                    (if (symbol? #{a _hoQGWMnyQPAh3k2jhWMNN}#)
+                                  (lambda (#{a -ANAU$bmvAmthP7L7xwsTu}#
+                                           #{init -ANAU$bmvAmthP7L7xwsTv}#
+                                           #{b -ANAU$bmvAmthP7L7xwsTw}#)
+                                    (if (symbol? #{a -ANAU$bmvAmthP7L7xwsTu}#)
                                       #t
                                       (if (if (vector?
-                                                #{a _hoQGWMnyQPAh3k2jhWMNN}#)
+                                                #{a -ANAU$bmvAmthP7L7xwsTu}#)
                                             (if (= (vector-length
-                                                     #{a _hoQGWMnyQPAh3k2jhWMNN}#)
+                                                     #{a -ANAU$bmvAmthP7L7xwsTu}#)
                                                    4)
                                               (eq? (vector-ref
-                                                     #{a _hoQGWMnyQPAh3k2jhWMNN}#
+                                                     #{a -ANAU$bmvAmthP7L7xwsTu}#
                                                      0)
                                                    'syntax-object)
                                               #f)
                                             #f)
                                         (symbol?
                                           (vector-ref
-                                            #{a _hoQGWMnyQPAh3k2jhWMNN}#
+                                            #{a -ANAU$bmvAmthP7L7xwsTu}#
                                             1))
                                         #f)))
-                                  #{tmp _hoQGWMnyQPAh3k2jhWMNJ}#)
+                                  #{tmp -ANAU$bmvAmthP7L7xwsTq}#)
                                 #f)
                             (@apply
-                              (lambda (#{a _hoQGWMnyQPAh3k2jhWMNq}#
-                                       #{init _hoQGWMnyQPAh3k2jhWMNr}#
-                                       #{b _hoQGWMnyQPAh3k2jhWMNs}#)
-                                (#{opt _hoQGWMnyQPAh3k2jhWMKb}#
-                                  #{b _hoQGWMnyQPAh3k2jhWMNs}#
-                                  #{req _hoQGWMnyQPAh3k2jhWMMe}#
-                                  (cons (list #{a _hoQGWMnyQPAh3k2jhWMNq}#
-                                              #{init _hoQGWMnyQPAh3k2jhWMNr}#)
-                                        #{ropt _hoQGWMnyQPAh3k2jhWMMf}#)))
-                              #{tmp _hoQGWMnyQPAh3k2jhWMNJ}#)
-                            (let ((#{tmp _hoQGWMnyQPAh3k2jhWMNt}#
+                              (lambda (#{a -ANAU$bmvAmthP7L7xwsUL}#
+                                       #{init -ANAU$bmvAmthP7L7xwsUM}#
+                                       #{b -ANAU$bmvAmthP7L7xwsUN}#)
+                                (#{opt -ANAU$bmvAmthP7L7xwsQ8}#
+                                  #{b -ANAU$bmvAmthP7L7xwsUN}#
+                                  #{req -ANAU$bmvAmthP7L7xwsS@}#
+                                  (cons (list #{a -ANAU$bmvAmthP7L7xwsUL}#
+                                              #{init -ANAU$bmvAmthP7L7xwsUM}#)
+                                        #{ropt -ANAU$bmvAmthP7L7xwsTA}#)))
+                              #{tmp -ANAU$bmvAmthP7L7xwsTq}#)
+                            (let ((#{tmp -ANAU$bmvAmthP7L7xwsUO}#
                                     ($sc-dispatch
-                                      #{args _hoQGWMnyQPAh3k2jhWMMd}#
+                                      #{args -ANAU$bmvAmthP7L7xwsS$}#
                                       '(any . any))))
-                              (if (if #{tmp _hoQGWMnyQPAh3k2jhWMNt}#
+                              (if (if #{tmp -ANAU$bmvAmthP7L7xwsUO}#
                                     (@apply
-                                      (lambda (#{a _hoQGWMnyQPAh3k2jhWMNx}#
-                                               #{b _hoQGWMnyQPAh3k2jhWMNy}#)
+                                      (lambda (#{a -ANAU$bmvAmthP7L7xwsUS}#
+                                               #{b -ANAU$bmvAmthP7L7xwsUT}#)
                                         (eq? (syntax->datum
-                                               #{a _hoQGWMnyQPAh3k2jhWMNx}#)
+                                               #{a -ANAU$bmvAmthP7L7xwsUS}#)
                                              #:key))
-                                      #{tmp _hoQGWMnyQPAh3k2jhWMNt}#)
+                                      #{tmp -ANAU$bmvAmthP7L7xwsUO}#)
                                     #f)
                                 (@apply
-                                  (lambda (#{a _hoQGWMnyQPAh3k2jhWMNz}#
-                                           #{b _hoQGWMnyQPAh3k2jhWMN0}#)
-                                    (#{key _hoQGWMnyQPAh3k2jhWMKc}#
-                                      #{b _hoQGWMnyQPAh3k2jhWMN0}#
-                                      #{req _hoQGWMnyQPAh3k2jhWMMe}#
-                                      (reverse #{ropt _hoQGWMnyQPAh3k2jhWMMf}#)
+                                  (lambda (#{a -ANAU$bmvAmthP7L7xwsUU}#
+                                           #{b -ANAU$bmvAmthP7L7xwsUV}#)
+                                    (#{key -ANAU$bmvAmthP7L7xwsQ9}#
+                                      #{b -ANAU$bmvAmthP7L7xwsUV}#
+                                      #{req -ANAU$bmvAmthP7L7xwsS@}#
+                                      (reverse #{ropt -ANAU$bmvAmthP7L7xwsTA}#)
                                       '()))
-                                  #{tmp _hoQGWMnyQPAh3k2jhWMNt}#)
-                                (let ((#{tmp _hoQGWMnyQPAh3k2jhWMN3}#
+                                  #{tmp -ANAU$bmvAmthP7L7xwsUO}#)
+                                (let ((#{tmp -ANAU$bmvAmthP7L7xwsUY}#
                                         ($sc-dispatch
-                                          #{args _hoQGWMnyQPAh3k2jhWMMd}#
+                                          #{args -ANAU$bmvAmthP7L7xwsS$}#
                                           '(any any))))
-                                  (if (if #{tmp _hoQGWMnyQPAh3k2jhWMN3}#
+                                  (if (if #{tmp -ANAU$bmvAmthP7L7xwsUY}#
                                         (@apply
-                                          (lambda (#{a _hoQGWMnyQPAh3k2jhWMN7}#
-                                                   #{b _hoQGWMnyQPAh3k2jhWMN8}#)
+                                          (lambda (#{a -ANAU$bmvAmthP7L7xwsUc}#
+                                                   #{b -ANAU$bmvAmthP7L7xwsUd}#)
                                             (eq? (syntax->datum
-                                                   #{a _hoQGWMnyQPAh3k2jhWMN7}#)
+                                                   #{a -ANAU$bmvAmthP7L7xwsUc}#)
                                                  #:rest))
-                                          #{tmp _hoQGWMnyQPAh3k2jhWMN3}#)
+                                          #{tmp -ANAU$bmvAmthP7L7xwsUY}#)
                                         #f)
                                     (@apply
-                                      (lambda (#{a _hoQGWMnyQPAh3k2jhWMN9}#
-                                               #{b _hoQGWMnyQPAh3k2jhWMN$}#)
-                                        (#{rest _hoQGWMnyQPAh3k2jhWMKd}#
-                                          #{b _hoQGWMnyQPAh3k2jhWMN$}#
-                                          #{req _hoQGWMnyQPAh3k2jhWMMe}#
+                                      (lambda (#{a -ANAU$bmvAmthP7L7xwsUe}#
+                                               #{b -ANAU$bmvAmthP7L7xwsUf}#)
+                                        (#{rest -ANAU$bmvAmthP7L7xwsQ$}#
+                                          #{b -ANAU$bmvAmthP7L7xwsUf}#
+                                          #{req -ANAU$bmvAmthP7L7xwsS@}#
                                           (reverse
-                                            #{ropt _hoQGWMnyQPAh3k2jhWMMf}#)
+                                            #{ropt -ANAU$bmvAmthP7L7xwsTA}#)
                                           '()))
-                                      #{tmp _hoQGWMnyQPAh3k2jhWMN3}#)
-                                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWMOB}#
-                                            (list #{args _hoQGWMnyQPAh3k2jhWMMd}#)))
+                                      #{tmp -ANAU$bmvAmthP7L7xwsUY}#)
+                                    (let ((#{tmp -ANAU$bmvAmthP7L7xwsUi}#
+                                            (list #{args -ANAU$bmvAmthP7L7xwsS$}#)))
                                       (if (@apply
-                                            (lambda (#{r _hoQGWMnyQPAh3k2jhWMOD}#)
+                                            (lambda (#{r -ANAU$bmvAmthP7L7xwsUk}#)
                                               (if (symbol?
-                                                    #{r _hoQGWMnyQPAh3k2jhWMOD}#)
+                                                    #{r -ANAU$bmvAmthP7L7xwsUk}#)
                                                 #t
                                                 (if (if (vector?
-                                                          #{r _hoQGWMnyQPAh3k2jhWMOD}#)
+                                                          #{r -ANAU$bmvAmthP7L7xwsUk}#)
                                                       (if (= (vector-length
-                                                               #{r _hoQGWMnyQPAh3k2jhWMOD}#)
+                                                               #{r -ANAU$bmvAmthP7L7xwsUk}#)
                                                              4)
                                                         (eq? (vector-ref
-                                                               #{r _hoQGWMnyQPAh3k2jhWMOD}#
+                                                               #{r -ANAU$bmvAmthP7L7xwsUk}#
                                                                0)
                                                              'syntax-object)
                                                         #f)
                                                       #f)
                                                   (symbol?
                                                     (vector-ref
-                                                      #{r _hoQGWMnyQPAh3k2jhWMOD}#
+                                                      #{r -ANAU$bmvAmthP7L7xwsUk}#
                                                       1))
                                                   #f)))
-                                            #{tmp _hoQGWMnyQPAh3k2jhWMOB}#)
+                                            #{tmp -ANAU$bmvAmthP7L7xwsUi}#)
                                         (@apply
-                                          (lambda (#{r _hoQGWMnyQPAh3k2jhWMOh}#)
-                                            (#{rest _hoQGWMnyQPAh3k2jhWMKd}#
-                                              #{r _hoQGWMnyQPAh3k2jhWMOh}#
-                                              #{req _hoQGWMnyQPAh3k2jhWMMe}#
+                                          (lambda (#{r -ANAU$bmvAmthP7L7xwsVC}#)
+                                            (#{rest -ANAU$bmvAmthP7L7xwsQ$}#
+                                              #{r -ANAU$bmvAmthP7L7xwsVC}#
+                                              #{req -ANAU$bmvAmthP7L7xwsS@}#
                                               (reverse
-                                                #{ropt _hoQGWMnyQPAh3k2jhWMMf}#)
+                                                #{ropt -ANAU$bmvAmthP7L7xwsTA}#)
                                               '()))
-                                          #{tmp _hoQGWMnyQPAh3k2jhWMOB}#)
+                                          #{tmp -ANAU$bmvAmthP7L7xwsUi}#)
                                         (syntax-violation
                                           'lambda*
                                           "invalid optional argument list"
-                                          #{orig-args _hoQGWMnyQPAh3k2jhWMKZ}#
-                                          #{args _hoQGWMnyQPAh3k2jhWMMd}#)))))))))))))))
-            (#{key _hoQGWMnyQPAh3k2jhWMKc}#
-              (lambda (#{args _hoQGWMnyQPAh3k2jhWMO0}#
-                       #{req _hoQGWMnyQPAh3k2jhWMO1}#
-                       #{opt _hoQGWMnyQPAh3k2jhWMO2}#
-                       #{rkey _hoQGWMnyQPAh3k2jhWMO3}#)
-                (let ((#{tmp _hoQGWMnyQPAh3k2jhWMO5}#
+                                          #{orig-args -ANAU$bmvAmthP7L7xwsQ6}#
+                                          #{args -ANAU$bmvAmthP7L7xwsS$}#)))))))))))))))
+            (#{key -ANAU$bmvAmthP7L7xwsQ9}#
+              (lambda (#{args -ANAU$bmvAmthP7L7xwsVV}#
+                       #{req -ANAU$bmvAmthP7L7xwsVW}#
+                       #{opt -ANAU$bmvAmthP7L7xwsVX}#
+                       #{rkey -ANAU$bmvAmthP7L7xwsVY}#)
+                (let ((#{tmp -ANAU$bmvAmthP7L7xwsVa}#
                         ($sc-dispatch
-                          #{args _hoQGWMnyQPAh3k2jhWMO0}#
+                          #{args -ANAU$bmvAmthP7L7xwsVV}#
                           '())))
-                  (if #{tmp _hoQGWMnyQPAh3k2jhWMO5}#
+                  (if #{tmp -ANAU$bmvAmthP7L7xwsVa}#
                     (@apply
                       (lambda ()
-                        (#{check _hoQGWMnyQPAh3k2jhWMKe}#
-                          #{req _hoQGWMnyQPAh3k2jhWMO1}#
-                          #{opt _hoQGWMnyQPAh3k2jhWMO2}#
+                        (#{check -ANAU$bmvAmthP7L7xwsQ@}#
+                          #{req -ANAU$bmvAmthP7L7xwsVW}#
+                          #{opt -ANAU$bmvAmthP7L7xwsVX}#
                           #f
                           (cons #f
-                                (reverse #{rkey _hoQGWMnyQPAh3k2jhWMO3}#))))
-                      #{tmp _hoQGWMnyQPAh3k2jhWMO5}#)
-                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWMO@}#
+                                (reverse #{rkey -ANAU$bmvAmthP7L7xwsVY}#))))
+                      #{tmp -ANAU$bmvAmthP7L7xwsVa}#)
+                    (let ((#{tmp -ANAU$bmvAmthP7L7xwsVg}#
                             ($sc-dispatch
-                              #{args _hoQGWMnyQPAh3k2jhWMO0}#
+                              #{args -ANAU$bmvAmthP7L7xwsVV}#
                               '(any . any))))
-                      (if (if #{tmp _hoQGWMnyQPAh3k2jhWMO@}#
+                      (if (if #{tmp -ANAU$bmvAmthP7L7xwsVg}#
                             (@apply
-                              (lambda (#{a _hoQGWMnyQPAh3k2jhWMPD}#
-                                       #{b _hoQGWMnyQPAh3k2jhWMPE}#)
-                                (if (symbol? #{a _hoQGWMnyQPAh3k2jhWMPD}#)
+                              (lambda (#{a -ANAU$bmvAmthP7L7xwsVk}#
+                                       #{b -ANAU$bmvAmthP7L7xwsVl}#)
+                                (if (symbol? #{a -ANAU$bmvAmthP7L7xwsVk}#)
                                   #t
                                   (if (if (vector?
-                                            #{a _hoQGWMnyQPAh3k2jhWMPD}#)
+                                            #{a -ANAU$bmvAmthP7L7xwsVk}#)
                                         (if (= (vector-length
-                                                 #{a _hoQGWMnyQPAh3k2jhWMPD}#)
+                                                 #{a -ANAU$bmvAmthP7L7xwsVk}#)
                                                4)
                                           (eq? (vector-ref
-                                                 #{a _hoQGWMnyQPAh3k2jhWMPD}#
+                                                 #{a -ANAU$bmvAmthP7L7xwsVk}#
                                                  0)
                                                'syntax-object)
                                           #f)
                                         #f)
                                     (symbol?
                                       (vector-ref
-                                        #{a _hoQGWMnyQPAh3k2jhWMPD}#
+                                        #{a -ANAU$bmvAmthP7L7xwsVk}#
                                         1))
                                     #f)))
-                              #{tmp _hoQGWMnyQPAh3k2jhWMO@}#)
+                              #{tmp -ANAU$bmvAmthP7L7xwsVg}#)
                             #f)
                         (@apply
-                          (lambda (#{a _hoQGWMnyQPAh3k2jhWMPf}#
-                                   #{b _hoQGWMnyQPAh3k2jhWMPg}#)
-                            (let ((#{tmp _hoQGWMnyQPAh3k2jhWMPh}#
+                          (lambda (#{a -ANAU$bmvAmthP7L7xwsWA}#
+                                   #{b -ANAU$bmvAmthP7L7xwsWB}#)
+                            (let ((#{tmp -ANAU$bmvAmthP7L7xwsWC}#
                                     (symbol->keyword
                                       (syntax->datum
-                                        #{a _hoQGWMnyQPAh3k2jhWMPf}#))))
-                              (#{key _hoQGWMnyQPAh3k2jhWMKc}#
-                                #{b _hoQGWMnyQPAh3k2jhWMPg}#
-                                #{req _hoQGWMnyQPAh3k2jhWMO1}#
-                                #{opt _hoQGWMnyQPAh3k2jhWMO2}#
-                                (cons (cons #{tmp _hoQGWMnyQPAh3k2jhWMPh}#
-                                            (cons #{a _hoQGWMnyQPAh3k2jhWMPf}#
+                                        #{a -ANAU$bmvAmthP7L7xwsWA}#))))
+                              (#{key -ANAU$bmvAmthP7L7xwsQ9}#
+                                #{b -ANAU$bmvAmthP7L7xwsWB}#
+                                #{req -ANAU$bmvAmthP7L7xwsVW}#
+                                #{opt -ANAU$bmvAmthP7L7xwsVX}#
+                                (cons (cons #{tmp -ANAU$bmvAmthP7L7xwsWC}#
+                                            (cons #{a -ANAU$bmvAmthP7L7xwsWA}#
                                                   '(#(syntax-object
                                                       #f
                                                       ((top)
@@ -7610,11 +7588,11 @@
                                                        #(ribcage
                                                          #(k)
                                                          #((top))
-                                                         #("2fs"))
+                                                         #("rk"))
                                                        #(ribcage
                                                          #(a b)
                                                          #((top) (top))
-                                                         #("2fq" "2fr"))
+                                                         #("ri" "rj"))
                                                        #(ribcage () () ())
                                                        #(ribcage
                                                          #(args req opt rkey)
@@ -7622,10 +7600,10 @@
                                                            (top)
                                                            (top)
                                                            (top))
-                                                         #("2fk"
-                                                           "2fl"
-                                                           "2fm"
-                                                           "2fn"))
+                                                         #("rc"
+                                                           "rd"
+                                                           "re"
+                                                           "rf"))
                                                        #(ribcage
                                                          (check rest
                                                                 key
@@ -7636,15 +7614,15 @@
                                                           (top)
                                                           (top)
                                                           (top))
-                                                         ("2ea"
-                                                          "2e9"
-                                                          "2e8"
-                                                          "2e7"
-                                                          "2e6"))
+                                                         ("q2"
+                                                          "q1"
+                                                          "q0"
+                                                          "pz"
+                                                          "py"))
                                                        #(ribcage
                                                          #(orig-args)
                                                          #((top))
-                                                         #("2e5"))
+                                                         #("px"))
                                                        #(ribcage
                                                          (lambda-var-list
                                                            gen-var
@@ -7926,1063 +7904,1063 @@
                                                           (top)
                                                           (top)
                                                           (top))
-                                                         ("1tt"
-                                                          "1ts"
-                                                          "1tr"
-                                                          "1tq"
-                                                          "1tp"
-                                                          "1to"
-                                                          "1tn"
-                                                          "1tm"
-                                                          "1tl"
-                                                          "1tk"
-                                                          "1tj"
-                                                          "1ti"
-                                                          "1th"
-                                                          "1tg"
-                                                          "1tf"
-                                                          "1te"
-                                                          "1td"
-                                                          "1tc"
-                                                          "1tb"
-                                                          "1ta"
-                                                          "1t9"
-                                                          "1t8"
-                                                          "1t7"
-                                                          "1t6"
-                                                          "1t5"
-                                                          "1t4"
-                                                          "1t3"
-                                                          "1t2"
-                                                          "1t1"
-                                                          "1t0"
-                                                          "1sz"
-                                                          "1sy"
-                                                          "1sx"
-                                                          "1sw"
-                                                          "1sv"
-                                                          "1su"
-                                                          "1st"
-                                                          "1ss"
-                                                          "1sr"
-                                                          "1sq"
-                                                          "1sp"
-                                                          "1so"
-                                                          "1sn"
-                                                          "1sm"
-                                                          "1sl"
-                                                          "1sk"
-                                                          "1sj"
-                                                          "1si"
-                                                          "1sh"
-                                                          "1sg"
-                                                          "1sf"
-                                                          "1se"
-                                                          "1sd"
-                                                          "1sc"
-                                                          "1sb"
-                                                          "1sa"
-                                                          "1s9"
-                                                          "1s8"
-                                                          "1s7"
-                                                          "1s6"
-                                                          "1s5"
-                                                          "1s4"
-                                                          "1s3"
-                                                          "1s2"
-                                                          "1s1"
-                                                          "1s0"
-                                                          "1rz"
-                                                          "1ry"
-                                                          "1rx"
-                                                          "1rw"
-                                                          "1rv"
-                                                          "1ru"
-                                                          "1rt"
-                                                          "1rs"
-                                                          "1rr"
-                                                          "1rq"
-                                                          "1rp"
-                                                          "1ro"
-                                                          "1rn"
-                                                          "1rm"
-                                                          "1rl"
-                                                          "1rk"
-                                                          "1rj"
-                                                          "1ri"
-                                                          "1rh"
-                                                          "1rg"
-                                                          "1rf"
-                                                          "1re"
-                                                          "1rd"
-                                                          "1rc"
-                                                          "1rb"
-                                                          "1ra"
-                                                          "1r9"
-                                                          "1r8"
-                                                          "1r7"
-                                                          "1r6"
-                                                          "1r5"
-                                                          "1r4"
-                                                          "1r3"
-                                                          "1r2"
-                                                          "1r1"
-                                                          "1r0"
-                                                          "1qz"
-                                                          "1qy"
-                                                          "1qx"
-                                                          "1qw"
-                                                          "1qv"
-                                                          "1qu"
-                                                          "1qt"
-                                                          "1qs"
-                                                          "1qr"
-                                                          "1qq"
-                                                          "1qp"
-                                                          "1qo"
-                                                          "1qn"
-                                                          "1qm"
-                                                          "1ql"
-                                                          "1qk"
-                                                          "1qj"
-                                                          "1qi"
-                                                          "1qh"
-                                                          "1qg"
-                                                          "1qf"
-                                                          "1qe"
-                                                          "1qd"
-                                                          "1qc"
-                                                          "1qb"
-                                                          "1qa"
-                                                          "1q9"
-                                                          "1q8"
-                                                          "1q7"
-                                                          "1q6"
-                                                          "1q5"
-                                                          "1q4"
-                                                          "1q3"
-                                                          "1q2"
-                                                          "1q1"
-                                                          "1q0"
-                                                          "1pz"
-                                                          "1py"))
+                                                         ("5l"
+                                                          "5k"
+                                                          "5j"
+                                                          "5i"
+                                                          "5h"
+                                                          "5g"
+                                                          "5f"
+                                                          "5e"
+                                                          "5d"
+                                                          "5c"
+                                                          "5b"
+                                                          "5a"
+                                                          "59"
+                                                          "58"
+                                                          "57"
+                                                          "56"
+                                                          "55"
+                                                          "54"
+                                                          "53"
+                                                          "52"
+                                                          "51"
+                                                          "50"
+                                                          "4z"
+                                                          "4y"
+                                                          "4x"
+                                                          "4w"
+                                                          "4v"
+                                                          "4u"
+                                                          "4t"
+                                                          "4s"
+                                                          "4r"
+                                                          "4q"
+                                                          "4p"
+                                                          "4o"
+                                                          "4n"
+                                                          "4m"
+                                                          "4l"
+                                                          "4k"
+                                                          "4j"
+                                                          "4i"
+                                                          "4h"
+                                                          "4g"
+                                                          "4f"
+                                                          "4e"
+                                                          "4d"
+                                                          "4c"
+                                                          "4b"
+                                                          "4a"
+                                                          "49"
+                                                          "48"
+                                                          "47"
+                                                          "46"
+                                                          "45"
+                                                          "44"
+                                                          "43"
+                                                          "42"
+                                                          "41"
+                                                          "40"
+                                                          "3z"
+                                                          "3y"
+                                                          "3x"
+                                                          "3w"
+                                                          "3v"
+                                                          "3u"
+                                                          "3t"
+                                                          "3s"
+                                                          "3r"
+                                                          "3q"
+                                                          "3p"
+                                                          "3o"
+                                                          "3n"
+                                                          "3m"
+                                                          "3l"
+                                                          "3k"
+                                                          "3j"
+                                                          "3i"
+                                                          "3h"
+                                                          "3g"
+                                                          "3f"
+                                                          "3e"
+                                                          "3d"
+                                                          "3c"
+                                                          "3b"
+                                                          "3a"
+                                                          "39"
+                                                          "38"
+                                                          "37"
+                                                          "36"
+                                                          "35"
+                                                          "34"
+                                                          "33"
+                                                          "32"
+                                                          "31"
+                                                          "30"
+                                                          "2z"
+                                                          "2y"
+                                                          "2x"
+                                                          "2w"
+                                                          "2v"
+                                                          "2u"
+                                                          "2t"
+                                                          "2s"
+                                                          "2r"
+                                                          "2q"
+                                                          "2p"
+                                                          "2o"
+                                                          "2n"
+                                                          "2m"
+                                                          "2l"
+                                                          "2k"
+                                                          "2j"
+                                                          "2i"
+                                                          "2h"
+                                                          "2g"
+                                                          "2f"
+                                                          "2e"
+                                                          "2d"
+                                                          "2c"
+                                                          "2b"
+                                                          "2a"
+                                                          "29"
+                                                          "28"
+                                                          "27"
+                                                          "26"
+                                                          "25"
+                                                          "24"
+                                                          "23"
+                                                          "22"
+                                                          "21"
+                                                          "20"
+                                                          "1z"
+                                                          "1y"
+                                                          "1x"
+                                                          "1w"
+                                                          "1v"
+                                                          "1u"
+                                                          "1t"
+                                                          "1s"
+                                                          "1r"
+                                                          "1q"))
                                                        #(ribcage
                                                          (define-structure
                                                            define-expansion-accessors
                                                            define-expansion-constructors)
                                                          ((top) (top) (top))
-                                                         ("1og" "1of" "1oe")))
+                                                         ("8" "7" "6")))
                                                       (hygiene guile)))))
-                                      #{rkey _hoQGWMnyQPAh3k2jhWMO3}#))))
-                          #{tmp _hoQGWMnyQPAh3k2jhWMO@}#)
-                        (let ((#{tmp _hoQGWMnyQPAh3k2jhWMPk}#
+                                      #{rkey -ANAU$bmvAmthP7L7xwsVY}#))))
+                          #{tmp -ANAU$bmvAmthP7L7xwsVg}#)
+                        (let ((#{tmp -ANAU$bmvAmthP7L7xwsWF}#
                                 ($sc-dispatch
-                                  #{args _hoQGWMnyQPAh3k2jhWMO0}#
+                                  #{args -ANAU$bmvAmthP7L7xwsVV}#
                                   '((any any) . any))))
-                          (if (if #{tmp _hoQGWMnyQPAh3k2jhWMPk}#
+                          (if (if #{tmp -ANAU$bmvAmthP7L7xwsWF}#
                                 (@apply
-                                  (lambda (#{a _hoQGWMnyQPAh3k2jhWMPo}#
-                                           #{init _hoQGWMnyQPAh3k2jhWMPp}#
-                                           #{b _hoQGWMnyQPAh3k2jhWMPq}#)
-                                    (if (symbol? #{a _hoQGWMnyQPAh3k2jhWMPo}#)
+                                  (lambda (#{a -ANAU$bmvAmthP7L7xwsWJ}#
+                                           #{init -ANAU$bmvAmthP7L7xwsWK}#
+                                           #{b -ANAU$bmvAmthP7L7xwsWL}#)
+                                    (if (symbol? #{a -ANAU$bmvAmthP7L7xwsWJ}#)
                                       #t
                                       (if (if (vector?
-                                                #{a _hoQGWMnyQPAh3k2jhWMPo}#)
+                                                #{a -ANAU$bmvAmthP7L7xwsWJ}#)
                                             (if (= (vector-length
-                                                     #{a _hoQGWMnyQPAh3k2jhWMPo}#)
+                                                     #{a -ANAU$bmvAmthP7L7xwsWJ}#)
                                                    4)
                                               (eq? (vector-ref
-                                                     #{a _hoQGWMnyQPAh3k2jhWMPo}#
+                                                     #{a -ANAU$bmvAmthP7L7xwsWJ}#
                                                      0)
                                                    'syntax-object)
                                               #f)
                                             #f)
                                         (symbol?
                                           (vector-ref
-                                            #{a _hoQGWMnyQPAh3k2jhWMPo}#
+                                            #{a -ANAU$bmvAmthP7L7xwsWJ}#
                                             1))
                                         #f)))
-                                  #{tmp _hoQGWMnyQPAh3k2jhWMPk}#)
+                                  #{tmp -ANAU$bmvAmthP7L7xwsWF}#)
                                 #f)
                             (@apply
-                              (lambda (#{a _hoQGWMnyQPAh3k2jhWMQF}#
-                                       #{init _hoQGWMnyQPAh3k2jhWMQG}#
-                                       #{b _hoQGWMnyQPAh3k2jhWMQH}#)
-                                (let ((#{tmp _hoQGWMnyQPAh3k2jhWMQI}#
+                              (lambda (#{a -ANAU$bmvAmthP7L7xwsWm}#
+                                       #{init -ANAU$bmvAmthP7L7xwsWn}#
+                                       #{b -ANAU$bmvAmthP7L7xwsWo}#)
+                                (let ((#{tmp -ANAU$bmvAmthP7L7xwsWp}#
                                         (symbol->keyword
                                           (syntax->datum
-                                            #{a _hoQGWMnyQPAh3k2jhWMQF}#))))
-                                  (#{key _hoQGWMnyQPAh3k2jhWMKc}#
-                                    #{b _hoQGWMnyQPAh3k2jhWMQH}#
-                                    #{req _hoQGWMnyQPAh3k2jhWMO1}#
-                                    #{opt _hoQGWMnyQPAh3k2jhWMO2}#
-                                    (cons (list #{tmp _hoQGWMnyQPAh3k2jhWMQI}#
-                                                #{a _hoQGWMnyQPAh3k2jhWMQF}#
-                                                #{init _hoQGWMnyQPAh3k2jhWMQG}#)
-                                          #{rkey _hoQGWMnyQPAh3k2jhWMO3}#))))
-                              #{tmp _hoQGWMnyQPAh3k2jhWMPk}#)
-                            (let ((#{tmp _hoQGWMnyQPAh3k2jhWMQL}#
+                                            #{a -ANAU$bmvAmthP7L7xwsWm}#))))
+                                  (#{key -ANAU$bmvAmthP7L7xwsQ9}#
+                                    #{b -ANAU$bmvAmthP7L7xwsWo}#
+                                    #{req -ANAU$bmvAmthP7L7xwsVW}#
+                                    #{opt -ANAU$bmvAmthP7L7xwsVX}#
+                                    (cons (list #{tmp -ANAU$bmvAmthP7L7xwsWp}#
+                                                #{a -ANAU$bmvAmthP7L7xwsWm}#
+                                                #{init -ANAU$bmvAmthP7L7xwsWn}#)
+                                          #{rkey -ANAU$bmvAmthP7L7xwsVY}#))))
+                              #{tmp -ANAU$bmvAmthP7L7xwsWF}#)
+                            (let ((#{tmp -ANAU$bmvAmthP7L7xwsWs}#
                                     ($sc-dispatch
-                                      #{args _hoQGWMnyQPAh3k2jhWMO0}#
+                                      #{args -ANAU$bmvAmthP7L7xwsVV}#
                                       '((any any any) . any))))
-                              (if (if #{tmp _hoQGWMnyQPAh3k2jhWMQL}#
+                              (if (if #{tmp -ANAU$bmvAmthP7L7xwsWs}#
                                     (@apply
-                                      (lambda (#{a _hoQGWMnyQPAh3k2jhWMQP}#
-                                               #{init _hoQGWMnyQPAh3k2jhWMQQ}#
-                                               #{k _hoQGWMnyQPAh3k2jhWMQR}#
-                                               #{b _hoQGWMnyQPAh3k2jhWMQS}#)
+                                      (lambda (#{a -ANAU$bmvAmthP7L7xwsWw}#
+                                               #{init -ANAU$bmvAmthP7L7xwsWx}#
+                                               #{k -ANAU$bmvAmthP7L7xwsWy}#
+                                               #{b -ANAU$bmvAmthP7L7xwsWz}#)
                                         (if (if (symbol?
-                                                  #{a _hoQGWMnyQPAh3k2jhWMQP}#)
+                                                  #{a -ANAU$bmvAmthP7L7xwsWw}#)
                                               #t
                                               (if (if (vector?
-                                                        #{a _hoQGWMnyQPAh3k2jhWMQP}#)
+                                                        #{a -ANAU$bmvAmthP7L7xwsWw}#)
                                                     (if (= (vector-length
-                                                             #{a _hoQGWMnyQPAh3k2jhWMQP}#)
+                                                             #{a -ANAU$bmvAmthP7L7xwsWw}#)
                                                            4)
                                                       (eq? (vector-ref
-                                                             #{a _hoQGWMnyQPAh3k2jhWMQP}#
+                                                             #{a -ANAU$bmvAmthP7L7xwsWw}#
                                                              0)
                                                            'syntax-object)
                                                       #f)
                                                     #f)
                                                 (symbol?
                                                   (vector-ref
-                                                    #{a _hoQGWMnyQPAh3k2jhWMQP}#
+                                                    #{a -ANAU$bmvAmthP7L7xwsWw}#
                                                     1))
                                                 #f))
                                           (keyword?
                                             (syntax->datum
-                                              #{k _hoQGWMnyQPAh3k2jhWMQR}#))
+                                              #{k -ANAU$bmvAmthP7L7xwsWy}#))
                                           #f))
-                                      #{tmp _hoQGWMnyQPAh3k2jhWMQL}#)
+                                      #{tmp -ANAU$bmvAmthP7L7xwsWs}#)
                                     #f)
                                 (@apply
-                                  (lambda (#{a _hoQGWMnyQPAh3k2jhWMQt}#
-                                           #{init _hoQGWMnyQPAh3k2jhWMQu}#
-                                           #{k _hoQGWMnyQPAh3k2jhWMQv}#
-                                           #{b _hoQGWMnyQPAh3k2jhWMQw}#)
-                                    (#{key _hoQGWMnyQPAh3k2jhWMKc}#
-                                      #{b _hoQGWMnyQPAh3k2jhWMQw}#
-                                      #{req _hoQGWMnyQPAh3k2jhWMO1}#
-                                      #{opt _hoQGWMnyQPAh3k2jhWMO2}#
-                                      (cons (list #{k _hoQGWMnyQPAh3k2jhWMQv}#
-                                                  #{a _hoQGWMnyQPAh3k2jhWMQt}#
-                                                  #{init _hoQGWMnyQPAh3k2jhWMQu}#)
-                                            #{rkey _hoQGWMnyQPAh3k2jhWMO3}#)))
-                                  #{tmp _hoQGWMnyQPAh3k2jhWMQL}#)
-                                (let ((#{tmp _hoQGWMnyQPAh3k2jhWMQx}#
+                                  (lambda (#{a -ANAU$bmvAmthP7L7xwsXO}#
+                                           #{init -ANAU$bmvAmthP7L7xwsXP}#
+                                           #{k -ANAU$bmvAmthP7L7xwsXQ}#
+                                           #{b -ANAU$bmvAmthP7L7xwsXR}#)
+                                    (#{key -ANAU$bmvAmthP7L7xwsQ9}#
+                                      #{b -ANAU$bmvAmthP7L7xwsXR}#
+                                      #{req -ANAU$bmvAmthP7L7xwsVW}#
+                                      #{opt -ANAU$bmvAmthP7L7xwsVX}#
+                                      (cons (list #{k -ANAU$bmvAmthP7L7xwsXQ}#
+                                                  #{a -ANAU$bmvAmthP7L7xwsXO}#
+                                                  #{init -ANAU$bmvAmthP7L7xwsXP}#)
+                                            #{rkey -ANAU$bmvAmthP7L7xwsVY}#)))
+                                  #{tmp -ANAU$bmvAmthP7L7xwsWs}#)
+                                (let ((#{tmp -ANAU$bmvAmthP7L7xwsXS}#
                                         ($sc-dispatch
-                                          #{args _hoQGWMnyQPAh3k2jhWMO0}#
+                                          #{args -ANAU$bmvAmthP7L7xwsVV}#
                                           '(any))))
-                                  (if (if #{tmp _hoQGWMnyQPAh3k2jhWMQx}#
+                                  (if (if #{tmp -ANAU$bmvAmthP7L7xwsXS}#
                                         (@apply
-                                          (lambda (#{aok _hoQGWMnyQPAh3k2jhWMQ1}#)
+                                          (lambda (#{aok -ANAU$bmvAmthP7L7xwsXW}#)
                                             (eq? (syntax->datum
-                                                   #{aok _hoQGWMnyQPAh3k2jhWMQ1}#)
+                                                   #{aok -ANAU$bmvAmthP7L7xwsXW}#)
                                                  #:allow-other-keys))
-                                          #{tmp _hoQGWMnyQPAh3k2jhWMQx}#)
+                                          #{tmp -ANAU$bmvAmthP7L7xwsXS}#)
                                         #f)
                                     (@apply
-                                      (lambda (#{aok _hoQGWMnyQPAh3k2jhWMQ2}#)
-                                        (#{check _hoQGWMnyQPAh3k2jhWMKe}#
-                                          #{req _hoQGWMnyQPAh3k2jhWMO1}#
-                                          #{opt _hoQGWMnyQPAh3k2jhWMO2}#
+                                      (lambda (#{aok -ANAU$bmvAmthP7L7xwsXX}#)
+                                        (#{check -ANAU$bmvAmthP7L7xwsQ@}#
+                                          #{req -ANAU$bmvAmthP7L7xwsVW}#
+                                          #{opt -ANAU$bmvAmthP7L7xwsVX}#
                                           #f
                                           (cons #t
                                                 (reverse
-                                                  #{rkey _hoQGWMnyQPAh3k2jhWMO3}#))))
-                                      #{tmp _hoQGWMnyQPAh3k2jhWMQx}#)
-                                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWMQ5}#
+                                                  #{rkey -ANAU$bmvAmthP7L7xwsVY}#))))
+                                      #{tmp -ANAU$bmvAmthP7L7xwsXS}#)
+                                    (let ((#{tmp -ANAU$bmvAmthP7L7xwsXa}#
                                             ($sc-dispatch
-                                              #{args _hoQGWMnyQPAh3k2jhWMO0}#
+                                              #{args -ANAU$bmvAmthP7L7xwsVV}#
                                               '(any any any))))
-                                      (if (if #{tmp _hoQGWMnyQPAh3k2jhWMQ5}#
+                                      (if (if #{tmp -ANAU$bmvAmthP7L7xwsXa}#
                                             (@apply
-                                              (lambda (#{aok _hoQGWMnyQPAh3k2jhWMQ9}#
-                                                       #{a _hoQGWMnyQPAh3k2jhWMQ$}#
-                                                       #{b _hoQGWMnyQPAh3k2jhWMQ@}#)
+                                              (lambda (#{aok -ANAU$bmvAmthP7L7xwsXe}#
+                                                       #{a -ANAU$bmvAmthP7L7xwsXf}#
+                                                       #{b -ANAU$bmvAmthP7L7xwsXg}#)
                                                 (if (eq? (syntax->datum
-                                                           #{aok _hoQGWMnyQPAh3k2jhWMQ9}#)
+                                                           #{aok -ANAU$bmvAmthP7L7xwsXe}#)
                                                          #:allow-other-keys)
                                                   (eq? (syntax->datum
-                                                         #{a _hoQGWMnyQPAh3k2jhWMQ$}#)
+                                                         #{a -ANAU$bmvAmthP7L7xwsXf}#)
                                                        #:rest)
                                                   #f))
-                                              #{tmp _hoQGWMnyQPAh3k2jhWMQ5}#)
+                                              #{tmp -ANAU$bmvAmthP7L7xwsXa}#)
                                             #f)
                                         (@apply
-                                          (lambda (#{aok _hoQGWMnyQPAh3k2jhWMRA}#
-                                                   #{a _hoQGWMnyQPAh3k2jhWMRB}#
-                                                   #{b _hoQGWMnyQPAh3k2jhWMRC}#)
-                                            (#{rest _hoQGWMnyQPAh3k2jhWMKd}#
-                                              #{b _hoQGWMnyQPAh3k2jhWMRC}#
-                                              #{req _hoQGWMnyQPAh3k2jhWMO1}#
-                                              #{opt _hoQGWMnyQPAh3k2jhWMO2}#
+                                          (lambda (#{aok -ANAU$bmvAmthP7L7xwsXh}#
+                                                   #{a -ANAU$bmvAmthP7L7xwsXi}#
+                                                   #{b -ANAU$bmvAmthP7L7xwsXj}#)
+                                            (#{rest -ANAU$bmvAmthP7L7xwsQ$}#
+                                              #{b -ANAU$bmvAmthP7L7xwsXj}#
+                                              #{req -ANAU$bmvAmthP7L7xwsVW}#
+                                              #{opt -ANAU$bmvAmthP7L7xwsVX}#
                                               (cons #t
                                                     (reverse
-                                                      #{rkey _hoQGWMnyQPAh3k2jhWMO3}#))))
-                                          #{tmp _hoQGWMnyQPAh3k2jhWMQ5}#)
-                                        (let ((#{tmp _hoQGWMnyQPAh3k2jhWMRF}#
+                                                      #{rkey -ANAU$bmvAmthP7L7xwsVY}#))))
+                                          #{tmp -ANAU$bmvAmthP7L7xwsXa}#)
+                                        (let ((#{tmp -ANAU$bmvAmthP7L7xwsXm}#
                                                 ($sc-dispatch
-                                                  #{args _hoQGWMnyQPAh3k2jhWMO0}#
+                                                  #{args -ANAU$bmvAmthP7L7xwsVV}#
                                                   '(any . any))))
-                                          (if (if #{tmp _hoQGWMnyQPAh3k2jhWMRF}#
+                                          (if (if #{tmp -ANAU$bmvAmthP7L7xwsXm}#
                                                 (@apply
-                                                  (lambda (#{aok _hoQGWMnyQPAh3k2jhWMRJ}#
-                                                           #{r _hoQGWMnyQPAh3k2jhWMRK}#)
+                                                  (lambda (#{aok -ANAU$bmvAmthP7L7xwsXq}#
+                                                           #{r -ANAU$bmvAmthP7L7xwsXr}#)
                                                     (if (eq? (syntax->datum
-                                                               #{aok _hoQGWMnyQPAh3k2jhWMRJ}#)
+                                                               #{aok -ANAU$bmvAmthP7L7xwsXq}#)
                                                              #:allow-other-keys)
                                                       (if (symbol?
-                                                            #{r _hoQGWMnyQPAh3k2jhWMRK}#)
+                                                            #{r -ANAU$bmvAmthP7L7xwsXr}#)
                                                         #t
                                                         (if (if (vector?
-                                                                  #{r _hoQGWMnyQPAh3k2jhWMRK}#)
+                                                                  #{r -ANAU$bmvAmthP7L7xwsXr}#)
                                                               (if (= (vector-length
-                                                                       #{r _hoQGWMnyQPAh3k2jhWMRK}#)
+                                                                       #{r -ANAU$bmvAmthP7L7xwsXr}#)
                                                                      4)
                                                                 (eq? (vector-ref
-                                                                       #{r _hoQGWMnyQPAh3k2jhWMRK}#
+                                                                       #{r -ANAU$bmvAmthP7L7xwsXr}#
                                                                        0)
                                                                      'syntax-object)
                                                                 #f)
                                                               #f)
                                                           (symbol?
                                                             (vector-ref
-                                                              #{r _hoQGWMnyQPAh3k2jhWMRK}#
+                                                              #{r -ANAU$bmvAmthP7L7xwsXr}#
                                                               1))
                                                           #f))
                                                       #f))
-                                                  #{tmp _hoQGWMnyQPAh3k2jhWMRF}#)
+                                                  #{tmp -ANAU$bmvAmthP7L7xwsXm}#)
                                                 #f)
                                             (@apply
-                                              (lambda (#{aok _hoQGWMnyQPAh3k2jhWMRl}#
-                                                       #{r _hoQGWMnyQPAh3k2jhWMRm}#)
-                                                (#{rest _hoQGWMnyQPAh3k2jhWMKd}#
-                                                  #{r _hoQGWMnyQPAh3k2jhWMRm}#
-                                                  #{req _hoQGWMnyQPAh3k2jhWMO1}#
-                                                  #{opt _hoQGWMnyQPAh3k2jhWMO2}#
+                                              (lambda (#{aok -ANAU$bmvAmthP7L7xwsYG}#
+                                                       #{r -ANAU$bmvAmthP7L7xwsYH}#)
+                                                (#{rest -ANAU$bmvAmthP7L7xwsQ$}#
+                                                  #{r -ANAU$bmvAmthP7L7xwsYH}#
+                                                  #{req -ANAU$bmvAmthP7L7xwsVW}#
+                                                  #{opt -ANAU$bmvAmthP7L7xwsVX}#
                                                   (cons #t
                                                         (reverse
-                                                          #{rkey _hoQGWMnyQPAh3k2jhWMO3}#))))
-                                              #{tmp _hoQGWMnyQPAh3k2jhWMRF}#)
-                                            (let ((#{tmp _hoQGWMnyQPAh3k2jhWMRp}#
+                                                          #{rkey -ANAU$bmvAmthP7L7xwsVY}#))))
+                                              #{tmp -ANAU$bmvAmthP7L7xwsXm}#)
+                                            (let ((#{tmp -ANAU$bmvAmthP7L7xwsYK}#
                                                     ($sc-dispatch
-                                                      #{args _hoQGWMnyQPAh3k2jhWMO0}#
+                                                      #{args -ANAU$bmvAmthP7L7xwsVV}#
                                                       '(any any))))
-                                              (if (if #{tmp _hoQGWMnyQPAh3k2jhWMRp}#
+                                              (if (if #{tmp -ANAU$bmvAmthP7L7xwsYK}#
                                                     (@apply
-                                                      (lambda (#{a _hoQGWMnyQPAh3k2jhWMRt}#
-                                                               #{b _hoQGWMnyQPAh3k2jhWMRu}#)
+                                                      (lambda (#{a -ANAU$bmvAmthP7L7xwsYO}#
+                                                               #{b -ANAU$bmvAmthP7L7xwsYP}#)
                                                         (eq? (syntax->datum
-                                                               #{a _hoQGWMnyQPAh3k2jhWMRt}#)
+                                                               #{a -ANAU$bmvAmthP7L7xwsYO}#)
                                                              #:rest))
-                                                      #{tmp _hoQGWMnyQPAh3k2jhWMRp}#)
+                                                      #{tmp -ANAU$bmvAmthP7L7xwsYK}#)
                                                     #f)
                                                 (@apply
-                                                  (lambda (#{a _hoQGWMnyQPAh3k2jhWMRv}#
-                                                           #{b _hoQGWMnyQPAh3k2jhWMRw}#)
-                                                    (#{rest _hoQGWMnyQPAh3k2jhWMKd}#
-                                                      #{b _hoQGWMnyQPAh3k2jhWMRw}#
-                                                      #{req _hoQGWMnyQPAh3k2jhWMO1}#
-                                                      #{opt _hoQGWMnyQPAh3k2jhWMO2}#
+                                                  (lambda (#{a -ANAU$bmvAmthP7L7xwsYQ}#
+                                                           #{b -ANAU$bmvAmthP7L7xwsYR}#)
+                                                    (#{rest -ANAU$bmvAmthP7L7xwsQ$}#
+                                                      #{b -ANAU$bmvAmthP7L7xwsYR}#
+                                                      #{req -ANAU$bmvAmthP7L7xwsVW}#
+                                                      #{opt -ANAU$bmvAmthP7L7xwsVX}#
                                                       (cons #f
                                                             (reverse
-                                                              #{rkey _hoQGWMnyQPAh3k2jhWMO3}#))))
-                                                  #{tmp _hoQGWMnyQPAh3k2jhWMRp}#)
-                                                (let ((#{tmp _hoQGWMnyQPAh3k2jhWMRz}#
-                                                        (list #{args _hoQGWMnyQPAh3k2jhWMO0}#)))
+                                                              #{rkey -ANAU$bmvAmthP7L7xwsVY}#))))
+                                                  #{tmp -ANAU$bmvAmthP7L7xwsYK}#)
+                                                (let ((#{tmp -ANAU$bmvAmthP7L7xwsYU}#
+                                                        (list #{args -ANAU$bmvAmthP7L7xwsVV}#)))
                                                   (if (@apply
-                                                        (lambda (#{r _hoQGWMnyQPAh3k2jhWMR1}#)
+                                                        (lambda (#{r -ANAU$bmvAmthP7L7xwsYW}#)
                                                           (if (symbol?
-                                                                #{r _hoQGWMnyQPAh3k2jhWMR1}#)
+                                                                #{r -ANAU$bmvAmthP7L7xwsYW}#)
                                                             #t
                                                             (if (if (vector?
-                                                                      #{r _hoQGWMnyQPAh3k2jhWMR1}#)
+                                                                      #{r -ANAU$bmvAmthP7L7xwsYW}#)
                                                                   (if (= (vector-length
-                                                                           #{r _hoQGWMnyQPAh3k2jhWMR1}#)
+                                                                           #{r -ANAU$bmvAmthP7L7xwsYW}#)
                                                                          4)
                                                                     (eq? (vector-ref
-                                                                           #{r _hoQGWMnyQPAh3k2jhWMR1}#
+                                                                           #{r -ANAU$bmvAmthP7L7xwsYW}#
                                                                            0)
                                                                          'syntax-object)
                                                                     #f)
                                                                   #f)
                                                               (symbol?
                                                                 (vector-ref
-                                                                  #{r _hoQGWMnyQPAh3k2jhWMR1}#
+                                                                  #{r -ANAU$bmvAmthP7L7xwsYW}#
                                                                   1))
                                                               #f)))
-                                                        #{tmp _hoQGWMnyQPAh3k2jhWMRz}#)
+                                                        #{tmp -ANAU$bmvAmthP7L7xwsYU}#)
                                                     (@apply
-                                                      (lambda (#{r _hoQGWMnyQPAh3k2jhWMST}#)
-                                                        (#{rest _hoQGWMnyQPAh3k2jhWMKd}#
-                                                          #{r _hoQGWMnyQPAh3k2jhWMST}#
-                                                          #{req _hoQGWMnyQPAh3k2jhWMO1}#
-                                                          #{opt _hoQGWMnyQPAh3k2jhWMO2}#
+                                                      (lambda (#{r -ANAU$bmvAmthP7L7xwsY0}#)
+                                                        (#{rest -ANAU$bmvAmthP7L7xwsQ$}#
+                                                          #{r -ANAU$bmvAmthP7L7xwsY0}#
+                                                          #{req -ANAU$bmvAmthP7L7xwsVW}#
+                                                          #{opt -ANAU$bmvAmthP7L7xwsVX}#
                                                           (cons #f
                                                                 (reverse
-                                                                  #{rkey _hoQGWMnyQPAh3k2jhWMO3}#))))
-                                                      #{tmp _hoQGWMnyQPAh3k2jhWMRz}#)
+                                                                  #{rkey -ANAU$bmvAmthP7L7xwsVY}#))))
+                                                      #{tmp -ANAU$bmvAmthP7L7xwsYU}#)
                                                     (syntax-violation
                                                       'lambda*
                                                       "invalid keyword argument list"
-                                                      #{orig-args _hoQGWMnyQPAh3k2jhWMKZ}#
-                                                      #{args _hoQGWMnyQPAh3k2jhWMO0}#)))))))))))))))))))))
-            (#{rest _hoQGWMnyQPAh3k2jhWMKd}#
-              (lambda (#{args _hoQGWMnyQPAh3k2jhWMSv}#
-                       #{req _hoQGWMnyQPAh3k2jhWMSw}#
-                       #{opt _hoQGWMnyQPAh3k2jhWMSx}#
-                       #{kw _hoQGWMnyQPAh3k2jhWMSy}#)
-                (let ((#{tmp _hoQGWMnyQPAh3k2jhWMS0}#
-                        (list #{args _hoQGWMnyQPAh3k2jhWMSv}#)))
+                                                      #{orig-args -ANAU$bmvAmthP7L7xwsQ6}#
+                                                      #{args -ANAU$bmvAmthP7L7xwsVV}#)))))))))))))))))))))
+            (#{rest -ANAU$bmvAmthP7L7xwsQ$}#
+              (lambda (#{args -ANAU$bmvAmthP7L7xwsZQ}#
+                       #{req -ANAU$bmvAmthP7L7xwsZR}#
+                       #{opt -ANAU$bmvAmthP7L7xwsZS}#
+                       #{kw -ANAU$bmvAmthP7L7xwsZT}#)
+                (let ((#{tmp -ANAU$bmvAmthP7L7xwsZV}#
+                        (list #{args -ANAU$bmvAmthP7L7xwsZQ}#)))
                   (if (@apply
-                        (lambda (#{r _hoQGWMnyQPAh3k2jhWMS2}#)
-                          (if (symbol? #{r _hoQGWMnyQPAh3k2jhWMS2}#)
+                        (lambda (#{r -ANAU$bmvAmthP7L7xwsZX}#)
+                          (if (symbol? #{r -ANAU$bmvAmthP7L7xwsZX}#)
                             #t
-                            (if (if (vector? #{r _hoQGWMnyQPAh3k2jhWMS2}#)
+                            (if (if (vector? #{r -ANAU$bmvAmthP7L7xwsZX}#)
                                   (if (= (vector-length
-                                           #{r _hoQGWMnyQPAh3k2jhWMS2}#)
+                                           #{r -ANAU$bmvAmthP7L7xwsZX}#)
                                          4)
                                     (eq? (vector-ref
-                                           #{r _hoQGWMnyQPAh3k2jhWMS2}#
+                                           #{r -ANAU$bmvAmthP7L7xwsZX}#
                                            0)
                                          'syntax-object)
                                     #f)
                                   #f)
                               (symbol?
-                                (vector-ref #{r _hoQGWMnyQPAh3k2jhWMS2}# 1))
+                                (vector-ref #{r -ANAU$bmvAmthP7L7xwsZX}# 1))
                               #f)))
-                        #{tmp _hoQGWMnyQPAh3k2jhWMS0}#)
+                        #{tmp -ANAU$bmvAmthP7L7xwsZV}#)
                     (@apply
-                      (lambda (#{r _hoQGWMnyQPAh3k2jhWMTU}#)
-                        (#{check _hoQGWMnyQPAh3k2jhWMKe}#
-                          #{req _hoQGWMnyQPAh3k2jhWMSw}#
-                          #{opt _hoQGWMnyQPAh3k2jhWMSx}#
-                          #{r _hoQGWMnyQPAh3k2jhWMTU}#
-                          #{kw _hoQGWMnyQPAh3k2jhWMSy}#))
-                      #{tmp _hoQGWMnyQPAh3k2jhWMS0}#)
+                      (lambda (#{r -ANAU$bmvAmthP7L7xwsZ1}#)
+                        (#{check -ANAU$bmvAmthP7L7xwsQ@}#
+                          #{req -ANAU$bmvAmthP7L7xwsZR}#
+                          #{opt -ANAU$bmvAmthP7L7xwsZS}#
+                          #{r -ANAU$bmvAmthP7L7xwsZ1}#
+                          #{kw -ANAU$bmvAmthP7L7xwsZT}#))
+                      #{tmp -ANAU$bmvAmthP7L7xwsZV}#)
                     (syntax-violation
                       'lambda*
                       "invalid rest argument"
-                      #{orig-args _hoQGWMnyQPAh3k2jhWMKZ}#
-                      #{args _hoQGWMnyQPAh3k2jhWMSv}#)))))
-            (#{check _hoQGWMnyQPAh3k2jhWMKe}#
-              (lambda (#{req _hoQGWMnyQPAh3k2jhWMTY}#
-                       #{opt _hoQGWMnyQPAh3k2jhWMTZ}#
-                       #{rest _hoQGWMnyQPAh3k2jhWMTa}#
-                       #{kw _hoQGWMnyQPAh3k2jhWMTb}#)
-                (if (#{distinct-bound-ids? _hoQGWMnyQPAh3k2jhWHTc}#
+                      #{orig-args -ANAU$bmvAmthP7L7xwsQ6}#
+                      #{args -ANAU$bmvAmthP7L7xwsZQ}#)))))
+            (#{check -ANAU$bmvAmthP7L7xwsQ@}#
+              (lambda (#{req -ANAU$bmvAmthP7L7xwsZ5}#
+                       #{opt -ANAU$bmvAmthP7L7xwsZ6}#
+                       #{rest -ANAU$bmvAmthP7L7xwsZ7}#
+                       #{kw -ANAU$bmvAmthP7L7xwsZ8}#)
+                (if (#{distinct-bound-ids? -ANAU$bmvAmthP7L7xwnN7}#
                       (append
-                        #{req _hoQGWMnyQPAh3k2jhWMTY}#
-                        (map car #{opt _hoQGWMnyQPAh3k2jhWMTZ}#)
-                        (if #{rest _hoQGWMnyQPAh3k2jhWMTa}#
-                          (list #{rest _hoQGWMnyQPAh3k2jhWMTa}#)
+                        #{req -ANAU$bmvAmthP7L7xwsZ5}#
+                        (map car #{opt -ANAU$bmvAmthP7L7xwsZ6}#)
+                        (if #{rest -ANAU$bmvAmthP7L7xwsZ7}#
+                          (list #{rest -ANAU$bmvAmthP7L7xwsZ7}#)
                           '())
-                        (if (pair? #{kw _hoQGWMnyQPAh3k2jhWMTb}#)
-                          (map cadr (cdr #{kw _hoQGWMnyQPAh3k2jhWMTb}#))
+                        (if (pair? #{kw -ANAU$bmvAmthP7L7xwsZ8}#)
+                          (map cadr (cdr #{kw -ANAU$bmvAmthP7L7xwsZ8}#))
                           '())))
                   (values
-                    #{req _hoQGWMnyQPAh3k2jhWMTY}#
-                    #{opt _hoQGWMnyQPAh3k2jhWMTZ}#
-                    #{rest _hoQGWMnyQPAh3k2jhWMTa}#
-                    #{kw _hoQGWMnyQPAh3k2jhWMTb}#)
+                    #{req -ANAU$bmvAmthP7L7xwsZ5}#
+                    #{opt -ANAU$bmvAmthP7L7xwsZ6}#
+                    #{rest -ANAU$bmvAmthP7L7xwsZ7}#
+                    #{kw -ANAU$bmvAmthP7L7xwsZ8}#)
                   (syntax-violation
                     'lambda*
                     "duplicate identifier in argument list"
-                    #{orig-args _hoQGWMnyQPAh3k2jhWMKZ}#)))))
-           (#{req _hoQGWMnyQPAh3k2jhWMKa}#
-             #{orig-args _hoQGWMnyQPAh3k2jhWMKZ}#
+                    #{orig-args -ANAU$bmvAmthP7L7xwsQ6}#)))))
+           (#{req -ANAU$bmvAmthP7L7xwsQ7}#
+             #{orig-args -ANAU$bmvAmthP7L7xwsQ6}#
              '()))))
-     (#{expand-lambda-case _hoQGWMnyQPAh3k2jhWHTx}#
-       (lambda (#{e _hoQGWMnyQPAh3k2jhWMVP}#
-                #{r _hoQGWMnyQPAh3k2jhWMVQ}#
-                #{w _hoQGWMnyQPAh3k2jhWMVR}#
-                #{s _hoQGWMnyQPAh3k2jhWMVS}#
-                #{mod _hoQGWMnyQPAh3k2jhWMVT}#
-                #{get-formals _hoQGWMnyQPAh3k2jhWMVU}#
-                #{clauses _hoQGWMnyQPAh3k2jhWMVV}#)
+     (#{expand-lambda-case -ANAU$bmvAmthP7L7xwnOQ}#
+       (lambda (#{e -ANAU$bmvAmthP7L7xwsbw}#
+                #{r -ANAU$bmvAmthP7L7xwsbx}#
+                #{w -ANAU$bmvAmthP7L7xwsby}#
+                #{s -ANAU$bmvAmthP7L7xwsbz}#
+                #{mod -ANAU$bmvAmthP7L7xwsb0}#
+                #{get-formals -ANAU$bmvAmthP7L7xwsb1}#
+                #{clauses -ANAU$bmvAmthP7L7xwsb2}#)
          (letrec*
-           ((#{parse-req _hoQGWMnyQPAh3k2jhWMVW}#
-              (lambda (#{req _hoQGWMnyQPAh3k2jhWMXV}#
-                       #{opt _hoQGWMnyQPAh3k2jhWMXW}#
-                       #{rest _hoQGWMnyQPAh3k2jhWMXX}#
-                       #{kw _hoQGWMnyQPAh3k2jhWMXY}#
-                       #{body _hoQGWMnyQPAh3k2jhWMXZ}#)
-                (let ((#{vars _hoQGWMnyQPAh3k2jhWMXa}#
-                        (map #{gen-var _hoQGWMnyQPAh3k2jhWHTz}#
-                             #{req _hoQGWMnyQPAh3k2jhWMXV}#))
-                      (#{labels _hoQGWMnyQPAh3k2jhWMXb}#
-                        (#{gen-labels _hoQGWMnyQPAh3k2jhWHTE}#
-                          #{req _hoQGWMnyQPAh3k2jhWMXV}#)))
-                  (let ((#{r* _hoQGWMnyQPAh3k2jhWMXc}#
-                          (#{extend-var-env _hoQGWMnyQPAh3k2jhWHS8}#
-                            #{labels _hoQGWMnyQPAh3k2jhWMXb}#
-                            #{vars _hoQGWMnyQPAh3k2jhWMXa}#
-                            #{r _hoQGWMnyQPAh3k2jhWMVQ}#))
-                        (#{w* _hoQGWMnyQPAh3k2jhWMXd}#
-                          (#{make-binding-wrap _hoQGWMnyQPAh3k2jhWHTP}#
-                            #{req _hoQGWMnyQPAh3k2jhWMXV}#
-                            #{labels _hoQGWMnyQPAh3k2jhWMXb}#
-                            #{w _hoQGWMnyQPAh3k2jhWMVR}#)))
-                    (#{parse-opt _hoQGWMnyQPAh3k2jhWMVX}#
+           ((#{parse-req -ANAU$bmvAmthP7L7xwsb3}#
+              (lambda (#{req -ANAU$bmvAmthP7L7xwsd2}#
+                       #{opt -ANAU$bmvAmthP7L7xwsd3}#
+                       #{rest -ANAU$bmvAmthP7L7xwsd4}#
+                       #{kw -ANAU$bmvAmthP7L7xwsd5}#
+                       #{body -ANAU$bmvAmthP7L7xwsd6}#)
+                (let ((#{vars -ANAU$bmvAmthP7L7xwsd7}#
+                        (map #{gen-var -ANAU$bmvAmthP7L7xwnOS}#
+                             #{req -ANAU$bmvAmthP7L7xwsd2}#))
+                      (#{labels -ANAU$bmvAmthP7L7xwsd8}#
+                        (#{gen-labels -ANAU$bmvAmthP7L7xwnNj}#
+                          #{req -ANAU$bmvAmthP7L7xwsd2}#)))
+                  (let ((#{r* -ANAU$bmvAmthP7L7xwsd9}#
+                          (#{extend-var-env -ANAU$bmvAmthP7L7xwnNb}#
+                            #{labels -ANAU$bmvAmthP7L7xwsd8}#
+                            #{vars -ANAU$bmvAmthP7L7xwsd7}#
+                            #{r -ANAU$bmvAmthP7L7xwsbx}#))
+                        (#{w* -ANAU$bmvAmthP7L7xwsd$}#
+                          (#{make-binding-wrap -ANAU$bmvAmthP7L7xwnNu}#
+                            #{req -ANAU$bmvAmthP7L7xwsd2}#
+                            #{labels -ANAU$bmvAmthP7L7xwsd8}#
+                            #{w -ANAU$bmvAmthP7L7xwsby}#)))
+                    (#{parse-opt -ANAU$bmvAmthP7L7xwsb4}#
                       (map syntax->datum
-                           #{req _hoQGWMnyQPAh3k2jhWMXV}#)
-                      #{opt _hoQGWMnyQPAh3k2jhWMXW}#
-                      #{rest _hoQGWMnyQPAh3k2jhWMXX}#
-                      #{kw _hoQGWMnyQPAh3k2jhWMXY}#
-                      #{body _hoQGWMnyQPAh3k2jhWMXZ}#
-                      (reverse #{vars _hoQGWMnyQPAh3k2jhWMXa}#)
-                      #{r* _hoQGWMnyQPAh3k2jhWMXc}#
-                      #{w* _hoQGWMnyQPAh3k2jhWMXd}#
+                           #{req -ANAU$bmvAmthP7L7xwsd2}#)
+                      #{opt -ANAU$bmvAmthP7L7xwsd3}#
+                      #{rest -ANAU$bmvAmthP7L7xwsd4}#
+                      #{kw -ANAU$bmvAmthP7L7xwsd5}#
+                      #{body -ANAU$bmvAmthP7L7xwsd6}#
+                      (reverse #{vars -ANAU$bmvAmthP7L7xwsd7}#)
+                      #{r* -ANAU$bmvAmthP7L7xwsd9}#
+                      #{w* -ANAU$bmvAmthP7L7xwsd$}#
                       '()
                       '())))))
-            (#{parse-opt _hoQGWMnyQPAh3k2jhWMVX}#
-              (lambda (#{req _hoQGWMnyQPAh3k2jhWMaN}#
-                       #{opt _hoQGWMnyQPAh3k2jhWMaO}#
-                       #{rest _hoQGWMnyQPAh3k2jhWMaP}#
-                       #{kw _hoQGWMnyQPAh3k2jhWMaQ}#
-                       #{body _hoQGWMnyQPAh3k2jhWMaR}#
-                       #{vars _hoQGWMnyQPAh3k2jhWMaS}#
-                       #{r* _hoQGWMnyQPAh3k2jhWMaT}#
-                       #{w* _hoQGWMnyQPAh3k2jhWMaU}#
-                       #{out _hoQGWMnyQPAh3k2jhWMaV}#
-                       #{inits _hoQGWMnyQPAh3k2jhWMaW}#)
-                (if (pair? #{opt _hoQGWMnyQPAh3k2jhWMaO}#)
-                  (let ((#{tmp _hoQGWMnyQPAh3k2jhWMaX}#
-                          (car #{opt _hoQGWMnyQPAh3k2jhWMaO}#)))
-                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWMaY}#
+            (#{parse-opt -ANAU$bmvAmthP7L7xwsb4}#
+              (lambda (#{req -ANAU$bmvAmthP7L7xwsgu}#
+                       #{opt -ANAU$bmvAmthP7L7xwsgv}#
+                       #{rest -ANAU$bmvAmthP7L7xwsgw}#
+                       #{kw -ANAU$bmvAmthP7L7xwsgx}#
+                       #{body -ANAU$bmvAmthP7L7xwsgy}#
+                       #{vars -ANAU$bmvAmthP7L7xwsgz}#
+                       #{r* -ANAU$bmvAmthP7L7xwsg0}#
+                       #{w* -ANAU$bmvAmthP7L7xwsg1}#
+                       #{out -ANAU$bmvAmthP7L7xwsg2}#
+                       #{inits -ANAU$bmvAmthP7L7xwsg3}#)
+                (if (pair? #{opt -ANAU$bmvAmthP7L7xwsgv}#)
+                  (let ((#{tmp -ANAU$bmvAmthP7L7xwsg4}#
+                          (car #{opt -ANAU$bmvAmthP7L7xwsgv}#)))
+                    (let ((#{tmp -ANAU$bmvAmthP7L7xwsg5}#
                             ($sc-dispatch
-                              #{tmp _hoQGWMnyQPAh3k2jhWMaX}#
+                              #{tmp -ANAU$bmvAmthP7L7xwsg4}#
                               '(any any))))
-                      (if #{tmp _hoQGWMnyQPAh3k2jhWMaY}#
+                      (if #{tmp -ANAU$bmvAmthP7L7xwsg5}#
                         (@apply
-                          (lambda (#{id _hoQGWMnyQPAh3k2jhWMaa}#
-                                   #{i _hoQGWMnyQPAh3k2jhWMab}#)
-                            (let ((#{v _hoQGWMnyQPAh3k2jhWMac}#
-                                    (let ((#{id _hoQGWMnyQPAh3k2jhWMak}#
+                          (lambda (#{id -ANAU$bmvAmthP7L7xwsg7}#
+                                   #{i -ANAU$bmvAmthP7L7xwsg8}#)
+                            (let ((#{v -ANAU$bmvAmthP7L7xwsg9}#
+                                    (let ((#{id -ANAU$bmvAmthP7L7xwshF}#
                                             (if (if (vector?
-                                                      #{id _hoQGWMnyQPAh3k2jhWMaa}#)
+                                                      #{id -ANAU$bmvAmthP7L7xwsg7}#)
                                                   (if (= (vector-length
-                                                           #{id _hoQGWMnyQPAh3k2jhWMaa}#)
+                                                           #{id -ANAU$bmvAmthP7L7xwsg7}#)
                                                          4)
                                                     (eq? (vector-ref
-                                                           #{id _hoQGWMnyQPAh3k2jhWMaa}#
+                                                           #{id -ANAU$bmvAmthP7L7xwsg7}#
                                                            0)
                                                          'syntax-object)
                                                     #f)
                                                   #f)
                                               (vector-ref
-                                                #{id _hoQGWMnyQPAh3k2jhWMaa}#
+                                                #{id -ANAU$bmvAmthP7L7xwsg7}#
                                                 1)
-                                              #{id _hoQGWMnyQPAh3k2jhWMaa}#)))
+                                              #{id -ANAU$bmvAmthP7L7xwsg7}#)))
                                       (gensym
                                         (string-append
                                           (symbol->string
-                                            #{id _hoQGWMnyQPAh3k2jhWMak}#)
+                                            #{id -ANAU$bmvAmthP7L7xwshF}#)
                                           " ")))))
-                              (let ((#{l _hoQGWMnyQPAh3k2jhWMad}#
-                                      (#{gen-labels _hoQGWMnyQPAh3k2jhWHTE}#
-                                        (list #{v _hoQGWMnyQPAh3k2jhWMac}#))))
-                                (let ((#{r** _hoQGWMnyQPAh3k2jhWMae}#
-                                        (#{extend-var-env _hoQGWMnyQPAh3k2jhWHS8}#
-                                          #{l _hoQGWMnyQPAh3k2jhWMad}#
-                                          (list #{v _hoQGWMnyQPAh3k2jhWMac}#)
-                                          #{r* _hoQGWMnyQPAh3k2jhWMaT}#)))
-                                  (let ((#{w** _hoQGWMnyQPAh3k2jhWMaf}#
-                                          (#{make-binding-wrap _hoQGWMnyQPAh3k2jhWHTP}#
-                                            (list #{id _hoQGWMnyQPAh3k2jhWMaa}#)
-                                            #{l _hoQGWMnyQPAh3k2jhWMad}#
-                                            #{w* _hoQGWMnyQPAh3k2jhWMaU}#)))
-                                    (#{parse-opt _hoQGWMnyQPAh3k2jhWMVX}#
-                                      #{req _hoQGWMnyQPAh3k2jhWMaN}#
-                                      (cdr #{opt _hoQGWMnyQPAh3k2jhWMaO}#)
-                                      #{rest _hoQGWMnyQPAh3k2jhWMaP}#
-                                      #{kw _hoQGWMnyQPAh3k2jhWMaQ}#
-                                      #{body _hoQGWMnyQPAh3k2jhWMaR}#
-                                      (cons #{v _hoQGWMnyQPAh3k2jhWMac}#
-                                            #{vars _hoQGWMnyQPAh3k2jhWMaS}#)
-                                      #{r** _hoQGWMnyQPAh3k2jhWMae}#
-                                      #{w** _hoQGWMnyQPAh3k2jhWMaf}#
+                              (let ((#{l -ANAU$bmvAmthP7L7xwsg$}#
+                                      (#{gen-labels -ANAU$bmvAmthP7L7xwnNj}#
+                                        (list #{v -ANAU$bmvAmthP7L7xwsg9}#))))
+                                (let ((#{r** -ANAU$bmvAmthP7L7xwsg@}#
+                                        (#{extend-var-env -ANAU$bmvAmthP7L7xwnNb}#
+                                          #{l -ANAU$bmvAmthP7L7xwsg$}#
+                                          (list #{v -ANAU$bmvAmthP7L7xwsg9}#)
+                                          #{r* -ANAU$bmvAmthP7L7xwsg0}#)))
+                                  (let ((#{w** -ANAU$bmvAmthP7L7xwshA}#
+                                          (#{make-binding-wrap -ANAU$bmvAmthP7L7xwnNu}#
+                                            (list #{id -ANAU$bmvAmthP7L7xwsg7}#)
+                                            #{l -ANAU$bmvAmthP7L7xwsg$}#
+                                            #{w* -ANAU$bmvAmthP7L7xwsg1}#)))
+                                    (#{parse-opt -ANAU$bmvAmthP7L7xwsb4}#
+                                      #{req -ANAU$bmvAmthP7L7xwsgu}#
+                                      (cdr #{opt -ANAU$bmvAmthP7L7xwsgv}#)
+                                      #{rest -ANAU$bmvAmthP7L7xwsgw}#
+                                      #{kw -ANAU$bmvAmthP7L7xwsgx}#
+                                      #{body -ANAU$bmvAmthP7L7xwsgy}#
+                                      (cons #{v -ANAU$bmvAmthP7L7xwsg9}#
+                                            #{vars -ANAU$bmvAmthP7L7xwsgz}#)
+                                      #{r** -ANAU$bmvAmthP7L7xwsg@}#
+                                      #{w** -ANAU$bmvAmthP7L7xwshA}#
                                       (cons (syntax->datum
-                                              #{id _hoQGWMnyQPAh3k2jhWMaa}#)
-                                            #{out _hoQGWMnyQPAh3k2jhWMaV}#)
-                                      (cons (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                              #{i _hoQGWMnyQPAh3k2jhWMab}#
-                                              #{r* _hoQGWMnyQPAh3k2jhWMaT}#
-                                              #{w* _hoQGWMnyQPAh3k2jhWMaU}#
-                                              #{mod _hoQGWMnyQPAh3k2jhWMVT}#)
-                                            #{inits _hoQGWMnyQPAh3k2jhWMaW}#)))))))
-                          #{tmp _hoQGWMnyQPAh3k2jhWMaY}#)
+                                              #{id -ANAU$bmvAmthP7L7xwsg7}#)
+                                            #{out -ANAU$bmvAmthP7L7xwsg2}#)
+                                      (cons (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                              #{i -ANAU$bmvAmthP7L7xwsg8}#
+                                              #{r* -ANAU$bmvAmthP7L7xwsg0}#
+                                              #{w* -ANAU$bmvAmthP7L7xwsg1}#
+                                              #{mod -ANAU$bmvAmthP7L7xwsb0}#)
+                                            #{inits -ANAU$bmvAmthP7L7xwsg3}#)))))))
+                          #{tmp -ANAU$bmvAmthP7L7xwsg5}#)
                         (syntax-violation
                           #f
                           "source expression failed to match any pattern"
-                          #{tmp _hoQGWMnyQPAh3k2jhWMaX}#))))
-                  (if #{rest _hoQGWMnyQPAh3k2jhWMaP}#
-                    (let ((#{v _hoQGWMnyQPAh3k2jhWMeJ}#
-                            (let ((#{id _hoQGWMnyQPAh3k2jhWMeT}#
+                          #{tmp -ANAU$bmvAmthP7L7xwsg4}#))))
+                  (if #{rest -ANAU$bmvAmthP7L7xwsgw}#
+                    (let ((#{v -ANAU$bmvAmthP7L7xwskq}#
+                            (let ((#{id -ANAU$bmvAmthP7L7xwsk0}#
                                     (if (if (vector?
-                                              #{rest _hoQGWMnyQPAh3k2jhWMaP}#)
+                                              #{rest -ANAU$bmvAmthP7L7xwsgw}#)
                                           (if (= (vector-length
-                                                   #{rest _hoQGWMnyQPAh3k2jhWMaP}#)
+                                                   #{rest -ANAU$bmvAmthP7L7xwsgw}#)
                                                  4)
                                             (eq? (vector-ref
-                                                   #{rest _hoQGWMnyQPAh3k2jhWMaP}#
+                                                   #{rest -ANAU$bmvAmthP7L7xwsgw}#
                                                    0)
                                                  'syntax-object)
                                             #f)
                                           #f)
                                       (vector-ref
-                                        #{rest _hoQGWMnyQPAh3k2jhWMaP}#
+                                        #{rest -ANAU$bmvAmthP7L7xwsgw}#
                                         1)
-                                      #{rest _hoQGWMnyQPAh3k2jhWMaP}#)))
+                                      #{rest -ANAU$bmvAmthP7L7xwsgw}#)))
                               (gensym
                                 (string-append
                                   (symbol->string
-                                    #{id _hoQGWMnyQPAh3k2jhWMeT}#)
+                                    #{id -ANAU$bmvAmthP7L7xwsk0}#)
                                   " ")))))
-                      (let ((#{l _hoQGWMnyQPAh3k2jhWMeK}#
-                              (#{gen-labels _hoQGWMnyQPAh3k2jhWHTE}#
-                                (list #{v _hoQGWMnyQPAh3k2jhWMeJ}#))))
-                        (let ((#{r* _hoQGWMnyQPAh3k2jhWMeL}#
-                                (#{extend-var-env _hoQGWMnyQPAh3k2jhWHS8}#
-                                  #{l _hoQGWMnyQPAh3k2jhWMeK}#
-                                  (list #{v _hoQGWMnyQPAh3k2jhWMeJ}#)
-                                  #{r* _hoQGWMnyQPAh3k2jhWMaT}#)))
-                          (let ((#{w* _hoQGWMnyQPAh3k2jhWMeM}#
-                                  (#{make-binding-wrap _hoQGWMnyQPAh3k2jhWHTP}#
-                                    (list #{rest _hoQGWMnyQPAh3k2jhWMaP}#)
-                                    #{l _hoQGWMnyQPAh3k2jhWMeK}#
-                                    #{w* _hoQGWMnyQPAh3k2jhWMaU}#)))
-                            (#{parse-kw _hoQGWMnyQPAh3k2jhWMVY}#
-                              #{req _hoQGWMnyQPAh3k2jhWMaN}#
-                              (if (pair? #{out _hoQGWMnyQPAh3k2jhWMaV}#)
-                                (reverse #{out _hoQGWMnyQPAh3k2jhWMaV}#)
+                      (let ((#{l -ANAU$bmvAmthP7L7xwskr}#
+                              (#{gen-labels -ANAU$bmvAmthP7L7xwnNj}#
+                                (list #{v -ANAU$bmvAmthP7L7xwskq}#))))
+                        (let ((#{r* -ANAU$bmvAmthP7L7xwsks}#
+                                (#{extend-var-env -ANAU$bmvAmthP7L7xwnNb}#
+                                  #{l -ANAU$bmvAmthP7L7xwskr}#
+                                  (list #{v -ANAU$bmvAmthP7L7xwskq}#)
+                                  #{r* -ANAU$bmvAmthP7L7xwsg0}#)))
+                          (let ((#{w* -ANAU$bmvAmthP7L7xwskt}#
+                                  (#{make-binding-wrap -ANAU$bmvAmthP7L7xwnNu}#
+                                    (list #{rest -ANAU$bmvAmthP7L7xwsgw}#)
+                                    #{l -ANAU$bmvAmthP7L7xwskr}#
+                                    #{w* -ANAU$bmvAmthP7L7xwsg1}#)))
+                            (#{parse-kw -ANAU$bmvAmthP7L7xwsb5}#
+                              #{req -ANAU$bmvAmthP7L7xwsgu}#
+                              (if (pair? #{out -ANAU$bmvAmthP7L7xwsg2}#)
+                                (reverse #{out -ANAU$bmvAmthP7L7xwsg2}#)
                                 #f)
-                              (syntax->datum #{rest _hoQGWMnyQPAh3k2jhWMaP}#)
-                              (if (pair? #{kw _hoQGWMnyQPAh3k2jhWMaQ}#)
-                                (cdr #{kw _hoQGWMnyQPAh3k2jhWMaQ}#)
-                                #{kw _hoQGWMnyQPAh3k2jhWMaQ}#)
-                              #{body _hoQGWMnyQPAh3k2jhWMaR}#
-                              (cons #{v _hoQGWMnyQPAh3k2jhWMeJ}#
-                                    #{vars _hoQGWMnyQPAh3k2jhWMaS}#)
-                              #{r* _hoQGWMnyQPAh3k2jhWMeL}#
-                              #{w* _hoQGWMnyQPAh3k2jhWMeM}#
-                              (if (pair? #{kw _hoQGWMnyQPAh3k2jhWMaQ}#)
-                                (car #{kw _hoQGWMnyQPAh3k2jhWMaQ}#)
+                              (syntax->datum #{rest -ANAU$bmvAmthP7L7xwsgw}#)
+                              (if (pair? #{kw -ANAU$bmvAmthP7L7xwsgx}#)
+                                (cdr #{kw -ANAU$bmvAmthP7L7xwsgx}#)
+                                #{kw -ANAU$bmvAmthP7L7xwsgx}#)
+                              #{body -ANAU$bmvAmthP7L7xwsgy}#
+                              (cons #{v -ANAU$bmvAmthP7L7xwskq}#
+                                    #{vars -ANAU$bmvAmthP7L7xwsgz}#)
+                              #{r* -ANAU$bmvAmthP7L7xwsks}#
+                              #{w* -ANAU$bmvAmthP7L7xwskt}#
+                              (if (pair? #{kw -ANAU$bmvAmthP7L7xwsgx}#)
+                                (car #{kw -ANAU$bmvAmthP7L7xwsgx}#)
                                 #f)
                               '()
-                              #{inits _hoQGWMnyQPAh3k2jhWMaW}#)))))
-                    (#{parse-kw _hoQGWMnyQPAh3k2jhWMVY}#
-                      #{req _hoQGWMnyQPAh3k2jhWMaN}#
-                      (if (pair? #{out _hoQGWMnyQPAh3k2jhWMaV}#)
-                        (reverse #{out _hoQGWMnyQPAh3k2jhWMaV}#)
+                              #{inits -ANAU$bmvAmthP7L7xwsg3}#)))))
+                    (#{parse-kw -ANAU$bmvAmthP7L7xwsb5}#
+                      #{req -ANAU$bmvAmthP7L7xwsgu}#
+                      (if (pair? #{out -ANAU$bmvAmthP7L7xwsg2}#)
+                        (reverse #{out -ANAU$bmvAmthP7L7xwsg2}#)
                         #f)
                       #f
-                      (if (pair? #{kw _hoQGWMnyQPAh3k2jhWMaQ}#)
-                        (cdr #{kw _hoQGWMnyQPAh3k2jhWMaQ}#)
-                        #{kw _hoQGWMnyQPAh3k2jhWMaQ}#)
-                      #{body _hoQGWMnyQPAh3k2jhWMaR}#
-                      #{vars _hoQGWMnyQPAh3k2jhWMaS}#
-                      #{r* _hoQGWMnyQPAh3k2jhWMaT}#
-                      #{w* _hoQGWMnyQPAh3k2jhWMaU}#
-                      (if (pair? #{kw _hoQGWMnyQPAh3k2jhWMaQ}#)
-                        (car #{kw _hoQGWMnyQPAh3k2jhWMaQ}#)
+                      (if (pair? #{kw -ANAU$bmvAmthP7L7xwsgx}#)
+                        (cdr #{kw -ANAU$bmvAmthP7L7xwsgx}#)
+                        #{kw -ANAU$bmvAmthP7L7xwsgx}#)
+                      #{body -ANAU$bmvAmthP7L7xwsgy}#
+                      #{vars -ANAU$bmvAmthP7L7xwsgz}#
+                      #{r* -ANAU$bmvAmthP7L7xwsg0}#
+                      #{w* -ANAU$bmvAmthP7L7xwsg1}#
+                      (if (pair? #{kw -ANAU$bmvAmthP7L7xwsgx}#)
+                        (car #{kw -ANAU$bmvAmthP7L7xwsgx}#)
                         #f)
                       '()
-                      #{inits _hoQGWMnyQPAh3k2jhWMaW}#)))))
-            (#{parse-kw _hoQGWMnyQPAh3k2jhWMVY}#
-              (lambda (#{req _hoQGWMnyQPAh3k2jhWMg1}#
-                       #{opt _hoQGWMnyQPAh3k2jhWMg2}#
-                       #{rest _hoQGWMnyQPAh3k2jhWMg3}#
-                       #{kw _hoQGWMnyQPAh3k2jhWMg4}#
-                       #{body _hoQGWMnyQPAh3k2jhWMg5}#
-                       #{vars _hoQGWMnyQPAh3k2jhWMg6}#
-                       #{r* _hoQGWMnyQPAh3k2jhWMg7}#
-                       #{w* _hoQGWMnyQPAh3k2jhWMg8}#
-                       #{aok _hoQGWMnyQPAh3k2jhWMg9}#
-                       #{out _hoQGWMnyQPAh3k2jhWMg$}#
-                       #{inits _hoQGWMnyQPAh3k2jhWMg@}#)
-                (if (pair? #{kw _hoQGWMnyQPAh3k2jhWMg4}#)
-                  (let ((#{tmp _hoQGWMnyQPAh3k2jhWMhA}#
-                          (car #{kw _hoQGWMnyQPAh3k2jhWMg4}#)))
-                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWMhB}#
+                      #{inits -ANAU$bmvAmthP7L7xwsg3}#)))))
+            (#{parse-kw -ANAU$bmvAmthP7L7xwsb5}#
+              (lambda (#{req -ANAU$bmvAmthP7L7xwsnW}#
+                       #{opt -ANAU$bmvAmthP7L7xwsnX}#
+                       #{rest -ANAU$bmvAmthP7L7xwsnY}#
+                       #{kw -ANAU$bmvAmthP7L7xwsnZ}#
+                       #{body -ANAU$bmvAmthP7L7xwsna}#
+                       #{vars -ANAU$bmvAmthP7L7xwsnb}#
+                       #{r* -ANAU$bmvAmthP7L7xwsnc}#
+                       #{w* -ANAU$bmvAmthP7L7xwsnd}#
+                       #{aok -ANAU$bmvAmthP7L7xwsne}#
+                       #{out -ANAU$bmvAmthP7L7xwsnf}#
+                       #{inits -ANAU$bmvAmthP7L7xwsng}#)
+                (if (pair? #{kw -ANAU$bmvAmthP7L7xwsnZ}#)
+                  (let ((#{tmp -ANAU$bmvAmthP7L7xwsnh}#
+                          (car #{kw -ANAU$bmvAmthP7L7xwsnZ}#)))
+                    (let ((#{tmp -ANAU$bmvAmthP7L7xwsni}#
                             ($sc-dispatch
-                              #{tmp _hoQGWMnyQPAh3k2jhWMhA}#
+                              #{tmp -ANAU$bmvAmthP7L7xwsnh}#
                               '(any any any))))
-                      (if #{tmp _hoQGWMnyQPAh3k2jhWMhB}#
+                      (if #{tmp -ANAU$bmvAmthP7L7xwsni}#
                         (@apply
-                          (lambda (#{k _hoQGWMnyQPAh3k2jhWMhD}#
-                                   #{id _hoQGWMnyQPAh3k2jhWMhE}#
-                                   #{i _hoQGWMnyQPAh3k2jhWMhF}#)
-                            (let ((#{v _hoQGWMnyQPAh3k2jhWMhG}#
-                                    (let ((#{id _hoQGWMnyQPAh3k2jhWMhO}#
+                          (lambda (#{k -ANAU$bmvAmthP7L7xwsnk}#
+                                   #{id -ANAU$bmvAmthP7L7xwsnl}#
+                                   #{i -ANAU$bmvAmthP7L7xwsnm}#)
+                            (let ((#{v -ANAU$bmvAmthP7L7xwsnn}#
+                                    (let ((#{id -ANAU$bmvAmthP7L7xwsnv}#
                                             (if (if (vector?
-                                                      #{id _hoQGWMnyQPAh3k2jhWMhE}#)
+                                                      #{id -ANAU$bmvAmthP7L7xwsnl}#)
                                                   (if (= (vector-length
-                                                           #{id _hoQGWMnyQPAh3k2jhWMhE}#)
+                                                           #{id -ANAU$bmvAmthP7L7xwsnl}#)
                                                          4)
                                                     (eq? (vector-ref
-                                                           #{id _hoQGWMnyQPAh3k2jhWMhE}#
+                                                           #{id -ANAU$bmvAmthP7L7xwsnl}#
                                                            0)
                                                          'syntax-object)
                                                     #f)
                                                   #f)
                                               (vector-ref
-                                                #{id _hoQGWMnyQPAh3k2jhWMhE}#
+                                                #{id -ANAU$bmvAmthP7L7xwsnl}#
                                                 1)
-                                              #{id _hoQGWMnyQPAh3k2jhWMhE}#)))
+                                              #{id -ANAU$bmvAmthP7L7xwsnl}#)))
                                       (gensym
                                         (string-append
                                           (symbol->string
-                                            #{id _hoQGWMnyQPAh3k2jhWMhO}#)
+                                            #{id -ANAU$bmvAmthP7L7xwsnv}#)
                                           " ")))))
-                              (let ((#{l _hoQGWMnyQPAh3k2jhWMhH}#
-                                      (#{gen-labels _hoQGWMnyQPAh3k2jhWHTE}#
-                                        (list #{v _hoQGWMnyQPAh3k2jhWMhG}#))))
-                                (let ((#{r** _hoQGWMnyQPAh3k2jhWMhI}#
-                                        (#{extend-var-env _hoQGWMnyQPAh3k2jhWHS8}#
-                                          #{l _hoQGWMnyQPAh3k2jhWMhH}#
-                                          (list #{v _hoQGWMnyQPAh3k2jhWMhG}#)
-                                          #{r* _hoQGWMnyQPAh3k2jhWMg7}#)))
-                                  (let ((#{w** _hoQGWMnyQPAh3k2jhWMhJ}#
-                                          (#{make-binding-wrap _hoQGWMnyQPAh3k2jhWHTP}#
-                                            (list #{id _hoQGWMnyQPAh3k2jhWMhE}#)
-                                            #{l _hoQGWMnyQPAh3k2jhWMhH}#
-                                            #{w* _hoQGWMnyQPAh3k2jhWMg8}#)))
-                                    (#{parse-kw _hoQGWMnyQPAh3k2jhWMVY}#
-                                      #{req _hoQGWMnyQPAh3k2jhWMg1}#
-                                      #{opt _hoQGWMnyQPAh3k2jhWMg2}#
-                                      #{rest _hoQGWMnyQPAh3k2jhWMg3}#
-                                      (cdr #{kw _hoQGWMnyQPAh3k2jhWMg4}#)
-                                      #{body _hoQGWMnyQPAh3k2jhWMg5}#
-                                      (cons #{v _hoQGWMnyQPAh3k2jhWMhG}#
-                                            #{vars _hoQGWMnyQPAh3k2jhWMg6}#)
-                                      #{r** _hoQGWMnyQPAh3k2jhWMhI}#
-                                      #{w** _hoQGWMnyQPAh3k2jhWMhJ}#
-                                      #{aok _hoQGWMnyQPAh3k2jhWMg9}#
+                              (let ((#{l -ANAU$bmvAmthP7L7xwsno}#
+                                      (#{gen-labels -ANAU$bmvAmthP7L7xwnNj}#
+                                        (list #{v -ANAU$bmvAmthP7L7xwsnn}#))))
+                                (let ((#{r** -ANAU$bmvAmthP7L7xwsnp}#
+                                        (#{extend-var-env -ANAU$bmvAmthP7L7xwnNb}#
+                                          #{l -ANAU$bmvAmthP7L7xwsno}#
+                                          (list #{v -ANAU$bmvAmthP7L7xwsnn}#)
+                                          #{r* -ANAU$bmvAmthP7L7xwsnc}#)))
+                                  (let ((#{w** -ANAU$bmvAmthP7L7xwsnq}#
+                                          (#{make-binding-wrap -ANAU$bmvAmthP7L7xwnNu}#
+                                            (list #{id -ANAU$bmvAmthP7L7xwsnl}#)
+                                            #{l -ANAU$bmvAmthP7L7xwsno}#
+                                            #{w* -ANAU$bmvAmthP7L7xwsnd}#)))
+                                    (#{parse-kw -ANAU$bmvAmthP7L7xwsb5}#
+                                      #{req -ANAU$bmvAmthP7L7xwsnW}#
+                                      #{opt -ANAU$bmvAmthP7L7xwsnX}#
+                                      #{rest -ANAU$bmvAmthP7L7xwsnY}#
+                                      (cdr #{kw -ANAU$bmvAmthP7L7xwsnZ}#)
+                                      #{body -ANAU$bmvAmthP7L7xwsna}#
+                                      (cons #{v -ANAU$bmvAmthP7L7xwsnn}#
+                                            #{vars -ANAU$bmvAmthP7L7xwsnb}#)
+                                      #{r** -ANAU$bmvAmthP7L7xwsnp}#
+                                      #{w** -ANAU$bmvAmthP7L7xwsnq}#
+                                      #{aok -ANAU$bmvAmthP7L7xwsne}#
                                       (cons (list (syntax->datum
-                                                    #{k _hoQGWMnyQPAh3k2jhWMhD}#)
+                                                    #{k -ANAU$bmvAmthP7L7xwsnk}#)
                                                   (syntax->datum
-                                                    #{id _hoQGWMnyQPAh3k2jhWMhE}#)
-                                                  #{v _hoQGWMnyQPAh3k2jhWMhG}#)
-                                            #{out _hoQGWMnyQPAh3k2jhWMg$}#)
-                                      (cons (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                              #{i _hoQGWMnyQPAh3k2jhWMhF}#
-                                              #{r* _hoQGWMnyQPAh3k2jhWMg7}#
-                                              #{w* _hoQGWMnyQPAh3k2jhWMg8}#
-                                              #{mod _hoQGWMnyQPAh3k2jhWMVT}#)
-                                            #{inits _hoQGWMnyQPAh3k2jhWMg@}#)))))))
-                          #{tmp _hoQGWMnyQPAh3k2jhWMhB}#)
+                                                    #{id -ANAU$bmvAmthP7L7xwsnl}#)
+                                                  #{v -ANAU$bmvAmthP7L7xwsnn}#)
+                                            #{out -ANAU$bmvAmthP7L7xwsnf}#)
+                                      (cons (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                              #{i -ANAU$bmvAmthP7L7xwsnm}#
+                                              #{r* -ANAU$bmvAmthP7L7xwsnc}#
+                                              #{w* -ANAU$bmvAmthP7L7xwsnd}#
+                                              #{mod -ANAU$bmvAmthP7L7xwsb0}#)
+                                            #{inits -ANAU$bmvAmthP7L7xwsng}#)))))))
+                          #{tmp -ANAU$bmvAmthP7L7xwsni}#)
                         (syntax-violation
                           #f
                           "source expression failed to match any pattern"
-                          #{tmp _hoQGWMnyQPAh3k2jhWMhA}#))))
-                  (#{parse-body _hoQGWMnyQPAh3k2jhWMVZ}#
-                    #{req _hoQGWMnyQPAh3k2jhWMg1}#
-                    #{opt _hoQGWMnyQPAh3k2jhWMg2}#
-                    #{rest _hoQGWMnyQPAh3k2jhWMg3}#
-                    (if (if #{aok _hoQGWMnyQPAh3k2jhWMg9}#
-                          #{aok _hoQGWMnyQPAh3k2jhWMg9}#
-                          (pair? #{out _hoQGWMnyQPAh3k2jhWMg$}#))
-                      (cons #{aok _hoQGWMnyQPAh3k2jhWMg9}#
-                            (reverse #{out _hoQGWMnyQPAh3k2jhWMg$}#))
+                          #{tmp -ANAU$bmvAmthP7L7xwsnh}#))))
+                  (#{parse-body -ANAU$bmvAmthP7L7xwsb6}#
+                    #{req -ANAU$bmvAmthP7L7xwsnW}#
+                    #{opt -ANAU$bmvAmthP7L7xwsnX}#
+                    #{rest -ANAU$bmvAmthP7L7xwsnY}#
+                    (if (if #{aok -ANAU$bmvAmthP7L7xwsne}#
+                          #{aok -ANAU$bmvAmthP7L7xwsne}#
+                          (pair? #{out -ANAU$bmvAmthP7L7xwsnf}#))
+                      (cons #{aok -ANAU$bmvAmthP7L7xwsne}#
+                            (reverse #{out -ANAU$bmvAmthP7L7xwsnf}#))
                       #f)
-                    #{body _hoQGWMnyQPAh3k2jhWMg5}#
-                    (reverse #{vars _hoQGWMnyQPAh3k2jhWMg6}#)
-                    #{r* _hoQGWMnyQPAh3k2jhWMg7}#
-                    #{w* _hoQGWMnyQPAh3k2jhWMg8}#
-                    (reverse #{inits _hoQGWMnyQPAh3k2jhWMg@}#)
+                    #{body -ANAU$bmvAmthP7L7xwsna}#
+                    (reverse #{vars -ANAU$bmvAmthP7L7xwsnb}#)
+                    #{r* -ANAU$bmvAmthP7L7xwsnc}#
+                    #{w* -ANAU$bmvAmthP7L7xwsnd}#
+                    (reverse #{inits -ANAU$bmvAmthP7L7xwsng}#)
                     '()))))
-            (#{parse-body _hoQGWMnyQPAh3k2jhWMVZ}#
-              (lambda (#{req _hoQGWMnyQPAh3k2jhWMk8}#
-                       #{opt _hoQGWMnyQPAh3k2jhWMk9}#
-                       #{rest _hoQGWMnyQPAh3k2jhWMk$}#
-                       #{kw _hoQGWMnyQPAh3k2jhWMk@}#
-                       #{body _hoQGWMnyQPAh3k2jhWMlA}#
-                       #{vars _hoQGWMnyQPAh3k2jhWMlB}#
-                       #{r* _hoQGWMnyQPAh3k2jhWMlC}#
-                       #{w* _hoQGWMnyQPAh3k2jhWMlD}#
-                       #{inits _hoQGWMnyQPAh3k2jhWMlE}#
-                       #{meta _hoQGWMnyQPAh3k2jhWMlF}#)
-                (let ((#{tmp _hoQGWMnyQPAh3k2jhWMlH}#
+            (#{parse-body -ANAU$bmvAmthP7L7xwsb6}#
+              (lambda (#{req -ANAU$bmvAmthP7L7xwsrd}#
+                       #{opt -ANAU$bmvAmthP7L7xwsre}#
+                       #{rest -ANAU$bmvAmthP7L7xwsrf}#
+                       #{kw -ANAU$bmvAmthP7L7xwsrg}#
+                       #{body -ANAU$bmvAmthP7L7xwsrh}#
+                       #{vars -ANAU$bmvAmthP7L7xwsri}#
+                       #{r* -ANAU$bmvAmthP7L7xwsrj}#
+                       #{w* -ANAU$bmvAmthP7L7xwsrk}#
+                       #{inits -ANAU$bmvAmthP7L7xwsrl}#
+                       #{meta -ANAU$bmvAmthP7L7xwsrm}#)
+                (let ((#{tmp -ANAU$bmvAmthP7L7xwsro}#
                         ($sc-dispatch
-                          #{body _hoQGWMnyQPAh3k2jhWMlA}#
+                          #{body -ANAU$bmvAmthP7L7xwsrh}#
                           '(any any . each-any))))
-                  (if (if #{tmp _hoQGWMnyQPAh3k2jhWMlH}#
+                  (if (if #{tmp -ANAU$bmvAmthP7L7xwsro}#
                         (@apply
-                          (lambda (#{docstring _hoQGWMnyQPAh3k2jhWMlL}#
-                                   #{e1 _hoQGWMnyQPAh3k2jhWMlM}#
-                                   #{e2 _hoQGWMnyQPAh3k2jhWMlN}#)
+                          (lambda (#{docstring -ANAU$bmvAmthP7L7xwsrs}#
+                                   #{e1 -ANAU$bmvAmthP7L7xwsrt}#
+                                   #{e2 -ANAU$bmvAmthP7L7xwsru}#)
                             (string?
                               (syntax->datum
-                                #{docstring _hoQGWMnyQPAh3k2jhWMlL}#)))
-                          #{tmp _hoQGWMnyQPAh3k2jhWMlH}#)
+                                #{docstring -ANAU$bmvAmthP7L7xwsrs}#)))
+                          #{tmp -ANAU$bmvAmthP7L7xwsro}#)
                         #f)
                     (@apply
-                      (lambda (#{docstring _hoQGWMnyQPAh3k2jhWMlO}#
-                               #{e1 _hoQGWMnyQPAh3k2jhWMlP}#
-                               #{e2 _hoQGWMnyQPAh3k2jhWMlQ}#)
-                        (#{parse-body _hoQGWMnyQPAh3k2jhWMVZ}#
-                          #{req _hoQGWMnyQPAh3k2jhWMk8}#
-                          #{opt _hoQGWMnyQPAh3k2jhWMk9}#
-                          #{rest _hoQGWMnyQPAh3k2jhWMk$}#
-                          #{kw _hoQGWMnyQPAh3k2jhWMk@}#
-                          (cons #{e1 _hoQGWMnyQPAh3k2jhWMlP}#
-                                #{e2 _hoQGWMnyQPAh3k2jhWMlQ}#)
-                          #{vars _hoQGWMnyQPAh3k2jhWMlB}#
-                          #{r* _hoQGWMnyQPAh3k2jhWMlC}#
-                          #{w* _hoQGWMnyQPAh3k2jhWMlD}#
-                          #{inits _hoQGWMnyQPAh3k2jhWMlE}#
+                      (lambda (#{docstring -ANAU$bmvAmthP7L7xwsrv}#
+                               #{e1 -ANAU$bmvAmthP7L7xwsrw}#
+                               #{e2 -ANAU$bmvAmthP7L7xwsrx}#)
+                        (#{parse-body -ANAU$bmvAmthP7L7xwsb6}#
+                          #{req -ANAU$bmvAmthP7L7xwsrd}#
+                          #{opt -ANAU$bmvAmthP7L7xwsre}#
+                          #{rest -ANAU$bmvAmthP7L7xwsrf}#
+                          #{kw -ANAU$bmvAmthP7L7xwsrg}#
+                          (cons #{e1 -ANAU$bmvAmthP7L7xwsrw}#
+                                #{e2 -ANAU$bmvAmthP7L7xwsrx}#)
+                          #{vars -ANAU$bmvAmthP7L7xwsri}#
+                          #{r* -ANAU$bmvAmthP7L7xwsrj}#
+                          #{w* -ANAU$bmvAmthP7L7xwsrk}#
+                          #{inits -ANAU$bmvAmthP7L7xwsrl}#
                           (append
-                            #{meta _hoQGWMnyQPAh3k2jhWMlF}#
+                            #{meta -ANAU$bmvAmthP7L7xwsrm}#
                             (list (cons 'documentation
                                         (syntax->datum
-                                          #{docstring _hoQGWMnyQPAh3k2jhWMlO}#))))))
-                      #{tmp _hoQGWMnyQPAh3k2jhWMlH}#)
-                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWMlR}#
+                                          #{docstring -ANAU$bmvAmthP7L7xwsrv}#))))))
+                      #{tmp -ANAU$bmvAmthP7L7xwsro}#)
+                    (let ((#{tmp -ANAU$bmvAmthP7L7xwsry}#
                             ($sc-dispatch
-                              #{body _hoQGWMnyQPAh3k2jhWMlA}#
+                              #{body -ANAU$bmvAmthP7L7xwsrh}#
                               '(#(vector #(each (any . any)))
                                 any
                                 .
                                 each-any))))
-                      (if #{tmp _hoQGWMnyQPAh3k2jhWMlR}#
+                      (if #{tmp -ANAU$bmvAmthP7L7xwsry}#
                         (@apply
-                          (lambda (#{k _hoQGWMnyQPAh3k2jhWMlV}#
-                                   #{v _hoQGWMnyQPAh3k2jhWMlW}#
-                                   #{e1 _hoQGWMnyQPAh3k2jhWMlX}#
-                                   #{e2 _hoQGWMnyQPAh3k2jhWMlY}#)
-                            (#{parse-body _hoQGWMnyQPAh3k2jhWMVZ}#
-                              #{req _hoQGWMnyQPAh3k2jhWMk8}#
-                              #{opt _hoQGWMnyQPAh3k2jhWMk9}#
-                              #{rest _hoQGWMnyQPAh3k2jhWMk$}#
-                              #{kw _hoQGWMnyQPAh3k2jhWMk@}#
-                              (cons #{e1 _hoQGWMnyQPAh3k2jhWMlX}#
-                                    #{e2 _hoQGWMnyQPAh3k2jhWMlY}#)
-                              #{vars _hoQGWMnyQPAh3k2jhWMlB}#
-                              #{r* _hoQGWMnyQPAh3k2jhWMlC}#
-                              #{w* _hoQGWMnyQPAh3k2jhWMlD}#
-                              #{inits _hoQGWMnyQPAh3k2jhWMlE}#
+                          (lambda (#{k -ANAU$bmvAmthP7L7xwsr2}#
+                                   #{v -ANAU$bmvAmthP7L7xwsr3}#
+                                   #{e1 -ANAU$bmvAmthP7L7xwsr4}#
+                                   #{e2 -ANAU$bmvAmthP7L7xwsr5}#)
+                            (#{parse-body -ANAU$bmvAmthP7L7xwsb6}#
+                              #{req -ANAU$bmvAmthP7L7xwsrd}#
+                              #{opt -ANAU$bmvAmthP7L7xwsre}#
+                              #{rest -ANAU$bmvAmthP7L7xwsrf}#
+                              #{kw -ANAU$bmvAmthP7L7xwsrg}#
+                              (cons #{e1 -ANAU$bmvAmthP7L7xwsr4}#
+                                    #{e2 -ANAU$bmvAmthP7L7xwsr5}#)
+                              #{vars -ANAU$bmvAmthP7L7xwsri}#
+                              #{r* -ANAU$bmvAmthP7L7xwsrj}#
+                              #{w* -ANAU$bmvAmthP7L7xwsrk}#
+                              #{inits -ANAU$bmvAmthP7L7xwsrl}#
                               (append
-                                #{meta _hoQGWMnyQPAh3k2jhWMlF}#
+                                #{meta -ANAU$bmvAmthP7L7xwsrm}#
                                 (syntax->datum
                                   (map cons
-                                       #{k _hoQGWMnyQPAh3k2jhWMlV}#
-                                       #{v _hoQGWMnyQPAh3k2jhWMlW}#)))))
-                          #{tmp _hoQGWMnyQPAh3k2jhWMlR}#)
-                        (let ((#{tmp _hoQGWMnyQPAh3k2jhWMlZ}#
+                                       #{k -ANAU$bmvAmthP7L7xwsr2}#
+                                       #{v -ANAU$bmvAmthP7L7xwsr3}#)))))
+                          #{tmp -ANAU$bmvAmthP7L7xwsry}#)
+                        (let ((#{tmp -ANAU$bmvAmthP7L7xwsr6}#
                                 ($sc-dispatch
-                                  #{body _hoQGWMnyQPAh3k2jhWMlA}#
+                                  #{body -ANAU$bmvAmthP7L7xwsrh}#
                                   '(any . each-any))))
-                          (if #{tmp _hoQGWMnyQPAh3k2jhWMlZ}#
+                          (if #{tmp -ANAU$bmvAmthP7L7xwsr6}#
                             (@apply
-                              (lambda (#{e1 _hoQGWMnyQPAh3k2jhWMld}#
-                                       #{e2 _hoQGWMnyQPAh3k2jhWMle}#)
+                              (lambda (#{e1 -ANAU$bmvAmthP7L7xwsr$}#
+                                       #{e2 -ANAU$bmvAmthP7L7xwsr@}#)
                                 (values
-                                  #{meta _hoQGWMnyQPAh3k2jhWMlF}#
-                                  #{req _hoQGWMnyQPAh3k2jhWMk8}#
-                                  #{opt _hoQGWMnyQPAh3k2jhWMk9}#
-                                  #{rest _hoQGWMnyQPAh3k2jhWMk$}#
-                                  #{kw _hoQGWMnyQPAh3k2jhWMk@}#
-                                  #{inits _hoQGWMnyQPAh3k2jhWMlE}#
-                                  #{vars _hoQGWMnyQPAh3k2jhWMlB}#
-                                  (#{expand-body _hoQGWMnyQPAh3k2jhWHTp}#
-                                    (cons #{e1 _hoQGWMnyQPAh3k2jhWMld}#
-                                          #{e2 _hoQGWMnyQPAh3k2jhWMle}#)
-                                    (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                                  #{meta -ANAU$bmvAmthP7L7xwsrm}#
+                                  #{req -ANAU$bmvAmthP7L7xwsrd}#
+                                  #{opt -ANAU$bmvAmthP7L7xwsre}#
+                                  #{rest -ANAU$bmvAmthP7L7xwsrf}#
+                                  #{kw -ANAU$bmvAmthP7L7xwsrg}#
+                                  #{inits -ANAU$bmvAmthP7L7xwsrl}#
+                                  #{vars -ANAU$bmvAmthP7L7xwsri}#
+                                  (#{expand-body -ANAU$bmvAmthP7L7xwnOI}#
+                                    (cons #{e1 -ANAU$bmvAmthP7L7xwsr$}#
+                                          #{e2 -ANAU$bmvAmthP7L7xwsr@}#)
+                                    (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                                       (begin
-                                        (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWMVP}#)
-                                              #{s _hoQGWMnyQPAh3k2jhWMVS}#
+                                        (if (if (pair? #{e -ANAU$bmvAmthP7L7xwsbw}#)
+                                              #{s -ANAU$bmvAmthP7L7xwsbz}#
                                               #f)
                                           (set-source-properties!
-                                            #{e _hoQGWMnyQPAh3k2jhWMVP}#
-                                            #{s _hoQGWMnyQPAh3k2jhWMVS}#))
-                                        #{e _hoQGWMnyQPAh3k2jhWMVP}#)
-                                      #{w _hoQGWMnyQPAh3k2jhWMVR}#
-                                      #{mod _hoQGWMnyQPAh3k2jhWMVT}#)
-                                    #{r* _hoQGWMnyQPAh3k2jhWMlC}#
-                                    #{w* _hoQGWMnyQPAh3k2jhWMlD}#
-                                    #{mod _hoQGWMnyQPAh3k2jhWMVT}#)))
-                              #{tmp _hoQGWMnyQPAh3k2jhWMlZ}#)
+                                            #{e -ANAU$bmvAmthP7L7xwsbw}#
+                                            #{s -ANAU$bmvAmthP7L7xwsbz}#))
+                                        #{e -ANAU$bmvAmthP7L7xwsbw}#)
+                                      #{w -ANAU$bmvAmthP7L7xwsby}#
+                                      #{mod -ANAU$bmvAmthP7L7xwsb0}#)
+                                    #{r* -ANAU$bmvAmthP7L7xwsrj}#
+                                    #{w* -ANAU$bmvAmthP7L7xwsrk}#
+                                    #{mod -ANAU$bmvAmthP7L7xwsb0}#)))
+                              #{tmp -ANAU$bmvAmthP7L7xwsr6}#)
                             (syntax-violation
                               #f
                               "source expression failed to match any pattern"
-                              #{body _hoQGWMnyQPAh3k2jhWMlA}#))))))))))
-           (let ((#{tmp _hoQGWMnyQPAh3k2jhWMVb}#
+                              #{body -ANAU$bmvAmthP7L7xwsrh}#))))))))))
+           (let ((#{tmp -ANAU$bmvAmthP7L7xwsb8}#
                    ($sc-dispatch
-                     #{clauses _hoQGWMnyQPAh3k2jhWMVV}#
+                     #{clauses -ANAU$bmvAmthP7L7xwsb2}#
                      '())))
-             (if #{tmp _hoQGWMnyQPAh3k2jhWMVb}#
+             (if #{tmp -ANAU$bmvAmthP7L7xwsb8}#
                (@apply
                  (lambda () (values '() #f))
-                 #{tmp _hoQGWMnyQPAh3k2jhWMVb}#)
-               (let ((#{tmp _hoQGWMnyQPAh3k2jhWMVf}#
+                 #{tmp -ANAU$bmvAmthP7L7xwsb8}#)
+               (let ((#{tmp -ANAU$bmvAmthP7L7xwscA}#
                        ($sc-dispatch
-                         #{clauses _hoQGWMnyQPAh3k2jhWMVV}#
+                         #{clauses -ANAU$bmvAmthP7L7xwsb2}#
                          '((any any . each-any)
                            .
                            #(each (any any . each-any))))))
-                 (if #{tmp _hoQGWMnyQPAh3k2jhWMVf}#
+                 (if #{tmp -ANAU$bmvAmthP7L7xwscA}#
                    (@apply
-                     (lambda (#{args _hoQGWMnyQPAh3k2jhWMVj}#
-                              #{e1 _hoQGWMnyQPAh3k2jhWMVk}#
-                              #{e2 _hoQGWMnyQPAh3k2jhWMVl}#
-                              #{args* _hoQGWMnyQPAh3k2jhWMVm}#
-                              #{e1* _hoQGWMnyQPAh3k2jhWMVn}#
-                              #{e2* _hoQGWMnyQPAh3k2jhWMVo}#)
+                     (lambda (#{args -ANAU$bmvAmthP7L7xwscE}#
+                              #{e1 -ANAU$bmvAmthP7L7xwscF}#
+                              #{e2 -ANAU$bmvAmthP7L7xwscG}#
+                              #{args* -ANAU$bmvAmthP7L7xwscH}#
+                              #{e1* -ANAU$bmvAmthP7L7xwscI}#
+                              #{e2* -ANAU$bmvAmthP7L7xwscJ}#)
                        (call-with-values
                          (lambda ()
-                           (#{get-formals _hoQGWMnyQPAh3k2jhWMVU}#
-                             #{args _hoQGWMnyQPAh3k2jhWMVj}#))
-                         (lambda (#{req _hoQGWMnyQPAh3k2jhWMVp}#
-                                  #{opt _hoQGWMnyQPAh3k2jhWMVq}#
-                                  #{rest _hoQGWMnyQPAh3k2jhWMVr}#
-                                  #{kw _hoQGWMnyQPAh3k2jhWMVs}#)
+                           (#{get-formals -ANAU$bmvAmthP7L7xwsb1}#
+                             #{args -ANAU$bmvAmthP7L7xwscE}#))
+                         (lambda (#{req -ANAU$bmvAmthP7L7xwscK}#
+                                  #{opt -ANAU$bmvAmthP7L7xwscL}#
+                                  #{rest -ANAU$bmvAmthP7L7xwscM}#
+                                  #{kw -ANAU$bmvAmthP7L7xwscN}#)
                            (call-with-values
                              (lambda ()
-                               (#{parse-req _hoQGWMnyQPAh3k2jhWMVW}#
-                                 #{req _hoQGWMnyQPAh3k2jhWMVp}#
-                                 #{opt _hoQGWMnyQPAh3k2jhWMVq}#
-                                 #{rest _hoQGWMnyQPAh3k2jhWMVr}#
-                                 #{kw _hoQGWMnyQPAh3k2jhWMVs}#
-                                 (cons #{e1 _hoQGWMnyQPAh3k2jhWMVk}#
-                                       #{e2 _hoQGWMnyQPAh3k2jhWMVl}#)))
-                             (lambda (#{meta _hoQGWMnyQPAh3k2jhWMWp}#
-                                      #{req _hoQGWMnyQPAh3k2jhWMWq}#
-                                      #{opt _hoQGWMnyQPAh3k2jhWMWr}#
-                                      #{rest _hoQGWMnyQPAh3k2jhWMWs}#
-                                      #{kw _hoQGWMnyQPAh3k2jhWMWt}#
-                                      #{inits _hoQGWMnyQPAh3k2jhWMWu}#
-                                      #{vars _hoQGWMnyQPAh3k2jhWMWv}#
-                                      #{body _hoQGWMnyQPAh3k2jhWMWw}#)
+                               (#{parse-req -ANAU$bmvAmthP7L7xwsb3}#
+                                 #{req -ANAU$bmvAmthP7L7xwscK}#
+                                 #{opt -ANAU$bmvAmthP7L7xwscL}#
+                                 #{rest -ANAU$bmvAmthP7L7xwscM}#
+                                 #{kw -ANAU$bmvAmthP7L7xwscN}#
+                                 (cons #{e1 -ANAU$bmvAmthP7L7xwscF}#
+                                       #{e2 -ANAU$bmvAmthP7L7xwscG}#)))
+                             (lambda (#{meta -ANAU$bmvAmthP7L7xwsdK}#
+                                      #{req -ANAU$bmvAmthP7L7xwsdL}#
+                                      #{opt -ANAU$bmvAmthP7L7xwsdM}#
+                                      #{rest -ANAU$bmvAmthP7L7xwsdN}#
+                                      #{kw -ANAU$bmvAmthP7L7xwsdO}#
+                                      #{inits -ANAU$bmvAmthP7L7xwsdP}#
+                                      #{vars -ANAU$bmvAmthP7L7xwsdQ}#
+                                      #{body -ANAU$bmvAmthP7L7xwsdR}#)
                                (call-with-values
                                  (lambda ()
-                                   (#{expand-lambda-case _hoQGWMnyQPAh3k2jhWHTx}#
-                                     #{e _hoQGWMnyQPAh3k2jhWMVP}#
-                                     #{r _hoQGWMnyQPAh3k2jhWMVQ}#
-                                     #{w _hoQGWMnyQPAh3k2jhWMVR}#
-                                     #{s _hoQGWMnyQPAh3k2jhWMVS}#
-                                     #{mod _hoQGWMnyQPAh3k2jhWMVT}#
-                                     #{get-formals _hoQGWMnyQPAh3k2jhWMVU}#
-                                     (map (lambda (#{tmp _hoQGWMnyQPAh3k2jhWHDD _hoQGWMnyQPAh3k2jhWMWx}#
-                                                   #{tmp _hoQGWMnyQPAh3k2jhWHDC _hoQGWMnyQPAh3k2jhWMWy}#
-                                                   #{tmp _hoQGWMnyQPAh3k2jhWHDB _hoQGWMnyQPAh3k2jhWMWz}#)
-                                            (cons #{tmp _hoQGWMnyQPAh3k2jhWHDB _hoQGWMnyQPAh3k2jhWMWz}#
-                                                  (cons #{tmp _hoQGWMnyQPAh3k2jhWHDC _hoQGWMnyQPAh3k2jhWMWy}#
-                                                        #{tmp _hoQGWMnyQPAh3k2jhWHDD _hoQGWMnyQPAh3k2jhWMWx}#)))
-                                          #{e2* _hoQGWMnyQPAh3k2jhWMVo}#
-                                          #{e1* _hoQGWMnyQPAh3k2jhWMVn}#
-                                          #{args* _hoQGWMnyQPAh3k2jhWMVm}#)))
-                                 (lambda (#{meta* _hoQGWMnyQPAh3k2jhWMW0}#
-                                          #{else* _hoQGWMnyQPAh3k2jhWMW1}#)
+                                   (#{expand-lambda-case -ANAU$bmvAmthP7L7xwnOQ}#
+                                     #{e -ANAU$bmvAmthP7L7xwsbw}#
+                                     #{r -ANAU$bmvAmthP7L7xwsbx}#
+                                     #{w -ANAU$bmvAmthP7L7xwsby}#
+                                     #{s -ANAU$bmvAmthP7L7xwsbz}#
+                                     #{mod -ANAU$bmvAmthP7L7xwsb0}#
+                                     #{get-formals -ANAU$bmvAmthP7L7xwsb1}#
+                                     (map (lambda (#{tmp -ANAU$bmvAmthP7L7xwm9f -ANAU$bmvAmthP7L7xwsdS}#
+                                                   #{tmp -ANAU$bmvAmthP7L7xwm9e -ANAU$bmvAmthP7L7xwsdT}#
+                                                   #{tmp -ANAU$bmvAmthP7L7xwm9d -ANAU$bmvAmthP7L7xwsdU}#)
+                                            (cons #{tmp -ANAU$bmvAmthP7L7xwm9d -ANAU$bmvAmthP7L7xwsdU}#
+                                                  (cons #{tmp -ANAU$bmvAmthP7L7xwm9e -ANAU$bmvAmthP7L7xwsdT}#
+                                                        #{tmp -ANAU$bmvAmthP7L7xwm9f -ANAU$bmvAmthP7L7xwsdS}#)))
+                                          #{e2* -ANAU$bmvAmthP7L7xwscJ}#
+                                          #{e1* -ANAU$bmvAmthP7L7xwscI}#
+                                          #{args* -ANAU$bmvAmthP7L7xwscH}#)))
+                                 (lambda (#{meta* -ANAU$bmvAmthP7L7xwsdV}#
+                                          #{else* -ANAU$bmvAmthP7L7xwsdW}#)
                                    (values
                                      (append
-                                       #{meta _hoQGWMnyQPAh3k2jhWMWp}#
-                                       #{meta* _hoQGWMnyQPAh3k2jhWMW0}#)
+                                       #{meta -ANAU$bmvAmthP7L7xwsdK}#
+                                       #{meta* -ANAU$bmvAmthP7L7xwsdV}#)
                                      (make-struct/no-tail
                                        (vector-ref %expanded-vtables 14)
-                                       #{s _hoQGWMnyQPAh3k2jhWMVS}#
-                                       #{req _hoQGWMnyQPAh3k2jhWMWq}#
-                                       #{opt _hoQGWMnyQPAh3k2jhWMWr}#
-                                       #{rest _hoQGWMnyQPAh3k2jhWMWs}#
-                                       #{kw _hoQGWMnyQPAh3k2jhWMWt}#
-                                       #{inits _hoQGWMnyQPAh3k2jhWMWu}#
-                                       #{vars _hoQGWMnyQPAh3k2jhWMWv}#
-                                       #{body _hoQGWMnyQPAh3k2jhWMWw}#
-                                       #{else* _hoQGWMnyQPAh3k2jhWMW1}#)))))))))
-                     #{tmp _hoQGWMnyQPAh3k2jhWMVf}#)
+                                       #{s -ANAU$bmvAmthP7L7xwsbz}#
+                                       #{req -ANAU$bmvAmthP7L7xwsdL}#
+                                       #{opt -ANAU$bmvAmthP7L7xwsdM}#
+                                       #{rest -ANAU$bmvAmthP7L7xwsdN}#
+                                       #{kw -ANAU$bmvAmthP7L7xwsdO}#
+                                       #{inits -ANAU$bmvAmthP7L7xwsdP}#
+                                       #{vars -ANAU$bmvAmthP7L7xwsdQ}#
+                                       #{body -ANAU$bmvAmthP7L7xwsdR}#
+                                       #{else* -ANAU$bmvAmthP7L7xwsdW}#)))))))))
+                     #{tmp -ANAU$bmvAmthP7L7xwscA}#)
                    (syntax-violation
                      #f
                      "source expression failed to match any pattern"
-                     #{clauses _hoQGWMnyQPAh3k2jhWMVV}#))))))))
-     (#{strip _hoQGWMnyQPAh3k2jhWHTy}#
-       (lambda (#{x _hoQGWMnyQPAh3k2jhWMmD}#
-                #{w _hoQGWMnyQPAh3k2jhWMmE}#)
-         (if (memq 'top (car #{w _hoQGWMnyQPAh3k2jhWMmE}#))
-           #{x _hoQGWMnyQPAh3k2jhWMmD}#
+                     #{clauses -ANAU$bmvAmthP7L7xwsb2}#))))))))
+     (#{strip -ANAU$bmvAmthP7L7xwnOR}#
+       (lambda (#{x -ANAU$bmvAmthP7L7xwssk}#
+                #{w -ANAU$bmvAmthP7L7xwssl}#)
+         (if (memq 'top (car #{w -ANAU$bmvAmthP7L7xwssl}#))
+           #{x -ANAU$bmvAmthP7L7xwssk}#
            (letrec*
-             ((#{f _hoQGWMnyQPAh3k2jhWMmF}#
-                (lambda (#{x _hoQGWMnyQPAh3k2jhWMmI}#)
-                  (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWMmI}#)
-                        (if (= (vector-length #{x _hoQGWMnyQPAh3k2jhWMmI}#)
+             ((#{f -ANAU$bmvAmthP7L7xwssm}#
+                (lambda (#{x -ANAU$bmvAmthP7L7xwssp}#)
+                  (if (if (vector? #{x -ANAU$bmvAmthP7L7xwssp}#)
+                        (if (= (vector-length #{x -ANAU$bmvAmthP7L7xwssp}#)
                                4)
-                          (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWMmI}# 0)
+                          (eq? (vector-ref #{x -ANAU$bmvAmthP7L7xwssp}# 0)
                                'syntax-object)
                           #f)
                         #f)
-                    (#{strip _hoQGWMnyQPAh3k2jhWHTy}#
-                      (vector-ref #{x _hoQGWMnyQPAh3k2jhWMmI}# 1)
-                      (vector-ref #{x _hoQGWMnyQPAh3k2jhWMmI}# 2))
-                    (if (pair? #{x _hoQGWMnyQPAh3k2jhWMmI}#)
-                      (let ((#{a _hoQGWMnyQPAh3k2jhWMmb}#
-                              (#{f _hoQGWMnyQPAh3k2jhWMmF}#
-                                (car #{x _hoQGWMnyQPAh3k2jhWMmI}#)))
-                            (#{d _hoQGWMnyQPAh3k2jhWMmc}#
-                              (#{f _hoQGWMnyQPAh3k2jhWMmF}#
-                                (cdr #{x _hoQGWMnyQPAh3k2jhWMmI}#))))
-                        (if (if (eq? #{a _hoQGWMnyQPAh3k2jhWMmb}#
-                                     (car #{x _hoQGWMnyQPAh3k2jhWMmI}#))
-                              (eq? #{d _hoQGWMnyQPAh3k2jhWMmc}#
-                                   (cdr #{x _hoQGWMnyQPAh3k2jhWMmI}#))
+                    (#{strip -ANAU$bmvAmthP7L7xwnOR}#
+                      (vector-ref #{x -ANAU$bmvAmthP7L7xwssp}# 1)
+                      (vector-ref #{x -ANAU$bmvAmthP7L7xwssp}# 2))
+                    (if (pair? #{x -ANAU$bmvAmthP7L7xwssp}#)
+                      (let ((#{a -ANAU$bmvAmthP7L7xwss8}#
+                              (#{f -ANAU$bmvAmthP7L7xwssm}#
+                                (car #{x -ANAU$bmvAmthP7L7xwssp}#)))
+                            (#{d -ANAU$bmvAmthP7L7xwss9}#
+                              (#{f -ANAU$bmvAmthP7L7xwssm}#
+                                (cdr #{x -ANAU$bmvAmthP7L7xwssp}#))))
+                        (if (if (eq? #{a -ANAU$bmvAmthP7L7xwss8}#
+                                     (car #{x -ANAU$bmvAmthP7L7xwssp}#))
+                              (eq? #{d -ANAU$bmvAmthP7L7xwss9}#
+                                   (cdr #{x -ANAU$bmvAmthP7L7xwssp}#))
                               #f)
-                          #{x _hoQGWMnyQPAh3k2jhWMmI}#
-                          (cons #{a _hoQGWMnyQPAh3k2jhWMmb}#
-                                #{d _hoQGWMnyQPAh3k2jhWMmc}#)))
-                      (if (vector? #{x _hoQGWMnyQPAh3k2jhWMmI}#)
-                        (let ((#{old _hoQGWMnyQPAh3k2jhWMmf}#
-                                (vector->list #{x _hoQGWMnyQPAh3k2jhWMmI}#)))
-                          (let ((#{new _hoQGWMnyQPAh3k2jhWMmg}#
-                                  (map #{f _hoQGWMnyQPAh3k2jhWMmF}#
-                                       #{old _hoQGWMnyQPAh3k2jhWMmf}#)))
+                          #{x -ANAU$bmvAmthP7L7xwssp}#
+                          (cons #{a -ANAU$bmvAmthP7L7xwss8}#
+                                #{d -ANAU$bmvAmthP7L7xwss9}#)))
+                      (if (vector? #{x -ANAU$bmvAmthP7L7xwssp}#)
+                        (let ((#{old -ANAU$bmvAmthP7L7xwstA}#
+                                (vector->list #{x -ANAU$bmvAmthP7L7xwssp}#)))
+                          (let ((#{new -ANAU$bmvAmthP7L7xwstB}#
+                                  (map #{f -ANAU$bmvAmthP7L7xwssm}#
+                                       #{old -ANAU$bmvAmthP7L7xwstA}#)))
                             (letrec*
-                              ((#{lp _hoQGWMnyQPAh3k2jhWMmh}#
-                                 (lambda (#{l1 _hoQGWMnyQPAh3k2jhWMnt}#
-                                          #{l2 _hoQGWMnyQPAh3k2jhWMnu}#)
-                                   (if (null? #{l1 _hoQGWMnyQPAh3k2jhWMnt}#)
-                                     #{x _hoQGWMnyQPAh3k2jhWMmI}#
-                                     (if (eq? (car #{l1 _hoQGWMnyQPAh3k2jhWMnt}#)
-                                              (car #{l2 _hoQGWMnyQPAh3k2jhWMnu}#))
-                                       (#{lp _hoQGWMnyQPAh3k2jhWMmh}#
-                                         (cdr #{l1 _hoQGWMnyQPAh3k2jhWMnt}#)
-                                         (cdr #{l2 _hoQGWMnyQPAh3k2jhWMnu}#))
+                              ((#{lp -ANAU$bmvAmthP7L7xwstC}#
+                                 (lambda (#{l1 -ANAU$bmvAmthP7L7xwsuO}#
+                                          #{l2 -ANAU$bmvAmthP7L7xwsuP}#)
+                                   (if (null? #{l1 -ANAU$bmvAmthP7L7xwsuO}#)
+                                     #{x -ANAU$bmvAmthP7L7xwssp}#
+                                     (if (eq? (car #{l1 -ANAU$bmvAmthP7L7xwsuO}#)
+                                              (car #{l2 -ANAU$bmvAmthP7L7xwsuP}#))
+                                       (#{lp -ANAU$bmvAmthP7L7xwstC}#
+                                         (cdr #{l1 -ANAU$bmvAmthP7L7xwsuO}#)
+                                         (cdr #{l2 -ANAU$bmvAmthP7L7xwsuP}#))
                                        (list->vector
-                                         #{new _hoQGWMnyQPAh3k2jhWMmg}#))))))
-                              (#{lp _hoQGWMnyQPAh3k2jhWMmh}#
-                                #{old _hoQGWMnyQPAh3k2jhWMmf}#
-                                #{new _hoQGWMnyQPAh3k2jhWMmg}#))))
-                        #{x _hoQGWMnyQPAh3k2jhWMmI}#))))))
-             (#{f _hoQGWMnyQPAh3k2jhWMmF}#
-               #{x _hoQGWMnyQPAh3k2jhWMmD}#)))))
-     (#{gen-var _hoQGWMnyQPAh3k2jhWHTz}#
-       (lambda (#{id _hoQGWMnyQPAh3k2jhWMXh}#)
-         (let ((#{id _hoQGWMnyQPAh3k2jhWMXi}#
-                 (if (if (vector? #{id _hoQGWMnyQPAh3k2jhWMXh}#)
-                       (if (= (vector-length #{id _hoQGWMnyQPAh3k2jhWMXh}#)
+                                         #{new -ANAU$bmvAmthP7L7xwstB}#))))))
+                              (#{lp -ANAU$bmvAmthP7L7xwstC}#
+                                #{old -ANAU$bmvAmthP7L7xwstA}#
+                                #{new -ANAU$bmvAmthP7L7xwstB}#))))
+                        #{x -ANAU$bmvAmthP7L7xwssp}#))))))
+             (#{f -ANAU$bmvAmthP7L7xwssm}#
+               #{x -ANAU$bmvAmthP7L7xwssk}#)))))
+     (#{gen-var -ANAU$bmvAmthP7L7xwnOS}#
+       (lambda (#{id -ANAU$bmvAmthP7L7xwseC}#)
+         (let ((#{id -ANAU$bmvAmthP7L7xwseD}#
+                 (if (if (vector? #{id -ANAU$bmvAmthP7L7xwseC}#)
+                       (if (= (vector-length #{id -ANAU$bmvAmthP7L7xwseC}#)
                               4)
-                         (eq? (vector-ref #{id _hoQGWMnyQPAh3k2jhWMXh}# 0)
+                         (eq? (vector-ref #{id -ANAU$bmvAmthP7L7xwseC}# 0)
                               'syntax-object)
                          #f)
                        #f)
-                   (vector-ref #{id _hoQGWMnyQPAh3k2jhWMXh}# 1)
-                   #{id _hoQGWMnyQPAh3k2jhWMXh}#)))
+                   (vector-ref #{id -ANAU$bmvAmthP7L7xwseC}# 1)
+                   #{id -ANAU$bmvAmthP7L7xwseC}#)))
            (gensym
              (string-append
-               (symbol->string #{id _hoQGWMnyQPAh3k2jhWMXi}#)
+               (symbol->string #{id -ANAU$bmvAmthP7L7xwseD}#)
                " "))))))
     (begin
-      (set! #{gen-label _hoQGWMnyQPAh3k2jhWHTD}#
-        (let ((#{i _hoQGWMnyQPAh3k2jhWKEc}# 0))
+      (set! #{gen-label -ANAU$bmvAmthP7L7xwnNi}#
+        (let ((#{i -ANAU$bmvAmthP7L7xwqAX}# 0))
           (lambda ()
-            (let ((#{n _hoQGWMnyQPAh3k2jhWKEd}#
-                    #{i _hoQGWMnyQPAh3k2jhWKEc}#))
+            (let ((#{n -ANAU$bmvAmthP7L7xwqAY}#
+                    #{i -ANAU$bmvAmthP7L7xwqAX}#))
               (begin
-                (set! #{i _hoQGWMnyQPAh3k2jhWKEc}#
-                  (#{1+}# #{n _hoQGWMnyQPAh3k2jhWKEd}#))
-                (number->string #{n _hoQGWMnyQPAh3k2jhWKEd}# 36))))))
-      (set! #{transformer-environment _hoQGWMnyQPAh3k2jhWHTX}#
+                (set! #{i -ANAU$bmvAmthP7L7xwqAX}#
+                  (#{1+}# #{n -ANAU$bmvAmthP7L7xwqAY}#))
+                (number->string #{n -ANAU$bmvAmthP7L7xwqAY}# 36))))))
+      (set! #{transformer-environment -ANAU$bmvAmthP7L7xwnN2}#
         (make-fluid
-          (lambda (#{k _hoQGWMnyQPAh3k2jhWJpb}#)
+          (lambda (#{k -ANAU$bmvAmthP7L7xwpsD}#)
             (error "called outside the dynamic extent of a syntax transformer"))))
       (module-define!
         (current-module)
@@ -8998,1500 +8976,1500 @@
           'let-syntax
           'local-syntax
           #f))
-      (#{global-extend _hoQGWMnyQPAh3k2jhWHS@}#
+      (#{global-extend -ANAU$bmvAmthP7L7xwnNe}#
         'core
         'syntax-parameterize
-        (lambda (#{e _hoQGWMnyQPAh3k2jhWHVs}#
-                 #{r _hoQGWMnyQPAh3k2jhWHVt}#
-                 #{w _hoQGWMnyQPAh3k2jhWHVu}#
-                 #{s _hoQGWMnyQPAh3k2jhWHVv}#
-                 #{mod _hoQGWMnyQPAh3k2jhWHVw}#)
-          (let ((#{tmp _hoQGWMnyQPAh3k2jhWHVy}#
+        (lambda (#{e -ANAU$bmvAmthP7L7xwnQL}#
+                 #{r -ANAU$bmvAmthP7L7xwnQM}#
+                 #{w -ANAU$bmvAmthP7L7xwnQN}#
+                 #{s -ANAU$bmvAmthP7L7xwnQO}#
+                 #{mod -ANAU$bmvAmthP7L7xwnQP}#)
+          (let ((#{tmp -ANAU$bmvAmthP7L7xwnQR}#
                   ($sc-dispatch
-                    #{e _hoQGWMnyQPAh3k2jhWHVs}#
+                    #{e -ANAU$bmvAmthP7L7xwnQL}#
                     '(_ #(each (any any)) any . each-any))))
-            (if (if #{tmp _hoQGWMnyQPAh3k2jhWHVy}#
+            (if (if #{tmp -ANAU$bmvAmthP7L7xwnQR}#
                   (@apply
-                    (lambda (#{var _hoQGWMnyQPAh3k2jhWHV2}#
-                             #{val _hoQGWMnyQPAh3k2jhWHV3}#
-                             #{e1 _hoQGWMnyQPAh3k2jhWHV4}#
-                             #{e2 _hoQGWMnyQPAh3k2jhWHV5}#)
-                      (#{valid-bound-ids? _hoQGWMnyQPAh3k2jhWHTb}#
-                        #{var _hoQGWMnyQPAh3k2jhWHV2}#))
-                    #{tmp _hoQGWMnyQPAh3k2jhWHVy}#)
+                    (lambda (#{var -ANAU$bmvAmthP7L7xwnQV}#
+                             #{val -ANAU$bmvAmthP7L7xwnQW}#
+                             #{e1 -ANAU$bmvAmthP7L7xwnQX}#
+                             #{e2 -ANAU$bmvAmthP7L7xwnQY}#)
+                      (#{valid-bound-ids? -ANAU$bmvAmthP7L7xwnN6}#
+                        #{var -ANAU$bmvAmthP7L7xwnQV}#))
+                    #{tmp -ANAU$bmvAmthP7L7xwnQR}#)
                   #f)
               (@apply
-                (lambda (#{var _hoQGWMnyQPAh3k2jhWHXH}#
-                         #{val _hoQGWMnyQPAh3k2jhWHXI}#
-                         #{e1 _hoQGWMnyQPAh3k2jhWHXJ}#
-                         #{e2 _hoQGWMnyQPAh3k2jhWHXK}#)
-                  (let ((#{names _hoQGWMnyQPAh3k2jhWHXL}#
-                          (map (lambda (#{x _hoQGWMnyQPAh3k2jhWHX9}#)
-                                 (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                                   #{x _hoQGWMnyQPAh3k2jhWHX9}#
-                                   #{w _hoQGWMnyQPAh3k2jhWHVu}#))
-                               #{var _hoQGWMnyQPAh3k2jhWHXH}#)))
+                (lambda (#{var -ANAU$bmvAmthP7L7xwnRm}#
+                         #{val -ANAU$bmvAmthP7L7xwnRn}#
+                         #{e1 -ANAU$bmvAmthP7L7xwnRo}#
+                         #{e2 -ANAU$bmvAmthP7L7xwnRp}#)
+                  (let ((#{names -ANAU$bmvAmthP7L7xwnRq}#
+                          (map (lambda (#{x -ANAU$bmvAmthP7L7xwnSc}#)
+                                 (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                                   #{x -ANAU$bmvAmthP7L7xwnSc}#
+                                   #{w -ANAU$bmvAmthP7L7xwnQN}#))
+                               #{var -ANAU$bmvAmthP7L7xwnRm}#)))
                     (begin
                       (for-each
-                        (lambda (#{id _hoQGWMnyQPAh3k2jhWHXM}#
-                                 #{n _hoQGWMnyQPAh3k2jhWHXN}#)
-                          (let ((#{atom-key _hoQGWMnyQPAh3k2jhWHXO}#
-                                  (car (let ((#{t _hoQGWMnyQPAh3k2jhWHXV}#
-                                               (assq #{n _hoQGWMnyQPAh3k2jhWHXN}#
-                                                     #{r _hoQGWMnyQPAh3k2jhWHVt}#)))
-                                         (if #{t _hoQGWMnyQPAh3k2jhWHXV}#
-                                           (cdr #{t _hoQGWMnyQPAh3k2jhWHXV}#)
+                        (lambda (#{id -ANAU$bmvAmthP7L7xwnRr}#
+                                 #{n -ANAU$bmvAmthP7L7xwnRs}#)
+                          (let ((#{atom-key -ANAU$bmvAmthP7L7xwnRt}#
+                                  (car (let ((#{t -ANAU$bmvAmthP7L7xwnR0}#
+                                               (assq #{n -ANAU$bmvAmthP7L7xwnRs}#
+                                                     #{r -ANAU$bmvAmthP7L7xwnQM}#)))
+                                         (if #{t -ANAU$bmvAmthP7L7xwnR0}#
+                                           (cdr #{t -ANAU$bmvAmthP7L7xwnR0}#)
                                            (if (symbol?
-                                                 #{n _hoQGWMnyQPAh3k2jhWHXN}#)
-                                             (let ((#{t _hoQGWMnyQPAh3k2jhWHXa}#
-                                                     (#{get-global-definition-hook _hoQGWMnyQPAh3k2jhWHSc}#
-                                                       #{n _hoQGWMnyQPAh3k2jhWHXN}#
-                                                       #{mod _hoQGWMnyQPAh3k2jhWHVw}#)))
-                                               (if #{t _hoQGWMnyQPAh3k2jhWHXa}#
-                                                 #{t _hoQGWMnyQPAh3k2jhWHXa}#
+                                                 #{n -ANAU$bmvAmthP7L7xwnRs}#)
+                                             (let ((#{t -ANAU$bmvAmthP7L7xwnR5}#
+                                                     (#{get-global-definition-hook -ANAU$bmvAmthP7L7xwnM7}#
+                                                       #{n -ANAU$bmvAmthP7L7xwnRs}#
+                                                       #{mod -ANAU$bmvAmthP7L7xwnQP}#)))
+                                               (if #{t -ANAU$bmvAmthP7L7xwnR5}#
+                                                 #{t -ANAU$bmvAmthP7L7xwnR5}#
                                                  '(global)))
                                              '(displaced-lexical)))))))
-                            (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWHXO}#
+                            (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwnRt}#
                                       'displaced-lexical)
                               (syntax-violation
                                 'syntax-parameterize
                                 "identifier out of context"
-                                #{e _hoQGWMnyQPAh3k2jhWHVs}#
-                                (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                                #{e -ANAU$bmvAmthP7L7xwnQL}#
+                                (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                                   (begin
-                                    (if (if (pair? #{id _hoQGWMnyQPAh3k2jhWHXM}#)
-                                          #{s _hoQGWMnyQPAh3k2jhWHVv}#
+                                    (if (if (pair? #{id -ANAU$bmvAmthP7L7xwnRr}#)
+                                          #{s -ANAU$bmvAmthP7L7xwnQO}#
                                           #f)
                                       (set-source-properties!
-                                        #{id _hoQGWMnyQPAh3k2jhWHXM}#
-                                        #{s _hoQGWMnyQPAh3k2jhWHVv}#))
-                                    #{id _hoQGWMnyQPAh3k2jhWHXM}#)
-                                  #{w _hoQGWMnyQPAh3k2jhWHVu}#
-                                  #{mod _hoQGWMnyQPAh3k2jhWHVw}#)))))
-                        #{var _hoQGWMnyQPAh3k2jhWHXH}#
-                        #{names _hoQGWMnyQPAh3k2jhWHXL}#)
-                      (#{expand-body _hoQGWMnyQPAh3k2jhWHTp}#
-                        (cons #{e1 _hoQGWMnyQPAh3k2jhWHXJ}#
-                              #{e2 _hoQGWMnyQPAh3k2jhWHXK}#)
-                        (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                                        #{id -ANAU$bmvAmthP7L7xwnRr}#
+                                        #{s -ANAU$bmvAmthP7L7xwnQO}#))
+                                    #{id -ANAU$bmvAmthP7L7xwnRr}#)
+                                  #{w -ANAU$bmvAmthP7L7xwnQN}#
+                                  #{mod -ANAU$bmvAmthP7L7xwnQP}#)))))
+                        #{var -ANAU$bmvAmthP7L7xwnRm}#
+                        #{names -ANAU$bmvAmthP7L7xwnRq}#)
+                      (#{expand-body -ANAU$bmvAmthP7L7xwnOI}#
+                        (cons #{e1 -ANAU$bmvAmthP7L7xwnRo}#
+                              #{e2 -ANAU$bmvAmthP7L7xwnRp}#)
+                        (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                           (begin
-                            (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWHVs}#)
-                                  #{s _hoQGWMnyQPAh3k2jhWHVv}#
+                            (if (if (pair? #{e -ANAU$bmvAmthP7L7xwnQL}#)
+                                  #{s -ANAU$bmvAmthP7L7xwnQO}#
                                   #f)
                               (set-source-properties!
-                                #{e _hoQGWMnyQPAh3k2jhWHVs}#
-                                #{s _hoQGWMnyQPAh3k2jhWHVv}#))
-                            #{e _hoQGWMnyQPAh3k2jhWHVs}#)
-                          #{w _hoQGWMnyQPAh3k2jhWHVu}#
-                          #{mod _hoQGWMnyQPAh3k2jhWHVw}#)
-                        (#{extend-env _hoQGWMnyQPAh3k2jhWHS7}#
-                          #{names _hoQGWMnyQPAh3k2jhWHXL}#
-                          (let ((#{trans-r _hoQGWMnyQPAh3k2jhWHZT}#
-                                  (#{macros-only-env _hoQGWMnyQPAh3k2jhWHS9}#
-                                    #{r _hoQGWMnyQPAh3k2jhWHVt}#)))
-                            (map (lambda (#{x _hoQGWMnyQPAh3k2jhWHZU}#)
+                                #{e -ANAU$bmvAmthP7L7xwnQL}#
+                                #{s -ANAU$bmvAmthP7L7xwnQO}#))
+                            #{e -ANAU$bmvAmthP7L7xwnQL}#)
+                          #{w -ANAU$bmvAmthP7L7xwnQN}#
+                          #{mod -ANAU$bmvAmthP7L7xwnQP}#)
+                        (#{extend-env -ANAU$bmvAmthP7L7xwnNa}#
+                          #{names -ANAU$bmvAmthP7L7xwnRq}#
+                          (let ((#{trans-r -ANAU$bmvAmthP7L7xwnTy}#
+                                  (#{macros-only-env -ANAU$bmvAmthP7L7xwnNc}#
+                                    #{r -ANAU$bmvAmthP7L7xwnQM}#)))
+                            (map (lambda (#{x -ANAU$bmvAmthP7L7xwnTz}#)
                                    (cons 'macro
-                                         (#{eval-local-transformer _hoQGWMnyQPAh3k2jhWHTr}#
-                                           (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                             #{x _hoQGWMnyQPAh3k2jhWHZU}#
-                                             #{trans-r _hoQGWMnyQPAh3k2jhWHZT}#
-                                             #{w _hoQGWMnyQPAh3k2jhWHVu}#
-                                             #{mod _hoQGWMnyQPAh3k2jhWHVw}#)
-                                           #{mod _hoQGWMnyQPAh3k2jhWHVw}#)))
-                                 #{val _hoQGWMnyQPAh3k2jhWHXI}#))
-                          #{r _hoQGWMnyQPAh3k2jhWHVt}#)
-                        #{w _hoQGWMnyQPAh3k2jhWHVu}#
-                        #{mod _hoQGWMnyQPAh3k2jhWHVw}#))))
-                #{tmp _hoQGWMnyQPAh3k2jhWHVy}#)
+                                         (#{eval-local-transformer -ANAU$bmvAmthP7L7xwnOK}#
+                                           (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                             #{x -ANAU$bmvAmthP7L7xwnTz}#
+                                             #{trans-r -ANAU$bmvAmthP7L7xwnTy}#
+                                             #{w -ANAU$bmvAmthP7L7xwnQN}#
+                                             #{mod -ANAU$bmvAmthP7L7xwnQP}#)
+                                           #{mod -ANAU$bmvAmthP7L7xwnQP}#)))
+                                 #{val -ANAU$bmvAmthP7L7xwnRn}#))
+                          #{r -ANAU$bmvAmthP7L7xwnQM}#)
+                        #{w -ANAU$bmvAmthP7L7xwnQN}#
+                        #{mod -ANAU$bmvAmthP7L7xwnQP}#))))
+                #{tmp -ANAU$bmvAmthP7L7xwnQR}#)
               (syntax-violation
                 'syntax-parameterize
                 "bad syntax"
-                (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                   (begin
-                    (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWHVs}#)
-                          #{s _hoQGWMnyQPAh3k2jhWHVv}#
+                    (if (if (pair? #{e -ANAU$bmvAmthP7L7xwnQL}#)
+                          #{s -ANAU$bmvAmthP7L7xwnQO}#
                           #f)
                       (set-source-properties!
-                        #{e _hoQGWMnyQPAh3k2jhWHVs}#
-                        #{s _hoQGWMnyQPAh3k2jhWHVv}#))
-                    #{e _hoQGWMnyQPAh3k2jhWHVs}#)
-                  #{w _hoQGWMnyQPAh3k2jhWHVu}#
-                  #{mod _hoQGWMnyQPAh3k2jhWHVw}#))))))
+                        #{e -ANAU$bmvAmthP7L7xwnQL}#
+                        #{s -ANAU$bmvAmthP7L7xwnQO}#))
+                    #{e -ANAU$bmvAmthP7L7xwnQL}#)
+                  #{w -ANAU$bmvAmthP7L7xwnQN}#
+                  #{mod -ANAU$bmvAmthP7L7xwnQP}#))))))
       (module-define!
         (current-module)
         'quote
         (make-syntax-transformer
           'quote
           'core
-          (lambda (#{e _hoQGWMnyQPAh3k2jhWHcl}#
-                   #{r _hoQGWMnyQPAh3k2jhWHcm}#
-                   #{w _hoQGWMnyQPAh3k2jhWHcn}#
-                   #{s _hoQGWMnyQPAh3k2jhWHco}#
-                   #{mod _hoQGWMnyQPAh3k2jhWHcp}#)
-            (let ((#{tmp _hoQGWMnyQPAh3k2jhWHcr}#
+          (lambda (#{e -ANAU$bmvAmthP7L7xwnXE}#
+                   #{r -ANAU$bmvAmthP7L7xwnXF}#
+                   #{w -ANAU$bmvAmthP7L7xwnXG}#
+                   #{s -ANAU$bmvAmthP7L7xwnXH}#
+                   #{mod -ANAU$bmvAmthP7L7xwnXI}#)
+            (let ((#{tmp -ANAU$bmvAmthP7L7xwnXK}#
                     ($sc-dispatch
-                      #{e _hoQGWMnyQPAh3k2jhWHcl}#
+                      #{e -ANAU$bmvAmthP7L7xwnXE}#
                       '(_ any))))
-              (if #{tmp _hoQGWMnyQPAh3k2jhWHcr}#
+              (if #{tmp -ANAU$bmvAmthP7L7xwnXK}#
                 (@apply
-                  (lambda (#{e _hoQGWMnyQPAh3k2jhWHcu}#)
-                    (let ((#{exp _hoQGWMnyQPAh3k2jhWHcy}#
-                            (#{strip _hoQGWMnyQPAh3k2jhWHTy}#
-                              #{e _hoQGWMnyQPAh3k2jhWHcu}#
-                              #{w _hoQGWMnyQPAh3k2jhWHcn}#)))
+                  (lambda (#{e -ANAU$bmvAmthP7L7xwnXN}#)
+                    (let ((#{exp -ANAU$bmvAmthP7L7xwnXR}#
+                            (#{strip -ANAU$bmvAmthP7L7xwnOR}#
+                              #{e -ANAU$bmvAmthP7L7xwnXN}#
+                              #{w -ANAU$bmvAmthP7L7xwnXG}#)))
                       (make-struct/no-tail
                         (vector-ref %expanded-vtables 1)
-                        #{s _hoQGWMnyQPAh3k2jhWHco}#
-                        #{exp _hoQGWMnyQPAh3k2jhWHcy}#)))
-                  #{tmp _hoQGWMnyQPAh3k2jhWHcr}#)
+                        #{s -ANAU$bmvAmthP7L7xwnXH}#
+                        #{exp -ANAU$bmvAmthP7L7xwnXR}#)))
+                  #{tmp -ANAU$bmvAmthP7L7xwnXK}#)
                 (syntax-violation
                   'quote
                   "bad syntax"
-                  (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                  (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                     (begin
-                      (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWHcl}#)
-                            #{s _hoQGWMnyQPAh3k2jhWHco}#
+                      (if (if (pair? #{e -ANAU$bmvAmthP7L7xwnXE}#)
+                            #{s -ANAU$bmvAmthP7L7xwnXH}#
                             #f)
                         (set-source-properties!
-                          #{e _hoQGWMnyQPAh3k2jhWHcl}#
-                          #{s _hoQGWMnyQPAh3k2jhWHco}#))
-                      #{e _hoQGWMnyQPAh3k2jhWHcl}#)
-                    #{w _hoQGWMnyQPAh3k2jhWHcn}#
-                    #{mod _hoQGWMnyQPAh3k2jhWHcp}#)))))))
-      (#{global-extend _hoQGWMnyQPAh3k2jhWHS@}#
+                          #{e -ANAU$bmvAmthP7L7xwnXE}#
+                          #{s -ANAU$bmvAmthP7L7xwnXH}#))
+                      #{e -ANAU$bmvAmthP7L7xwnXE}#)
+                    #{w -ANAU$bmvAmthP7L7xwnXG}#
+                    #{mod -ANAU$bmvAmthP7L7xwnXI}#)))))))
+      (#{global-extend -ANAU$bmvAmthP7L7xwnNe}#
         'core
         'syntax
         (letrec*
-          ((#{gen-syntax _hoQGWMnyQPAh3k2jhWHgO}#
-             (lambda (#{src _hoQGWMnyQPAh3k2jhWHh0}#
-                      #{e _hoQGWMnyQPAh3k2jhWHh1}#
-                      #{r _hoQGWMnyQPAh3k2jhWHh2}#
-                      #{maps _hoQGWMnyQPAh3k2jhWHh3}#
-                      #{ellipsis? _hoQGWMnyQPAh3k2jhWHh4}#
-                      #{mod _hoQGWMnyQPAh3k2jhWHh5}#)
-               (if (if (symbol? #{e _hoQGWMnyQPAh3k2jhWHh1}#)
+          ((#{gen-syntax -ANAU$bmvAmthP7L7xwnat}#
+             (lambda (#{src -ANAU$bmvAmthP7L7xwncT}#
+                      #{e -ANAU$bmvAmthP7L7xwncU}#
+                      #{r -ANAU$bmvAmthP7L7xwncV}#
+                      #{maps -ANAU$bmvAmthP7L7xwncW}#
+                      #{ellipsis? -ANAU$bmvAmthP7L7xwncX}#
+                      #{mod -ANAU$bmvAmthP7L7xwncY}#)
+               (if (if (symbol? #{e -ANAU$bmvAmthP7L7xwncU}#)
                      #t
-                     (if (if (vector? #{e _hoQGWMnyQPAh3k2jhWHh1}#)
-                           (if (= (vector-length #{e _hoQGWMnyQPAh3k2jhWHh1}#)
+                     (if (if (vector? #{e -ANAU$bmvAmthP7L7xwncU}#)
+                           (if (= (vector-length #{e -ANAU$bmvAmthP7L7xwncU}#)
                                   4)
-                             (eq? (vector-ref #{e _hoQGWMnyQPAh3k2jhWHh1}# 0)
+                             (eq? (vector-ref #{e -ANAU$bmvAmthP7L7xwncU}# 0)
                                   'syntax-object)
                              #f)
                            #f)
                        (symbol?
-                         (vector-ref #{e _hoQGWMnyQPAh3k2jhWHh1}# 1))
+                         (vector-ref #{e -ANAU$bmvAmthP7L7xwncU}# 1))
                        #f))
-                 (let ((#{label _hoQGWMnyQPAh3k2jhWHiU}#
-                         (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                           #{e _hoQGWMnyQPAh3k2jhWHh1}#
+                 (let ((#{label -ANAU$bmvAmthP7L7xwncz}#
+                         (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                           #{e -ANAU$bmvAmthP7L7xwncU}#
                            '(()))))
-                   (let ((#{b _hoQGWMnyQPAh3k2jhWHiV}#
-                           (let ((#{t _hoQGWMnyQPAh3k2jhWHic}#
-                                   (assq #{label _hoQGWMnyQPAh3k2jhWHiU}#
-                                         #{r _hoQGWMnyQPAh3k2jhWHh2}#)))
-                             (if #{t _hoQGWMnyQPAh3k2jhWHic}#
-                               (cdr #{t _hoQGWMnyQPAh3k2jhWHic}#)
-                               (if (symbol? #{label _hoQGWMnyQPAh3k2jhWHiU}#)
-                                 (let ((#{t _hoQGWMnyQPAh3k2jhWHii}#
-                                         (#{get-global-definition-hook _hoQGWMnyQPAh3k2jhWHSc}#
-                                           #{label _hoQGWMnyQPAh3k2jhWHiU}#
-                                           #{mod _hoQGWMnyQPAh3k2jhWHh5}#)))
-                                   (if #{t _hoQGWMnyQPAh3k2jhWHii}#
-                                     #{t _hoQGWMnyQPAh3k2jhWHii}#
+                   (let ((#{b -ANAU$bmvAmthP7L7xwnc0}#
+                           (let ((#{t -ANAU$bmvAmthP7L7xwnc7}#
+                                   (assq #{label -ANAU$bmvAmthP7L7xwncz}#
+                                         #{r -ANAU$bmvAmthP7L7xwncV}#)))
+                             (if #{t -ANAU$bmvAmthP7L7xwnc7}#
+                               (cdr #{t -ANAU$bmvAmthP7L7xwnc7}#)
+                               (if (symbol? #{label -ANAU$bmvAmthP7L7xwncz}#)
+                                 (let ((#{t -ANAU$bmvAmthP7L7xwndB}#
+                                         (#{get-global-definition-hook -ANAU$bmvAmthP7L7xwnM7}#
+                                           #{label -ANAU$bmvAmthP7L7xwncz}#
+                                           #{mod -ANAU$bmvAmthP7L7xwncY}#)))
+                                   (if #{t -ANAU$bmvAmthP7L7xwndB}#
+                                     #{t -ANAU$bmvAmthP7L7xwndB}#
                                      '(global)))
                                  '(displaced-lexical))))))
-                     (if (eq? (car #{b _hoQGWMnyQPAh3k2jhWHiV}#) 'syntax)
+                     (if (eq? (car #{b -ANAU$bmvAmthP7L7xwnc0}#) 'syntax)
                        (call-with-values
                          (lambda ()
-                           (let ((#{var.lev _hoQGWMnyQPAh3k2jhWHir}#
-                                   (cdr #{b _hoQGWMnyQPAh3k2jhWHiV}#)))
-                             (#{gen-ref _hoQGWMnyQPAh3k2jhWHgP}#
-                               #{src _hoQGWMnyQPAh3k2jhWHh0}#
-                               (car #{var.lev _hoQGWMnyQPAh3k2jhWHir}#)
-                               (cdr #{var.lev _hoQGWMnyQPAh3k2jhWHir}#)
-                               #{maps _hoQGWMnyQPAh3k2jhWHh3}#)))
-                         (lambda (#{var _hoQGWMnyQPAh3k2jhWHiv}#
-                                  #{maps _hoQGWMnyQPAh3k2jhWHiw}#)
+                           (let ((#{var.lev -ANAU$bmvAmthP7L7xwndK}#
+                                   (cdr #{b -ANAU$bmvAmthP7L7xwnc0}#)))
+                             (#{gen-ref -ANAU$bmvAmthP7L7xwnau}#
+                               #{src -ANAU$bmvAmthP7L7xwncT}#
+                               (car #{var.lev -ANAU$bmvAmthP7L7xwndK}#)
+                               (cdr #{var.lev -ANAU$bmvAmthP7L7xwndK}#)
+                               #{maps -ANAU$bmvAmthP7L7xwncW}#)))
+                         (lambda (#{var -ANAU$bmvAmthP7L7xwndO}#
+                                  #{maps -ANAU$bmvAmthP7L7xwndP}#)
                            (values
-                             (list 'ref #{var _hoQGWMnyQPAh3k2jhWHiv}#)
-                             #{maps _hoQGWMnyQPAh3k2jhWHiw}#)))
-                       (if (#{ellipsis? _hoQGWMnyQPAh3k2jhWHh4}#
-                             #{e _hoQGWMnyQPAh3k2jhWHh1}#)
+                             (list 'ref #{var -ANAU$bmvAmthP7L7xwndO}#)
+                             #{maps -ANAU$bmvAmthP7L7xwndP}#)))
+                       (if (#{ellipsis? -ANAU$bmvAmthP7L7xwncX}#
+                             #{e -ANAU$bmvAmthP7L7xwncU}#)
                          (syntax-violation
                            'syntax
                            "misplaced ellipsis"
-                           #{src _hoQGWMnyQPAh3k2jhWHh0}#)
+                           #{src -ANAU$bmvAmthP7L7xwncT}#)
                          (values
-                           (list 'quote #{e _hoQGWMnyQPAh3k2jhWHh1}#)
-                           #{maps _hoQGWMnyQPAh3k2jhWHh3}#)))))
-                 (let ((#{tmp _hoQGWMnyQPAh3k2jhWHiy}#
+                           (list 'quote #{e -ANAU$bmvAmthP7L7xwncU}#)
+                           #{maps -ANAU$bmvAmthP7L7xwncW}#)))))
+                 (let ((#{tmp -ANAU$bmvAmthP7L7xwndR}#
                          ($sc-dispatch
-                           #{e _hoQGWMnyQPAh3k2jhWHh1}#
+                           #{e -ANAU$bmvAmthP7L7xwncU}#
                            '(any any))))
-                   (if (if #{tmp _hoQGWMnyQPAh3k2jhWHiy}#
+                   (if (if #{tmp -ANAU$bmvAmthP7L7xwndR}#
                          (@apply
-                           (lambda (#{dots _hoQGWMnyQPAh3k2jhWHi2}#
-                                    #{e _hoQGWMnyQPAh3k2jhWHi3}#)
-                             (#{ellipsis? _hoQGWMnyQPAh3k2jhWHh4}#
-                               #{dots _hoQGWMnyQPAh3k2jhWHi2}#))
-                           #{tmp _hoQGWMnyQPAh3k2jhWHiy}#)
+                           (lambda (#{dots -ANAU$bmvAmthP7L7xwndV}#
+                                    #{e -ANAU$bmvAmthP7L7xwndW}#)
+                             (#{ellipsis? -ANAU$bmvAmthP7L7xwncX}#
+                               #{dots -ANAU$bmvAmthP7L7xwndV}#))
+                           #{tmp -ANAU$bmvAmthP7L7xwndR}#)
                          #f)
                      (@apply
-                       (lambda (#{dots _hoQGWMnyQPAh3k2jhWHi4}#
-                                #{e _hoQGWMnyQPAh3k2jhWHi5}#)
-                         (#{gen-syntax _hoQGWMnyQPAh3k2jhWHgO}#
-                           #{src _hoQGWMnyQPAh3k2jhWHh0}#
-                           #{e _hoQGWMnyQPAh3k2jhWHi5}#
-                           #{r _hoQGWMnyQPAh3k2jhWHh2}#
-                           #{maps _hoQGWMnyQPAh3k2jhWHh3}#
-                           (lambda (#{x _hoQGWMnyQPAh3k2jhWHi6}#) #f)
-                           #{mod _hoQGWMnyQPAh3k2jhWHh5}#))
-                       #{tmp _hoQGWMnyQPAh3k2jhWHiy}#)
-                     (let ((#{tmp _hoQGWMnyQPAh3k2jhWHi7}#
+                       (lambda (#{dots -ANAU$bmvAmthP7L7xwndX}#
+                                #{e -ANAU$bmvAmthP7L7xwndY}#)
+                         (#{gen-syntax -ANAU$bmvAmthP7L7xwnat}#
+                           #{src -ANAU$bmvAmthP7L7xwncT}#
+                           #{e -ANAU$bmvAmthP7L7xwndY}#
+                           #{r -ANAU$bmvAmthP7L7xwncV}#
+                           #{maps -ANAU$bmvAmthP7L7xwncW}#
+                           (lambda (#{x -ANAU$bmvAmthP7L7xwndZ}#) #f)
+                           #{mod -ANAU$bmvAmthP7L7xwncY}#))
+                       #{tmp -ANAU$bmvAmthP7L7xwndR}#)
+                     (let ((#{tmp -ANAU$bmvAmthP7L7xwnda}#
                              ($sc-dispatch
-                               #{e _hoQGWMnyQPAh3k2jhWHh1}#
+                               #{e -ANAU$bmvAmthP7L7xwncU}#
                                '(any any . any))))
-                       (if (if #{tmp _hoQGWMnyQPAh3k2jhWHi7}#
+                       (if (if #{tmp -ANAU$bmvAmthP7L7xwnda}#
                              (@apply
-                               (lambda (#{x _hoQGWMnyQPAh3k2jhWHi@}#
-                                        #{dots _hoQGWMnyQPAh3k2jhWHjA}#
-                                        #{y _hoQGWMnyQPAh3k2jhWHjB}#)
-                                 (#{ellipsis? _hoQGWMnyQPAh3k2jhWHh4}#
-                                   #{dots _hoQGWMnyQPAh3k2jhWHjA}#))
-                               #{tmp _hoQGWMnyQPAh3k2jhWHi7}#)
+                               (lambda (#{x -ANAU$bmvAmthP7L7xwnde}#
+                                        #{dots -ANAU$bmvAmthP7L7xwndf}#
+                                        #{y -ANAU$bmvAmthP7L7xwndg}#)
+                                 (#{ellipsis? -ANAU$bmvAmthP7L7xwncX}#
+                                   #{dots -ANAU$bmvAmthP7L7xwndf}#))
+                               #{tmp -ANAU$bmvAmthP7L7xwnda}#)
                              #f)
                          (@apply
-                           (lambda (#{x _hoQGWMnyQPAh3k2jhWHjC}#
-                                    #{dots _hoQGWMnyQPAh3k2jhWHjD}#
-                                    #{y _hoQGWMnyQPAh3k2jhWHjE}#)
+                           (lambda (#{x -ANAU$bmvAmthP7L7xwndh}#
+                                    #{dots -ANAU$bmvAmthP7L7xwndi}#
+                                    #{y -ANAU$bmvAmthP7L7xwndj}#)
                              (letrec*
-                               ((#{f _hoQGWMnyQPAh3k2jhWHjF}#
-                                  (lambda (#{y _hoQGWMnyQPAh3k2jhWHjN}#
-                                           #{k _hoQGWMnyQPAh3k2jhWHjO}#)
-                                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWHjQ}#
+                               ((#{f -ANAU$bmvAmthP7L7xwndk}#
+                                  (lambda (#{y -ANAU$bmvAmthP7L7xwnds}#
+                                           #{k -ANAU$bmvAmthP7L7xwndt}#)
+                                    (let ((#{tmp -ANAU$bmvAmthP7L7xwndv}#
                                             ($sc-dispatch
-                                              #{y _hoQGWMnyQPAh3k2jhWHjN}#
+                                              #{y -ANAU$bmvAmthP7L7xwnds}#
                                               '(any . any))))
-                                      (if (if #{tmp _hoQGWMnyQPAh3k2jhWHjQ}#
+                                      (if (if #{tmp -ANAU$bmvAmthP7L7xwndv}#
                                             (@apply
-                                              (lambda (#{dots _hoQGWMnyQPAh3k2jhWHjU}#
-                                                       #{y _hoQGWMnyQPAh3k2jhWHjV}#)
-                                                (#{ellipsis? _hoQGWMnyQPAh3k2jhWHh4}#
-                                                  #{dots _hoQGWMnyQPAh3k2jhWHjU}#))
-                                              #{tmp _hoQGWMnyQPAh3k2jhWHjQ}#)
+                                              (lambda (#{dots -ANAU$bmvAmthP7L7xwndz}#
+                                                       #{y -ANAU$bmvAmthP7L7xwnd0}#)
+                                                (#{ellipsis? -ANAU$bmvAmthP7L7xwncX}#
+                                                  #{dots -ANAU$bmvAmthP7L7xwndz}#))
+                                              #{tmp -ANAU$bmvAmthP7L7xwndv}#)
                                             #f)
                                         (@apply
-                                          (lambda (#{dots _hoQGWMnyQPAh3k2jhWHjW}#
-                                                   #{y _hoQGWMnyQPAh3k2jhWHjX}#)
-                                            (#{f _hoQGWMnyQPAh3k2jhWHjF}#
-                                              #{y _hoQGWMnyQPAh3k2jhWHjX}#
-                                              (lambda (#{maps _hoQGWMnyQPAh3k2jhWHjY}#)
+                                          (lambda (#{dots -ANAU$bmvAmthP7L7xwnd1}#
+                                                   #{y -ANAU$bmvAmthP7L7xwnd2}#)
+                                            (#{f -ANAU$bmvAmthP7L7xwndk}#
+                                              #{y -ANAU$bmvAmthP7L7xwnd2}#
+                                              (lambda (#{maps -ANAU$bmvAmthP7L7xwnd3}#)
                                                 (call-with-values
                                                   (lambda ()
-                                                    (#{k _hoQGWMnyQPAh3k2jhWHjO}#
+                                                    (#{k -ANAU$bmvAmthP7L7xwndt}#
                                                       (cons '()
-                                                            #{maps _hoQGWMnyQPAh3k2jhWHjY}#)))
-                                                  (lambda (#{x _hoQGWMnyQPAh3k2jhWHjZ}#
-                                                           #{maps _hoQGWMnyQPAh3k2jhWHja}#)
-                                                    (if (null? (car #{maps _hoQGWMnyQPAh3k2jhWHja}#))
+                                                            #{maps -ANAU$bmvAmthP7L7xwnd3}#)))
+                                                  (lambda (#{x -ANAU$bmvAmthP7L7xwnd4}#
+                                                           #{maps -ANAU$bmvAmthP7L7xwnd5}#)
+                                                    (if (null? (car #{maps -ANAU$bmvAmthP7L7xwnd5}#))
                                                       (syntax-violation
                                                         'syntax
                                                         "extra ellipsis"
-                                                        #{src _hoQGWMnyQPAh3k2jhWHh0}#)
+                                                        #{src -ANAU$bmvAmthP7L7xwncT}#)
                                                       (values
-                                                        (let ((#{map-env _hoQGWMnyQPAh3k2jhWHje}#
-                                                                (car #{maps _hoQGWMnyQPAh3k2jhWHja}#)))
+                                                        (let ((#{map-env -ANAU$bmvAmthP7L7xwnd9}#
+                                                                (car #{maps -ANAU$bmvAmthP7L7xwnd5}#)))
                                                           (list 'apply
                                                                 '(primitive
                                                                    append)
-                                                                (#{gen-map _hoQGWMnyQPAh3k2jhWHgR}#
-                                                                  #{x _hoQGWMnyQPAh3k2jhWHjZ}#
-                                                                  #{map-env _hoQGWMnyQPAh3k2jhWHje}#)))
-                                                        (cdr #{maps _hoQGWMnyQPAh3k2jhWHja}#))))))))
-                                          #{tmp _hoQGWMnyQPAh3k2jhWHjQ}#)
+                                                                (#{gen-map -ANAU$bmvAmthP7L7xwnaw}#
+                                                                  #{x -ANAU$bmvAmthP7L7xwnd4}#
+                                                                  #{map-env -ANAU$bmvAmthP7L7xwnd9}#)))
+                                                        (cdr #{maps -ANAU$bmvAmthP7L7xwnd5}#))))))))
+                                          #{tmp -ANAU$bmvAmthP7L7xwndv}#)
                                         (call-with-values
                                           (lambda ()
-                                            (#{gen-syntax _hoQGWMnyQPAh3k2jhWHgO}#
-                                              #{src _hoQGWMnyQPAh3k2jhWHh0}#
-                                              #{y _hoQGWMnyQPAh3k2jhWHjN}#
-                                              #{r _hoQGWMnyQPAh3k2jhWHh2}#
-                                              #{maps _hoQGWMnyQPAh3k2jhWHh3}#
-                                              #{ellipsis? _hoQGWMnyQPAh3k2jhWHh4}#
-                                              #{mod _hoQGWMnyQPAh3k2jhWHh5}#))
-                                          (lambda (#{y _hoQGWMnyQPAh3k2jhWHjh}#
-                                                   #{maps _hoQGWMnyQPAh3k2jhWHji}#)
+                                            (#{gen-syntax -ANAU$bmvAmthP7L7xwnat}#
+                                              #{src -ANAU$bmvAmthP7L7xwncT}#
+                                              #{y -ANAU$bmvAmthP7L7xwnds}#
+                                              #{r -ANAU$bmvAmthP7L7xwncV}#
+                                              #{maps -ANAU$bmvAmthP7L7xwncW}#
+                                              #{ellipsis? -ANAU$bmvAmthP7L7xwncX}#
+                                              #{mod -ANAU$bmvAmthP7L7xwncY}#))
+                                          (lambda (#{y -ANAU$bmvAmthP7L7xwneA}#
+                                                   #{maps -ANAU$bmvAmthP7L7xwneB}#)
                                             (call-with-values
                                               (lambda ()
-                                                (#{k _hoQGWMnyQPAh3k2jhWHjO}#
-                                                  #{maps _hoQGWMnyQPAh3k2jhWHji}#))
-                                              (lambda (#{x _hoQGWMnyQPAh3k2jhWHjj}#
-                                                       #{maps _hoQGWMnyQPAh3k2jhWHjk}#)
+                                                (#{k -ANAU$bmvAmthP7L7xwndt}#
+                                                  #{maps -ANAU$bmvAmthP7L7xwneB}#))
+                                              (lambda (#{x -ANAU$bmvAmthP7L7xwneC}#
+                                                       #{maps -ANAU$bmvAmthP7L7xwneD}#)
                                                 (values
                                                   (if (equal?
-                                                        #{y _hoQGWMnyQPAh3k2jhWHjh}#
+                                                        #{y -ANAU$bmvAmthP7L7xwneA}#
                                                         ''())
-                                                    #{x _hoQGWMnyQPAh3k2jhWHjj}#
+                                                    #{x -ANAU$bmvAmthP7L7xwneC}#
                                                     (list 'append
-                                                          #{x _hoQGWMnyQPAh3k2jhWHjj}#
-                                                          #{y _hoQGWMnyQPAh3k2jhWHjh}#))
-                                                  #{maps _hoQGWMnyQPAh3k2jhWHjk}#))))))))))
-                               (#{f _hoQGWMnyQPAh3k2jhWHjF}#
-                                 #{y _hoQGWMnyQPAh3k2jhWHjE}#
-                                 (lambda (#{maps _hoQGWMnyQPAh3k2jhWHjI}#)
+                                                          #{x -ANAU$bmvAmthP7L7xwneC}#
+                                                          #{y -ANAU$bmvAmthP7L7xwneA}#))
+                                                  #{maps -ANAU$bmvAmthP7L7xwneD}#))))))))))
+                               (#{f -ANAU$bmvAmthP7L7xwndk}#
+                                 #{y -ANAU$bmvAmthP7L7xwndj}#
+                                 (lambda (#{maps -ANAU$bmvAmthP7L7xwndn}#)
                                    (call-with-values
                                      (lambda ()
-                                       (#{gen-syntax _hoQGWMnyQPAh3k2jhWHgO}#
-                                         #{src _hoQGWMnyQPAh3k2jhWHh0}#
-                                         #{x _hoQGWMnyQPAh3k2jhWHjC}#
-                                         #{r _hoQGWMnyQPAh3k2jhWHh2}#
+                                       (#{gen-syntax -ANAU$bmvAmthP7L7xwnat}#
+                                         #{src -ANAU$bmvAmthP7L7xwncT}#
+                                         #{x -ANAU$bmvAmthP7L7xwndh}#
+                                         #{r -ANAU$bmvAmthP7L7xwncV}#
                                          (cons '()
-                                               #{maps _hoQGWMnyQPAh3k2jhWHjI}#)
-                                         #{ellipsis? _hoQGWMnyQPAh3k2jhWHh4}#
-                                         #{mod _hoQGWMnyQPAh3k2jhWHh5}#))
-                                     (lambda (#{x _hoQGWMnyQPAh3k2jhWHjJ}#
-                                              #{maps _hoQGWMnyQPAh3k2jhWHjK}#)
-                                       (if (null? (car #{maps _hoQGWMnyQPAh3k2jhWHjK}#))
+                                               #{maps -ANAU$bmvAmthP7L7xwndn}#)
+                                         #{ellipsis? -ANAU$bmvAmthP7L7xwncX}#
+                                         #{mod -ANAU$bmvAmthP7L7xwncY}#))
+                                     (lambda (#{x -ANAU$bmvAmthP7L7xwndo}#
+                                              #{maps -ANAU$bmvAmthP7L7xwndp}#)
+                                       (if (null? (car #{maps -ANAU$bmvAmthP7L7xwndp}#))
                                          (syntax-violation
                                            'syntax
                                            "extra ellipsis"
-                                           #{src _hoQGWMnyQPAh3k2jhWHh0}#)
+                                           #{src -ANAU$bmvAmthP7L7xwncT}#)
                                          (values
-                                           (#{gen-map _hoQGWMnyQPAh3k2jhWHgR}#
-                                             #{x _hoQGWMnyQPAh3k2jhWHjJ}#
-                                             (car #{maps _hoQGWMnyQPAh3k2jhWHjK}#))
-                                           (cdr #{maps _hoQGWMnyQPAh3k2jhWHjK}#)))))))))
-                           #{tmp _hoQGWMnyQPAh3k2jhWHi7}#)
-                         (let ((#{tmp _hoQGWMnyQPAh3k2jhWHj0}#
+                                           (#{gen-map -ANAU$bmvAmthP7L7xwnaw}#
+                                             #{x -ANAU$bmvAmthP7L7xwndo}#
+                                             (car #{maps -ANAU$bmvAmthP7L7xwndp}#))
+                                           (cdr #{maps -ANAU$bmvAmthP7L7xwndp}#)))))))))
+                           #{tmp -ANAU$bmvAmthP7L7xwnda}#)
+                         (let ((#{tmp -ANAU$bmvAmthP7L7xwneT}#
                                  ($sc-dispatch
-                                   #{e _hoQGWMnyQPAh3k2jhWHh1}#
+                                   #{e -ANAU$bmvAmthP7L7xwncU}#
                                    '(any . any))))
-                           (if #{tmp _hoQGWMnyQPAh3k2jhWHj0}#
+                           (if #{tmp -ANAU$bmvAmthP7L7xwneT}#
                              (@apply
-                               (lambda (#{x _hoQGWMnyQPAh3k2jhWHj4}#
-                                        #{y _hoQGWMnyQPAh3k2jhWHj5}#)
+                               (lambda (#{x -ANAU$bmvAmthP7L7xwneX}#
+                                        #{y -ANAU$bmvAmthP7L7xwneY}#)
                                  (call-with-values
                                    (lambda ()
-                                     (#{gen-syntax _hoQGWMnyQPAh3k2jhWHgO}#
-                                       #{src _hoQGWMnyQPAh3k2jhWHh0}#
-                                       #{x _hoQGWMnyQPAh3k2jhWHj4}#
-                                       #{r _hoQGWMnyQPAh3k2jhWHh2}#
-                                       #{maps _hoQGWMnyQPAh3k2jhWHh3}#
-                                       #{ellipsis? _hoQGWMnyQPAh3k2jhWHh4}#
-                                       #{mod _hoQGWMnyQPAh3k2jhWHh5}#))
-                                   (lambda (#{x _hoQGWMnyQPAh3k2jhWHj6}#
-                                            #{maps _hoQGWMnyQPAh3k2jhWHj7}#)
+                                     (#{gen-syntax -ANAU$bmvAmthP7L7xwnat}#
+                                       #{src -ANAU$bmvAmthP7L7xwncT}#
+                                       #{x -ANAU$bmvAmthP7L7xwneX}#
+                                       #{r -ANAU$bmvAmthP7L7xwncV}#
+                                       #{maps -ANAU$bmvAmthP7L7xwncW}#
+                                       #{ellipsis? -ANAU$bmvAmthP7L7xwncX}#
+                                       #{mod -ANAU$bmvAmthP7L7xwncY}#))
+                                   (lambda (#{x -ANAU$bmvAmthP7L7xwneZ}#
+                                            #{maps -ANAU$bmvAmthP7L7xwnea}#)
                                      (call-with-values
                                        (lambda ()
-                                         (#{gen-syntax _hoQGWMnyQPAh3k2jhWHgO}#
-                                           #{src _hoQGWMnyQPAh3k2jhWHh0}#
-                                           #{y _hoQGWMnyQPAh3k2jhWHj5}#
-                                           #{r _hoQGWMnyQPAh3k2jhWHh2}#
-                                           #{maps _hoQGWMnyQPAh3k2jhWHj7}#
-                                           #{ellipsis? _hoQGWMnyQPAh3k2jhWHh4}#
-                                           #{mod _hoQGWMnyQPAh3k2jhWHh5}#))
-                                       (lambda (#{y _hoQGWMnyQPAh3k2jhWHj8}#
-                                                #{maps _hoQGWMnyQPAh3k2jhWHj9}#)
+                                         (#{gen-syntax -ANAU$bmvAmthP7L7xwnat}#
+                                           #{src -ANAU$bmvAmthP7L7xwncT}#
+                                           #{y -ANAU$bmvAmthP7L7xwneY}#
+                                           #{r -ANAU$bmvAmthP7L7xwncV}#
+                                           #{maps -ANAU$bmvAmthP7L7xwnea}#
+                                           #{ellipsis? -ANAU$bmvAmthP7L7xwncX}#
+                                           #{mod -ANAU$bmvAmthP7L7xwncY}#))
+                                       (lambda (#{y -ANAU$bmvAmthP7L7xwneb}#
+                                                #{maps -ANAU$bmvAmthP7L7xwnec}#)
                                          (values
-                                           (let ((#{atom-key _hoQGWMnyQPAh3k2jhWHkC}#
-                                                   (car #{y _hoQGWMnyQPAh3k2jhWHj8}#)))
-                                             (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWHkC}#
+                                           (let ((#{atom-key -ANAU$bmvAmthP7L7xwneh}#
+                                                   (car #{y -ANAU$bmvAmthP7L7xwneb}#)))
+                                             (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwneh}#
                                                        'quote)
-                                               (if (eq? (car #{x _hoQGWMnyQPAh3k2jhWHj6}#)
+                                               (if (eq? (car #{x -ANAU$bmvAmthP7L7xwneZ}#)
                                                         'quote)
                                                  (list 'quote
-                                                       (cons (car (cdr #{x _hoQGWMnyQPAh3k2jhWHj6}#))
-                                                             (car (cdr #{y _hoQGWMnyQPAh3k2jhWHj8}#))))
-                                                 (if (eq? (car (cdr #{y _hoQGWMnyQPAh3k2jhWHj8}#))
+                                                       (cons (car (cdr #{x -ANAU$bmvAmthP7L7xwneZ}#))
+                                                             (car (cdr #{y -ANAU$bmvAmthP7L7xwneb}#))))
+                                                 (if (eq? (car (cdr #{y -ANAU$bmvAmthP7L7xwneb}#))
                                                           '())
                                                    (list 'list
-                                                         #{x _hoQGWMnyQPAh3k2jhWHj6}#)
+                                                         #{x -ANAU$bmvAmthP7L7xwneZ}#)
                                                    (list 'cons
-                                                         #{x _hoQGWMnyQPAh3k2jhWHj6}#
-                                                         #{y _hoQGWMnyQPAh3k2jhWHj8}#)))
-                                               (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWHkC}#
+                                                         #{x -ANAU$bmvAmthP7L7xwneZ}#
+                                                         #{y -ANAU$bmvAmthP7L7xwneb}#)))
+                                               (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwneh}#
                                                          'list)
                                                  (cons 'list
-                                                       (cons #{x _hoQGWMnyQPAh3k2jhWHj6}#
-                                                             (cdr #{y _hoQGWMnyQPAh3k2jhWHj8}#)))
+                                                       (cons #{x -ANAU$bmvAmthP7L7xwneZ}#
+                                                             (cdr #{y -ANAU$bmvAmthP7L7xwneb}#)))
                                                  (list 'cons
-                                                       #{x _hoQGWMnyQPAh3k2jhWHj6}#
-                                                       #{y _hoQGWMnyQPAh3k2jhWHj8}#))))
-                                           #{maps _hoQGWMnyQPAh3k2jhWHj9}#))))))
-                               #{tmp _hoQGWMnyQPAh3k2jhWHj0}#)
-                             (let ((#{tmp _hoQGWMnyQPAh3k2jhWHkf}#
+                                                       #{x -ANAU$bmvAmthP7L7xwneZ}#
+                                                       #{y -ANAU$bmvAmthP7L7xwneb}#))))
+                                           #{maps -ANAU$bmvAmthP7L7xwnec}#))))))
+                               #{tmp -ANAU$bmvAmthP7L7xwneT}#)
+                             (let ((#{tmp -ANAU$bmvAmthP7L7xwne$}#
                                      ($sc-dispatch
-                                       #{e _hoQGWMnyQPAh3k2jhWHh1}#
+                                       #{e -ANAU$bmvAmthP7L7xwncU}#
                                        '#(vector (any . each-any)))))
-                               (if #{tmp _hoQGWMnyQPAh3k2jhWHkf}#
+                               (if #{tmp -ANAU$bmvAmthP7L7xwne$}#
                                  (@apply
-                                   (lambda (#{e1 _hoQGWMnyQPAh3k2jhWHkj}#
-                                            #{e2 _hoQGWMnyQPAh3k2jhWHkk}#)
+                                   (lambda (#{e1 -ANAU$bmvAmthP7L7xwnfC}#
+                                            #{e2 -ANAU$bmvAmthP7L7xwnfD}#)
                                      (call-with-values
                                        (lambda ()
-                                         (#{gen-syntax _hoQGWMnyQPAh3k2jhWHgO}#
-                                           #{src _hoQGWMnyQPAh3k2jhWHh0}#
-                                           (cons #{e1 _hoQGWMnyQPAh3k2jhWHkj}#
-                                                 #{e2 _hoQGWMnyQPAh3k2jhWHkk}#)
-                                           #{r _hoQGWMnyQPAh3k2jhWHh2}#
-                                           #{maps _hoQGWMnyQPAh3k2jhWHh3}#
-                                           #{ellipsis? _hoQGWMnyQPAh3k2jhWHh4}#
-                                           #{mod _hoQGWMnyQPAh3k2jhWHh5}#))
-                                       (lambda (#{e _hoQGWMnyQPAh3k2jhWHkl}#
-                                                #{maps _hoQGWMnyQPAh3k2jhWHkm}#)
+                                         (#{gen-syntax -ANAU$bmvAmthP7L7xwnat}#
+                                           #{src -ANAU$bmvAmthP7L7xwncT}#
+                                           (cons #{e1 -ANAU$bmvAmthP7L7xwnfC}#
+                                                 #{e2 -ANAU$bmvAmthP7L7xwnfD}#)
+                                           #{r -ANAU$bmvAmthP7L7xwncV}#
+                                           #{maps -ANAU$bmvAmthP7L7xwncW}#
+                                           #{ellipsis? -ANAU$bmvAmthP7L7xwncX}#
+                                           #{mod -ANAU$bmvAmthP7L7xwncY}#))
+                                       (lambda (#{e -ANAU$bmvAmthP7L7xwnfE}#
+                                                #{maps -ANAU$bmvAmthP7L7xwnfF}#)
                                          (values
-                                           (if (eq? (car #{e _hoQGWMnyQPAh3k2jhWHkl}#)
+                                           (if (eq? (car #{e -ANAU$bmvAmthP7L7xwnfE}#)
                                                     'list)
                                              (cons 'vector
-                                                   (cdr #{e _hoQGWMnyQPAh3k2jhWHkl}#))
-                                             (if (eq? (car #{e _hoQGWMnyQPAh3k2jhWHkl}#)
+                                                   (cdr #{e -ANAU$bmvAmthP7L7xwnfE}#))
+                                             (if (eq? (car #{e -ANAU$bmvAmthP7L7xwnfE}#)
                                                       'quote)
                                                (list 'quote
                                                      (list->vector
-                                                       (car (cdr #{e _hoQGWMnyQPAh3k2jhWHkl}#))))
+                                                       (car (cdr #{e -ANAU$bmvAmthP7L7xwnfE}#))))
                                                (list 'list->vector
-                                                     #{e _hoQGWMnyQPAh3k2jhWHkl}#)))
-                                           #{maps _hoQGWMnyQPAh3k2jhWHkm}#))))
-                                   #{tmp _hoQGWMnyQPAh3k2jhWHkf}#)
+                                                     #{e -ANAU$bmvAmthP7L7xwnfE}#)))
+                                           #{maps -ANAU$bmvAmthP7L7xwnfF}#))))
+                                   #{tmp -ANAU$bmvAmthP7L7xwne$}#)
                                  (values
-                                   (list 'quote #{e _hoQGWMnyQPAh3k2jhWHh1}#)
-                                   #{maps _hoQGWMnyQPAh3k2jhWHh3}#))))))))))))
-           (#{gen-ref _hoQGWMnyQPAh3k2jhWHgP}#
-             (lambda (#{src _hoQGWMnyQPAh3k2jhWHlB}#
-                      #{var _hoQGWMnyQPAh3k2jhWHlC}#
-                      #{level _hoQGWMnyQPAh3k2jhWHlD}#
-                      #{maps _hoQGWMnyQPAh3k2jhWHlE}#)
-               (if (= #{level _hoQGWMnyQPAh3k2jhWHlD}# 0)
+                                   (list 'quote #{e -ANAU$bmvAmthP7L7xwncU}#)
+                                   #{maps -ANAU$bmvAmthP7L7xwncW}#))))))))))))
+           (#{gen-ref -ANAU$bmvAmthP7L7xwnau}#
+             (lambda (#{src -ANAU$bmvAmthP7L7xwnfg}#
+                      #{var -ANAU$bmvAmthP7L7xwnfh}#
+                      #{level -ANAU$bmvAmthP7L7xwnfi}#
+                      #{maps -ANAU$bmvAmthP7L7xwnfj}#)
+               (if (= #{level -ANAU$bmvAmthP7L7xwnfi}# 0)
                  (values
-                   #{var _hoQGWMnyQPAh3k2jhWHlC}#
-                   #{maps _hoQGWMnyQPAh3k2jhWHlE}#)
-                 (if (null? #{maps _hoQGWMnyQPAh3k2jhWHlE}#)
+                   #{var -ANAU$bmvAmthP7L7xwnfh}#
+                   #{maps -ANAU$bmvAmthP7L7xwnfj}#)
+                 (if (null? #{maps -ANAU$bmvAmthP7L7xwnfj}#)
                    (syntax-violation
                      'syntax
                      "missing ellipsis"
-                     #{src _hoQGWMnyQPAh3k2jhWHlB}#)
+                     #{src -ANAU$bmvAmthP7L7xwnfg}#)
                    (call-with-values
                      (lambda ()
-                       (#{gen-ref _hoQGWMnyQPAh3k2jhWHgP}#
-                         #{src _hoQGWMnyQPAh3k2jhWHlB}#
-                         #{var _hoQGWMnyQPAh3k2jhWHlC}#
-                         (#{1-}# #{level _hoQGWMnyQPAh3k2jhWHlD}#)
-                         (cdr #{maps _hoQGWMnyQPAh3k2jhWHlE}#)))
-                     (lambda (#{outer-var _hoQGWMnyQPAh3k2jhWHlF}#
-                              #{outer-maps _hoQGWMnyQPAh3k2jhWHlG}#)
-                       (let ((#{b _hoQGWMnyQPAh3k2jhWHlH}#
-                               (assq #{outer-var _hoQGWMnyQPAh3k2jhWHlF}#
-                                     (car #{maps _hoQGWMnyQPAh3k2jhWHlE}#))))
-                         (if #{b _hoQGWMnyQPAh3k2jhWHlH}#
+                       (#{gen-ref -ANAU$bmvAmthP7L7xwnau}#
+                         #{src -ANAU$bmvAmthP7L7xwnfg}#
+                         #{var -ANAU$bmvAmthP7L7xwnfh}#
+                         (#{1-}# #{level -ANAU$bmvAmthP7L7xwnfi}#)
+                         (cdr #{maps -ANAU$bmvAmthP7L7xwnfj}#)))
+                     (lambda (#{outer-var -ANAU$bmvAmthP7L7xwnfk}#
+                              #{outer-maps -ANAU$bmvAmthP7L7xwnfl}#)
+                       (let ((#{b -ANAU$bmvAmthP7L7xwnfm}#
+                               (assq #{outer-var -ANAU$bmvAmthP7L7xwnfk}#
+                                     (car #{maps -ANAU$bmvAmthP7L7xwnfj}#))))
+                         (if #{b -ANAU$bmvAmthP7L7xwnfm}#
                            (values
-                             (cdr #{b _hoQGWMnyQPAh3k2jhWHlH}#)
-                             #{maps _hoQGWMnyQPAh3k2jhWHlE}#)
-                           (let ((#{inner-var _hoQGWMnyQPAh3k2jhWHlJ}#
+                             (cdr #{b -ANAU$bmvAmthP7L7xwnfm}#)
+                             #{maps -ANAU$bmvAmthP7L7xwnfj}#)
+                           (let ((#{inner-var -ANAU$bmvAmthP7L7xwnfo}#
                                    (gensym
                                      (string-append
                                        (symbol->string 'tmp)
                                        " "))))
                              (values
-                               #{inner-var _hoQGWMnyQPAh3k2jhWHlJ}#
-                               (cons (cons (cons #{outer-var _hoQGWMnyQPAh3k2jhWHlF}#
-                                                 #{inner-var _hoQGWMnyQPAh3k2jhWHlJ}#)
-                                           (car #{maps _hoQGWMnyQPAh3k2jhWHlE}#))
-                                     #{outer-maps _hoQGWMnyQPAh3k2jhWHlG}#)))))))))))
-           (#{gen-map _hoQGWMnyQPAh3k2jhWHgR}#
-             (lambda (#{e _hoQGWMnyQPAh3k2jhWHlX}#
-                      #{map-env _hoQGWMnyQPAh3k2jhWHlY}#)
-               (let ((#{formals _hoQGWMnyQPAh3k2jhWHlZ}#
-                       (map cdr #{map-env _hoQGWMnyQPAh3k2jhWHlY}#))
-                     (#{actuals _hoQGWMnyQPAh3k2jhWHla}#
-                       (map (lambda (#{x _hoQGWMnyQPAh3k2jhWHlc}#)
-                              (list 'ref (car #{x _hoQGWMnyQPAh3k2jhWHlc}#)))
-                            #{map-env _hoQGWMnyQPAh3k2jhWHlY}#)))
-                 (if (eq? (car #{e _hoQGWMnyQPAh3k2jhWHlX}#) 'ref)
-                   (car #{actuals _hoQGWMnyQPAh3k2jhWHla}#)
+                               #{inner-var -ANAU$bmvAmthP7L7xwnfo}#
+                               (cons (cons (cons #{outer-var -ANAU$bmvAmthP7L7xwnfk}#
+                                                 #{inner-var -ANAU$bmvAmthP7L7xwnfo}#)
+                                           (car #{maps -ANAU$bmvAmthP7L7xwnfj}#))
+                                     #{outer-maps -ANAU$bmvAmthP7L7xwnfl}#)))))))))))
+           (#{gen-map -ANAU$bmvAmthP7L7xwnaw}#
+             (lambda (#{e -ANAU$bmvAmthP7L7xwnf2}#
+                      #{map-env -ANAU$bmvAmthP7L7xwnf3}#)
+               (let ((#{formals -ANAU$bmvAmthP7L7xwnf4}#
+                       (map cdr #{map-env -ANAU$bmvAmthP7L7xwnf3}#))
+                     (#{actuals -ANAU$bmvAmthP7L7xwnf5}#
+                       (map (lambda (#{x -ANAU$bmvAmthP7L7xwnf7}#)
+                              (list 'ref (car #{x -ANAU$bmvAmthP7L7xwnf7}#)))
+                            #{map-env -ANAU$bmvAmthP7L7xwnf3}#)))
+                 (if (eq? (car #{e -ANAU$bmvAmthP7L7xwnf2}#) 'ref)
+                   (car #{actuals -ANAU$bmvAmthP7L7xwnf5}#)
                    (if (and-map
-                         (lambda (#{x _hoQGWMnyQPAh3k2jhWHld}#)
-                           (if (eq? (car #{x _hoQGWMnyQPAh3k2jhWHld}#) 'ref)
-                             (memq (car (cdr #{x _hoQGWMnyQPAh3k2jhWHld}#))
-                                   #{formals _hoQGWMnyQPAh3k2jhWHlZ}#)
+                         (lambda (#{x -ANAU$bmvAmthP7L7xwnf8}#)
+                           (if (eq? (car #{x -ANAU$bmvAmthP7L7xwnf8}#) 'ref)
+                             (memq (car (cdr #{x -ANAU$bmvAmthP7L7xwnf8}#))
+                                   #{formals -ANAU$bmvAmthP7L7xwnf4}#)
                              #f))
-                         (cdr #{e _hoQGWMnyQPAh3k2jhWHlX}#))
+                         (cdr #{e -ANAU$bmvAmthP7L7xwnf2}#))
                      (cons 'map
                            (cons (list 'primitive
-                                       (car #{e _hoQGWMnyQPAh3k2jhWHlX}#))
-                                 (map (let ((#{r _hoQGWMnyQPAh3k2jhWHlf}#
+                                       (car #{e -ANAU$bmvAmthP7L7xwnf2}#))
+                                 (map (let ((#{r -ANAU$bmvAmthP7L7xwnf$}#
                                               (map cons
-                                                   #{formals _hoQGWMnyQPAh3k2jhWHlZ}#
-                                                   #{actuals _hoQGWMnyQPAh3k2jhWHla}#)))
-                                        (lambda (#{x _hoQGWMnyQPAh3k2jhWHlg}#)
-                                          (cdr (assq (car (cdr #{x _hoQGWMnyQPAh3k2jhWHlg}#))
-                                                     #{r _hoQGWMnyQPAh3k2jhWHlf}#))))
-                                      (cdr #{e _hoQGWMnyQPAh3k2jhWHlX}#))))
+                                                   #{formals -ANAU$bmvAmthP7L7xwnf4}#
+                                                   #{actuals -ANAU$bmvAmthP7L7xwnf5}#)))
+                                        (lambda (#{x -ANAU$bmvAmthP7L7xwnf@}#)
+                                          (cdr (assq (car (cdr #{x -ANAU$bmvAmthP7L7xwnf@}#))
+                                                     #{r -ANAU$bmvAmthP7L7xwnf$}#))))
+                                      (cdr #{e -ANAU$bmvAmthP7L7xwnf2}#))))
                      (cons 'map
                            (cons (list 'lambda
-                                       #{formals _hoQGWMnyQPAh3k2jhWHlZ}#
-                                       #{e _hoQGWMnyQPAh3k2jhWHlX}#)
-                                 #{actuals _hoQGWMnyQPAh3k2jhWHla}#)))))))
-           (#{regen _hoQGWMnyQPAh3k2jhWHgV}#
-             (lambda (#{x _hoQGWMnyQPAh3k2jhWHli}#)
-               (let ((#{atom-key _hoQGWMnyQPAh3k2jhWHlj}#
-                       (car #{x _hoQGWMnyQPAh3k2jhWHli}#)))
-                 (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWHlj}# 'ref)
-                   (let ((#{name _hoQGWMnyQPAh3k2jhWHlt}#
-                           (car (cdr #{x _hoQGWMnyQPAh3k2jhWHli}#)))
-                         (#{var _hoQGWMnyQPAh3k2jhWHlu}#
-                           (car (cdr #{x _hoQGWMnyQPAh3k2jhWHli}#))))
+                                       #{formals -ANAU$bmvAmthP7L7xwnf4}#
+                                       #{e -ANAU$bmvAmthP7L7xwnf2}#)
+                                 #{actuals -ANAU$bmvAmthP7L7xwnf5}#)))))))
+           (#{regen -ANAU$bmvAmthP7L7xwna0}#
+             (lambda (#{x -ANAU$bmvAmthP7L7xwngB}#)
+               (let ((#{atom-key -ANAU$bmvAmthP7L7xwngC}#
+                       (car #{x -ANAU$bmvAmthP7L7xwngB}#)))
+                 (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwngC}# 'ref)
+                   (let ((#{name -ANAU$bmvAmthP7L7xwngM}#
+                           (car (cdr #{x -ANAU$bmvAmthP7L7xwngB}#)))
+                         (#{var -ANAU$bmvAmthP7L7xwngN}#
+                           (car (cdr #{x -ANAU$bmvAmthP7L7xwngB}#))))
                      (make-struct/no-tail
                        (vector-ref %expanded-vtables 3)
                        #f
-                       #{name _hoQGWMnyQPAh3k2jhWHlt}#
-                       #{var _hoQGWMnyQPAh3k2jhWHlu}#))
-                   (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWHlj}#
+                       #{name -ANAU$bmvAmthP7L7xwngM}#
+                       #{var -ANAU$bmvAmthP7L7xwngN}#))
+                   (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwngC}#
                              'primitive)
-                     (let ((#{name _hoQGWMnyQPAh3k2jhWHl6}#
-                             (car (cdr #{x _hoQGWMnyQPAh3k2jhWHli}#))))
+                     (let ((#{name -ANAU$bmvAmthP7L7xwngZ}#
+                             (car (cdr #{x -ANAU$bmvAmthP7L7xwngB}#))))
                        (if (equal? (module-name (current-module)) '(guile))
                          (make-struct/no-tail
                            (vector-ref %expanded-vtables 7)
                            #f
-                           #{name _hoQGWMnyQPAh3k2jhWHl6}#)
+                           #{name -ANAU$bmvAmthP7L7xwngZ}#)
                          (make-struct/no-tail
                            (vector-ref %expanded-vtables 5)
                            #f
                            '(guile)
-                           #{name _hoQGWMnyQPAh3k2jhWHl6}#
+                           #{name -ANAU$bmvAmthP7L7xwngZ}#
                            #f)))
-                     (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWHlj}# 'quote)
-                       (let ((#{exp _hoQGWMnyQPAh3k2jhWHmM}#
-                               (car (cdr #{x _hoQGWMnyQPAh3k2jhWHli}#))))
+                     (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwngC}# 'quote)
+                       (let ((#{exp -ANAU$bmvAmthP7L7xwngr}#
+                               (car (cdr #{x -ANAU$bmvAmthP7L7xwngB}#))))
                          (make-struct/no-tail
                            (vector-ref %expanded-vtables 1)
                            #f
-                           #{exp _hoQGWMnyQPAh3k2jhWHmM}#))
-                       (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWHlj}#
+                           #{exp -ANAU$bmvAmthP7L7xwngr}#))
+                       (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwngC}#
                                  'lambda)
-                         (if (list? (car (cdr #{x _hoQGWMnyQPAh3k2jhWHli}#)))
-                           (let ((#{req _hoQGWMnyQPAh3k2jhWHmX}#
-                                   (car (cdr #{x _hoQGWMnyQPAh3k2jhWHli}#)))
-                                 (#{vars _hoQGWMnyQPAh3k2jhWHmZ}#
-                                   (car (cdr #{x _hoQGWMnyQPAh3k2jhWHli}#)))
-                                 (#{exp _hoQGWMnyQPAh3k2jhWHmb}#
-                                   (#{regen _hoQGWMnyQPAh3k2jhWHgV}#
-                                     (car (cdr (cdr #{x _hoQGWMnyQPAh3k2jhWHli}#))))))
-                             (let ((#{body _hoQGWMnyQPAh3k2jhWHmg}#
+                         (if (list? (car (cdr #{x -ANAU$bmvAmthP7L7xwngB}#)))
+                           (let ((#{req -ANAU$bmvAmthP7L7xwng2}#
+                                   (car (cdr #{x -ANAU$bmvAmthP7L7xwngB}#)))
+                                 (#{vars -ANAU$bmvAmthP7L7xwng4}#
+                                   (car (cdr #{x -ANAU$bmvAmthP7L7xwngB}#)))
+                                 (#{exp -ANAU$bmvAmthP7L7xwng6}#
+                                   (#{regen -ANAU$bmvAmthP7L7xwna0}#
+                                     (car (cdr (cdr #{x -ANAU$bmvAmthP7L7xwngB}#))))))
+                             (let ((#{body -ANAU$bmvAmthP7L7xwng@}#
                                      (make-struct/no-tail
                                        (vector-ref %expanded-vtables 14)
                                        #f
-                                       #{req _hoQGWMnyQPAh3k2jhWHmX}#
+                                       #{req -ANAU$bmvAmthP7L7xwng2}#
                                        #f
                                        #f
                                        #f
                                        '()
-                                       #{vars _hoQGWMnyQPAh3k2jhWHmZ}#
-                                       #{exp _hoQGWMnyQPAh3k2jhWHmb}#
+                                       #{vars -ANAU$bmvAmthP7L7xwng4}#
+                                       #{exp -ANAU$bmvAmthP7L7xwng6}#
                                        #f)))
                                (make-struct/no-tail
                                  (vector-ref %expanded-vtables 13)
                                  #f
                                  '()
-                                 #{body _hoQGWMnyQPAh3k2jhWHmg}#)))
+                                 #{body -ANAU$bmvAmthP7L7xwng@}#)))
                            (error "how did we get here"
-                                  #{x _hoQGWMnyQPAh3k2jhWHli}#))
-                         (let ((#{fun-exp _hoQGWMnyQPAh3k2jhWHmw}#
-                                 (let ((#{name _hoQGWMnyQPAh3k2jhWHm5}#
-                                         (car #{x _hoQGWMnyQPAh3k2jhWHli}#)))
+                                  #{x -ANAU$bmvAmthP7L7xwngB}#))
+                         (let ((#{fun-exp -ANAU$bmvAmthP7L7xwnhP}#
+                                 (let ((#{name -ANAU$bmvAmthP7L7xwnhY}#
+                                         (car #{x -ANAU$bmvAmthP7L7xwngB}#)))
                                    (if (equal?
                                          (module-name (current-module))
                                          '(guile))
                                      (make-struct/no-tail
                                        (vector-ref %expanded-vtables 7)
                                        #f
-                                       #{name _hoQGWMnyQPAh3k2jhWHm5}#)
+                                       #{name -ANAU$bmvAmthP7L7xwnhY}#)
                                      (make-struct/no-tail
                                        (vector-ref %expanded-vtables 5)
                                        #f
                                        '(guile)
-                                       #{name _hoQGWMnyQPAh3k2jhWHm5}#
+                                       #{name -ANAU$bmvAmthP7L7xwnhY}#
                                        #f))))
-                               (#{arg-exps _hoQGWMnyQPAh3k2jhWHmx}#
-                                 (map #{regen _hoQGWMnyQPAh3k2jhWHgV}#
-                                      (cdr #{x _hoQGWMnyQPAh3k2jhWHli}#))))
+                               (#{arg-exps -ANAU$bmvAmthP7L7xwnhQ}#
+                                 (map #{regen -ANAU$bmvAmthP7L7xwna0}#
+                                      (cdr #{x -ANAU$bmvAmthP7L7xwngB}#))))
                            (make-struct/no-tail
                              (vector-ref %expanded-vtables 11)
                              #f
-                             #{fun-exp _hoQGWMnyQPAh3k2jhWHmw}#
-                             #{arg-exps _hoQGWMnyQPAh3k2jhWHmx}#))))))))))
-          (lambda (#{e _hoQGWMnyQPAh3k2jhWHgW}#
-                   #{r _hoQGWMnyQPAh3k2jhWHgX}#
-                   #{w _hoQGWMnyQPAh3k2jhWHgY}#
-                   #{s _hoQGWMnyQPAh3k2jhWHgZ}#
-                   #{mod _hoQGWMnyQPAh3k2jhWHga}#)
-            (let ((#{e _hoQGWMnyQPAh3k2jhWHgb}#
-                    (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                             #{fun-exp -ANAU$bmvAmthP7L7xwnhP}#
+                             #{arg-exps -ANAU$bmvAmthP7L7xwnhQ}#))))))))))
+          (lambda (#{e -ANAU$bmvAmthP7L7xwna1}#
+                   #{r -ANAU$bmvAmthP7L7xwna2}#
+                   #{w -ANAU$bmvAmthP7L7xwna3}#
+                   #{s -ANAU$bmvAmthP7L7xwna4}#
+                   #{mod -ANAU$bmvAmthP7L7xwna5}#)
+            (let ((#{e -ANAU$bmvAmthP7L7xwna6}#
+                    (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                       (begin
-                        (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWHgW}#)
-                              #{s _hoQGWMnyQPAh3k2jhWHgZ}#
+                        (if (if (pair? #{e -ANAU$bmvAmthP7L7xwna1}#)
+                              #{s -ANAU$bmvAmthP7L7xwna4}#
                               #f)
                           (set-source-properties!
-                            #{e _hoQGWMnyQPAh3k2jhWHgW}#
-                            #{s _hoQGWMnyQPAh3k2jhWHgZ}#))
-                        #{e _hoQGWMnyQPAh3k2jhWHgW}#)
-                      #{w _hoQGWMnyQPAh3k2jhWHgY}#
-                      #{mod _hoQGWMnyQPAh3k2jhWHga}#)))
-              (let ((#{tmp _hoQGWMnyQPAh3k2jhWHgd}#
+                            #{e -ANAU$bmvAmthP7L7xwna1}#
+                            #{s -ANAU$bmvAmthP7L7xwna4}#))
+                        #{e -ANAU$bmvAmthP7L7xwna1}#)
+                      #{w -ANAU$bmvAmthP7L7xwna3}#
+                      #{mod -ANAU$bmvAmthP7L7xwna5}#)))
+              (let ((#{tmp -ANAU$bmvAmthP7L7xwna8}#
                       ($sc-dispatch
-                        #{e _hoQGWMnyQPAh3k2jhWHgb}#
+                        #{e -ANAU$bmvAmthP7L7xwna6}#
                         '(_ any))))
-                (if #{tmp _hoQGWMnyQPAh3k2jhWHgd}#
+                (if #{tmp -ANAU$bmvAmthP7L7xwna8}#
                   (@apply
-                    (lambda (#{x _hoQGWMnyQPAh3k2jhWHg2}#)
+                    (lambda (#{x -ANAU$bmvAmthP7L7xwnbV}#)
                       (call-with-values
                         (lambda ()
-                          (#{gen-syntax _hoQGWMnyQPAh3k2jhWHgO}#
-                            #{e _hoQGWMnyQPAh3k2jhWHgb}#
-                            #{x _hoQGWMnyQPAh3k2jhWHg2}#
-                            #{r _hoQGWMnyQPAh3k2jhWHgX}#
+                          (#{gen-syntax -ANAU$bmvAmthP7L7xwnat}#
+                            #{e -ANAU$bmvAmthP7L7xwna6}#
+                            #{x -ANAU$bmvAmthP7L7xwnbV}#
+                            #{r -ANAU$bmvAmthP7L7xwna2}#
                             '()
-                            #{ellipsis? _hoQGWMnyQPAh3k2jhWHTt}#
-                            #{mod _hoQGWMnyQPAh3k2jhWHga}#))
-                        (lambda (#{e _hoQGWMnyQPAh3k2jhWHhs}#
-                                 #{maps _hoQGWMnyQPAh3k2jhWHht}#)
-                          (#{regen _hoQGWMnyQPAh3k2jhWHgV}#
-                            #{e _hoQGWMnyQPAh3k2jhWHhs}#))))
-                    #{tmp _hoQGWMnyQPAh3k2jhWHgd}#)
+                            #{ellipsis? -ANAU$bmvAmthP7L7xwnOM}#
+                            #{mod -ANAU$bmvAmthP7L7xwna5}#))
+                        (lambda (#{e -ANAU$bmvAmthP7L7xwncL}#
+                                 #{maps -ANAU$bmvAmthP7L7xwncM}#)
+                          (#{regen -ANAU$bmvAmthP7L7xwna0}#
+                            #{e -ANAU$bmvAmthP7L7xwncL}#))))
+                    #{tmp -ANAU$bmvAmthP7L7xwna8}#)
                   (syntax-violation
                     'syntax
                     "bad `syntax' form"
-                    #{e _hoQGWMnyQPAh3k2jhWHgb}#)))))))
-      (#{global-extend _hoQGWMnyQPAh3k2jhWHS@}#
+                    #{e -ANAU$bmvAmthP7L7xwna6}#)))))))
+      (#{global-extend -ANAU$bmvAmthP7L7xwnNe}#
         'core
         'lambda
-        (lambda (#{e _hoQGWMnyQPAh3k2jhWHp2}#
-                 #{r _hoQGWMnyQPAh3k2jhWHp3}#
-                 #{w _hoQGWMnyQPAh3k2jhWHp4}#
-                 #{s _hoQGWMnyQPAh3k2jhWHp5}#
-                 #{mod _hoQGWMnyQPAh3k2jhWHp6}#)
-          (let ((#{tmp _hoQGWMnyQPAh3k2jhWHp8}#
+        (lambda (#{e -ANAU$bmvAmthP7L7xwnkV}#
+                 #{r -ANAU$bmvAmthP7L7xwnkW}#
+                 #{w -ANAU$bmvAmthP7L7xwnkX}#
+                 #{s -ANAU$bmvAmthP7L7xwnkY}#
+                 #{mod -ANAU$bmvAmthP7L7xwnkZ}#)
+          (let ((#{tmp -ANAU$bmvAmthP7L7xwnkb}#
                   ($sc-dispatch
-                    #{e _hoQGWMnyQPAh3k2jhWHp2}#
+                    #{e -ANAU$bmvAmthP7L7xwnkV}#
                     '(_ any any . each-any))))
-            (if #{tmp _hoQGWMnyQPAh3k2jhWHp8}#
+            (if #{tmp -ANAU$bmvAmthP7L7xwnkb}#
               (@apply
-                (lambda (#{args _hoQGWMnyQPAh3k2jhWHqA}#
-                         #{e1 _hoQGWMnyQPAh3k2jhWHqB}#
-                         #{e2 _hoQGWMnyQPAh3k2jhWHqC}#)
+                (lambda (#{args -ANAU$bmvAmthP7L7xwnkf}#
+                         #{e1 -ANAU$bmvAmthP7L7xwnkg}#
+                         #{e2 -ANAU$bmvAmthP7L7xwnkh}#)
                   (call-with-values
                     (lambda ()
-                      (#{lambda-formals _hoQGWMnyQPAh3k2jhWHTu}#
-                        #{args _hoQGWMnyQPAh3k2jhWHqA}#))
-                    (lambda (#{req _hoQGWMnyQPAh3k2jhWHqF}#
-                             #{opt _hoQGWMnyQPAh3k2jhWHqG}#
-                             #{rest _hoQGWMnyQPAh3k2jhWHqH}#
-                             #{kw _hoQGWMnyQPAh3k2jhWHqI}#)
+                      (#{lambda-formals -ANAU$bmvAmthP7L7xwnON}#
+                        #{args -ANAU$bmvAmthP7L7xwnkf}#))
+                    (lambda (#{req -ANAU$bmvAmthP7L7xwnkk}#
+                             #{opt -ANAU$bmvAmthP7L7xwnkl}#
+                             #{rest -ANAU$bmvAmthP7L7xwnkm}#
+                             #{kw -ANAU$bmvAmthP7L7xwnkn}#)
                       (letrec*
-                        ((#{lp _hoQGWMnyQPAh3k2jhWHqJ}#
-                           (lambda (#{body _hoQGWMnyQPAh3k2jhWHqM}#
-                                    #{meta _hoQGWMnyQPAh3k2jhWHqN}#)
-                             (let ((#{tmp _hoQGWMnyQPAh3k2jhWHqP}#
+                        ((#{lp -ANAU$bmvAmthP7L7xwnko}#
+                           (lambda (#{body -ANAU$bmvAmthP7L7xwnkr}#
+                                    #{meta -ANAU$bmvAmthP7L7xwnks}#)
+                             (let ((#{tmp -ANAU$bmvAmthP7L7xwnku}#
                                      ($sc-dispatch
-                                       #{body _hoQGWMnyQPAh3k2jhWHqM}#
+                                       #{body -ANAU$bmvAmthP7L7xwnkr}#
                                        '(any any . each-any))))
-                               (if (if #{tmp _hoQGWMnyQPAh3k2jhWHqP}#
+                               (if (if #{tmp -ANAU$bmvAmthP7L7xwnku}#
                                      (@apply
-                                       (lambda (#{docstring _hoQGWMnyQPAh3k2jhWHqT}#
-                                                #{e1 _hoQGWMnyQPAh3k2jhWHqU}#
-                                                #{e2 _hoQGWMnyQPAh3k2jhWHqV}#)
+                                       (lambda (#{docstring -ANAU$bmvAmthP7L7xwnky}#
+                                                #{e1 -ANAU$bmvAmthP7L7xwnkz}#
+                                                #{e2 -ANAU$bmvAmthP7L7xwnk0}#)
                                          (string?
                                            (syntax->datum
-                                             #{docstring _hoQGWMnyQPAh3k2jhWHqT}#)))
-                                       #{tmp _hoQGWMnyQPAh3k2jhWHqP}#)
+                                             #{docstring -ANAU$bmvAmthP7L7xwnky}#)))
+                                       #{tmp -ANAU$bmvAmthP7L7xwnku}#)
                                      #f)
                                  (@apply
-                                   (lambda (#{docstring _hoQGWMnyQPAh3k2jhWHqW}#
-                                            #{e1 _hoQGWMnyQPAh3k2jhWHqX}#
-                                            #{e2 _hoQGWMnyQPAh3k2jhWHqY}#)
-                                     (#{lp _hoQGWMnyQPAh3k2jhWHqJ}#
-                                       (cons #{e1 _hoQGWMnyQPAh3k2jhWHqX}#
-                                             #{e2 _hoQGWMnyQPAh3k2jhWHqY}#)
+                                   (lambda (#{docstring -ANAU$bmvAmthP7L7xwnk1}#
+                                            #{e1 -ANAU$bmvAmthP7L7xwnk2}#
+                                            #{e2 -ANAU$bmvAmthP7L7xwnk3}#)
+                                     (#{lp -ANAU$bmvAmthP7L7xwnko}#
+                                       (cons #{e1 -ANAU$bmvAmthP7L7xwnk2}#
+                                             #{e2 -ANAU$bmvAmthP7L7xwnk3}#)
                                        (append
-                                         #{meta _hoQGWMnyQPAh3k2jhWHqN}#
+                                         #{meta -ANAU$bmvAmthP7L7xwnks}#
                                          (list (cons 'documentation
                                                      (syntax->datum
-                                                       #{docstring _hoQGWMnyQPAh3k2jhWHqW}#))))))
-                                   #{tmp _hoQGWMnyQPAh3k2jhWHqP}#)
-                                 (let ((#{tmp _hoQGWMnyQPAh3k2jhWHqZ}#
+                                                       #{docstring -ANAU$bmvAmthP7L7xwnk1}#))))))
+                                   #{tmp -ANAU$bmvAmthP7L7xwnku}#)
+                                 (let ((#{tmp -ANAU$bmvAmthP7L7xwnk4}#
                                          ($sc-dispatch
-                                           #{body _hoQGWMnyQPAh3k2jhWHqM}#
+                                           #{body -ANAU$bmvAmthP7L7xwnkr}#
                                            '(#(vector #(each (any . any)))
                                              any
                                              .
                                              each-any))))
-                                   (if #{tmp _hoQGWMnyQPAh3k2jhWHqZ}#
+                                   (if #{tmp -ANAU$bmvAmthP7L7xwnk4}#
                                      (@apply
-                                       (lambda (#{k _hoQGWMnyQPAh3k2jhWHqd}#
-                                                #{v _hoQGWMnyQPAh3k2jhWHqe}#
-                                                #{e1 _hoQGWMnyQPAh3k2jhWHqf}#
-                                                #{e2 _hoQGWMnyQPAh3k2jhWHqg}#)
-                                         (#{lp _hoQGWMnyQPAh3k2jhWHqJ}#
-                                           (cons #{e1 _hoQGWMnyQPAh3k2jhWHqf}#
-                                                 #{e2 _hoQGWMnyQPAh3k2jhWHqg}#)
+                                       (lambda (#{k -ANAU$bmvAmthP7L7xwnk8}#
+                                                #{v -ANAU$bmvAmthP7L7xwnk9}#
+                                                #{e1 -ANAU$bmvAmthP7L7xwnk$}#
+                                                #{e2 -ANAU$bmvAmthP7L7xwnk@}#)
+                                         (#{lp -ANAU$bmvAmthP7L7xwnko}#
+                                           (cons #{e1 -ANAU$bmvAmthP7L7xwnk$}#
+                                                 #{e2 -ANAU$bmvAmthP7L7xwnk@}#)
                                            (append
-                                             #{meta _hoQGWMnyQPAh3k2jhWHqN}#
+                                             #{meta -ANAU$bmvAmthP7L7xwnks}#
                                              (syntax->datum
                                                (map cons
-                                                    #{k _hoQGWMnyQPAh3k2jhWHqd}#
-                                                    #{v _hoQGWMnyQPAh3k2jhWHqe}#)))))
-                                       #{tmp _hoQGWMnyQPAh3k2jhWHqZ}#)
-                                     (#{expand-simple-lambda _hoQGWMnyQPAh3k2jhWHTv}#
-                                       #{e _hoQGWMnyQPAh3k2jhWHp2}#
-                                       #{r _hoQGWMnyQPAh3k2jhWHp3}#
-                                       #{w _hoQGWMnyQPAh3k2jhWHp4}#
-                                       #{s _hoQGWMnyQPAh3k2jhWHp5}#
-                                       #{mod _hoQGWMnyQPAh3k2jhWHp6}#
-                                       #{req _hoQGWMnyQPAh3k2jhWHqF}#
-                                       #{rest _hoQGWMnyQPAh3k2jhWHqH}#
-                                       #{meta _hoQGWMnyQPAh3k2jhWHqN}#
-                                       #{body _hoQGWMnyQPAh3k2jhWHqM}#))))))))
-                        (#{lp _hoQGWMnyQPAh3k2jhWHqJ}#
-                          (cons #{e1 _hoQGWMnyQPAh3k2jhWHqB}#
-                                #{e2 _hoQGWMnyQPAh3k2jhWHqC}#)
+                                                    #{k -ANAU$bmvAmthP7L7xwnk8}#
+                                                    #{v -ANAU$bmvAmthP7L7xwnk9}#)))))
+                                       #{tmp -ANAU$bmvAmthP7L7xwnk4}#)
+                                     (#{expand-simple-lambda -ANAU$bmvAmthP7L7xwnOO}#
+                                       #{e -ANAU$bmvAmthP7L7xwnkV}#
+                                       #{r -ANAU$bmvAmthP7L7xwnkW}#
+                                       #{w -ANAU$bmvAmthP7L7xwnkX}#
+                                       #{s -ANAU$bmvAmthP7L7xwnkY}#
+                                       #{mod -ANAU$bmvAmthP7L7xwnkZ}#
+                                       #{req -ANAU$bmvAmthP7L7xwnkk}#
+                                       #{rest -ANAU$bmvAmthP7L7xwnkm}#
+                                       #{meta -ANAU$bmvAmthP7L7xwnks}#
+                                       #{body -ANAU$bmvAmthP7L7xwnkr}#))))))))
+                        (#{lp -ANAU$bmvAmthP7L7xwnko}#
+                          (cons #{e1 -ANAU$bmvAmthP7L7xwnkg}#
+                                #{e2 -ANAU$bmvAmthP7L7xwnkh}#)
                           '())))))
-                #{tmp _hoQGWMnyQPAh3k2jhWHp8}#)
+                #{tmp -ANAU$bmvAmthP7L7xwnkb}#)
               (syntax-violation
                 'lambda
                 "bad lambda"
-                #{e _hoQGWMnyQPAh3k2jhWHp2}#)))))
-      (#{global-extend _hoQGWMnyQPAh3k2jhWHS@}#
+                #{e -ANAU$bmvAmthP7L7xwnkV}#)))))
+      (#{global-extend -ANAU$bmvAmthP7L7xwnNe}#
         'core
         'lambda*
-        (lambda (#{e _hoQGWMnyQPAh3k2jhWHu9}#
-                 #{r _hoQGWMnyQPAh3k2jhWHu$}#
-                 #{w _hoQGWMnyQPAh3k2jhWHu@}#
-                 #{s _hoQGWMnyQPAh3k2jhWHvA}#
-                 #{mod _hoQGWMnyQPAh3k2jhWHvB}#)
-          (let ((#{tmp _hoQGWMnyQPAh3k2jhWHvD}#
+        (lambda (#{e -ANAU$bmvAmthP7L7xwnpc}#
+                 #{r -ANAU$bmvAmthP7L7xwnpd}#
+                 #{w -ANAU$bmvAmthP7L7xwnpe}#
+                 #{s -ANAU$bmvAmthP7L7xwnpf}#
+                 #{mod -ANAU$bmvAmthP7L7xwnpg}#)
+          (let ((#{tmp -ANAU$bmvAmthP7L7xwnpi}#
                   ($sc-dispatch
-                    #{e _hoQGWMnyQPAh3k2jhWHu9}#
+                    #{e -ANAU$bmvAmthP7L7xwnpc}#
                     '(_ any any . each-any))))
-            (if #{tmp _hoQGWMnyQPAh3k2jhWHvD}#
+            (if #{tmp -ANAU$bmvAmthP7L7xwnpi}#
               (@apply
-                (lambda (#{args _hoQGWMnyQPAh3k2jhWHvH}#
-                         #{e1 _hoQGWMnyQPAh3k2jhWHvI}#
-                         #{e2 _hoQGWMnyQPAh3k2jhWHvJ}#)
+                (lambda (#{args -ANAU$bmvAmthP7L7xwnpm}#
+                         #{e1 -ANAU$bmvAmthP7L7xwnpn}#
+                         #{e2 -ANAU$bmvAmthP7L7xwnpo}#)
                   (call-with-values
                     (lambda ()
-                      (#{expand-lambda-case _hoQGWMnyQPAh3k2jhWHTx}#
-                        #{e _hoQGWMnyQPAh3k2jhWHu9}#
-                        #{r _hoQGWMnyQPAh3k2jhWHu$}#
-                        #{w _hoQGWMnyQPAh3k2jhWHu@}#
-                        #{s _hoQGWMnyQPAh3k2jhWHvA}#
-                        #{mod _hoQGWMnyQPAh3k2jhWHvB}#
-                        #{lambda*-formals _hoQGWMnyQPAh3k2jhWHTw}#
-                        (list (cons #{args _hoQGWMnyQPAh3k2jhWHvH}#
-                                    (cons #{e1 _hoQGWMnyQPAh3k2jhWHvI}#
-                                          #{e2 _hoQGWMnyQPAh3k2jhWHvJ}#)))))
-                    (lambda (#{meta _hoQGWMnyQPAh3k2jhWHvM}#
-                             #{lcase _hoQGWMnyQPAh3k2jhWHvN}#)
+                      (#{expand-lambda-case -ANAU$bmvAmthP7L7xwnOQ}#
+                        #{e -ANAU$bmvAmthP7L7xwnpc}#
+                        #{r -ANAU$bmvAmthP7L7xwnpd}#
+                        #{w -ANAU$bmvAmthP7L7xwnpe}#
+                        #{s -ANAU$bmvAmthP7L7xwnpf}#
+                        #{mod -ANAU$bmvAmthP7L7xwnpg}#
+                        #{lambda*-formals -ANAU$bmvAmthP7L7xwnOP}#
+                        (list (cons #{args -ANAU$bmvAmthP7L7xwnpm}#
+                                    (cons #{e1 -ANAU$bmvAmthP7L7xwnpn}#
+                                          #{e2 -ANAU$bmvAmthP7L7xwnpo}#)))))
+                    (lambda (#{meta -ANAU$bmvAmthP7L7xwnpr}#
+                             #{lcase -ANAU$bmvAmthP7L7xwnps}#)
                       (make-struct/no-tail
                         (vector-ref %expanded-vtables 13)
-                        #{s _hoQGWMnyQPAh3k2jhWHvA}#
-                        #{meta _hoQGWMnyQPAh3k2jhWHvM}#
-                        #{lcase _hoQGWMnyQPAh3k2jhWHvN}#))))
-                #{tmp _hoQGWMnyQPAh3k2jhWHvD}#)
+                        #{s -ANAU$bmvAmthP7L7xwnpf}#
+                        #{meta -ANAU$bmvAmthP7L7xwnpr}#
+                        #{lcase -ANAU$bmvAmthP7L7xwnps}#))))
+                #{tmp -ANAU$bmvAmthP7L7xwnpi}#)
               (syntax-violation
                 'lambda
                 "bad lambda*"
-                #{e _hoQGWMnyQPAh3k2jhWHu9}#)))))
-      (#{global-extend _hoQGWMnyQPAh3k2jhWHS@}#
+                #{e -ANAU$bmvAmthP7L7xwnpc}#)))))
+      (#{global-extend -ANAU$bmvAmthP7L7xwnNe}#
         'core
         'case-lambda
-        (lambda (#{e _hoQGWMnyQPAh3k2jhWHx3}#
-                 #{r _hoQGWMnyQPAh3k2jhWHx4}#
-                 #{w _hoQGWMnyQPAh3k2jhWHx5}#
-                 #{s _hoQGWMnyQPAh3k2jhWHx6}#
-                 #{mod _hoQGWMnyQPAh3k2jhWHx7}#)
-          (let ((#{tmp _hoQGWMnyQPAh3k2jhWHx9}#
+        (lambda (#{e -ANAU$bmvAmthP7L7xwnsW}#
+                 #{r -ANAU$bmvAmthP7L7xwnsX}#
+                 #{w -ANAU$bmvAmthP7L7xwnsY}#
+                 #{s -ANAU$bmvAmthP7L7xwnsZ}#
+                 #{mod -ANAU$bmvAmthP7L7xwnsa}#)
+          (let ((#{tmp -ANAU$bmvAmthP7L7xwnsc}#
                   ($sc-dispatch
-                    #{e _hoQGWMnyQPAh3k2jhWHx3}#
+                    #{e -ANAU$bmvAmthP7L7xwnsW}#
                     '(_ (any any . each-any)
                         .
                         #(each (any any . each-any))))))
-            (if #{tmp _hoQGWMnyQPAh3k2jhWHx9}#
+            (if #{tmp -ANAU$bmvAmthP7L7xwnsc}#
               (@apply
-                (lambda (#{args _hoQGWMnyQPAh3k2jhWHyB}#
-                         #{e1 _hoQGWMnyQPAh3k2jhWHyC}#
-                         #{e2 _hoQGWMnyQPAh3k2jhWHyD}#
-                         #{args* _hoQGWMnyQPAh3k2jhWHyE}#
-                         #{e1* _hoQGWMnyQPAh3k2jhWHyF}#
-                         #{e2* _hoQGWMnyQPAh3k2jhWHyG}#)
+                (lambda (#{args -ANAU$bmvAmthP7L7xwnsg}#
+                         #{e1 -ANAU$bmvAmthP7L7xwnsh}#
+                         #{e2 -ANAU$bmvAmthP7L7xwnsi}#
+                         #{args* -ANAU$bmvAmthP7L7xwnsj}#
+                         #{e1* -ANAU$bmvAmthP7L7xwnsk}#
+                         #{e2* -ANAU$bmvAmthP7L7xwnsl}#)
                   (call-with-values
                     (lambda ()
-                      (#{expand-lambda-case _hoQGWMnyQPAh3k2jhWHTx}#
-                        #{e _hoQGWMnyQPAh3k2jhWHx3}#
-                        #{r _hoQGWMnyQPAh3k2jhWHx4}#
-                        #{w _hoQGWMnyQPAh3k2jhWHx5}#
-                        #{s _hoQGWMnyQPAh3k2jhWHx6}#
-                        #{mod _hoQGWMnyQPAh3k2jhWHx7}#
-                        #{lambda-formals _hoQGWMnyQPAh3k2jhWHTu}#
-                        (cons (cons #{args _hoQGWMnyQPAh3k2jhWHyB}#
-                                    (cons #{e1 _hoQGWMnyQPAh3k2jhWHyC}#
-                                          #{e2 _hoQGWMnyQPAh3k2jhWHyD}#))
-                              (map (lambda (#{tmp _hoQGWMnyQPAh3k2jhWHH2 _hoQGWMnyQPAh3k2jhWHyJ}#
-                                            #{tmp _hoQGWMnyQPAh3k2jhWHH1 _hoQGWMnyQPAh3k2jhWHyK}#
-                                            #{tmp _hoQGWMnyQPAh3k2jhWHH0 _hoQGWMnyQPAh3k2jhWHyL}#)
-                                     (cons #{tmp _hoQGWMnyQPAh3k2jhWHH0 _hoQGWMnyQPAh3k2jhWHyL}#
-                                           (cons #{tmp _hoQGWMnyQPAh3k2jhWHH1 _hoQGWMnyQPAh3k2jhWHyK}#
-                                                 #{tmp _hoQGWMnyQPAh3k2jhWHH2 _hoQGWMnyQPAh3k2jhWHyJ}#)))
-                                   #{e2* _hoQGWMnyQPAh3k2jhWHyG}#
-                                   #{e1* _hoQGWMnyQPAh3k2jhWHyF}#
-                                   #{args* _hoQGWMnyQPAh3k2jhWHyE}#))))
-                    (lambda (#{meta _hoQGWMnyQPAh3k2jhWHyM}#
-                             #{lcase _hoQGWMnyQPAh3k2jhWHyN}#)
+                      (#{expand-lambda-case -ANAU$bmvAmthP7L7xwnOQ}#
+                        #{e -ANAU$bmvAmthP7L7xwnsW}#
+                        #{r -ANAU$bmvAmthP7L7xwnsX}#
+                        #{w -ANAU$bmvAmthP7L7xwnsY}#
+                        #{s -ANAU$bmvAmthP7L7xwnsZ}#
+                        #{mod -ANAU$bmvAmthP7L7xwnsa}#
+                        #{lambda-formals -ANAU$bmvAmthP7L7xwnON}#
+                        (cons (cons #{args -ANAU$bmvAmthP7L7xwnsg}#
+                                    (cons #{e1 -ANAU$bmvAmthP7L7xwnsh}#
+                                          #{e2 -ANAU$bmvAmthP7L7xwnsi}#))
+                              (map (lambda (#{tmp -ANAU$bmvAmthP7L7xwnCS -ANAU$bmvAmthP7L7xwnso}#
+                                            #{tmp -ANAU$bmvAmthP7L7xwnCR -ANAU$bmvAmthP7L7xwnsp}#
+                                            #{tmp -ANAU$bmvAmthP7L7xwnCQ -ANAU$bmvAmthP7L7xwnsq}#)
+                                     (cons #{tmp -ANAU$bmvAmthP7L7xwnCQ -ANAU$bmvAmthP7L7xwnsq}#
+                                           (cons #{tmp -ANAU$bmvAmthP7L7xwnCR -ANAU$bmvAmthP7L7xwnsp}#
+                                                 #{tmp -ANAU$bmvAmthP7L7xwnCS -ANAU$bmvAmthP7L7xwnso}#)))
+                                   #{e2* -ANAU$bmvAmthP7L7xwnsl}#
+                                   #{e1* -ANAU$bmvAmthP7L7xwnsk}#
+                                   #{args* -ANAU$bmvAmthP7L7xwnsj}#))))
+                    (lambda (#{meta -ANAU$bmvAmthP7L7xwnsr}#
+                             #{lcase -ANAU$bmvAmthP7L7xwnss}#)
                       (make-struct/no-tail
                         (vector-ref %expanded-vtables 13)
-                        #{s _hoQGWMnyQPAh3k2jhWHx6}#
-                        #{meta _hoQGWMnyQPAh3k2jhWHyM}#
-                        #{lcase _hoQGWMnyQPAh3k2jhWHyN}#))))
-                #{tmp _hoQGWMnyQPAh3k2jhWHx9}#)
+                        #{s -ANAU$bmvAmthP7L7xwnsZ}#
+                        #{meta -ANAU$bmvAmthP7L7xwnsr}#
+                        #{lcase -ANAU$bmvAmthP7L7xwnss}#))))
+                #{tmp -ANAU$bmvAmthP7L7xwnsc}#)
               (syntax-violation
                 'case-lambda
                 "bad case-lambda"
-                #{e _hoQGWMnyQPAh3k2jhWHx3}#)))))
-      (#{global-extend _hoQGWMnyQPAh3k2jhWHS@}#
+                #{e -ANAU$bmvAmthP7L7xwnsW}#)))))
+      (#{global-extend -ANAU$bmvAmthP7L7xwnNe}#
         'core
         'case-lambda*
-        (lambda (#{e _hoQGWMnyQPAh3k2jhWH0v}#
-                 #{r _hoQGWMnyQPAh3k2jhWH0w}#
-                 #{w _hoQGWMnyQPAh3k2jhWH0x}#
-                 #{s _hoQGWMnyQPAh3k2jhWH0y}#
-                 #{mod _hoQGWMnyQPAh3k2jhWH0z}#)
-          (let ((#{tmp _hoQGWMnyQPAh3k2jhWH01}#
+        (lambda (#{e -ANAU$bmvAmthP7L7xwnvO}#
+                 #{r -ANAU$bmvAmthP7L7xwnvP}#
+                 #{w -ANAU$bmvAmthP7L7xwnvQ}#
+                 #{s -ANAU$bmvAmthP7L7xwnvR}#
+                 #{mod -ANAU$bmvAmthP7L7xwnvS}#)
+          (let ((#{tmp -ANAU$bmvAmthP7L7xwnvU}#
                   ($sc-dispatch
-                    #{e _hoQGWMnyQPAh3k2jhWH0v}#
+                    #{e -ANAU$bmvAmthP7L7xwnvO}#
                     '(_ (any any . each-any)
                         .
                         #(each (any any . each-any))))))
-            (if #{tmp _hoQGWMnyQPAh3k2jhWH01}#
+            (if #{tmp -ANAU$bmvAmthP7L7xwnvU}#
               (@apply
-                (lambda (#{args _hoQGWMnyQPAh3k2jhWH05}#
-                         #{e1 _hoQGWMnyQPAh3k2jhWH06}#
-                         #{e2 _hoQGWMnyQPAh3k2jhWH07}#
-                         #{args* _hoQGWMnyQPAh3k2jhWH08}#
-                         #{e1* _hoQGWMnyQPAh3k2jhWH09}#
-                         #{e2* _hoQGWMnyQPAh3k2jhWH0$}#)
+                (lambda (#{args -ANAU$bmvAmthP7L7xwnvY}#
+                         #{e1 -ANAU$bmvAmthP7L7xwnvZ}#
+                         #{e2 -ANAU$bmvAmthP7L7xwnva}#
+                         #{args* -ANAU$bmvAmthP7L7xwnvb}#
+                         #{e1* -ANAU$bmvAmthP7L7xwnvc}#
+                         #{e2* -ANAU$bmvAmthP7L7xwnvd}#)
                   (call-with-values
                     (lambda ()
-                      (#{expand-lambda-case _hoQGWMnyQPAh3k2jhWHTx}#
-                        #{e _hoQGWMnyQPAh3k2jhWH0v}#
-                        #{r _hoQGWMnyQPAh3k2jhWH0w}#
-                        #{w _hoQGWMnyQPAh3k2jhWH0x}#
-                        #{s _hoQGWMnyQPAh3k2jhWH0y}#
-                        #{mod _hoQGWMnyQPAh3k2jhWH0z}#
-                        #{lambda*-formals _hoQGWMnyQPAh3k2jhWHTw}#
-                        (cons (cons #{args _hoQGWMnyQPAh3k2jhWH05}#
-                                    (cons #{e1 _hoQGWMnyQPAh3k2jhWH06}#
-                                          #{e2 _hoQGWMnyQPAh3k2jhWH07}#))
-                              (map (lambda (#{tmp _hoQGWMnyQPAh3k2jhWHIL _hoQGWMnyQPAh3k2jhWH1B}#
-                                            #{tmp _hoQGWMnyQPAh3k2jhWHIK _hoQGWMnyQPAh3k2jhWH1C}#
-                                            #{tmp _hoQGWMnyQPAh3k2jhWHIJ _hoQGWMnyQPAh3k2jhWH1D}#)
-                                     (cons #{tmp _hoQGWMnyQPAh3k2jhWHIJ _hoQGWMnyQPAh3k2jhWH1D}#
-                                           (cons #{tmp _hoQGWMnyQPAh3k2jhWHIK _hoQGWMnyQPAh3k2jhWH1C}#
-                                                 #{tmp _hoQGWMnyQPAh3k2jhWHIL _hoQGWMnyQPAh3k2jhWH1B}#)))
-                                   #{e2* _hoQGWMnyQPAh3k2jhWH0$}#
-                                   #{e1* _hoQGWMnyQPAh3k2jhWH09}#
-                                   #{args* _hoQGWMnyQPAh3k2jhWH08}#))))
-                    (lambda (#{meta _hoQGWMnyQPAh3k2jhWH1E}#
-                             #{lcase _hoQGWMnyQPAh3k2jhWH1F}#)
+                      (#{expand-lambda-case -ANAU$bmvAmthP7L7xwnOQ}#
+                        #{e -ANAU$bmvAmthP7L7xwnvO}#
+                        #{r -ANAU$bmvAmthP7L7xwnvP}#
+                        #{w -ANAU$bmvAmthP7L7xwnvQ}#
+                        #{s -ANAU$bmvAmthP7L7xwnvR}#
+                        #{mod -ANAU$bmvAmthP7L7xwnvS}#
+                        #{lambda*-formals -ANAU$bmvAmthP7L7xwnOP}#
+                        (cons (cons #{args -ANAU$bmvAmthP7L7xwnvY}#
+                                    (cons #{e1 -ANAU$bmvAmthP7L7xwnvZ}#
+                                          #{e2 -ANAU$bmvAmthP7L7xwnva}#))
+                              (map (lambda (#{tmp -ANAU$bmvAmthP7L7xwnCn -ANAU$bmvAmthP7L7xwnvg}#
+                                            #{tmp -ANAU$bmvAmthP7L7xwnCm -ANAU$bmvAmthP7L7xwnvh}#
+                                            #{tmp -ANAU$bmvAmthP7L7xwnCl -ANAU$bmvAmthP7L7xwnvi}#)
+                                     (cons #{tmp -ANAU$bmvAmthP7L7xwnCl -ANAU$bmvAmthP7L7xwnvi}#
+                                           (cons #{tmp -ANAU$bmvAmthP7L7xwnCm -ANAU$bmvAmthP7L7xwnvh}#
+                                                 #{tmp -ANAU$bmvAmthP7L7xwnCn -ANAU$bmvAmthP7L7xwnvg}#)))
+                                   #{e2* -ANAU$bmvAmthP7L7xwnvd}#
+                                   #{e1* -ANAU$bmvAmthP7L7xwnvc}#
+                                   #{args* -ANAU$bmvAmthP7L7xwnvb}#))))
+                    (lambda (#{meta -ANAU$bmvAmthP7L7xwnvj}#
+                             #{lcase -ANAU$bmvAmthP7L7xwnvk}#)
                       (make-struct/no-tail
                         (vector-ref %expanded-vtables 13)
-                        #{s _hoQGWMnyQPAh3k2jhWH0y}#
-                        #{meta _hoQGWMnyQPAh3k2jhWH1E}#
-                        #{lcase _hoQGWMnyQPAh3k2jhWH1F}#))))
-                #{tmp _hoQGWMnyQPAh3k2jhWH01}#)
+                        #{s -ANAU$bmvAmthP7L7xwnvR}#
+                        #{meta -ANAU$bmvAmthP7L7xwnvj}#
+                        #{lcase -ANAU$bmvAmthP7L7xwnvk}#))))
+                #{tmp -ANAU$bmvAmthP7L7xwnvU}#)
               (syntax-violation
                 'case-lambda
                 "bad case-lambda*"
-                #{e _hoQGWMnyQPAh3k2jhWH0v}#)))))
-      (#{global-extend _hoQGWMnyQPAh3k2jhWHS@}#
+                #{e -ANAU$bmvAmthP7L7xwnvO}#)))))
+      (#{global-extend -ANAU$bmvAmthP7L7xwnNe}#
         'core
         'let
         (letrec*
-          ((#{expand-let _hoQGWMnyQPAh3k2jhWH4E}#
-             (lambda (#{e _hoQGWMnyQPAh3k2jhWH6Z}#
-                      #{r _hoQGWMnyQPAh3k2jhWH6a}#
-                      #{w _hoQGWMnyQPAh3k2jhWH6b}#
-                      #{s _hoQGWMnyQPAh3k2jhWH6c}#
-                      #{mod _hoQGWMnyQPAh3k2jhWH6d}#
-                      #{constructor _hoQGWMnyQPAh3k2jhWH6e}#
-                      #{ids _hoQGWMnyQPAh3k2jhWH6f}#
-                      #{vals _hoQGWMnyQPAh3k2jhWH6g}#
-                      #{exps _hoQGWMnyQPAh3k2jhWH6h}#)
-               (if (not (#{valid-bound-ids? _hoQGWMnyQPAh3k2jhWHTb}#
-                          #{ids _hoQGWMnyQPAh3k2jhWH6f}#))
+          ((#{expand-let -ANAU$bmvAmthP7L7xwnyj}#
+             (lambda (#{e -ANAU$bmvAmthP7L7xwn04}#
+                      #{r -ANAU$bmvAmthP7L7xwn05}#
+                      #{w -ANAU$bmvAmthP7L7xwn06}#
+                      #{s -ANAU$bmvAmthP7L7xwn07}#
+                      #{mod -ANAU$bmvAmthP7L7xwn08}#
+                      #{constructor -ANAU$bmvAmthP7L7xwn09}#
+                      #{ids -ANAU$bmvAmthP7L7xwn0$}#
+                      #{vals -ANAU$bmvAmthP7L7xwn0@}#
+                      #{exps -ANAU$bmvAmthP7L7xwn1A}#)
+               (if (not (#{valid-bound-ids? -ANAU$bmvAmthP7L7xwnN6}#
+                          #{ids -ANAU$bmvAmthP7L7xwn0$}#))
                  (syntax-violation
                    'let
                    "duplicate bound variable"
-                   #{e _hoQGWMnyQPAh3k2jhWH6Z}#)
-                 (let ((#{labels _hoQGWMnyQPAh3k2jhWH7v}#
-                         (#{gen-labels _hoQGWMnyQPAh3k2jhWHTE}#
-                           #{ids _hoQGWMnyQPAh3k2jhWH6f}#))
-                       (#{new-vars _hoQGWMnyQPAh3k2jhWH7w}#
-                         (map #{gen-var _hoQGWMnyQPAh3k2jhWHTz}#
-                              #{ids _hoQGWMnyQPAh3k2jhWH6f}#)))
-                   (let ((#{nw _hoQGWMnyQPAh3k2jhWH7x}#
-                           (#{make-binding-wrap _hoQGWMnyQPAh3k2jhWHTP}#
-                             #{ids _hoQGWMnyQPAh3k2jhWH6f}#
-                             #{labels _hoQGWMnyQPAh3k2jhWH7v}#
-                             #{w _hoQGWMnyQPAh3k2jhWH6b}#))
-                         (#{nr _hoQGWMnyQPAh3k2jhWH7y}#
-                           (#{extend-var-env _hoQGWMnyQPAh3k2jhWHS8}#
-                             #{labels _hoQGWMnyQPAh3k2jhWH7v}#
-                             #{new-vars _hoQGWMnyQPAh3k2jhWH7w}#
-                             #{r _hoQGWMnyQPAh3k2jhWH6a}#)))
-                     (#{constructor _hoQGWMnyQPAh3k2jhWH6e}#
-                       #{s _hoQGWMnyQPAh3k2jhWH6c}#
+                   #{e -ANAU$bmvAmthP7L7xwn04}#)
+                 (let ((#{labels -ANAU$bmvAmthP7L7xwn2O}#
+                         (#{gen-labels -ANAU$bmvAmthP7L7xwnNj}#
+                           #{ids -ANAU$bmvAmthP7L7xwn0$}#))
+                       (#{new-vars -ANAU$bmvAmthP7L7xwn2P}#
+                         (map #{gen-var -ANAU$bmvAmthP7L7xwnOS}#
+                              #{ids -ANAU$bmvAmthP7L7xwn0$}#)))
+                   (let ((#{nw -ANAU$bmvAmthP7L7xwn2Q}#
+                           (#{make-binding-wrap -ANAU$bmvAmthP7L7xwnNu}#
+                             #{ids -ANAU$bmvAmthP7L7xwn0$}#
+                             #{labels -ANAU$bmvAmthP7L7xwn2O}#
+                             #{w -ANAU$bmvAmthP7L7xwn06}#))
+                         (#{nr -ANAU$bmvAmthP7L7xwn2R}#
+                           (#{extend-var-env -ANAU$bmvAmthP7L7xwnNb}#
+                             #{labels -ANAU$bmvAmthP7L7xwn2O}#
+                             #{new-vars -ANAU$bmvAmthP7L7xwn2P}#
+                             #{r -ANAU$bmvAmthP7L7xwn05}#)))
+                     (#{constructor -ANAU$bmvAmthP7L7xwn09}#
+                       #{s -ANAU$bmvAmthP7L7xwn07}#
                        (map syntax->datum
-                            #{ids _hoQGWMnyQPAh3k2jhWH6f}#)
-                       #{new-vars _hoQGWMnyQPAh3k2jhWH7w}#
-                       (map (lambda (#{x _hoQGWMnyQPAh3k2jhWH8D}#)
-                              (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                #{x _hoQGWMnyQPAh3k2jhWH8D}#
-                                #{r _hoQGWMnyQPAh3k2jhWH6a}#
-                                #{w _hoQGWMnyQPAh3k2jhWH6b}#
-                                #{mod _hoQGWMnyQPAh3k2jhWH6d}#))
-                            #{vals _hoQGWMnyQPAh3k2jhWH6g}#)
-                       (#{expand-body _hoQGWMnyQPAh3k2jhWHTp}#
-                         #{exps _hoQGWMnyQPAh3k2jhWH6h}#
-                         (#{source-wrap _hoQGWMnyQPAh3k2jhWHTf}#
-                           #{e _hoQGWMnyQPAh3k2jhWH6Z}#
-                           #{nw _hoQGWMnyQPAh3k2jhWH7x}#
-                           #{s _hoQGWMnyQPAh3k2jhWH6c}#
-                           #{mod _hoQGWMnyQPAh3k2jhWH6d}#)
-                         #{nr _hoQGWMnyQPAh3k2jhWH7y}#
-                         #{nw _hoQGWMnyQPAh3k2jhWH7x}#
-                         #{mod _hoQGWMnyQPAh3k2jhWH6d}#))))))))
-          (lambda (#{e _hoQGWMnyQPAh3k2jhWH4F}#
-                   #{r _hoQGWMnyQPAh3k2jhWH4G}#
-                   #{w _hoQGWMnyQPAh3k2jhWH4H}#
-                   #{s _hoQGWMnyQPAh3k2jhWH4I}#
-                   #{mod _hoQGWMnyQPAh3k2jhWH4J}#)
-            (let ((#{tmp _hoQGWMnyQPAh3k2jhWH4L}#
+                            #{ids -ANAU$bmvAmthP7L7xwn0$}#)
+                       #{new-vars -ANAU$bmvAmthP7L7xwn2P}#
+                       (map (lambda (#{x -ANAU$bmvAmthP7L7xwn2i}#)
+                              (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                #{x -ANAU$bmvAmthP7L7xwn2i}#
+                                #{r -ANAU$bmvAmthP7L7xwn05}#
+                                #{w -ANAU$bmvAmthP7L7xwn06}#
+                                #{mod -ANAU$bmvAmthP7L7xwn08}#))
+                            #{vals -ANAU$bmvAmthP7L7xwn0@}#)
+                       (#{expand-body -ANAU$bmvAmthP7L7xwnOI}#
+                         #{exps -ANAU$bmvAmthP7L7xwn1A}#
+                         (#{source-wrap -ANAU$bmvAmthP7L7xwnN$}#
+                           #{e -ANAU$bmvAmthP7L7xwn04}#
+                           #{nw -ANAU$bmvAmthP7L7xwn2Q}#
+                           #{s -ANAU$bmvAmthP7L7xwn07}#
+                           #{mod -ANAU$bmvAmthP7L7xwn08}#)
+                         #{nr -ANAU$bmvAmthP7L7xwn2R}#
+                         #{nw -ANAU$bmvAmthP7L7xwn2Q}#
+                         #{mod -ANAU$bmvAmthP7L7xwn08}#))))))))
+          (lambda (#{e -ANAU$bmvAmthP7L7xwnyk}#
+                   #{r -ANAU$bmvAmthP7L7xwnyl}#
+                   #{w -ANAU$bmvAmthP7L7xwnym}#
+                   #{s -ANAU$bmvAmthP7L7xwnyn}#
+                   #{mod -ANAU$bmvAmthP7L7xwnyo}#)
+            (let ((#{tmp -ANAU$bmvAmthP7L7xwnyq}#
                     ($sc-dispatch
-                      #{e _hoQGWMnyQPAh3k2jhWH4F}#
+                      #{e -ANAU$bmvAmthP7L7xwnyk}#
                       '(_ #(each (any any)) any . each-any))))
-              (if (if #{tmp _hoQGWMnyQPAh3k2jhWH4L}#
+              (if (if #{tmp -ANAU$bmvAmthP7L7xwnyq}#
                     (@apply
-                      (lambda (#{id _hoQGWMnyQPAh3k2jhWH4P}#
-                               #{val _hoQGWMnyQPAh3k2jhWH4Q}#
-                               #{e1 _hoQGWMnyQPAh3k2jhWH4R}#
-                               #{e2 _hoQGWMnyQPAh3k2jhWH4S}#)
+                      (lambda (#{id -ANAU$bmvAmthP7L7xwnyu}#
+                               #{val -ANAU$bmvAmthP7L7xwnyv}#
+                               #{e1 -ANAU$bmvAmthP7L7xwnyw}#
+                               #{e2 -ANAU$bmvAmthP7L7xwnyx}#)
                         (and-map
-                          #{id? _hoQGWMnyQPAh3k2jhWHTB}#
-                          #{id _hoQGWMnyQPAh3k2jhWH4P}#))
-                      #{tmp _hoQGWMnyQPAh3k2jhWH4L}#)
+                          #{id? -ANAU$bmvAmthP7L7xwnNg}#
+                          #{id -ANAU$bmvAmthP7L7xwnyu}#))
+                      #{tmp -ANAU$bmvAmthP7L7xwnyq}#)
                     #f)
                 (@apply
-                  (lambda (#{id _hoQGWMnyQPAh3k2jhWH4i}#
-                           #{val _hoQGWMnyQPAh3k2jhWH4j}#
-                           #{e1 _hoQGWMnyQPAh3k2jhWH4k}#
-                           #{e2 _hoQGWMnyQPAh3k2jhWH4l}#)
-                    (#{expand-let _hoQGWMnyQPAh3k2jhWH4E}#
-                      #{e _hoQGWMnyQPAh3k2jhWH4F}#
-                      #{r _hoQGWMnyQPAh3k2jhWH4G}#
-                      #{w _hoQGWMnyQPAh3k2jhWH4H}#
-                      #{s _hoQGWMnyQPAh3k2jhWH4I}#
-                      #{mod _hoQGWMnyQPAh3k2jhWH4J}#
-                      #{build-let _hoQGWMnyQPAh3k2jhWHSv}#
-                      #{id _hoQGWMnyQPAh3k2jhWH4i}#
-                      #{val _hoQGWMnyQPAh3k2jhWH4j}#
-                      (cons #{e1 _hoQGWMnyQPAh3k2jhWH4k}#
-                            #{e2 _hoQGWMnyQPAh3k2jhWH4l}#)))
-                  #{tmp _hoQGWMnyQPAh3k2jhWH4L}#)
-                (let ((#{tmp _hoQGWMnyQPAh3k2jhWH5D}#
+                  (lambda (#{id -ANAU$bmvAmthP7L7xwnzB}#
+                           #{val -ANAU$bmvAmthP7L7xwnzC}#
+                           #{e1 -ANAU$bmvAmthP7L7xwnzD}#
+                           #{e2 -ANAU$bmvAmthP7L7xwnzE}#)
+                    (#{expand-let -ANAU$bmvAmthP7L7xwnyj}#
+                      #{e -ANAU$bmvAmthP7L7xwnyk}#
+                      #{r -ANAU$bmvAmthP7L7xwnyl}#
+                      #{w -ANAU$bmvAmthP7L7xwnym}#
+                      #{s -ANAU$bmvAmthP7L7xwnyn}#
+                      #{mod -ANAU$bmvAmthP7L7xwnyo}#
+                      #{build-let -ANAU$bmvAmthP7L7xwnNO}#
+                      #{id -ANAU$bmvAmthP7L7xwnzB}#
+                      #{val -ANAU$bmvAmthP7L7xwnzC}#
+                      (cons #{e1 -ANAU$bmvAmthP7L7xwnzD}#
+                            #{e2 -ANAU$bmvAmthP7L7xwnzE}#)))
+                  #{tmp -ANAU$bmvAmthP7L7xwnyq}#)
+                (let ((#{tmp -ANAU$bmvAmthP7L7xwnzi}#
                         ($sc-dispatch
-                          #{e _hoQGWMnyQPAh3k2jhWH4F}#
+                          #{e -ANAU$bmvAmthP7L7xwnyk}#
                           '(_ any #(each (any any)) any . each-any))))
-                  (if (if #{tmp _hoQGWMnyQPAh3k2jhWH5D}#
+                  (if (if #{tmp -ANAU$bmvAmthP7L7xwnzi}#
                         (@apply
-                          (lambda (#{f _hoQGWMnyQPAh3k2jhWH5H}#
-                                   #{id _hoQGWMnyQPAh3k2jhWH5I}#
-                                   #{val _hoQGWMnyQPAh3k2jhWH5J}#
-                                   #{e1 _hoQGWMnyQPAh3k2jhWH5K}#
-                                   #{e2 _hoQGWMnyQPAh3k2jhWH5L}#)
-                            (if (if (symbol? #{f _hoQGWMnyQPAh3k2jhWH5H}#)
+                          (lambda (#{f -ANAU$bmvAmthP7L7xwnzm}#
+                                   #{id -ANAU$bmvAmthP7L7xwnzn}#
+                                   #{val -ANAU$bmvAmthP7L7xwnzo}#
+                                   #{e1 -ANAU$bmvAmthP7L7xwnzp}#
+                                   #{e2 -ANAU$bmvAmthP7L7xwnzq}#)
+                            (if (if (symbol? #{f -ANAU$bmvAmthP7L7xwnzm}#)
                                   #t
                                   (if (if (vector?
-                                            #{f _hoQGWMnyQPAh3k2jhWH5H}#)
+                                            #{f -ANAU$bmvAmthP7L7xwnzm}#)
                                         (if (= (vector-length
-                                                 #{f _hoQGWMnyQPAh3k2jhWH5H}#)
+                                                 #{f -ANAU$bmvAmthP7L7xwnzm}#)
                                                4)
                                           (eq? (vector-ref
-                                                 #{f _hoQGWMnyQPAh3k2jhWH5H}#
+                                                 #{f -ANAU$bmvAmthP7L7xwnzm}#
                                                  0)
                                                'syntax-object)
                                           #f)
                                         #f)
                                     (symbol?
                                       (vector-ref
-                                        #{f _hoQGWMnyQPAh3k2jhWH5H}#
+                                        #{f -ANAU$bmvAmthP7L7xwnzm}#
                                         1))
                                     #f))
                               (and-map
-                                #{id? _hoQGWMnyQPAh3k2jhWHTB}#
-                                #{id _hoQGWMnyQPAh3k2jhWH5I}#)
+                                #{id? -ANAU$bmvAmthP7L7xwnNg}#
+                                #{id -ANAU$bmvAmthP7L7xwnzn}#)
                               #f))
-                          #{tmp _hoQGWMnyQPAh3k2jhWH5D}#)
+                          #{tmp -ANAU$bmvAmthP7L7xwnzi}#)
                         #f)
                     (@apply
-                      (lambda (#{f _hoQGWMnyQPAh3k2jhWH51}#
-                               #{id _hoQGWMnyQPAh3k2jhWH52}#
-                               #{val _hoQGWMnyQPAh3k2jhWH53}#
-                               #{e1 _hoQGWMnyQPAh3k2jhWH54}#
-                               #{e2 _hoQGWMnyQPAh3k2jhWH55}#)
-                        (#{expand-let _hoQGWMnyQPAh3k2jhWH4E}#
-                          #{e _hoQGWMnyQPAh3k2jhWH4F}#
-                          #{r _hoQGWMnyQPAh3k2jhWH4G}#
-                          #{w _hoQGWMnyQPAh3k2jhWH4H}#
-                          #{s _hoQGWMnyQPAh3k2jhWH4I}#
-                          #{mod _hoQGWMnyQPAh3k2jhWH4J}#
-                          #{build-named-let _hoQGWMnyQPAh3k2jhWHSw}#
-                          (cons #{f _hoQGWMnyQPAh3k2jhWH51}#
-                                #{id _hoQGWMnyQPAh3k2jhWH52}#)
-                          #{val _hoQGWMnyQPAh3k2jhWH53}#
-                          (cons #{e1 _hoQGWMnyQPAh3k2jhWH54}#
-                                #{e2 _hoQGWMnyQPAh3k2jhWH55}#)))
-                      #{tmp _hoQGWMnyQPAh3k2jhWH5D}#)
+                      (lambda (#{f -ANAU$bmvAmthP7L7xwn0U}#
+                               #{id -ANAU$bmvAmthP7L7xwn0V}#
+                               #{val -ANAU$bmvAmthP7L7xwn0W}#
+                               #{e1 -ANAU$bmvAmthP7L7xwn0X}#
+                               #{e2 -ANAU$bmvAmthP7L7xwn0Y}#)
+                        (#{expand-let -ANAU$bmvAmthP7L7xwnyj}#
+                          #{e -ANAU$bmvAmthP7L7xwnyk}#
+                          #{r -ANAU$bmvAmthP7L7xwnyl}#
+                          #{w -ANAU$bmvAmthP7L7xwnym}#
+                          #{s -ANAU$bmvAmthP7L7xwnyn}#
+                          #{mod -ANAU$bmvAmthP7L7xwnyo}#
+                          #{build-named-let -ANAU$bmvAmthP7L7xwnNP}#
+                          (cons #{f -ANAU$bmvAmthP7L7xwn0U}#
+                                #{id -ANAU$bmvAmthP7L7xwn0V}#)
+                          #{val -ANAU$bmvAmthP7L7xwn0W}#
+                          (cons #{e1 -ANAU$bmvAmthP7L7xwn0X}#
+                                #{e2 -ANAU$bmvAmthP7L7xwn0Y}#)))
+                      #{tmp -ANAU$bmvAmthP7L7xwnzi}#)
                     (syntax-violation
                       'let
                       "bad let"
-                      (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                      (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                         (begin
-                          (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWH4F}#)
-                                #{s _hoQGWMnyQPAh3k2jhWH4I}#
+                          (if (if (pair? #{e -ANAU$bmvAmthP7L7xwnyk}#)
+                                #{s -ANAU$bmvAmthP7L7xwnyn}#
                                 #f)
                             (set-source-properties!
-                              #{e _hoQGWMnyQPAh3k2jhWH4F}#
-                              #{s _hoQGWMnyQPAh3k2jhWH4I}#))
-                          #{e _hoQGWMnyQPAh3k2jhWH4F}#)
-                        #{w _hoQGWMnyQPAh3k2jhWH4H}#
-                        #{mod _hoQGWMnyQPAh3k2jhWH4J}#)))))))))
-      (#{global-extend _hoQGWMnyQPAh3k2jhWHS@}#
+                              #{e -ANAU$bmvAmthP7L7xwnyk}#
+                              #{s -ANAU$bmvAmthP7L7xwnyn}#))
+                          #{e -ANAU$bmvAmthP7L7xwnyk}#)
+                        #{w -ANAU$bmvAmthP7L7xwnym}#
+                        #{mod -ANAU$bmvAmthP7L7xwnyo}#)))))))))
+      (#{global-extend -ANAU$bmvAmthP7L7xwnNe}#
         'core
         'letrec
-        (lambda (#{e _hoQGWMnyQPAh3k2jhWICR}#
-                 #{r _hoQGWMnyQPAh3k2jhWICS}#
-                 #{w _hoQGWMnyQPAh3k2jhWICT}#
-                 #{s _hoQGWMnyQPAh3k2jhWICU}#
-                 #{mod _hoQGWMnyQPAh3k2jhWICV}#)
-          (let ((#{tmp _hoQGWMnyQPAh3k2jhWICX}#
+        (lambda (#{e -ANAU$bmvAmthP7L7xwn8w}#
+                 #{r -ANAU$bmvAmthP7L7xwn8x}#
+                 #{w -ANAU$bmvAmthP7L7xwn8y}#
+                 #{s -ANAU$bmvAmthP7L7xwn8z}#
+                 #{mod -ANAU$bmvAmthP7L7xwn80}#)
+          (let ((#{tmp -ANAU$bmvAmthP7L7xwn82}#
                   ($sc-dispatch
-                    #{e _hoQGWMnyQPAh3k2jhWICR}#
+                    #{e -ANAU$bmvAmthP7L7xwn8w}#
                     '(_ #(each (any any)) any . each-any))))
-            (if (if #{tmp _hoQGWMnyQPAh3k2jhWICX}#
+            (if (if #{tmp -ANAU$bmvAmthP7L7xwn82}#
                   (@apply
-                    (lambda (#{id _hoQGWMnyQPAh3k2jhWICb}#
-                             #{val _hoQGWMnyQPAh3k2jhWICc}#
-                             #{e1 _hoQGWMnyQPAh3k2jhWICd}#
-                             #{e2 _hoQGWMnyQPAh3k2jhWICe}#)
+                    (lambda (#{id -ANAU$bmvAmthP7L7xwn86}#
+                             #{val -ANAU$bmvAmthP7L7xwn87}#
+                             #{e1 -ANAU$bmvAmthP7L7xwn88}#
+                             #{e2 -ANAU$bmvAmthP7L7xwn89}#)
                       (and-map
-                        #{id? _hoQGWMnyQPAh3k2jhWHTB}#
-                        #{id _hoQGWMnyQPAh3k2jhWICb}#))
-                    #{tmp _hoQGWMnyQPAh3k2jhWICX}#)
+                        #{id? -ANAU$bmvAmthP7L7xwnNg}#
+                        #{id -ANAU$bmvAmthP7L7xwn86}#))
+                    #{tmp -ANAU$bmvAmthP7L7xwn82}#)
                   #f)
               (@apply
-                (lambda (#{id _hoQGWMnyQPAh3k2jhWICu}#
-                         #{val _hoQGWMnyQPAh3k2jhWICv}#
-                         #{e1 _hoQGWMnyQPAh3k2jhWICw}#
-                         #{e2 _hoQGWMnyQPAh3k2jhWICx}#)
-                  (if (not (#{valid-bound-ids? _hoQGWMnyQPAh3k2jhWHTb}#
-                             #{id _hoQGWMnyQPAh3k2jhWICu}#))
+                (lambda (#{id -ANAU$bmvAmthP7L7xwn9N}#
+                         #{val -ANAU$bmvAmthP7L7xwn9O}#
+                         #{e1 -ANAU$bmvAmthP7L7xwn9P}#
+                         #{e2 -ANAU$bmvAmthP7L7xwn9Q}#)
+                  (if (not (#{valid-bound-ids? -ANAU$bmvAmthP7L7xwnN6}#
+                             #{id -ANAU$bmvAmthP7L7xwn9N}#))
                     (syntax-violation
                       'letrec
                       "duplicate bound variable"
-                      #{e _hoQGWMnyQPAh3k2jhWICR}#)
-                    (let ((#{labels _hoQGWMnyQPAh3k2jhWIEL}#
-                            (#{gen-labels _hoQGWMnyQPAh3k2jhWHTE}#
-                              #{id _hoQGWMnyQPAh3k2jhWICu}#))
-                          (#{new-vars _hoQGWMnyQPAh3k2jhWIEM}#
-                            (map #{gen-var _hoQGWMnyQPAh3k2jhWHTz}#
-                                 #{id _hoQGWMnyQPAh3k2jhWICu}#)))
-                      (let ((#{w _hoQGWMnyQPAh3k2jhWIEN}#
-                              (#{make-binding-wrap _hoQGWMnyQPAh3k2jhWHTP}#
-                                #{id _hoQGWMnyQPAh3k2jhWICu}#
-                                #{labels _hoQGWMnyQPAh3k2jhWIEL}#
-                                #{w _hoQGWMnyQPAh3k2jhWICT}#))
-                            (#{r _hoQGWMnyQPAh3k2jhWIEO}#
-                              (#{extend-var-env _hoQGWMnyQPAh3k2jhWHS8}#
-                                #{labels _hoQGWMnyQPAh3k2jhWIEL}#
-                                #{new-vars _hoQGWMnyQPAh3k2jhWIEM}#
-                                #{r _hoQGWMnyQPAh3k2jhWICS}#)))
-                        (#{build-letrec _hoQGWMnyQPAh3k2jhWHSx}#
-                          #{s _hoQGWMnyQPAh3k2jhWICU}#
+                      #{e -ANAU$bmvAmthP7L7xwn8w}#)
+                    (let ((#{labels -ANAU$bmvAmthP7L7xwn$q}#
+                            (#{gen-labels -ANAU$bmvAmthP7L7xwnNj}#
+                              #{id -ANAU$bmvAmthP7L7xwn9N}#))
+                          (#{new-vars -ANAU$bmvAmthP7L7xwn$r}#
+                            (map #{gen-var -ANAU$bmvAmthP7L7xwnOS}#
+                                 #{id -ANAU$bmvAmthP7L7xwn9N}#)))
+                      (let ((#{w -ANAU$bmvAmthP7L7xwn$s}#
+                              (#{make-binding-wrap -ANAU$bmvAmthP7L7xwnNu}#
+                                #{id -ANAU$bmvAmthP7L7xwn9N}#
+                                #{labels -ANAU$bmvAmthP7L7xwn$q}#
+                                #{w -ANAU$bmvAmthP7L7xwn8y}#))
+                            (#{r -ANAU$bmvAmthP7L7xwn$t}#
+                              (#{extend-var-env -ANAU$bmvAmthP7L7xwnNb}#
+                                #{labels -ANAU$bmvAmthP7L7xwn$q}#
+                                #{new-vars -ANAU$bmvAmthP7L7xwn$r}#
+                                #{r -ANAU$bmvAmthP7L7xwn8x}#)))
+                        (#{build-letrec -ANAU$bmvAmthP7L7xwnNQ}#
+                          #{s -ANAU$bmvAmthP7L7xwn8z}#
                           #f
-                          (map syntax->datum #{id _hoQGWMnyQPAh3k2jhWICu}#)
-                          #{new-vars _hoQGWMnyQPAh3k2jhWIEM}#
-                          (map (lambda (#{x _hoQGWMnyQPAh3k2jhWIFf}#)
-                                 (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                   #{x _hoQGWMnyQPAh3k2jhWIFf}#
-                                   #{r _hoQGWMnyQPAh3k2jhWIEO}#
-                                   #{w _hoQGWMnyQPAh3k2jhWIEN}#
-                                   #{mod _hoQGWMnyQPAh3k2jhWICV}#))
-                               #{val _hoQGWMnyQPAh3k2jhWICv}#)
-                          (#{expand-body _hoQGWMnyQPAh3k2jhWHTp}#
-                            (cons #{e1 _hoQGWMnyQPAh3k2jhWICw}#
-                                  #{e2 _hoQGWMnyQPAh3k2jhWICx}#)
-                            (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                          (map syntax->datum #{id -ANAU$bmvAmthP7L7xwn9N}#)
+                          #{new-vars -ANAU$bmvAmthP7L7xwn$r}#
+                          (map (lambda (#{x -ANAU$bmvAmthP7L7xwn@$}#)
+                                 (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                   #{x -ANAU$bmvAmthP7L7xwn@$}#
+                                   #{r -ANAU$bmvAmthP7L7xwn$t}#
+                                   #{w -ANAU$bmvAmthP7L7xwn$s}#
+                                   #{mod -ANAU$bmvAmthP7L7xwn80}#))
+                               #{val -ANAU$bmvAmthP7L7xwn9O}#)
+                          (#{expand-body -ANAU$bmvAmthP7L7xwnOI}#
+                            (cons #{e1 -ANAU$bmvAmthP7L7xwn9P}#
+                                  #{e2 -ANAU$bmvAmthP7L7xwn9Q}#)
+                            (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                               (begin
-                                (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWICR}#)
-                                      #{s _hoQGWMnyQPAh3k2jhWICU}#
+                                (if (if (pair? #{e -ANAU$bmvAmthP7L7xwn8w}#)
+                                      #{s -ANAU$bmvAmthP7L7xwn8z}#
                                       #f)
                                   (set-source-properties!
-                                    #{e _hoQGWMnyQPAh3k2jhWICR}#
-                                    #{s _hoQGWMnyQPAh3k2jhWICU}#))
-                                #{e _hoQGWMnyQPAh3k2jhWICR}#)
-                              #{w _hoQGWMnyQPAh3k2jhWIEN}#
-                              #{mod _hoQGWMnyQPAh3k2jhWICV}#)
-                            #{r _hoQGWMnyQPAh3k2jhWIEO}#
-                            #{w _hoQGWMnyQPAh3k2jhWIEN}#
-                            #{mod _hoQGWMnyQPAh3k2jhWICV}#))))))
-                #{tmp _hoQGWMnyQPAh3k2jhWICX}#)
+                                    #{e -ANAU$bmvAmthP7L7xwn8w}#
+                                    #{s -ANAU$bmvAmthP7L7xwn8z}#))
+                                #{e -ANAU$bmvAmthP7L7xwn8w}#)
+                              #{w -ANAU$bmvAmthP7L7xwn$s}#
+                              #{mod -ANAU$bmvAmthP7L7xwn80}#)
+                            #{r -ANAU$bmvAmthP7L7xwn$t}#
+                            #{w -ANAU$bmvAmthP7L7xwn$s}#
+                            #{mod -ANAU$bmvAmthP7L7xwn80}#))))))
+                #{tmp -ANAU$bmvAmthP7L7xwn82}#)
               (syntax-violation
                 'letrec
                 "bad letrec"
-                (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                   (begin
-                    (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWICR}#)
-                          #{s _hoQGWMnyQPAh3k2jhWICU}#
+                    (if (if (pair? #{e -ANAU$bmvAmthP7L7xwn8w}#)
+                          #{s -ANAU$bmvAmthP7L7xwn8z}#
                           #f)
                       (set-source-properties!
-                        #{e _hoQGWMnyQPAh3k2jhWICR}#
-                        #{s _hoQGWMnyQPAh3k2jhWICU}#))
-                    #{e _hoQGWMnyQPAh3k2jhWICR}#)
-                  #{w _hoQGWMnyQPAh3k2jhWICT}#
-                  #{mod _hoQGWMnyQPAh3k2jhWICV}#))))))
-      (#{global-extend _hoQGWMnyQPAh3k2jhWHS@}#
+                        #{e -ANAU$bmvAmthP7L7xwn8w}#
+                        #{s -ANAU$bmvAmthP7L7xwn8z}#))
+                    #{e -ANAU$bmvAmthP7L7xwn8w}#)
+                  #{w -ANAU$bmvAmthP7L7xwn8y}#
+                  #{mod -ANAU$bmvAmthP7L7xwn80}#))))))
+      (#{global-extend -ANAU$bmvAmthP7L7xwnNe}#
         'core
         'letrec*
-        (lambda (#{e _hoQGWMnyQPAh3k2jhWILi}#
-                 #{r _hoQGWMnyQPAh3k2jhWILj}#
-                 #{w _hoQGWMnyQPAh3k2jhWILk}#
-                 #{s _hoQGWMnyQPAh3k2jhWILl}#
-                 #{mod _hoQGWMnyQPAh3k2jhWILm}#)
-          (let ((#{tmp _hoQGWMnyQPAh3k2jhWILo}#
+        (lambda (#{e -ANAU$bmvAmthP7L7xwoGB}#
+                 #{r -ANAU$bmvAmthP7L7xwoGC}#
+                 #{w -ANAU$bmvAmthP7L7xwoGD}#
+                 #{s -ANAU$bmvAmthP7L7xwoGE}#
+                 #{mod -ANAU$bmvAmthP7L7xwoGF}#)
+          (let ((#{tmp -ANAU$bmvAmthP7L7xwoGH}#
                   ($sc-dispatch
-                    #{e _hoQGWMnyQPAh3k2jhWILi}#
+                    #{e -ANAU$bmvAmthP7L7xwoGB}#
                     '(_ #(each (any any)) any . each-any))))
-            (if (if #{tmp _hoQGWMnyQPAh3k2jhWILo}#
+            (if (if #{tmp -ANAU$bmvAmthP7L7xwoGH}#
                   (@apply
-                    (lambda (#{id _hoQGWMnyQPAh3k2jhWILs}#
-                             #{val _hoQGWMnyQPAh3k2jhWILt}#
-                             #{e1 _hoQGWMnyQPAh3k2jhWILu}#
-                             #{e2 _hoQGWMnyQPAh3k2jhWILv}#)
+                    (lambda (#{id -ANAU$bmvAmthP7L7xwoGL}#
+                             #{val -ANAU$bmvAmthP7L7xwoGM}#
+                             #{e1 -ANAU$bmvAmthP7L7xwoGN}#
+                             #{e2 -ANAU$bmvAmthP7L7xwoGO}#)
                       (and-map
-                        #{id? _hoQGWMnyQPAh3k2jhWHTB}#
-                        #{id _hoQGWMnyQPAh3k2jhWILs}#))
-                    #{tmp _hoQGWMnyQPAh3k2jhWILo}#)
+                        #{id? -ANAU$bmvAmthP7L7xwnNg}#
+                        #{id -ANAU$bmvAmthP7L7xwoGL}#))
+                    #{tmp -ANAU$bmvAmthP7L7xwoGH}#)
                   #f)
               (@apply
-                (lambda (#{id _hoQGWMnyQPAh3k2jhWIL@}#
-                         #{val _hoQGWMnyQPAh3k2jhWIMA}#
-                         #{e1 _hoQGWMnyQPAh3k2jhWIMB}#
-                         #{e2 _hoQGWMnyQPAh3k2jhWIMC}#)
-                  (if (not (#{valid-bound-ids? _hoQGWMnyQPAh3k2jhWHTb}#
-                             #{id _hoQGWMnyQPAh3k2jhWIL@}#))
+                (lambda (#{id -ANAU$bmvAmthP7L7xwoGe}#
+                         #{val -ANAU$bmvAmthP7L7xwoGf}#
+                         #{e1 -ANAU$bmvAmthP7L7xwoGg}#
+                         #{e2 -ANAU$bmvAmthP7L7xwoGh}#)
+                  (if (not (#{valid-bound-ids? -ANAU$bmvAmthP7L7xwnN6}#
+                             #{id -ANAU$bmvAmthP7L7xwoGe}#))
                     (syntax-violation
                       'letrec*
                       "duplicate bound variable"
-                      #{e _hoQGWMnyQPAh3k2jhWILi}#)
-                    (let ((#{labels _hoQGWMnyQPAh3k2jhWINc}#
-                            (#{gen-labels _hoQGWMnyQPAh3k2jhWHTE}#
-                              #{id _hoQGWMnyQPAh3k2jhWIL@}#))
-                          (#{new-vars _hoQGWMnyQPAh3k2jhWINd}#
-                            (map #{gen-var _hoQGWMnyQPAh3k2jhWHTz}#
-                                 #{id _hoQGWMnyQPAh3k2jhWIL@}#)))
-                      (let ((#{w _hoQGWMnyQPAh3k2jhWINe}#
-                              (#{make-binding-wrap _hoQGWMnyQPAh3k2jhWHTP}#
-                                #{id _hoQGWMnyQPAh3k2jhWIL@}#
-                                #{labels _hoQGWMnyQPAh3k2jhWINc}#
-                                #{w _hoQGWMnyQPAh3k2jhWILk}#))
-                            (#{r _hoQGWMnyQPAh3k2jhWINf}#
-                              (#{extend-var-env _hoQGWMnyQPAh3k2jhWHS8}#
-                                #{labels _hoQGWMnyQPAh3k2jhWINc}#
-                                #{new-vars _hoQGWMnyQPAh3k2jhWINd}#
-                                #{r _hoQGWMnyQPAh3k2jhWILj}#)))
-                        (#{build-letrec _hoQGWMnyQPAh3k2jhWHSx}#
-                          #{s _hoQGWMnyQPAh3k2jhWILl}#
+                      #{e -ANAU$bmvAmthP7L7xwoGB}#)
+                    (let ((#{labels -ANAU$bmvAmthP7L7xwoH7}#
+                            (#{gen-labels -ANAU$bmvAmthP7L7xwnNj}#
+                              #{id -ANAU$bmvAmthP7L7xwoGe}#))
+                          (#{new-vars -ANAU$bmvAmthP7L7xwoH8}#
+                            (map #{gen-var -ANAU$bmvAmthP7L7xwnOS}#
+                                 #{id -ANAU$bmvAmthP7L7xwoGe}#)))
+                      (let ((#{w -ANAU$bmvAmthP7L7xwoH9}#
+                              (#{make-binding-wrap -ANAU$bmvAmthP7L7xwnNu}#
+                                #{id -ANAU$bmvAmthP7L7xwoGe}#
+                                #{labels -ANAU$bmvAmthP7L7xwoH7}#
+                                #{w -ANAU$bmvAmthP7L7xwoGD}#))
+                            (#{r -ANAU$bmvAmthP7L7xwoH$}#
+                              (#{extend-var-env -ANAU$bmvAmthP7L7xwnNb}#
+                                #{labels -ANAU$bmvAmthP7L7xwoH7}#
+                                #{new-vars -ANAU$bmvAmthP7L7xwoH8}#
+                                #{r -ANAU$bmvAmthP7L7xwoGC}#)))
+                        (#{build-letrec -ANAU$bmvAmthP7L7xwnNQ}#
+                          #{s -ANAU$bmvAmthP7L7xwoGE}#
                           #t
-                          (map syntax->datum #{id _hoQGWMnyQPAh3k2jhWIL@}#)
-                          #{new-vars _hoQGWMnyQPAh3k2jhWINd}#
-                          (map (lambda (#{x _hoQGWMnyQPAh3k2jhWIOw}#)
-                                 (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                   #{x _hoQGWMnyQPAh3k2jhWIOw}#
-                                   #{r _hoQGWMnyQPAh3k2jhWINf}#
-                                   #{w _hoQGWMnyQPAh3k2jhWINe}#
-                                   #{mod _hoQGWMnyQPAh3k2jhWILm}#))
-                               #{val _hoQGWMnyQPAh3k2jhWIMA}#)
-                          (#{expand-body _hoQGWMnyQPAh3k2jhWHTp}#
-                            (cons #{e1 _hoQGWMnyQPAh3k2jhWIMB}#
-                                  #{e2 _hoQGWMnyQPAh3k2jhWIMC}#)
-                            (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                          (map syntax->datum #{id -ANAU$bmvAmthP7L7xwoGe}#)
+                          #{new-vars -ANAU$bmvAmthP7L7xwoH8}#
+                          (map (lambda (#{x -ANAU$bmvAmthP7L7xwoJP}#)
+                                 (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                   #{x -ANAU$bmvAmthP7L7xwoJP}#
+                                   #{r -ANAU$bmvAmthP7L7xwoH$}#
+                                   #{w -ANAU$bmvAmthP7L7xwoH9}#
+                                   #{mod -ANAU$bmvAmthP7L7xwoGF}#))
+                               #{val -ANAU$bmvAmthP7L7xwoGf}#)
+                          (#{expand-body -ANAU$bmvAmthP7L7xwnOI}#
+                            (cons #{e1 -ANAU$bmvAmthP7L7xwoGg}#
+                                  #{e2 -ANAU$bmvAmthP7L7xwoGh}#)
+                            (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                               (begin
-                                (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWILi}#)
-                                      #{s _hoQGWMnyQPAh3k2jhWILl}#
+                                (if (if (pair? #{e -ANAU$bmvAmthP7L7xwoGB}#)
+                                      #{s -ANAU$bmvAmthP7L7xwoGE}#
                                       #f)
                                   (set-source-properties!
-                                    #{e _hoQGWMnyQPAh3k2jhWILi}#
-                                    #{s _hoQGWMnyQPAh3k2jhWILl}#))
-                                #{e _hoQGWMnyQPAh3k2jhWILi}#)
-                              #{w _hoQGWMnyQPAh3k2jhWINe}#
-                              #{mod _hoQGWMnyQPAh3k2jhWILm}#)
-                            #{r _hoQGWMnyQPAh3k2jhWINf}#
-                            #{w _hoQGWMnyQPAh3k2jhWINe}#
-                            #{mod _hoQGWMnyQPAh3k2jhWILm}#))))))
-                #{tmp _hoQGWMnyQPAh3k2jhWILo}#)
+                                    #{e -ANAU$bmvAmthP7L7xwoGB}#
+                                    #{s -ANAU$bmvAmthP7L7xwoGE}#))
+                                #{e -ANAU$bmvAmthP7L7xwoGB}#)
+                              #{w -ANAU$bmvAmthP7L7xwoH9}#
+                              #{mod -ANAU$bmvAmthP7L7xwoGF}#)
+                            #{r -ANAU$bmvAmthP7L7xwoH$}#
+                            #{w -ANAU$bmvAmthP7L7xwoH9}#
+                            #{mod -ANAU$bmvAmthP7L7xwoGF}#))))))
+                #{tmp -ANAU$bmvAmthP7L7xwoGH}#)
               (syntax-violation
                 'letrec*
                 "bad letrec*"
-                (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                   (begin
-                    (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWILi}#)
-                          #{s _hoQGWMnyQPAh3k2jhWILl}#
+                    (if (if (pair? #{e -ANAU$bmvAmthP7L7xwoGB}#)
+                          #{s -ANAU$bmvAmthP7L7xwoGE}#
                           #f)
                       (set-source-properties!
-                        #{e _hoQGWMnyQPAh3k2jhWILi}#
-                        #{s _hoQGWMnyQPAh3k2jhWILl}#))
-                    #{e _hoQGWMnyQPAh3k2jhWILi}#)
-                  #{w _hoQGWMnyQPAh3k2jhWILk}#
-                  #{mod _hoQGWMnyQPAh3k2jhWILm}#))))))
-      (#{global-extend _hoQGWMnyQPAh3k2jhWHS@}#
+                        #{e -ANAU$bmvAmthP7L7xwoGB}#
+                        #{s -ANAU$bmvAmthP7L7xwoGE}#))
+                    #{e -ANAU$bmvAmthP7L7xwoGB}#)
+                  #{w -ANAU$bmvAmthP7L7xwoGD}#
+                  #{mod -ANAU$bmvAmthP7L7xwoGF}#))))))
+      (#{global-extend -ANAU$bmvAmthP7L7xwnNe}#
         'core
         'set!
-        (lambda (#{e _hoQGWMnyQPAh3k2jhWIVa}#
-                 #{r _hoQGWMnyQPAh3k2jhWIVb}#
-                 #{w _hoQGWMnyQPAh3k2jhWIVc}#
-                 #{s _hoQGWMnyQPAh3k2jhWIVd}#
-                 #{mod _hoQGWMnyQPAh3k2jhWIVe}#)
-          (let ((#{tmp _hoQGWMnyQPAh3k2jhWIVg}#
+        (lambda (#{e -ANAU$bmvAmthP7L7xwoP5}#
+                 #{r -ANAU$bmvAmthP7L7xwoP6}#
+                 #{w -ANAU$bmvAmthP7L7xwoP7}#
+                 #{s -ANAU$bmvAmthP7L7xwoP8}#
+                 #{mod -ANAU$bmvAmthP7L7xwoP9}#)
+          (let ((#{tmp -ANAU$bmvAmthP7L7xwoP@}#
                   ($sc-dispatch
-                    #{e _hoQGWMnyQPAh3k2jhWIVa}#
+                    #{e -ANAU$bmvAmthP7L7xwoP5}#
                     '(_ any any))))
-            (if (if #{tmp _hoQGWMnyQPAh3k2jhWIVg}#
+            (if (if #{tmp -ANAU$bmvAmthP7L7xwoP@}#
                   (@apply
-                    (lambda (#{id _hoQGWMnyQPAh3k2jhWIVk}#
-                             #{val _hoQGWMnyQPAh3k2jhWIVl}#)
-                      (if (symbol? #{id _hoQGWMnyQPAh3k2jhWIVk}#)
+                    (lambda (#{id -ANAU$bmvAmthP7L7xwoQD}#
+                             #{val -ANAU$bmvAmthP7L7xwoQE}#)
+                      (if (symbol? #{id -ANAU$bmvAmthP7L7xwoQD}#)
                         #t
-                        (if (if (vector? #{id _hoQGWMnyQPAh3k2jhWIVk}#)
+                        (if (if (vector? #{id -ANAU$bmvAmthP7L7xwoQD}#)
                               (if (= (vector-length
-                                       #{id _hoQGWMnyQPAh3k2jhWIVk}#)
+                                       #{id -ANAU$bmvAmthP7L7xwoQD}#)
                                      4)
                                 (eq? (vector-ref
-                                       #{id _hoQGWMnyQPAh3k2jhWIVk}#
+                                       #{id -ANAU$bmvAmthP7L7xwoQD}#
                                        0)
                                      'syntax-object)
                                 #f)
                               #f)
                           (symbol?
-                            (vector-ref #{id _hoQGWMnyQPAh3k2jhWIVk}# 1))
+                            (vector-ref #{id -ANAU$bmvAmthP7L7xwoQD}# 1))
                           #f)))
-                    #{tmp _hoQGWMnyQPAh3k2jhWIVg}#)
+                    #{tmp -ANAU$bmvAmthP7L7xwoP@}#)
                   #f)
               (@apply
-                (lambda (#{id _hoQGWMnyQPAh3k2jhWIWA}#
-                         #{val _hoQGWMnyQPAh3k2jhWIWB}#)
-                  (let ((#{n _hoQGWMnyQPAh3k2jhWIWC}#
-                          (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                            #{id _hoQGWMnyQPAh3k2jhWIWA}#
-                            #{w _hoQGWMnyQPAh3k2jhWIVc}#))
-                        (#{id-mod _hoQGWMnyQPAh3k2jhWIWD}#
-                          (if (if (vector? #{id _hoQGWMnyQPAh3k2jhWIWA}#)
+                (lambda (#{id -ANAU$bmvAmthP7L7xwoQf}#
+                         #{val -ANAU$bmvAmthP7L7xwoQg}#)
+                  (let ((#{n -ANAU$bmvAmthP7L7xwoQh}#
+                          (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                            #{id -ANAU$bmvAmthP7L7xwoQf}#
+                            #{w -ANAU$bmvAmthP7L7xwoP7}#))
+                        (#{id-mod -ANAU$bmvAmthP7L7xwoQi}#
+                          (if (if (vector? #{id -ANAU$bmvAmthP7L7xwoQf}#)
                                 (if (= (vector-length
-                                         #{id _hoQGWMnyQPAh3k2jhWIWA}#)
+                                         #{id -ANAU$bmvAmthP7L7xwoQf}#)
                                        4)
                                   (eq? (vector-ref
-                                         #{id _hoQGWMnyQPAh3k2jhWIWA}#
+                                         #{id -ANAU$bmvAmthP7L7xwoQf}#
                                          0)
                                        'syntax-object)
                                   #f)
                                 #f)
-                            (vector-ref #{id _hoQGWMnyQPAh3k2jhWIWA}# 3)
-                            #{mod _hoQGWMnyQPAh3k2jhWIVe}#)))
-                    (let ((#{b _hoQGWMnyQPAh3k2jhWIWE}#
-                            (let ((#{t _hoQGWMnyQPAh3k2jhWIWt}#
-                                    (assq #{n _hoQGWMnyQPAh3k2jhWIWC}#
-                                          #{r _hoQGWMnyQPAh3k2jhWIVb}#)))
-                              (if #{t _hoQGWMnyQPAh3k2jhWIWt}#
-                                (cdr #{t _hoQGWMnyQPAh3k2jhWIWt}#)
-                                (if (symbol? #{n _hoQGWMnyQPAh3k2jhWIWC}#)
-                                  (let ((#{t _hoQGWMnyQPAh3k2jhWIWy}#
-                                          (#{get-global-definition-hook _hoQGWMnyQPAh3k2jhWHSc}#
-                                            #{n _hoQGWMnyQPAh3k2jhWIWC}#
-                                            #{id-mod _hoQGWMnyQPAh3k2jhWIWD}#)))
-                                    (if #{t _hoQGWMnyQPAh3k2jhWIWy}#
-                                      #{t _hoQGWMnyQPAh3k2jhWIWy}#
+                            (vector-ref #{id -ANAU$bmvAmthP7L7xwoQf}# 3)
+                            #{mod -ANAU$bmvAmthP7L7xwoP9}#)))
+                    (let ((#{b -ANAU$bmvAmthP7L7xwoQj}#
+                            (let ((#{t -ANAU$bmvAmthP7L7xwoRM}#
+                                    (assq #{n -ANAU$bmvAmthP7L7xwoQh}#
+                                          #{r -ANAU$bmvAmthP7L7xwoP6}#)))
+                              (if #{t -ANAU$bmvAmthP7L7xwoRM}#
+                                (cdr #{t -ANAU$bmvAmthP7L7xwoRM}#)
+                                (if (symbol? #{n -ANAU$bmvAmthP7L7xwoQh}#)
+                                  (let ((#{t -ANAU$bmvAmthP7L7xwoRR}#
+                                          (#{get-global-definition-hook -ANAU$bmvAmthP7L7xwnM7}#
+                                            #{n -ANAU$bmvAmthP7L7xwoQh}#
+                                            #{id-mod -ANAU$bmvAmthP7L7xwoQi}#)))
+                                    (if #{t -ANAU$bmvAmthP7L7xwoRR}#
+                                      #{t -ANAU$bmvAmthP7L7xwoRR}#
                                       '(global)))
                                   '(displaced-lexical))))))
-                      (let ((#{atom-key _hoQGWMnyQPAh3k2jhWIWF}#
-                              (car #{b _hoQGWMnyQPAh3k2jhWIWE}#)))
-                        (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWIWF}#
+                      (let ((#{atom-key -ANAU$bmvAmthP7L7xwoQk}#
+                              (car #{b -ANAU$bmvAmthP7L7xwoQj}#)))
+                        (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwoQk}#
                                   'lexical)
-                          (#{build-lexical-assignment _hoQGWMnyQPAh3k2jhWHSk}#
-                            #{s _hoQGWMnyQPAh3k2jhWIVd}#
-                            (syntax->datum #{id _hoQGWMnyQPAh3k2jhWIWA}#)
-                            (cdr #{b _hoQGWMnyQPAh3k2jhWIWE}#)
-                            (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                              #{val _hoQGWMnyQPAh3k2jhWIWB}#
-                              #{r _hoQGWMnyQPAh3k2jhWIVb}#
-                              #{w _hoQGWMnyQPAh3k2jhWIVc}#
-                              #{mod _hoQGWMnyQPAh3k2jhWIVe}#))
-                          (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWIWF}#
+                          (#{build-lexical-assignment -ANAU$bmvAmthP7L7xwnND}#
+                            #{s -ANAU$bmvAmthP7L7xwoP8}#
+                            (syntax->datum #{id -ANAU$bmvAmthP7L7xwoQf}#)
+                            (cdr #{b -ANAU$bmvAmthP7L7xwoQj}#)
+                            (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                              #{val -ANAU$bmvAmthP7L7xwoQg}#
+                              #{r -ANAU$bmvAmthP7L7xwoP6}#
+                              #{w -ANAU$bmvAmthP7L7xwoP7}#
+                              #{mod -ANAU$bmvAmthP7L7xwoP9}#))
+                          (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwoQk}#
                                     'global)
-                            (#{build-global-assignment _hoQGWMnyQPAh3k2jhWHSn}#
-                              #{s _hoQGWMnyQPAh3k2jhWIVd}#
-                              #{n _hoQGWMnyQPAh3k2jhWIWC}#
-                              (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                #{val _hoQGWMnyQPAh3k2jhWIWB}#
-                                #{r _hoQGWMnyQPAh3k2jhWIVb}#
-                                #{w _hoQGWMnyQPAh3k2jhWIVc}#
-                                #{mod _hoQGWMnyQPAh3k2jhWIVe}#)
-                              #{id-mod _hoQGWMnyQPAh3k2jhWIWD}#)
-                            (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWIWF}#
+                            (#{build-global-assignment -ANAU$bmvAmthP7L7xwnNG}#
+                              #{s -ANAU$bmvAmthP7L7xwoP8}#
+                              #{n -ANAU$bmvAmthP7L7xwoQh}#
+                              (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                #{val -ANAU$bmvAmthP7L7xwoQg}#
+                                #{r -ANAU$bmvAmthP7L7xwoP6}#
+                                #{w -ANAU$bmvAmthP7L7xwoP7}#
+                                #{mod -ANAU$bmvAmthP7L7xwoP9}#)
+                              #{id-mod -ANAU$bmvAmthP7L7xwoQi}#)
+                            (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwoQk}#
                                       'macro)
-                              (let ((#{p _hoQGWMnyQPAh3k2jhWIbs}#
-                                      (cdr #{b _hoQGWMnyQPAh3k2jhWIWE}#)))
+                              (let ((#{p -ANAU$bmvAmthP7L7xwoWL}#
+                                      (cdr #{b -ANAU$bmvAmthP7L7xwoQj}#)))
                                 (if (procedure-property
-                                      #{p _hoQGWMnyQPAh3k2jhWIbs}#
+                                      #{p -ANAU$bmvAmthP7L7xwoWL}#
                                       'variable-transformer)
-                                  (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                    (#{expand-macro _hoQGWMnyQPAh3k2jhWHTo}#
-                                      #{p _hoQGWMnyQPAh3k2jhWIbs}#
-                                      #{e _hoQGWMnyQPAh3k2jhWIVa}#
-                                      #{r _hoQGWMnyQPAh3k2jhWIVb}#
-                                      #{w _hoQGWMnyQPAh3k2jhWIVc}#
-                                      #{s _hoQGWMnyQPAh3k2jhWIVd}#
+                                  (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                    (#{expand-macro -ANAU$bmvAmthP7L7xwnOH}#
+                                      #{p -ANAU$bmvAmthP7L7xwoWL}#
+                                      #{e -ANAU$bmvAmthP7L7xwoP5}#
+                                      #{r -ANAU$bmvAmthP7L7xwoP6}#
+                                      #{w -ANAU$bmvAmthP7L7xwoP7}#
+                                      #{s -ANAU$bmvAmthP7L7xwoP8}#
                                       #f
-                                      #{mod _hoQGWMnyQPAh3k2jhWIVe}#)
-                                    #{r _hoQGWMnyQPAh3k2jhWIVb}#
+                                      #{mod -ANAU$bmvAmthP7L7xwoP9}#)
+                                    #{r -ANAU$bmvAmthP7L7xwoP6}#
                                     '(())
-                                    #{mod _hoQGWMnyQPAh3k2jhWIVe}#)
+                                    #{mod -ANAU$bmvAmthP7L7xwoP9}#)
                                   (syntax-violation
                                     'set!
                                     "not a variable transformer"
-                                    (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                      #{e _hoQGWMnyQPAh3k2jhWIVa}#
-                                      #{w _hoQGWMnyQPAh3k2jhWIVc}#
-                                      #{mod _hoQGWMnyQPAh3k2jhWIVe}#)
-                                    (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                      #{id _hoQGWMnyQPAh3k2jhWIWA}#
-                                      #{w _hoQGWMnyQPAh3k2jhWIVc}#
-                                      #{id-mod _hoQGWMnyQPAh3k2jhWIWD}#))))
-                              (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWIWF}#
+                                    (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                      #{e -ANAU$bmvAmthP7L7xwoP5}#
+                                      #{w -ANAU$bmvAmthP7L7xwoP7}#
+                                      #{mod -ANAU$bmvAmthP7L7xwoP9}#)
+                                    (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                      #{id -ANAU$bmvAmthP7L7xwoQf}#
+                                      #{w -ANAU$bmvAmthP7L7xwoP7}#
+                                      #{id-mod -ANAU$bmvAmthP7L7xwoQi}#))))
+                              (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwoQk}#
                                         'displaced-lexical)
                                 (syntax-violation
                                   'set!
                                   "identifier out of context"
-                                  (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                    #{id _hoQGWMnyQPAh3k2jhWIWA}#
-                                    #{w _hoQGWMnyQPAh3k2jhWIVc}#
-                                    #{mod _hoQGWMnyQPAh3k2jhWIVe}#))
+                                  (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                    #{id -ANAU$bmvAmthP7L7xwoQf}#
+                                    #{w -ANAU$bmvAmthP7L7xwoP7}#
+                                    #{mod -ANAU$bmvAmthP7L7xwoP9}#))
                                 (syntax-violation
                                   'set!
                                   "bad set!"
-                                  (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                                  (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                                     (begin
-                                      (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWIVa}#)
-                                            #{s _hoQGWMnyQPAh3k2jhWIVd}#
+                                      (if (if (pair? #{e -ANAU$bmvAmthP7L7xwoP5}#)
+                                            #{s -ANAU$bmvAmthP7L7xwoP8}#
                                             #f)
                                         (set-source-properties!
-                                          #{e _hoQGWMnyQPAh3k2jhWIVa}#
-                                          #{s _hoQGWMnyQPAh3k2jhWIVd}#))
-                                      #{e _hoQGWMnyQPAh3k2jhWIVa}#)
-                                    #{w _hoQGWMnyQPAh3k2jhWIVc}#
-                                    #{mod _hoQGWMnyQPAh3k2jhWIVe}#))))))))))
-                #{tmp _hoQGWMnyQPAh3k2jhWIVg}#)
-              (let ((#{tmp _hoQGWMnyQPAh3k2jhWIdL}#
+                                          #{e -ANAU$bmvAmthP7L7xwoP5}#
+                                          #{s -ANAU$bmvAmthP7L7xwoP8}#))
+                                      #{e -ANAU$bmvAmthP7L7xwoP5}#)
+                                    #{w -ANAU$bmvAmthP7L7xwoP7}#
+                                    #{mod -ANAU$bmvAmthP7L7xwoP9}#))))))))))
+                #{tmp -ANAU$bmvAmthP7L7xwoP@}#)
+              (let ((#{tmp -ANAU$bmvAmthP7L7xwoXq}#
                       ($sc-dispatch
-                        #{e _hoQGWMnyQPAh3k2jhWIVa}#
+                        #{e -ANAU$bmvAmthP7L7xwoP5}#
                         '(_ (any . each-any) any))))
-                (if #{tmp _hoQGWMnyQPAh3k2jhWIdL}#
+                (if #{tmp -ANAU$bmvAmthP7L7xwoXq}#
                   (@apply
-                    (lambda (#{head _hoQGWMnyQPAh3k2jhWIdP}#
-                             #{tail _hoQGWMnyQPAh3k2jhWIdQ}#
-                             #{val _hoQGWMnyQPAh3k2jhWIdR}#)
+                    (lambda (#{head -ANAU$bmvAmthP7L7xwoXu}#
+                             #{tail -ANAU$bmvAmthP7L7xwoXv}#
+                             #{val -ANAU$bmvAmthP7L7xwoXw}#)
                       (call-with-values
                         (lambda ()
-                          (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-                            #{head _hoQGWMnyQPAh3k2jhWIdP}#
-                            #{r _hoQGWMnyQPAh3k2jhWIVb}#
+                          (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+                            #{head -ANAU$bmvAmthP7L7xwoXu}#
+                            #{r -ANAU$bmvAmthP7L7xwoP6}#
                             '(())
                             #f
                             #f
-                            #{mod _hoQGWMnyQPAh3k2jhWIVe}#
+                            #{mod -ANAU$bmvAmthP7L7xwoP9}#
                             #t))
-                        (lambda (#{type _hoQGWMnyQPAh3k2jhWIdU}#
-                                 #{value _hoQGWMnyQPAh3k2jhWIdV}#
-                                 #{ee _hoQGWMnyQPAh3k2jhWIdW}#
-                                 #{ww _hoQGWMnyQPAh3k2jhWIdX}#
-                                 #{ss _hoQGWMnyQPAh3k2jhWIdY}#
-                                 #{modmod _hoQGWMnyQPAh3k2jhWIdZ}#)
-                          (if (eqv? #{type _hoQGWMnyQPAh3k2jhWIdU}#
+                        (lambda (#{type -ANAU$bmvAmthP7L7xwoXz}#
+                                 #{value -ANAU$bmvAmthP7L7xwoX0}#
+                                 #{ee -ANAU$bmvAmthP7L7xwoX1}#
+                                 #{ww -ANAU$bmvAmthP7L7xwoX2}#
+                                 #{ss -ANAU$bmvAmthP7L7xwoX3}#
+                                 #{modmod -ANAU$bmvAmthP7L7xwoX4}#)
+                          (if (eqv? #{type -ANAU$bmvAmthP7L7xwoXz}#
                                     'module-ref)
-                            (let ((#{val _hoQGWMnyQPAh3k2jhWIdd}#
-                                    (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                      #{val _hoQGWMnyQPAh3k2jhWIdR}#
-                                      #{r _hoQGWMnyQPAh3k2jhWIVb}#
-                                      #{w _hoQGWMnyQPAh3k2jhWIVc}#
-                                      #{mod _hoQGWMnyQPAh3k2jhWIVe}#)))
+                            (let ((#{val -ANAU$bmvAmthP7L7xwoX8}#
+                                    (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                      #{val -ANAU$bmvAmthP7L7xwoXw}#
+                                      #{r -ANAU$bmvAmthP7L7xwoP6}#
+                                      #{w -ANAU$bmvAmthP7L7xwoP7}#
+                                      #{mod -ANAU$bmvAmthP7L7xwoP9}#)))
                               (call-with-values
                                 (lambda ()
-                                  (#{value _hoQGWMnyQPAh3k2jhWIdV}#
-                                    (cons #{head _hoQGWMnyQPAh3k2jhWIdP}#
-                                          #{tail _hoQGWMnyQPAh3k2jhWIdQ}#)
-                                    #{r _hoQGWMnyQPAh3k2jhWIVb}#
-                                    #{w _hoQGWMnyQPAh3k2jhWIVc}#))
-                                (lambda (#{e _hoQGWMnyQPAh3k2jhWIde}#
-                                         #{r _hoQGWMnyQPAh3k2jhWIdf}#
-                                         #{w _hoQGWMnyQPAh3k2jhWIdg}#
-                                         #{s* _hoQGWMnyQPAh3k2jhWIdh}#
-                                         #{mod _hoQGWMnyQPAh3k2jhWIdi}#)
-                                  (let ((#{tmp _hoQGWMnyQPAh3k2jhWIdk}#
-                                          (list #{e _hoQGWMnyQPAh3k2jhWIde}#)))
+                                  (#{value -ANAU$bmvAmthP7L7xwoX0}#
+                                    (cons #{head -ANAU$bmvAmthP7L7xwoXu}#
+                                          #{tail -ANAU$bmvAmthP7L7xwoXv}#)
+                                    #{r -ANAU$bmvAmthP7L7xwoP6}#
+                                    #{w -ANAU$bmvAmthP7L7xwoP7}#))
+                                (lambda (#{e -ANAU$bmvAmthP7L7xwoX9}#
+                                         #{r -ANAU$bmvAmthP7L7xwoX$}#
+                                         #{w -ANAU$bmvAmthP7L7xwoX@}#
+                                         #{s* -ANAU$bmvAmthP7L7xwoYA}#
+                                         #{mod -ANAU$bmvAmthP7L7xwoYB}#)
+                                  (let ((#{tmp -ANAU$bmvAmthP7L7xwoYD}#
+                                          (list #{e -ANAU$bmvAmthP7L7xwoX9}#)))
                                     (if (@apply
-                                          (lambda (#{e _hoQGWMnyQPAh3k2jhWIdm}#)
+                                          (lambda (#{e -ANAU$bmvAmthP7L7xwoYF}#)
                                             (if (symbol?
-                                                  #{e _hoQGWMnyQPAh3k2jhWIdm}#)
+                                                  #{e -ANAU$bmvAmthP7L7xwoYF}#)
                                               #t
                                               (if (if (vector?
-                                                        #{e _hoQGWMnyQPAh3k2jhWIdm}#)
+                                                        #{e -ANAU$bmvAmthP7L7xwoYF}#)
                                                     (if (= (vector-length
-                                                             #{e _hoQGWMnyQPAh3k2jhWIdm}#)
+                                                             #{e -ANAU$bmvAmthP7L7xwoYF}#)
                                                            4)
                                                       (eq? (vector-ref
-                                                             #{e _hoQGWMnyQPAh3k2jhWIdm}#
+                                                             #{e -ANAU$bmvAmthP7L7xwoYF}#
                                                              0)
                                                            'syntax-object)
                                                       #f)
                                                     #f)
                                                 (symbol?
                                                   (vector-ref
-                                                    #{e _hoQGWMnyQPAh3k2jhWIdm}#
+                                                    #{e -ANAU$bmvAmthP7L7xwoYF}#
                                                     1))
                                                 #f)))
-                                          #{tmp _hoQGWMnyQPAh3k2jhWIdk}#)
+                                          #{tmp -ANAU$bmvAmthP7L7xwoYD}#)
                                       (@apply
-                                        (lambda (#{e _hoQGWMnyQPAh3k2jhWIeE}#)
-                                          (#{build-global-assignment _hoQGWMnyQPAh3k2jhWHSn}#
-                                            #{s _hoQGWMnyQPAh3k2jhWIVd}#
+                                        (lambda (#{e -ANAU$bmvAmthP7L7xwoYj}#)
+                                          (#{build-global-assignment -ANAU$bmvAmthP7L7xwnNG}#
+                                            #{s -ANAU$bmvAmthP7L7xwoP8}#
                                             (syntax->datum
-                                              #{e _hoQGWMnyQPAh3k2jhWIeE}#)
-                                            #{val _hoQGWMnyQPAh3k2jhWIdd}#
-                                            #{mod _hoQGWMnyQPAh3k2jhWIdi}#))
-                                        #{tmp _hoQGWMnyQPAh3k2jhWIdk}#)
+                                              #{e -ANAU$bmvAmthP7L7xwoYj}#)
+                                            #{val -ANAU$bmvAmthP7L7xwoX8}#
+                                            #{mod -ANAU$bmvAmthP7L7xwoYB}#))
+                                        #{tmp -ANAU$bmvAmthP7L7xwoYD}#)
                                       (syntax-violation
                                         #f
                                         "source expression failed to match any pattern"
-                                        #{e _hoQGWMnyQPAh3k2jhWIde}#))))))
-                            (#{build-application _hoQGWMnyQPAh3k2jhWHSg}#
-                              #{s _hoQGWMnyQPAh3k2jhWIVd}#
-                              (let ((#{e _hoQGWMnyQPAh3k2jhWIhl}#
+                                        #{e -ANAU$bmvAmthP7L7xwoX9}#))))))
+                            (#{build-application -ANAU$bmvAmthP7L7xwnM@}#
+                              #{s -ANAU$bmvAmthP7L7xwoP8}#
+                              (let ((#{e -ANAU$bmvAmthP7L7xwocE}#
                                       (list '#(syntax-object
                                                setter
                                                ((top)
@@ -10505,16 +10483,16 @@
                                                     (top)
                                                     (top)
                                                     (top))
-                                                  #("2sa"
-                                                    "2sb"
-                                                    "2sc"
-                                                    "2sd"
-                                                    "2se"
-                                                    "2sf"))
+                                                  #("142"
+                                                    "143"
+                                                    "144"
+                                                    "145"
+                                                    "146"
+                                                    "147"))
                                                 #(ribcage
                                                   #(head tail val)
                                                   #((top) (top) (top))
-                                                  #("2s7" "2s8" "2s9"))
+                                                  #("13z" "140" "141"))
                                                 #(ribcage () () ())
                                                 #(ribcage
                                                   #(e r w s mod)
@@ -10523,11 +10501,11 @@
                                                     (top)
                                                     (top)
                                                     (top))
-                                                  #("2rt"
-                                                    "2ru"
-                                                    "2rv"
-                                                    "2rw"
-                                                    "2rx"))
+                                                  #("13l"
+                                                    "13m"
+                                                    "13n"
+                                                    "13o"
+                                                    "13p"))
                                                 #(ribcage
                                                   (lambda-var-list
                                                     gen-var
@@ -10809,268 +10787,268 @@
                                                    (top)
                                                    (top)
                                                    (top))
-                                                  ("1tt"
-                                                   "1ts"
-                                                   "1tr"
-                                                   "1tq"
-                                                   "1tp"
-                                                   "1to"
-                                                   "1tn"
-                                                   "1tm"
-                                                   "1tl"
-                                                   "1tk"
-                                                   "1tj"
-                                                   "1ti"
-                                                   "1th"
-                                                   "1tg"
-                                                   "1tf"
-                                                   "1te"
-                                                   "1td"
-                                                   "1tc"
-                                                   "1tb"
-                                                   "1ta"
-                                                   "1t9"
-                                                   "1t8"
-                                                   "1t7"
-                                                   "1t6"
-                                                   "1t5"
-                                                   "1t4"
-                                                   "1t3"
-                                                   "1t2"
-                                                   "1t1"
-                                                   "1t0"
-                                                   "1sz"
-                                                   "1sy"
-                                                   "1sx"
-                                                   "1sw"
-                                                   "1sv"
-                                                   "1su"
-                                                   "1st"
-                                                   "1ss"
-                                                   "1sr"
-                                                   "1sq"
-                                                   "1sp"
-                                                   "1so"
-                                                   "1sn"
-                                                   "1sm"
-                                                   "1sl"
-                                                   "1sk"
-                                                   "1sj"
-                                                   "1si"
-                                                   "1sh"
-                                                   "1sg"
-                                                   "1sf"
-                                                   "1se"
-                                                   "1sd"
-                                                   "1sc"
-                                                   "1sb"
-                                                   "1sa"
-                                                   "1s9"
-                                                   "1s8"
-                                                   "1s7"
-                                                   "1s6"
-                                                   "1s5"
-                                                   "1s4"
-                                                   "1s3"
-                                                   "1s2"
-                                                   "1s1"
-                                                   "1s0"
-                                                   "1rz"
-                                                   "1ry"
-                                                   "1rx"
-                                                   "1rw"
-                                                   "1rv"
-                                                   "1ru"
-                                                   "1rt"
-                                                   "1rs"
-                                                   "1rr"
-                                                   "1rq"
-                                                   "1rp"
-                                                   "1ro"
-                                                   "1rn"
-                                                   "1rm"
-                                                   "1rl"
-                                                   "1rk"
-                                                   "1rj"
-                                                   "1ri"
-                                                   "1rh"
-                                                   "1rg"
-                                                   "1rf"
-                                                   "1re"
-                                                   "1rd"
-                                                   "1rc"
-                                                   "1rb"
-                                                   "1ra"
-                                                   "1r9"
-                                                   "1r8"
-                                                   "1r7"
-                                                   "1r6"
-                                                   "1r5"
-                                                   "1r4"
-                                                   "1r3"
-                                                   "1r2"
-                                                   "1r1"
-                                                   "1r0"
-                                                   "1qz"
-                                                   "1qy"
-                                                   "1qx"
-                                                   "1qw"
-                                                   "1qv"
-                                                   "1qu"
-                                                   "1qt"
-                                                   "1qs"
-                                                   "1qr"
-                                                   "1qq"
-                                                   "1qp"
-                                                   "1qo"
-                                                   "1qn"
-                                                   "1qm"
-                                                   "1ql"
-                                                   "1qk"
-                                                   "1qj"
-                                                   "1qi"
-                                                   "1qh"
-                                                   "1qg"
-                                                   "1qf"
-                                                   "1qe"
-                                                   "1qd"
-                                                   "1qc"
-                                                   "1qb"
-                                                   "1qa"
-                                                   "1q9"
-                                                   "1q8"
-                                                   "1q7"
-                                                   "1q6"
-                                                   "1q5"
-                                                   "1q4"
-                                                   "1q3"
-                                                   "1q2"
-                                                   "1q1"
-                                                   "1q0"
-                                                   "1pz"
-                                                   "1py"))
+                                                  ("5l"
+                                                   "5k"
+                                                   "5j"
+                                                   "5i"
+                                                   "5h"
+                                                   "5g"
+                                                   "5f"
+                                                   "5e"
+                                                   "5d"
+                                                   "5c"
+                                                   "5b"
+                                                   "5a"
+                                                   "59"
+                                                   "58"
+                                                   "57"
+                                                   "56"
+                                                   "55"
+                                                   "54"
+                                                   "53"
+                                                   "52"
+                                                   "51"
+                                                   "50"
+                                                   "4z"
+                                                   "4y"
+                                                   "4x"
+                                                   "4w"
+                                                   "4v"
+                                                   "4u"
+                                                   "4t"
+                                                   "4s"
+                                                   "4r"
+                                                   "4q"
+                                                   "4p"
+                                                   "4o"
+                                                   "4n"
+                                                   "4m"
+                                                   "4l"
+                                                   "4k"
+                                                   "4j"
+                                                   "4i"
+                                                   "4h"
+                                                   "4g"
+                                                   "4f"
+                                                   "4e"
+                                                   "4d"
+                                                   "4c"
+                                                   "4b"
+                                                   "4a"
+                                                   "49"
+                                                   "48"
+                                                   "47"
+                                                   "46"
+                                                   "45"
+                                                   "44"
+                                                   "43"
+                                                   "42"
+                                                   "41"
+                                                   "40"
+                                                   "3z"
+                                                   "3y"
+                                                   "3x"
+                                                   "3w"
+                                                   "3v"
+                                                   "3u"
+                                                   "3t"
+                                                   "3s"
+                                                   "3r"
+                                                   "3q"
+                                                   "3p"
+                                                   "3o"
+                                                   "3n"
+                                                   "3m"
+                                                   "3l"
+                                                   "3k"
+                                                   "3j"
+                                                   "3i"
+                                                   "3h"
+                                                   "3g"
+                                                   "3f"
+                                                   "3e"
+                                                   "3d"
+                                                   "3c"
+                                                   "3b"
+                                                   "3a"
+                                                   "39"
+                                                   "38"
+                                                   "37"
+                                                   "36"
+                                                   "35"
+                                                   "34"
+                                                   "33"
+                                                   "32"
+                                                   "31"
+                                                   "30"
+                                                   "2z"
+                                                   "2y"
+                                                   "2x"
+                                                   "2w"
+                                                   "2v"
+                                                   "2u"
+                                                   "2t"
+                                                   "2s"
+                                                   "2r"
+                                                   "2q"
+                                                   "2p"
+                                                   "2o"
+                                                   "2n"
+                                                   "2m"
+                                                   "2l"
+                                                   "2k"
+                                                   "2j"
+                                                   "2i"
+                                                   "2h"
+                                                   "2g"
+                                                   "2f"
+                                                   "2e"
+                                                   "2d"
+                                                   "2c"
+                                                   "2b"
+                                                   "2a"
+                                                   "29"
+                                                   "28"
+                                                   "27"
+                                                   "26"
+                                                   "25"
+                                                   "24"
+                                                   "23"
+                                                   "22"
+                                                   "21"
+                                                   "20"
+                                                   "1z"
+                                                   "1y"
+                                                   "1x"
+                                                   "1w"
+                                                   "1v"
+                                                   "1u"
+                                                   "1t"
+                                                   "1s"
+                                                   "1r"
+                                                   "1q"))
                                                 #(ribcage
                                                   (define-structure
                                                     define-expansion-accessors
                                                     define-expansion-constructors)
                                                   ((top) (top) (top))
-                                                  ("1og" "1of" "1oe")))
+                                                  ("8" "7" "6")))
                                                (hygiene guile))
-                                            #{head _hoQGWMnyQPAh3k2jhWIdP}#)))
+                                            #{head -ANAU$bmvAmthP7L7xwoXu}#)))
                                 (call-with-values
                                   (lambda ()
-                                    (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-                                      #{e _hoQGWMnyQPAh3k2jhWIhl}#
-                                      #{r _hoQGWMnyQPAh3k2jhWIVb}#
-                                      #{w _hoQGWMnyQPAh3k2jhWIVc}#
-                                      (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-                                        #{e _hoQGWMnyQPAh3k2jhWIhl}#)
+                                    (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+                                      #{e -ANAU$bmvAmthP7L7xwocE}#
+                                      #{r -ANAU$bmvAmthP7L7xwoP6}#
+                                      #{w -ANAU$bmvAmthP7L7xwoP7}#
+                                      (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+                                        #{e -ANAU$bmvAmthP7L7xwocE}#)
                                       #f
-                                      #{mod _hoQGWMnyQPAh3k2jhWIVe}#
+                                      #{mod -ANAU$bmvAmthP7L7xwoP9}#
                                       #f))
-                                  (lambda (#{type _hoQGWMnyQPAh3k2jhWIhs}#
-                                           #{value _hoQGWMnyQPAh3k2jhWIht}#
-                                           #{e _hoQGWMnyQPAh3k2jhWIhu}#
-                                           #{w _hoQGWMnyQPAh3k2jhWIhv}#
-                                           #{s _hoQGWMnyQPAh3k2jhWIhw}#
-                                           #{mod _hoQGWMnyQPAh3k2jhWIhx}#)
-                                    (#{expand-expr _hoQGWMnyQPAh3k2jhWHTm}#
-                                      #{type _hoQGWMnyQPAh3k2jhWIhs}#
-                                      #{value _hoQGWMnyQPAh3k2jhWIht}#
-                                      #{e _hoQGWMnyQPAh3k2jhWIhu}#
-                                      #{r _hoQGWMnyQPAh3k2jhWIVb}#
-                                      #{w _hoQGWMnyQPAh3k2jhWIhv}#
-                                      #{s _hoQGWMnyQPAh3k2jhWIhw}#
-                                      #{mod _hoQGWMnyQPAh3k2jhWIhx}#))))
-                              (map (lambda (#{e _hoQGWMnyQPAh3k2jhWIh1}#)
+                                  (lambda (#{type -ANAU$bmvAmthP7L7xwocL}#
+                                           #{value -ANAU$bmvAmthP7L7xwocM}#
+                                           #{e -ANAU$bmvAmthP7L7xwocN}#
+                                           #{w -ANAU$bmvAmthP7L7xwocO}#
+                                           #{s -ANAU$bmvAmthP7L7xwocP}#
+                                           #{mod -ANAU$bmvAmthP7L7xwocQ}#)
+                                    (#{expand-expr -ANAU$bmvAmthP7L7xwnOF}#
+                                      #{type -ANAU$bmvAmthP7L7xwocL}#
+                                      #{value -ANAU$bmvAmthP7L7xwocM}#
+                                      #{e -ANAU$bmvAmthP7L7xwocN}#
+                                      #{r -ANAU$bmvAmthP7L7xwoP6}#
+                                      #{w -ANAU$bmvAmthP7L7xwocO}#
+                                      #{s -ANAU$bmvAmthP7L7xwocP}#
+                                      #{mod -ANAU$bmvAmthP7L7xwocQ}#))))
+                              (map (lambda (#{e -ANAU$bmvAmthP7L7xwocU}#)
                                      (call-with-values
                                        (lambda ()
-                                         (#{syntax-type _hoQGWMnyQPAh3k2jhWHTk}#
-                                           #{e _hoQGWMnyQPAh3k2jhWIh1}#
-                                           #{r _hoQGWMnyQPAh3k2jhWIVb}#
-                                           #{w _hoQGWMnyQPAh3k2jhWIVc}#
-                                           (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-                                             #{e _hoQGWMnyQPAh3k2jhWIh1}#)
+                                         (#{syntax-type -ANAU$bmvAmthP7L7xwnOD}#
+                                           #{e -ANAU$bmvAmthP7L7xwocU}#
+                                           #{r -ANAU$bmvAmthP7L7xwoP6}#
+                                           #{w -ANAU$bmvAmthP7L7xwoP7}#
+                                           (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+                                             #{e -ANAU$bmvAmthP7L7xwocU}#)
                                            #f
-                                           #{mod _hoQGWMnyQPAh3k2jhWIVe}#
+                                           #{mod -ANAU$bmvAmthP7L7xwoP9}#
                                            #f))
-                                       (lambda (#{type _hoQGWMnyQPAh3k2jhWIiE}#
-                                                #{value _hoQGWMnyQPAh3k2jhWIiF}#
-                                                #{e _hoQGWMnyQPAh3k2jhWIiG}#
-                                                #{w _hoQGWMnyQPAh3k2jhWIiH}#
-                                                #{s _hoQGWMnyQPAh3k2jhWIiI}#
-                                                #{mod _hoQGWMnyQPAh3k2jhWIiJ}#)
-                                         (#{expand-expr _hoQGWMnyQPAh3k2jhWHTm}#
-                                           #{type _hoQGWMnyQPAh3k2jhWIiE}#
-                                           #{value _hoQGWMnyQPAh3k2jhWIiF}#
-                                           #{e _hoQGWMnyQPAh3k2jhWIiG}#
-                                           #{r _hoQGWMnyQPAh3k2jhWIVb}#
-                                           #{w _hoQGWMnyQPAh3k2jhWIiH}#
-                                           #{s _hoQGWMnyQPAh3k2jhWIiI}#
-                                           #{mod _hoQGWMnyQPAh3k2jhWIiJ}#))))
+                                       (lambda (#{type -ANAU$bmvAmthP7L7xwocj}#
+                                                #{value -ANAU$bmvAmthP7L7xwock}#
+                                                #{e -ANAU$bmvAmthP7L7xwocl}#
+                                                #{w -ANAU$bmvAmthP7L7xwocm}#
+                                                #{s -ANAU$bmvAmthP7L7xwocn}#
+                                                #{mod -ANAU$bmvAmthP7L7xwoco}#)
+                                         (#{expand-expr -ANAU$bmvAmthP7L7xwnOF}#
+                                           #{type -ANAU$bmvAmthP7L7xwocj}#
+                                           #{value -ANAU$bmvAmthP7L7xwock}#
+                                           #{e -ANAU$bmvAmthP7L7xwocl}#
+                                           #{r -ANAU$bmvAmthP7L7xwoP6}#
+                                           #{w -ANAU$bmvAmthP7L7xwocm}#
+                                           #{s -ANAU$bmvAmthP7L7xwocn}#
+                                           #{mod -ANAU$bmvAmthP7L7xwoco}#))))
                                    (append
-                                     #{tail _hoQGWMnyQPAh3k2jhWIdQ}#
-                                     (list #{val _hoQGWMnyQPAh3k2jhWIdR}#))))))))
-                    #{tmp _hoQGWMnyQPAh3k2jhWIdL}#)
+                                     #{tail -ANAU$bmvAmthP7L7xwoXv}#
+                                     (list #{val -ANAU$bmvAmthP7L7xwoXw}#))))))))
+                    #{tmp -ANAU$bmvAmthP7L7xwoXq}#)
                   (syntax-violation
                     'set!
                     "bad set!"
-                    (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                    (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                       (begin
-                        (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWIVa}#)
-                              #{s _hoQGWMnyQPAh3k2jhWIVd}#
+                        (if (if (pair? #{e -ANAU$bmvAmthP7L7xwoP5}#)
+                              #{s -ANAU$bmvAmthP7L7xwoP8}#
                               #f)
                           (set-source-properties!
-                            #{e _hoQGWMnyQPAh3k2jhWIVa}#
-                            #{s _hoQGWMnyQPAh3k2jhWIVd}#))
-                        #{e _hoQGWMnyQPAh3k2jhWIVa}#)
-                      #{w _hoQGWMnyQPAh3k2jhWIVc}#
-                      #{mod _hoQGWMnyQPAh3k2jhWIVe}#))))))))
+                            #{e -ANAU$bmvAmthP7L7xwoP5}#
+                            #{s -ANAU$bmvAmthP7L7xwoP8}#))
+                        #{e -ANAU$bmvAmthP7L7xwoP5}#)
+                      #{w -ANAU$bmvAmthP7L7xwoP7}#
+                      #{mod -ANAU$bmvAmthP7L7xwoP9}#))))))))
       (module-define!
         (current-module)
         '@
         (make-syntax-transformer
           '@
           'module-ref
-          (lambda (#{e _hoQGWMnyQPAh3k2jhWIi0}#
-                   #{r _hoQGWMnyQPAh3k2jhWIi1}#
-                   #{w _hoQGWMnyQPAh3k2jhWIi2}#)
-            (let ((#{tmp _hoQGWMnyQPAh3k2jhWIi4}#
+          (lambda (#{e -ANAU$bmvAmthP7L7xwodT}#
+                   #{r -ANAU$bmvAmthP7L7xwodU}#
+                   #{w -ANAU$bmvAmthP7L7xwodV}#)
+            (let ((#{tmp -ANAU$bmvAmthP7L7xwodX}#
                     ($sc-dispatch
-                      #{e _hoQGWMnyQPAh3k2jhWIi0}#
+                      #{e -ANAU$bmvAmthP7L7xwodT}#
                       '(_ each-any any))))
-              (if (if #{tmp _hoQGWMnyQPAh3k2jhWIi4}#
+              (if (if #{tmp -ANAU$bmvAmthP7L7xwodX}#
                     (@apply
-                      (lambda (#{mod _hoQGWMnyQPAh3k2jhWIi7}#
-                               #{id _hoQGWMnyQPAh3k2jhWIi8}#)
+                      (lambda (#{mod -ANAU$bmvAmthP7L7xwoda}#
+                               #{id -ANAU$bmvAmthP7L7xwodb}#)
                         (if (and-map
-                              #{id? _hoQGWMnyQPAh3k2jhWHTB}#
-                              #{mod _hoQGWMnyQPAh3k2jhWIi7}#)
-                          (if (symbol? #{id _hoQGWMnyQPAh3k2jhWIi8}#)
+                              #{id? -ANAU$bmvAmthP7L7xwnNg}#
+                              #{mod -ANAU$bmvAmthP7L7xwoda}#)
+                          (if (symbol? #{id -ANAU$bmvAmthP7L7xwodb}#)
                             #t
-                            (if (if (vector? #{id _hoQGWMnyQPAh3k2jhWIi8}#)
+                            (if (if (vector? #{id -ANAU$bmvAmthP7L7xwodb}#)
                                   (if (= (vector-length
-                                           #{id _hoQGWMnyQPAh3k2jhWIi8}#)
+                                           #{id -ANAU$bmvAmthP7L7xwodb}#)
                                          4)
                                     (eq? (vector-ref
-                                           #{id _hoQGWMnyQPAh3k2jhWIi8}#
+                                           #{id -ANAU$bmvAmthP7L7xwodb}#
                                            0)
                                          'syntax-object)
                                     #f)
                                   #f)
                               (symbol?
-                                (vector-ref #{id _hoQGWMnyQPAh3k2jhWIi8}# 1))
+                                (vector-ref #{id -ANAU$bmvAmthP7L7xwodb}# 1))
                               #f))
                           #f))
-                      #{tmp _hoQGWMnyQPAh3k2jhWIi4}#)
+                      #{tmp -ANAU$bmvAmthP7L7xwodX}#)
                     #f)
                 (@apply
-                  (lambda (#{mod _hoQGWMnyQPAh3k2jhWIjk}#
-                           #{id _hoQGWMnyQPAh3k2jhWIjl}#)
+                  (lambda (#{mod -ANAU$bmvAmthP7L7xwoeD}#
+                           #{id -ANAU$bmvAmthP7L7xwoeE}#)
                     (values
-                      (syntax->datum #{id _hoQGWMnyQPAh3k2jhWIjl}#)
-                      #{r _hoQGWMnyQPAh3k2jhWIi1}#
-                      #{w _hoQGWMnyQPAh3k2jhWIi2}#
+                      (syntax->datum #{id -ANAU$bmvAmthP7L7xwoeE}#)
+                      #{r -ANAU$bmvAmthP7L7xwodU}#
+                      #{w -ANAU$bmvAmthP7L7xwodV}#
                       #f
                       (syntax->datum
                         (cons '#(syntax-object
@@ -11079,12 +11057,12 @@
                                   #(ribcage
                                     #(mod id)
                                     #((top) (top))
-                                    #("2sv" "2sw"))
+                                    #("14n" "14o"))
                                   #(ribcage () () ())
                                   #(ribcage
                                     #(e r w)
                                     #((top) (top) (top))
-                                    #("2sq" "2sr" "2ss"))
+                                    #("14i" "14j" "14k"))
                                   #(ribcage
                                     (lambda-var-list
                                       gen-var
@@ -11366,235 +11344,235 @@
                                      (top)
                                      (top)
                                      (top))
-                                    ("1tt"
-                                     "1ts"
-                                     "1tr"
-                                     "1tq"
-                                     "1tp"
-                                     "1to"
-                                     "1tn"
-                                     "1tm"
-                                     "1tl"
-                                     "1tk"
-                                     "1tj"
-                                     "1ti"
-                                     "1th"
-                                     "1tg"
-                                     "1tf"
-                                     "1te"
-                                     "1td"
-                                     "1tc"
-                                     "1tb"
-                                     "1ta"
-                                     "1t9"
-                                     "1t8"
-                                     "1t7"
-                                     "1t6"
-                                     "1t5"
-                                     "1t4"
-                                     "1t3"
-                                     "1t2"
-                                     "1t1"
-                                     "1t0"
-                                     "1sz"
-                                     "1sy"
-                                     "1sx"
-                                     "1sw"
-                                     "1sv"
-                                     "1su"
-                                     "1st"
-                                     "1ss"
-                                     "1sr"
-                                     "1sq"
-                                     "1sp"
-                                     "1so"
-                                     "1sn"
-                                     "1sm"
-                                     "1sl"
-                                     "1sk"
-                                     "1sj"
-                                     "1si"
-                                     "1sh"
-                                     "1sg"
-                                     "1sf"
-                                     "1se"
-                                     "1sd"
-                                     "1sc"
-                                     "1sb"
-                                     "1sa"
-                                     "1s9"
-                                     "1s8"
-                                     "1s7"
-                                     "1s6"
-                                     "1s5"
-                                     "1s4"
-                                     "1s3"
-                                     "1s2"
-                                     "1s1"
-                                     "1s0"
-                                     "1rz"
-                                     "1ry"
-                                     "1rx"
-                                     "1rw"
-                                     "1rv"
-                                     "1ru"
-                                     "1rt"
-                                     "1rs"
-                                     "1rr"
-                                     "1rq"
-                                     "1rp"
-                                     "1ro"
-                                     "1rn"
-                                     "1rm"
-                                     "1rl"
-                                     "1rk"
-                                     "1rj"
-                                     "1ri"
-                                     "1rh"
-                                     "1rg"
-                                     "1rf"
-                                     "1re"
-                                     "1rd"
-                                     "1rc"
-                                     "1rb"
-                                     "1ra"
-                                     "1r9"
-                                     "1r8"
-                                     "1r7"
-                                     "1r6"
-                                     "1r5"
-                                     "1r4"
-                                     "1r3"
-                                     "1r2"
-                                     "1r1"
-                                     "1r0"
-                                     "1qz"
-                                     "1qy"
-                                     "1qx"
-                                     "1qw"
-                                     "1qv"
-                                     "1qu"
-                                     "1qt"
-                                     "1qs"
-                                     "1qr"
-                                     "1qq"
-                                     "1qp"
-                                     "1qo"
-                                     "1qn"
-                                     "1qm"
-                                     "1ql"
-                                     "1qk"
-                                     "1qj"
-                                     "1qi"
-                                     "1qh"
-                                     "1qg"
-                                     "1qf"
-                                     "1qe"
-                                     "1qd"
-                                     "1qc"
-                                     "1qb"
-                                     "1qa"
-                                     "1q9"
-                                     "1q8"
-                                     "1q7"
-                                     "1q6"
-                                     "1q5"
-                                     "1q4"
-                                     "1q3"
-                                     "1q2"
-                                     "1q1"
-                                     "1q0"
-                                     "1pz"
-                                     "1py"))
+                                    ("5l"
+                                     "5k"
+                                     "5j"
+                                     "5i"
+                                     "5h"
+                                     "5g"
+                                     "5f"
+                                     "5e"
+                                     "5d"
+                                     "5c"
+                                     "5b"
+                                     "5a"
+                                     "59"
+                                     "58"
+                                     "57"
+                                     "56"
+                                     "55"
+                                     "54"
+                                     "53"
+                                     "52"
+                                     "51"
+                                     "50"
+                                     "4z"
+                                     "4y"
+                                     "4x"
+                                     "4w"
+                                     "4v"
+                                     "4u"
+                                     "4t"
+                                     "4s"
+                                     "4r"
+                                     "4q"
+                                     "4p"
+                                     "4o"
+                                     "4n"
+                                     "4m"
+                                     "4l"
+                                     "4k"
+                                     "4j"
+                                     "4i"
+                                     "4h"
+                                     "4g"
+                                     "4f"
+                                     "4e"
+                                     "4d"
+                                     "4c"
+                                     "4b"
+                                     "4a"
+                                     "49"
+                                     "48"
+                                     "47"
+                                     "46"
+                                     "45"
+                                     "44"
+                                     "43"
+                                     "42"
+                                     "41"
+                                     "40"
+                                     "3z"
+                                     "3y"
+                                     "3x"
+                                     "3w"
+                                     "3v"
+                                     "3u"
+                                     "3t"
+                                     "3s"
+                                     "3r"
+                                     "3q"
+                                     "3p"
+                                     "3o"
+                                     "3n"
+                                     "3m"
+                                     "3l"
+                                     "3k"
+                                     "3j"
+                                     "3i"
+                                     "3h"
+                                     "3g"
+                                     "3f"
+                                     "3e"
+                                     "3d"
+                                     "3c"
+                                     "3b"
+                                     "3a"
+                                     "39"
+                                     "38"
+                                     "37"
+                                     "36"
+                                     "35"
+                                     "34"
+                                     "33"
+                                     "32"
+                                     "31"
+                                     "30"
+                                     "2z"
+                                     "2y"
+                                     "2x"
+                                     "2w"
+                                     "2v"
+                                     "2u"
+                                     "2t"
+                                     "2s"
+                                     "2r"
+                                     "2q"
+                                     "2p"
+                                     "2o"
+                                     "2n"
+                                     "2m"
+                                     "2l"
+                                     "2k"
+                                     "2j"
+                                     "2i"
+                                     "2h"
+                                     "2g"
+                                     "2f"
+                                     "2e"
+                                     "2d"
+                                     "2c"
+                                     "2b"
+                                     "2a"
+                                     "29"
+                                     "28"
+                                     "27"
+                                     "26"
+                                     "25"
+                                     "24"
+                                     "23"
+                                     "22"
+                                     "21"
+                                     "20"
+                                     "1z"
+                                     "1y"
+                                     "1x"
+                                     "1w"
+                                     "1v"
+                                     "1u"
+                                     "1t"
+                                     "1s"
+                                     "1r"
+                                     "1q"))
                                   #(ribcage
                                     (define-structure
                                       define-expansion-accessors
                                       define-expansion-constructors)
                                     ((top) (top) (top))
-                                    ("1og" "1of" "1oe")))
+                                    ("8" "7" "6")))
                                  (hygiene guile))
-                              #{mod _hoQGWMnyQPAh3k2jhWIjk}#))))
-                  #{tmp _hoQGWMnyQPAh3k2jhWIi4}#)
+                              #{mod -ANAU$bmvAmthP7L7xwoeD}#))))
+                  #{tmp -ANAU$bmvAmthP7L7xwodX}#)
                 (syntax-violation
                   #f
                   "source expression failed to match any pattern"
-                  #{e _hoQGWMnyQPAh3k2jhWIi0}#))))))
-      (#{global-extend _hoQGWMnyQPAh3k2jhWHS@}#
+                  #{e -ANAU$bmvAmthP7L7xwodT}#))))))
+      (#{global-extend -ANAU$bmvAmthP7L7xwnNe}#
         'module-ref
         '@@
-        (lambda (#{e _hoQGWMnyQPAh3k2jhWIlB}#
-                 #{r _hoQGWMnyQPAh3k2jhWIlC}#
-                 #{w _hoQGWMnyQPAh3k2jhWIlD}#)
+        (lambda (#{e -ANAU$bmvAmthP7L7xwofg}#
+                 #{r -ANAU$bmvAmthP7L7xwofh}#
+                 #{w -ANAU$bmvAmthP7L7xwofi}#)
           (letrec*
-            ((#{remodulate _hoQGWMnyQPAh3k2jhWIlE}#
-               (lambda (#{x _hoQGWMnyQPAh3k2jhWIln}#
-                        #{mod _hoQGWMnyQPAh3k2jhWIlo}#)
-                 (if (pair? #{x _hoQGWMnyQPAh3k2jhWIln}#)
-                   (cons (#{remodulate _hoQGWMnyQPAh3k2jhWIlE}#
-                           (car #{x _hoQGWMnyQPAh3k2jhWIln}#)
-                           #{mod _hoQGWMnyQPAh3k2jhWIlo}#)
-                         (#{remodulate _hoQGWMnyQPAh3k2jhWIlE}#
-                           (cdr #{x _hoQGWMnyQPAh3k2jhWIln}#)
-                           #{mod _hoQGWMnyQPAh3k2jhWIlo}#))
-                   (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWIln}#)
-                         (if (= (vector-length #{x _hoQGWMnyQPAh3k2jhWIln}#)
+            ((#{remodulate -ANAU$bmvAmthP7L7xwofj}#
+               (lambda (#{x -ANAU$bmvAmthP7L7xwogG}#
+                        #{mod -ANAU$bmvAmthP7L7xwogH}#)
+                 (if (pair? #{x -ANAU$bmvAmthP7L7xwogG}#)
+                   (cons (#{remodulate -ANAU$bmvAmthP7L7xwofj}#
+                           (car #{x -ANAU$bmvAmthP7L7xwogG}#)
+                           #{mod -ANAU$bmvAmthP7L7xwogH}#)
+                         (#{remodulate -ANAU$bmvAmthP7L7xwofj}#
+                           (cdr #{x -ANAU$bmvAmthP7L7xwogG}#)
+                           #{mod -ANAU$bmvAmthP7L7xwogH}#))
+                   (if (if (vector? #{x -ANAU$bmvAmthP7L7xwogG}#)
+                         (if (= (vector-length #{x -ANAU$bmvAmthP7L7xwogG}#)
                                 4)
-                           (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWIln}# 0)
+                           (eq? (vector-ref #{x -ANAU$bmvAmthP7L7xwogG}# 0)
                                 'syntax-object)
                            #f)
                          #f)
-                     (let ((#{expression _hoQGWMnyQPAh3k2jhWIl2}#
-                             (#{remodulate _hoQGWMnyQPAh3k2jhWIlE}#
-                               (vector-ref #{x _hoQGWMnyQPAh3k2jhWIln}# 1)
-                               #{mod _hoQGWMnyQPAh3k2jhWIlo}#))
-                           (#{wrap _hoQGWMnyQPAh3k2jhWIl3}#
-                             (vector-ref #{x _hoQGWMnyQPAh3k2jhWIln}# 2)))
+                     (let ((#{expression -ANAU$bmvAmthP7L7xwogV}#
+                             (#{remodulate -ANAU$bmvAmthP7L7xwofj}#
+                               (vector-ref #{x -ANAU$bmvAmthP7L7xwogG}# 1)
+                               #{mod -ANAU$bmvAmthP7L7xwogH}#))
+                           (#{wrap -ANAU$bmvAmthP7L7xwogW}#
+                             (vector-ref #{x -ANAU$bmvAmthP7L7xwogG}# 2)))
                        (vector
                          'syntax-object
-                         #{expression _hoQGWMnyQPAh3k2jhWIl2}#
-                         #{wrap _hoQGWMnyQPAh3k2jhWIl3}#
-                         #{mod _hoQGWMnyQPAh3k2jhWIlo}#))
-                     (if (vector? #{x _hoQGWMnyQPAh3k2jhWIln}#)
-                       (let ((#{n _hoQGWMnyQPAh3k2jhWIl@}#
-                               (vector-length #{x _hoQGWMnyQPAh3k2jhWIln}#)))
-                         (let ((#{v _hoQGWMnyQPAh3k2jhWImA}#
-                                 (make-vector #{n _hoQGWMnyQPAh3k2jhWIl@}#)))
+                         #{expression -ANAU$bmvAmthP7L7xwogV}#
+                         #{wrap -ANAU$bmvAmthP7L7xwogW}#
+                         #{mod -ANAU$bmvAmthP7L7xwogH}#))
+                     (if (vector? #{x -ANAU$bmvAmthP7L7xwogG}#)
+                       (let ((#{n -ANAU$bmvAmthP7L7xwoge}#
+                               (vector-length #{x -ANAU$bmvAmthP7L7xwogG}#)))
+                         (let ((#{v -ANAU$bmvAmthP7L7xwogf}#
+                                 (make-vector #{n -ANAU$bmvAmthP7L7xwoge}#)))
                            (letrec*
-                             ((#{loop _hoQGWMnyQPAh3k2jhWImB}#
-                                (lambda (#{i _hoQGWMnyQPAh3k2jhWImw}#)
-                                  (if (= #{i _hoQGWMnyQPAh3k2jhWImw}#
-                                         #{n _hoQGWMnyQPAh3k2jhWIl@}#)
-                                    #{v _hoQGWMnyQPAh3k2jhWImA}#
+                             ((#{loop -ANAU$bmvAmthP7L7xwogg}#
+                                (lambda (#{i -ANAU$bmvAmthP7L7xwohP}#)
+                                  (if (= #{i -ANAU$bmvAmthP7L7xwohP}#
+                                         #{n -ANAU$bmvAmthP7L7xwoge}#)
+                                    #{v -ANAU$bmvAmthP7L7xwogf}#
                                     (begin
                                       (vector-set!
-                                        #{v _hoQGWMnyQPAh3k2jhWImA}#
-                                        #{i _hoQGWMnyQPAh3k2jhWImw}#
-                                        (#{remodulate _hoQGWMnyQPAh3k2jhWIlE}#
+                                        #{v -ANAU$bmvAmthP7L7xwogf}#
+                                        #{i -ANAU$bmvAmthP7L7xwohP}#
+                                        (#{remodulate -ANAU$bmvAmthP7L7xwofj}#
                                           (vector-ref
-                                            #{x _hoQGWMnyQPAh3k2jhWIln}#
-                                            #{i _hoQGWMnyQPAh3k2jhWImw}#)
-                                          #{mod _hoQGWMnyQPAh3k2jhWIlo}#))
-                                      (#{loop _hoQGWMnyQPAh3k2jhWImB}#
-                                        (#{1+}# #{i _hoQGWMnyQPAh3k2jhWImw}#)))))))
-                             (#{loop _hoQGWMnyQPAh3k2jhWImB}# 0))))
-                       #{x _hoQGWMnyQPAh3k2jhWIln}#))))))
-            (let ((#{tmp _hoQGWMnyQPAh3k2jhWIlG}#
+                                            #{x -ANAU$bmvAmthP7L7xwogG}#
+                                            #{i -ANAU$bmvAmthP7L7xwohP}#)
+                                          #{mod -ANAU$bmvAmthP7L7xwogH}#))
+                                      (#{loop -ANAU$bmvAmthP7L7xwogg}#
+                                        (#{1+}# #{i -ANAU$bmvAmthP7L7xwohP}#)))))))
+                             (#{loop -ANAU$bmvAmthP7L7xwogg}# 0))))
+                       #{x -ANAU$bmvAmthP7L7xwogG}#))))))
+            (let ((#{tmp -ANAU$bmvAmthP7L7xwofl}#
                     ($sc-dispatch
-                      #{e _hoQGWMnyQPAh3k2jhWIlB}#
+                      #{e -ANAU$bmvAmthP7L7xwofg}#
                       '(_ each-any any))))
-              (if (if #{tmp _hoQGWMnyQPAh3k2jhWIlG}#
+              (if (if #{tmp -ANAU$bmvAmthP7L7xwofl}#
                     (@apply
-                      (lambda (#{mod _hoQGWMnyQPAh3k2jhWIlK}#
-                               #{exp _hoQGWMnyQPAh3k2jhWIlL}#)
+                      (lambda (#{mod -ANAU$bmvAmthP7L7xwofp}#
+                               #{exp -ANAU$bmvAmthP7L7xwofq}#)
                         (and-map
-                          #{id? _hoQGWMnyQPAh3k2jhWHTB}#
-                          #{mod _hoQGWMnyQPAh3k2jhWIlK}#))
-                      #{tmp _hoQGWMnyQPAh3k2jhWIlG}#)
+                          #{id? -ANAU$bmvAmthP7L7xwnNg}#
+                          #{mod -ANAU$bmvAmthP7L7xwofp}#))
+                      #{tmp -ANAU$bmvAmthP7L7xwofl}#)
                     #f)
                 (@apply
-                  (lambda (#{mod _hoQGWMnyQPAh3k2jhWIlb}#
-                           #{exp _hoQGWMnyQPAh3k2jhWIlc}#)
-                    (let ((#{mod _hoQGWMnyQPAh3k2jhWIld}#
+                  (lambda (#{mod -ANAU$bmvAmthP7L7xwof6}#
+                           #{exp -ANAU$bmvAmthP7L7xwof7}#)
+                    (let ((#{mod -ANAU$bmvAmthP7L7xwof8}#
                             (syntax->datum
                               (cons '#(syntax-object
                                        private
@@ -11602,12 +11580,12 @@
                                         #(ribcage
                                           #(mod exp)
                                           #((top) (top))
-                                          #("2t9" "2ta"))
-                                        #(ribcage (remodulate) ((top)) ("2t0"))
+                                          #("151" "152"))
+                                        #(ribcage (remodulate) ((top)) ("14s"))
                                         #(ribcage
                                           #(e r w)
                                           #((top) (top) (top))
-                                          #("2sx" "2sy" "2sz"))
+                                          #("14p" "14q" "14r"))
                                         #(ribcage
                                           (lambda-var-list
                                             gen-var
@@ -11889,287 +11867,287 @@
                                            (top)
                                            (top)
                                            (top))
-                                          ("1tt"
-                                           "1ts"
-                                           "1tr"
-                                           "1tq"
-                                           "1tp"
-                                           "1to"
-                                           "1tn"
-                                           "1tm"
-                                           "1tl"
-                                           "1tk"
-                                           "1tj"
-                                           "1ti"
-                                           "1th"
-                                           "1tg"
-                                           "1tf"
-                                           "1te"
-                                           "1td"
-                                           "1tc"
-                                           "1tb"
-                                           "1ta"
-                                           "1t9"
-                                           "1t8"
-                                           "1t7"
-                                           "1t6"
-                                           "1t5"
-                                           "1t4"
-                                           "1t3"
-                                           "1t2"
-                                           "1t1"
-                                           "1t0"
-                                           "1sz"
-                                           "1sy"
-                                           "1sx"
-                                           "1sw"
-                                           "1sv"
-                                           "1su"
-                                           "1st"
-                                           "1ss"
-                                           "1sr"
-                                           "1sq"
-                                           "1sp"
-                                           "1so"
-                                           "1sn"
-                                           "1sm"
-                                           "1sl"
-                                           "1sk"
-                                           "1sj"
-                                           "1si"
-                                           "1sh"
-                                           "1sg"
-                                           "1sf"
-                                           "1se"
-                                           "1sd"
-                                           "1sc"
-                                           "1sb"
-                                           "1sa"
-                                           "1s9"
-                                           "1s8"
-                                           "1s7"
-                                           "1s6"
-                                           "1s5"
-                                           "1s4"
-                                           "1s3"
-                                           "1s2"
-                                           "1s1"
-                                           "1s0"
-                                           "1rz"
-                                           "1ry"
-                                           "1rx"
-                                           "1rw"
-                                           "1rv"
-                                           "1ru"
-                                           "1rt"
-                                           "1rs"
-                                           "1rr"
-                                           "1rq"
-                                           "1rp"
-                                           "1ro"
-                                           "1rn"
-                                           "1rm"
-                                           "1rl"
-                                           "1rk"
-                                           "1rj"
-                                           "1ri"
-                                           "1rh"
-                                           "1rg"
-                                           "1rf"
-                                           "1re"
-                                           "1rd"
-                                           "1rc"
-                                           "1rb"
-                                           "1ra"
-                                           "1r9"
-                                           "1r8"
-                                           "1r7"
-                                           "1r6"
-                                           "1r5"
-                                           "1r4"
-                                           "1r3"
-                                           "1r2"
-                                           "1r1"
-                                           "1r0"
-                                           "1qz"
-                                           "1qy"
-                                           "1qx"
-                                           "1qw"
-                                           "1qv"
-                                           "1qu"
-                                           "1qt"
-                                           "1qs"
-                                           "1qr"
-                                           "1qq"
-                                           "1qp"
-                                           "1qo"
-                                           "1qn"
-                                           "1qm"
-                                           "1ql"
-                                           "1qk"
-                                           "1qj"
-                                           "1qi"
-                                           "1qh"
-                                           "1qg"
-                                           "1qf"
-                                           "1qe"
-                                           "1qd"
-                                           "1qc"
-                                           "1qb"
-                                           "1qa"
-                                           "1q9"
-                                           "1q8"
-                                           "1q7"
-                                           "1q6"
-                                           "1q5"
-                                           "1q4"
-                                           "1q3"
-                                           "1q2"
-                                           "1q1"
-                                           "1q0"
-                                           "1pz"
-                                           "1py"))
+                                          ("5l"
+                                           "5k"
+                                           "5j"
+                                           "5i"
+                                           "5h"
+                                           "5g"
+                                           "5f"
+                                           "5e"
+                                           "5d"
+                                           "5c"
+                                           "5b"
+                                           "5a"
+                                           "59"
+                                           "58"
+                                           "57"
+                                           "56"
+                                           "55"
+                                           "54"
+                                           "53"
+                                           "52"
+                                           "51"
+                                           "50"
+                                           "4z"
+                                           "4y"
+                                           "4x"
+                                           "4w"
+                                           "4v"
+                                           "4u"
+                                           "4t"
+                                           "4s"
+                                           "4r"
+                                           "4q"
+                                           "4p"
+                                           "4o"
+                                           "4n"
+                                           "4m"
+                                           "4l"
+                                           "4k"
+                                           "4j"
+                                           "4i"
+                                           "4h"
+                                           "4g"
+                                           "4f"
+                                           "4e"
+                                           "4d"
+                                           "4c"
+                                           "4b"
+                                           "4a"
+                                           "49"
+                                           "48"
+                                           "47"
+                                           "46"
+                                           "45"
+                                           "44"
+                                           "43"
+                                           "42"
+                                           "41"
+                                           "40"
+                                           "3z"
+                                           "3y"
+                                           "3x"
+                                           "3w"
+                                           "3v"
+                                           "3u"
+                                           "3t"
+                                           "3s"
+                                           "3r"
+                                           "3q"
+                                           "3p"
+                                           "3o"
+                                           "3n"
+                                           "3m"
+                                           "3l"
+                                           "3k"
+                                           "3j"
+                                           "3i"
+                                           "3h"
+                                           "3g"
+                                           "3f"
+                                           "3e"
+                                           "3d"
+                                           "3c"
+                                           "3b"
+                                           "3a"
+                                           "39"
+                                           "38"
+                                           "37"
+                                           "36"
+                                           "35"
+                                           "34"
+                                           "33"
+                                           "32"
+                                           "31"
+                                           "30"
+                                           "2z"
+                                           "2y"
+                                           "2x"
+                                           "2w"
+                                           "2v"
+                                           "2u"
+                                           "2t"
+                                           "2s"
+                                           "2r"
+                                           "2q"
+                                           "2p"
+                                           "2o"
+                                           "2n"
+                                           "2m"
+                                           "2l"
+                                           "2k"
+                                           "2j"
+                                           "2i"
+                                           "2h"
+                                           "2g"
+                                           "2f"
+                                           "2e"
+                                           "2d"
+                                           "2c"
+                                           "2b"
+                                           "2a"
+                                           "29"
+                                           "28"
+                                           "27"
+                                           "26"
+                                           "25"
+                                           "24"
+                                           "23"
+                                           "22"
+                                           "21"
+                                           "20"
+                                           "1z"
+                                           "1y"
+                                           "1x"
+                                           "1w"
+                                           "1v"
+                                           "1u"
+                                           "1t"
+                                           "1s"
+                                           "1r"
+                                           "1q"))
                                         #(ribcage
                                           (define-structure
                                             define-expansion-accessors
                                             define-expansion-constructors)
                                           ((top) (top) (top))
-                                          ("1og" "1of" "1oe")))
+                                          ("8" "7" "6")))
                                        (hygiene guile))
-                                    #{mod _hoQGWMnyQPAh3k2jhWIlb}#))))
+                                    #{mod -ANAU$bmvAmthP7L7xwof6}#))))
                       (values
-                        (#{remodulate _hoQGWMnyQPAh3k2jhWIlE}#
-                          #{exp _hoQGWMnyQPAh3k2jhWIlc}#
-                          #{mod _hoQGWMnyQPAh3k2jhWIld}#)
-                        #{r _hoQGWMnyQPAh3k2jhWIlC}#
-                        #{w _hoQGWMnyQPAh3k2jhWIlD}#
-                        (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-                          #{exp _hoQGWMnyQPAh3k2jhWIlc}#)
-                        #{mod _hoQGWMnyQPAh3k2jhWIld}#)))
-                  #{tmp _hoQGWMnyQPAh3k2jhWIlG}#)
+                        (#{remodulate -ANAU$bmvAmthP7L7xwofj}#
+                          #{exp -ANAU$bmvAmthP7L7xwof7}#
+                          #{mod -ANAU$bmvAmthP7L7xwof8}#)
+                        #{r -ANAU$bmvAmthP7L7xwofh}#
+                        #{w -ANAU$bmvAmthP7L7xwofi}#
+                        (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+                          #{exp -ANAU$bmvAmthP7L7xwof7}#)
+                        #{mod -ANAU$bmvAmthP7L7xwof8}#)))
+                  #{tmp -ANAU$bmvAmthP7L7xwofl}#)
                 (syntax-violation
                   #f
                   "source expression failed to match any pattern"
-                  #{e _hoQGWMnyQPAh3k2jhWIlB}#))))))
-      (#{global-extend _hoQGWMnyQPAh3k2jhWHS@}#
+                  #{e -ANAU$bmvAmthP7L7xwofg}#))))))
+      (#{global-extend -ANAU$bmvAmthP7L7xwnNe}#
         'core
         'if
-        (lambda (#{e _hoQGWMnyQPAh3k2jhWIoV}#
-                 #{r _hoQGWMnyQPAh3k2jhWIoW}#
-                 #{w _hoQGWMnyQPAh3k2jhWIoX}#
-                 #{s _hoQGWMnyQPAh3k2jhWIoY}#
-                 #{mod _hoQGWMnyQPAh3k2jhWIoZ}#)
-          (let ((#{tmp _hoQGWMnyQPAh3k2jhWIob}#
+        (lambda (#{e -ANAU$bmvAmthP7L7xwoi0}#
+                 #{r -ANAU$bmvAmthP7L7xwoi1}#
+                 #{w -ANAU$bmvAmthP7L7xwoi2}#
+                 #{s -ANAU$bmvAmthP7L7xwoi3}#
+                 #{mod -ANAU$bmvAmthP7L7xwoi4}#)
+          (let ((#{tmp -ANAU$bmvAmthP7L7xwoi6}#
                   ($sc-dispatch
-                    #{e _hoQGWMnyQPAh3k2jhWIoV}#
+                    #{e -ANAU$bmvAmthP7L7xwoi0}#
                     '(_ any any))))
-            (if #{tmp _hoQGWMnyQPAh3k2jhWIob}#
+            (if #{tmp -ANAU$bmvAmthP7L7xwoi6}#
               (@apply
-                (lambda (#{test _hoQGWMnyQPAh3k2jhWIof}#
-                         #{then _hoQGWMnyQPAh3k2jhWIog}#)
-                  (#{build-conditional _hoQGWMnyQPAh3k2jhWHSh}#
-                    #{s _hoQGWMnyQPAh3k2jhWIoY}#
-                    (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                      #{test _hoQGWMnyQPAh3k2jhWIof}#
-                      #{r _hoQGWMnyQPAh3k2jhWIoW}#
-                      #{w _hoQGWMnyQPAh3k2jhWIoX}#
-                      #{mod _hoQGWMnyQPAh3k2jhWIoZ}#)
-                    (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                      #{then _hoQGWMnyQPAh3k2jhWIog}#
-                      #{r _hoQGWMnyQPAh3k2jhWIoW}#
-                      #{w _hoQGWMnyQPAh3k2jhWIoX}#
-                      #{mod _hoQGWMnyQPAh3k2jhWIoZ}#)
+                (lambda (#{test -ANAU$bmvAmthP7L7xwoi$}#
+                         #{then -ANAU$bmvAmthP7L7xwoi@}#)
+                  (#{build-conditional -ANAU$bmvAmthP7L7xwnNA}#
+                    #{s -ANAU$bmvAmthP7L7xwoi3}#
+                    (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                      #{test -ANAU$bmvAmthP7L7xwoi$}#
+                      #{r -ANAU$bmvAmthP7L7xwoi1}#
+                      #{w -ANAU$bmvAmthP7L7xwoi2}#
+                      #{mod -ANAU$bmvAmthP7L7xwoi4}#)
+                    (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                      #{then -ANAU$bmvAmthP7L7xwoi@}#
+                      #{r -ANAU$bmvAmthP7L7xwoi1}#
+                      #{w -ANAU$bmvAmthP7L7xwoi2}#
+                      #{mod -ANAU$bmvAmthP7L7xwoi4}#)
                     (make-struct/no-tail
                       (vector-ref %expanded-vtables 0)
                       #f)))
-                #{tmp _hoQGWMnyQPAh3k2jhWIob}#)
-              (let ((#{tmp _hoQGWMnyQPAh3k2jhWIsB}#
+                #{tmp -ANAU$bmvAmthP7L7xwoi6}#)
+              (let ((#{tmp -ANAU$bmvAmthP7L7xwomg}#
                       ($sc-dispatch
-                        #{e _hoQGWMnyQPAh3k2jhWIoV}#
+                        #{e -ANAU$bmvAmthP7L7xwoi0}#
                         '(_ any any any))))
-                (if #{tmp _hoQGWMnyQPAh3k2jhWIsB}#
+                (if #{tmp -ANAU$bmvAmthP7L7xwomg}#
                   (@apply
-                    (lambda (#{test _hoQGWMnyQPAh3k2jhWIsF}#
-                             #{then _hoQGWMnyQPAh3k2jhWIsG}#
-                             #{else _hoQGWMnyQPAh3k2jhWIsH}#)
-                      (#{build-conditional _hoQGWMnyQPAh3k2jhWHSh}#
-                        #{s _hoQGWMnyQPAh3k2jhWIoY}#
-                        (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                          #{test _hoQGWMnyQPAh3k2jhWIsF}#
-                          #{r _hoQGWMnyQPAh3k2jhWIoW}#
-                          #{w _hoQGWMnyQPAh3k2jhWIoX}#
-                          #{mod _hoQGWMnyQPAh3k2jhWIoZ}#)
-                        (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                          #{then _hoQGWMnyQPAh3k2jhWIsG}#
-                          #{r _hoQGWMnyQPAh3k2jhWIoW}#
-                          #{w _hoQGWMnyQPAh3k2jhWIoX}#
-                          #{mod _hoQGWMnyQPAh3k2jhWIoZ}#)
-                        (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                          #{else _hoQGWMnyQPAh3k2jhWIsH}#
-                          #{r _hoQGWMnyQPAh3k2jhWIoW}#
-                          #{w _hoQGWMnyQPAh3k2jhWIoX}#
-                          #{mod _hoQGWMnyQPAh3k2jhWIoZ}#)))
-                    #{tmp _hoQGWMnyQPAh3k2jhWIsB}#)
+                    (lambda (#{test -ANAU$bmvAmthP7L7xwomk}#
+                             #{then -ANAU$bmvAmthP7L7xwoml}#
+                             #{else -ANAU$bmvAmthP7L7xwomm}#)
+                      (#{build-conditional -ANAU$bmvAmthP7L7xwnNA}#
+                        #{s -ANAU$bmvAmthP7L7xwoi3}#
+                        (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                          #{test -ANAU$bmvAmthP7L7xwomk}#
+                          #{r -ANAU$bmvAmthP7L7xwoi1}#
+                          #{w -ANAU$bmvAmthP7L7xwoi2}#
+                          #{mod -ANAU$bmvAmthP7L7xwoi4}#)
+                        (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                          #{then -ANAU$bmvAmthP7L7xwoml}#
+                          #{r -ANAU$bmvAmthP7L7xwoi1}#
+                          #{w -ANAU$bmvAmthP7L7xwoi2}#
+                          #{mod -ANAU$bmvAmthP7L7xwoi4}#)
+                        (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                          #{else -ANAU$bmvAmthP7L7xwomm}#
+                          #{r -ANAU$bmvAmthP7L7xwoi1}#
+                          #{w -ANAU$bmvAmthP7L7xwoi2}#
+                          #{mod -ANAU$bmvAmthP7L7xwoi4}#)))
+                    #{tmp -ANAU$bmvAmthP7L7xwomg}#)
                   (syntax-violation
                     #f
                     "source expression failed to match any pattern"
-                    #{e _hoQGWMnyQPAh3k2jhWIoV}#)))))))
-      (#{global-extend _hoQGWMnyQPAh3k2jhWHS@}#
+                    #{e -ANAU$bmvAmthP7L7xwoi0}#)))))))
+      (#{global-extend -ANAU$bmvAmthP7L7xwnNe}#
         'core
         'with-fluids
-        (lambda (#{e _hoQGWMnyQPAh3k2jhWIyW}#
-                 #{r _hoQGWMnyQPAh3k2jhWIyX}#
-                 #{w _hoQGWMnyQPAh3k2jhWIyY}#
-                 #{s _hoQGWMnyQPAh3k2jhWIyZ}#
-                 #{mod _hoQGWMnyQPAh3k2jhWIya}#)
-          (let ((#{tmp _hoQGWMnyQPAh3k2jhWIyc}#
+        (lambda (#{e -ANAU$bmvAmthP7L7xwos1}#
+                 #{r -ANAU$bmvAmthP7L7xwos2}#
+                 #{w -ANAU$bmvAmthP7L7xwos3}#
+                 #{s -ANAU$bmvAmthP7L7xwos4}#
+                 #{mod -ANAU$bmvAmthP7L7xwos5}#)
+          (let ((#{tmp -ANAU$bmvAmthP7L7xwos7}#
                   ($sc-dispatch
-                    #{e _hoQGWMnyQPAh3k2jhWIyW}#
+                    #{e -ANAU$bmvAmthP7L7xwos1}#
                     '(_ #(each (any any)) any . each-any))))
-            (if #{tmp _hoQGWMnyQPAh3k2jhWIyc}#
+            (if #{tmp -ANAU$bmvAmthP7L7xwos7}#
               (@apply
-                (lambda (#{fluid _hoQGWMnyQPAh3k2jhWIyg}#
-                         #{val _hoQGWMnyQPAh3k2jhWIyh}#
-                         #{b _hoQGWMnyQPAh3k2jhWIyi}#
-                         #{b* _hoQGWMnyQPAh3k2jhWIyj}#)
-                  (#{build-dynlet _hoQGWMnyQPAh3k2jhWHSi}#
-                    #{s _hoQGWMnyQPAh3k2jhWIyZ}#
-                    (map (lambda (#{x _hoQGWMnyQPAh3k2jhWIz0}#)
-                           (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                             #{x _hoQGWMnyQPAh3k2jhWIz0}#
-                             #{r _hoQGWMnyQPAh3k2jhWIyX}#
-                             #{w _hoQGWMnyQPAh3k2jhWIyY}#
-                             #{mod _hoQGWMnyQPAh3k2jhWIya}#))
-                         #{fluid _hoQGWMnyQPAh3k2jhWIyg}#)
-                    (map (lambda (#{x _hoQGWMnyQPAh3k2jhWI06}#)
-                           (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                             #{x _hoQGWMnyQPAh3k2jhWI06}#
-                             #{r _hoQGWMnyQPAh3k2jhWIyX}#
-                             #{w _hoQGWMnyQPAh3k2jhWIyY}#
-                             #{mod _hoQGWMnyQPAh3k2jhWIya}#))
-                         #{val _hoQGWMnyQPAh3k2jhWIyh}#)
-                    (#{expand-body _hoQGWMnyQPAh3k2jhWHTp}#
-                      (cons #{b _hoQGWMnyQPAh3k2jhWIyi}#
-                            #{b* _hoQGWMnyQPAh3k2jhWIyj}#)
-                      (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                (lambda (#{fluid -ANAU$bmvAmthP7L7xwos@}#
+                         #{val -ANAU$bmvAmthP7L7xwotA}#
+                         #{b -ANAU$bmvAmthP7L7xwotB}#
+                         #{b* -ANAU$bmvAmthP7L7xwotC}#)
+                  (#{build-dynlet -ANAU$bmvAmthP7L7xwnNB}#
+                    #{s -ANAU$bmvAmthP7L7xwos4}#
+                    (map (lambda (#{x -ANAU$bmvAmthP7L7xwouT}#)
+                           (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                             #{x -ANAU$bmvAmthP7L7xwouT}#
+                             #{r -ANAU$bmvAmthP7L7xwos2}#
+                             #{w -ANAU$bmvAmthP7L7xwos3}#
+                             #{mod -ANAU$bmvAmthP7L7xwos5}#))
+                         #{fluid -ANAU$bmvAmthP7L7xwos@}#)
+                    (map (lambda (#{x -ANAU$bmvAmthP7L7xwovZ}#)
+                           (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                             #{x -ANAU$bmvAmthP7L7xwovZ}#
+                             #{r -ANAU$bmvAmthP7L7xwos2}#
+                             #{w -ANAU$bmvAmthP7L7xwos3}#
+                             #{mod -ANAU$bmvAmthP7L7xwos5}#))
+                         #{val -ANAU$bmvAmthP7L7xwotA}#)
+                    (#{expand-body -ANAU$bmvAmthP7L7xwnOI}#
+                      (cons #{b -ANAU$bmvAmthP7L7xwotB}#
+                            #{b* -ANAU$bmvAmthP7L7xwotC}#)
+                      (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                         (begin
-                          (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWIyW}#)
-                                #{s _hoQGWMnyQPAh3k2jhWIyZ}#
+                          (if (if (pair? #{e -ANAU$bmvAmthP7L7xwos1}#)
+                                #{s -ANAU$bmvAmthP7L7xwos4}#
                                 #f)
                             (set-source-properties!
-                              #{e _hoQGWMnyQPAh3k2jhWIyW}#
-                              #{s _hoQGWMnyQPAh3k2jhWIyZ}#))
-                          #{e _hoQGWMnyQPAh3k2jhWIyW}#)
-                        #{w _hoQGWMnyQPAh3k2jhWIyY}#
-                        #{mod _hoQGWMnyQPAh3k2jhWIya}#)
-                      #{r _hoQGWMnyQPAh3k2jhWIyX}#
-                      #{w _hoQGWMnyQPAh3k2jhWIyY}#
-                      #{mod _hoQGWMnyQPAh3k2jhWIya}#)))
-                #{tmp _hoQGWMnyQPAh3k2jhWIyc}#)
+                              #{e -ANAU$bmvAmthP7L7xwos1}#
+                              #{s -ANAU$bmvAmthP7L7xwos4}#))
+                          #{e -ANAU$bmvAmthP7L7xwos1}#)
+                        #{w -ANAU$bmvAmthP7L7xwos3}#
+                        #{mod -ANAU$bmvAmthP7L7xwos5}#)
+                      #{r -ANAU$bmvAmthP7L7xwos2}#
+                      #{w -ANAU$bmvAmthP7L7xwos3}#
+                      #{mod -ANAU$bmvAmthP7L7xwos5}#)))
+                #{tmp -ANAU$bmvAmthP7L7xwos7}#)
               (syntax-violation
                 #f
                 "source expression failed to match any pattern"
-                #{e _hoQGWMnyQPAh3k2jhWIyW}#)))))
+                #{e -ANAU$bmvAmthP7L7xwos1}#)))))
       (module-define!
         (current-module)
         'begin
@@ -12199,100 +12177,100 @@
           'eval-when
           'eval-when
           '()))
-      (#{global-extend _hoQGWMnyQPAh3k2jhWHS@}#
+      (#{global-extend -ANAU$bmvAmthP7L7xwnNe}#
         'core
         'syntax-case
         (letrec*
-          ((#{convert-pattern _hoQGWMnyQPAh3k2jhWI6q}#
-             (lambda (#{pattern _hoQGWMnyQPAh3k2jhWJTl}#
-                      #{keys _hoQGWMnyQPAh3k2jhWJTm}#)
+          ((#{convert-pattern -ANAU$bmvAmthP7L7xwo1J}#
+             (lambda (#{pattern -ANAU$bmvAmthP7L7xwpOE}#
+                      #{keys -ANAU$bmvAmthP7L7xwpOF}#)
                (letrec*
-                 ((#{cvt* _hoQGWMnyQPAh3k2jhWJTn}#
-                    (lambda (#{p* _hoQGWMnyQPAh3k2jhWJdX}#
-                             #{n _hoQGWMnyQPAh3k2jhWJdY}#
-                             #{ids _hoQGWMnyQPAh3k2jhWJdZ}#)
-                      (if (not (pair? #{p* _hoQGWMnyQPAh3k2jhWJdX}#))
-                        (#{cvt _hoQGWMnyQPAh3k2jhWJTp}#
-                          #{p* _hoQGWMnyQPAh3k2jhWJdX}#
-                          #{n _hoQGWMnyQPAh3k2jhWJdY}#
-                          #{ids _hoQGWMnyQPAh3k2jhWJdZ}#)
+                 ((#{cvt* -ANAU$bmvAmthP7L7xwpOG}#
+                    (lambda (#{p* -ANAU$bmvAmthP7L7xwpX2}#
+                             #{n -ANAU$bmvAmthP7L7xwpX3}#
+                             #{ids -ANAU$bmvAmthP7L7xwpX4}#)
+                      (if (not (pair? #{p* -ANAU$bmvAmthP7L7xwpX2}#))
+                        (#{cvt -ANAU$bmvAmthP7L7xwpOI}#
+                          #{p* -ANAU$bmvAmthP7L7xwpX2}#
+                          #{n -ANAU$bmvAmthP7L7xwpX3}#
+                          #{ids -ANAU$bmvAmthP7L7xwpX4}#)
                         (call-with-values
                           (lambda ()
-                            (#{cvt* _hoQGWMnyQPAh3k2jhWJTn}#
-                              (cdr #{p* _hoQGWMnyQPAh3k2jhWJdX}#)
-                              #{n _hoQGWMnyQPAh3k2jhWJdY}#
-                              #{ids _hoQGWMnyQPAh3k2jhWJdZ}#))
-                          (lambda (#{y _hoQGWMnyQPAh3k2jhWJdc}#
-                                   #{ids _hoQGWMnyQPAh3k2jhWJdd}#)
+                            (#{cvt* -ANAU$bmvAmthP7L7xwpOG}#
+                              (cdr #{p* -ANAU$bmvAmthP7L7xwpX2}#)
+                              #{n -ANAU$bmvAmthP7L7xwpX3}#
+                              #{ids -ANAU$bmvAmthP7L7xwpX4}#))
+                          (lambda (#{y -ANAU$bmvAmthP7L7xwpX7}#
+                                   #{ids -ANAU$bmvAmthP7L7xwpX8}#)
                             (call-with-values
                               (lambda ()
-                                (#{cvt _hoQGWMnyQPAh3k2jhWJTp}#
-                                  (car #{p* _hoQGWMnyQPAh3k2jhWJdX}#)
-                                  #{n _hoQGWMnyQPAh3k2jhWJdY}#
-                                  #{ids _hoQGWMnyQPAh3k2jhWJdd}#))
-                              (lambda (#{x _hoQGWMnyQPAh3k2jhWJdg}#
-                                       #{ids _hoQGWMnyQPAh3k2jhWJdh}#)
+                                (#{cvt -ANAU$bmvAmthP7L7xwpOI}#
+                                  (car #{p* -ANAU$bmvAmthP7L7xwpX2}#)
+                                  #{n -ANAU$bmvAmthP7L7xwpX3}#
+                                  #{ids -ANAU$bmvAmthP7L7xwpX8}#))
+                              (lambda (#{x -ANAU$bmvAmthP7L7xwpX@}#
+                                       #{ids -ANAU$bmvAmthP7L7xwpYA}#)
                                 (values
-                                  (cons #{x _hoQGWMnyQPAh3k2jhWJdg}#
-                                        #{y _hoQGWMnyQPAh3k2jhWJdc}#)
-                                  #{ids _hoQGWMnyQPAh3k2jhWJdh}#))))))))
-                  (#{v-reverse _hoQGWMnyQPAh3k2jhWJTo}#
-                    (lambda (#{x _hoQGWMnyQPAh3k2jhWJdi}#)
+                                  (cons #{x -ANAU$bmvAmthP7L7xwpX@}#
+                                        #{y -ANAU$bmvAmthP7L7xwpX7}#)
+                                  #{ids -ANAU$bmvAmthP7L7xwpYA}#))))))))
+                  (#{v-reverse -ANAU$bmvAmthP7L7xwpOH}#
+                    (lambda (#{x -ANAU$bmvAmthP7L7xwpYB}#)
                       (letrec*
-                        ((#{loop _hoQGWMnyQPAh3k2jhWJdj}#
-                           (lambda (#{r _hoQGWMnyQPAh3k2jhWJez}#
-                                    #{x _hoQGWMnyQPAh3k2jhWJe0}#)
-                             (if (not (pair? #{x _hoQGWMnyQPAh3k2jhWJe0}#))
+                        ((#{loop -ANAU$bmvAmthP7L7xwpYC}#
+                           (lambda (#{r -ANAU$bmvAmthP7L7xwpZS}#
+                                    #{x -ANAU$bmvAmthP7L7xwpZT}#)
+                             (if (not (pair? #{x -ANAU$bmvAmthP7L7xwpZT}#))
                                (values
-                                 #{r _hoQGWMnyQPAh3k2jhWJez}#
-                                 #{x _hoQGWMnyQPAh3k2jhWJe0}#)
-                               (#{loop _hoQGWMnyQPAh3k2jhWJdj}#
-                                 (cons (car #{x _hoQGWMnyQPAh3k2jhWJe0}#)
-                                       #{r _hoQGWMnyQPAh3k2jhWJez}#)
-                                 (cdr #{x _hoQGWMnyQPAh3k2jhWJe0}#))))))
-                        (#{loop _hoQGWMnyQPAh3k2jhWJdj}#
+                                 #{r -ANAU$bmvAmthP7L7xwpZS}#
+                                 #{x -ANAU$bmvAmthP7L7xwpZT}#)
+                               (#{loop -ANAU$bmvAmthP7L7xwpYC}#
+                                 (cons (car #{x -ANAU$bmvAmthP7L7xwpZT}#)
+                                       #{r -ANAU$bmvAmthP7L7xwpZS}#)
+                                 (cdr #{x -ANAU$bmvAmthP7L7xwpZT}#))))))
+                        (#{loop -ANAU$bmvAmthP7L7xwpYC}#
                           '()
-                          #{x _hoQGWMnyQPAh3k2jhWJdi}#))))
-                  (#{cvt _hoQGWMnyQPAh3k2jhWJTp}#
-                    (lambda (#{p _hoQGWMnyQPAh3k2jhWJTs}#
-                             #{n _hoQGWMnyQPAh3k2jhWJTt}#
-                             #{ids _hoQGWMnyQPAh3k2jhWJTu}#)
-                      (if (if (symbol? #{p _hoQGWMnyQPAh3k2jhWJTs}#)
+                          #{x -ANAU$bmvAmthP7L7xwpYB}#))))
+                  (#{cvt -ANAU$bmvAmthP7L7xwpOI}#
+                    (lambda (#{p -ANAU$bmvAmthP7L7xwpOL}#
+                             #{n -ANAU$bmvAmthP7L7xwpOM}#
+                             #{ids -ANAU$bmvAmthP7L7xwpON}#)
+                      (if (if (symbol? #{p -ANAU$bmvAmthP7L7xwpOL}#)
                             #t
-                            (if (if (vector? #{p _hoQGWMnyQPAh3k2jhWJTs}#)
+                            (if (if (vector? #{p -ANAU$bmvAmthP7L7xwpOL}#)
                                   (if (= (vector-length
-                                           #{p _hoQGWMnyQPAh3k2jhWJTs}#)
+                                           #{p -ANAU$bmvAmthP7L7xwpOL}#)
                                          4)
                                     (eq? (vector-ref
-                                           #{p _hoQGWMnyQPAh3k2jhWJTs}#
+                                           #{p -ANAU$bmvAmthP7L7xwpOL}#
                                            0)
                                          'syntax-object)
                                     #f)
                                   #f)
                               (symbol?
-                                (vector-ref #{p _hoQGWMnyQPAh3k2jhWJTs}# 1))
+                                (vector-ref #{p -ANAU$bmvAmthP7L7xwpOL}# 1))
                               #f))
-                        (if (#{bound-id-member? _hoQGWMnyQPAh3k2jhWHTd}#
-                              #{p _hoQGWMnyQPAh3k2jhWJTs}#
-                              #{keys _hoQGWMnyQPAh3k2jhWJTm}#)
+                        (if (#{bound-id-member? -ANAU$bmvAmthP7L7xwnN8}#
+                              #{p -ANAU$bmvAmthP7L7xwpOL}#
+                              #{keys -ANAU$bmvAmthP7L7xwpOF}#)
                           (values
-                            (vector 'free-id #{p _hoQGWMnyQPAh3k2jhWJTs}#)
-                            #{ids _hoQGWMnyQPAh3k2jhWJTu}#)
+                            (vector 'free-id #{p -ANAU$bmvAmthP7L7xwpOL}#)
+                            #{ids -ANAU$bmvAmthP7L7xwpON}#)
                           (if (if (eq? (if (if (vector?
-                                                 #{p _hoQGWMnyQPAh3k2jhWJTs}#)
+                                                 #{p -ANAU$bmvAmthP7L7xwpOL}#)
                                              (if (= (vector-length
-                                                      #{p _hoQGWMnyQPAh3k2jhWJTs}#)
+                                                      #{p -ANAU$bmvAmthP7L7xwpOL}#)
                                                     4)
                                                (eq? (vector-ref
-                                                      #{p _hoQGWMnyQPAh3k2jhWJTs}#
+                                                      #{p -ANAU$bmvAmthP7L7xwpOL}#
                                                       0)
                                                     'syntax-object)
                                                #f)
                                              #f)
                                          (vector-ref
-                                           #{p _hoQGWMnyQPAh3k2jhWJTs}#
+                                           #{p -ANAU$bmvAmthP7L7xwpOL}#
                                            1)
-                                         #{p _hoQGWMnyQPAh3k2jhWJTs}#)
+                                         #{p -ANAU$bmvAmthP7L7xwpOL}#)
                                        (if (if (= (vector-length
                                                     '#(syntax-object
                                                        _
@@ -12301,15 +12279,15 @@
                                                         #(ribcage
                                                           #(p n ids)
                                                           #((top) (top) (top))
-                                                          #("2uh" "2ui" "2uj"))
+                                                          #("169" "16a" "16b"))
                                                         #(ribcage
                                                           (cvt v-reverse cvt*)
                                                           ((top) (top) (top))
-                                                          ("2u5" "2u4" "2u3"))
+                                                          ("15x" "15w" "15v"))
                                                         #(ribcage
                                                           #(pattern keys)
                                                           #((top) (top))
-                                                          #("2u1" "2u2"))
+                                                          #("15t" "15u"))
                                                         #(ribcage
                                                           (gen-syntax-case
                                                             gen-clause
@@ -12319,10 +12297,10 @@
                                                            (top)
                                                            (top)
                                                            (top))
-                                                          ("2u0"
-                                                           "2tz"
-                                                           "2ty"
-                                                           "2tx"))
+                                                          ("15s"
+                                                           "15r"
+                                                           "15q"
+                                                           "15p"))
                                                         #(ribcage
                                                           (lambda-var-list
                                                             gen-var
@@ -12604,152 +12582,152 @@
                                                            (top)
                                                            (top)
                                                            (top))
-                                                          ("1tt"
-                                                           "1ts"
-                                                           "1tr"
-                                                           "1tq"
-                                                           "1tp"
-                                                           "1to"
-                                                           "1tn"
-                                                           "1tm"
-                                                           "1tl"
-                                                           "1tk"
-                                                           "1tj"
-                                                           "1ti"
-                                                           "1th"
-                                                           "1tg"
-                                                           "1tf"
-                                                           "1te"
-                                                           "1td"
-                                                           "1tc"
-                                                           "1tb"
-                                                           "1ta"
-                                                           "1t9"
-                                                           "1t8"
-                                                           "1t7"
-                                                           "1t6"
-                                                           "1t5"
-                                                           "1t4"
-                                                           "1t3"
-                                                           "1t2"
-                                                           "1t1"
-                                                           "1t0"
-                                                           "1sz"
-                                                           "1sy"
-                                                           "1sx"
-                                                           "1sw"
-                                                           "1sv"
-                                                           "1su"
-                                                           "1st"
-                                                           "1ss"
-                                                           "1sr"
-                                                           "1sq"
-                                                           "1sp"
-                                                           "1so"
-                                                           "1sn"
-                                                           "1sm"
-                                                           "1sl"
-                                                           "1sk"
-                                                           "1sj"
-                                                           "1si"
-                                                           "1sh"
-                                                           "1sg"
-                                                           "1sf"
-                                                           "1se"
-                                                           "1sd"
-                                                           "1sc"
-                                                           "1sb"
-                                                           "1sa"
-                                                           "1s9"
-                                                           "1s8"
-                                                           "1s7"
-                                                           "1s6"
-                                                           "1s5"
-                                                           "1s4"
-                                                           "1s3"
-                                                           "1s2"
-                                                           "1s1"
-                                                           "1s0"
-                                                           "1rz"
-                                                           "1ry"
-                                                           "1rx"
-                                                           "1rw"
-                                                           "1rv"
-                                                           "1ru"
-                                                           "1rt"
-                                                           "1rs"
-                                                           "1rr"
-                                                           "1rq"
-                                                           "1rp"
-                                                           "1ro"
-                                                           "1rn"
-                                                           "1rm"
-                                                           "1rl"
-                                                           "1rk"
-                                                           "1rj"
-                                                           "1ri"
-                                                           "1rh"
-                                                           "1rg"
-                                                           "1rf"
-                                                           "1re"
-                                                           "1rd"
-                                                           "1rc"
-                                                           "1rb"
-                                                           "1ra"
-                                                           "1r9"
-                                                           "1r8"
-                                                           "1r7"
-                                                           "1r6"
-                                                           "1r5"
-                                                           "1r4"
-                                                           "1r3"
-                                                           "1r2"
-                                                           "1r1"
-                                                           "1r0"
-                                                           "1qz"
-                                                           "1qy"
-                                                           "1qx"
-                                                           "1qw"
-                                                           "1qv"
-                                                           "1qu"
-                                                           "1qt"
-                                                           "1qs"
-                                                           "1qr"
-                                                           "1qq"
-                                                           "1qp"
-                                                           "1qo"
-                                                           "1qn"
-                                                           "1qm"
-                                                           "1ql"
-                                                           "1qk"
-                                                           "1qj"
-                                                           "1qi"
-                                                           "1qh"
-                                                           "1qg"
-                                                           "1qf"
-                                                           "1qe"
-                                                           "1qd"
-                                                           "1qc"
-                                                           "1qb"
-                                                           "1qa"
-                                                           "1q9"
-                                                           "1q8"
-                                                           "1q7"
-                                                           "1q6"
-                                                           "1q5"
-                                                           "1q4"
-                                                           "1q3"
-                                                           "1q2"
-                                                           "1q1"
-                                                           "1q0"
-                                                           "1pz"
-                                                           "1py"))
+                                                          ("5l"
+                                                           "5k"
+                                                           "5j"
+                                                           "5i"
+                                                           "5h"
+                                                           "5g"
+                                                           "5f"
+                                                           "5e"
+                                                           "5d"
+                                                           "5c"
+                                                           "5b"
+                                                           "5a"
+                                                           "59"
+                                                           "58"
+                                                           "57"
+                                                           "56"
+                                                           "55"
+                                                           "54"
+                                                           "53"
+                                                           "52"
+                                                           "51"
+                                                           "50"
+                                                           "4z"
+                                                           "4y"
+                                                           "4x"
+                                                           "4w"
+                                                           "4v"
+                                                           "4u"
+                                                           "4t"
+                                                           "4s"
+                                                           "4r"
+                                                           "4q"
+                                                           "4p"
+                                                           "4o"
+                                                           "4n"
+                                                           "4m"
+                                                           "4l"
+                                                           "4k"
+                                                           "4j"
+                                                           "4i"
+                                                           "4h"
+                                                           "4g"
+                                                           "4f"
+                                                           "4e"
+                                                           "4d"
+                                                           "4c"
+                                                           "4b"
+                                                           "4a"
+                                                           "49"
+                                                           "48"
+                                                           "47"
+                                                           "46"
+                                                           "45"
+                                                           "44"
+                                                           "43"
+                                                           "42"
+                                                           "41"
+                                                           "40"
+                                                           "3z"
+                                                           "3y"
+                                                           "3x"
+                                                           "3w"
+                                                           "3v"
+                                                           "3u"
+                                                           "3t"
+                                                           "3s"
+                                                           "3r"
+                                                           "3q"
+                                                           "3p"
+                                                           "3o"
+                                                           "3n"
+                                                           "3m"
+                                                           "3l"
+                                                           "3k"
+                                                           "3j"
+                                                           "3i"
+                                                           "3h"
+                                                           "3g"
+                                                           "3f"
+                                                           "3e"
+                                                           "3d"
+                                                           "3c"
+                                                           "3b"
+                                                           "3a"
+                                                           "39"
+                                                           "38"
+                                                           "37"
+                                                           "36"
+                                                           "35"
+                                                           "34"
+                                                           "33"
+                                                           "32"
+                                                           "31"
+                                                           "30"
+                                                           "2z"
+                                                           "2y"
+                                                           "2x"
+                                                           "2w"
+                                                           "2v"
+                                                           "2u"
+                                                           "2t"
+                                                           "2s"
+                                                           "2r"
+                                                           "2q"
+                                                           "2p"
+                                                           "2o"
+                                                           "2n"
+                                                           "2m"
+                                                           "2l"
+                                                           "2k"
+                                                           "2j"
+                                                           "2i"
+                                                           "2h"
+                                                           "2g"
+                                                           "2f"
+                                                           "2e"
+                                                           "2d"
+                                                           "2c"
+                                                           "2b"
+                                                           "2a"
+                                                           "29"
+                                                           "28"
+                                                           "27"
+                                                           "26"
+                                                           "25"
+                                                           "24"
+                                                           "23"
+                                                           "22"
+                                                           "21"
+                                                           "20"
+                                                           "1z"
+                                                           "1y"
+                                                           "1x"
+                                                           "1w"
+                                                           "1v"
+                                                           "1u"
+                                                           "1t"
+                                                           "1s"
+                                                           "1r"
+                                                           "1q"))
                                                         #(ribcage
                                                           (define-structure
                                                             define-expansion-accessors
                                                             define-expansion-constructors)
                                                           ((top) (top) (top))
-                                                          ("1og" "1of" "1oe")))
+                                                          ("8" "7" "6")))
                                                        (hygiene guile)))
                                                   4)
                                              #t
@@ -12762,22 +12740,22 @@
                                              #(ribcage
                                                #(p n ids)
                                                #((top) (top) (top))
-                                               #("2uh" "2ui" "2uj"))
+                                               #("169" "16a" "16b"))
                                              #(ribcage
                                                (cvt v-reverse cvt*)
                                                ((top) (top) (top))
-                                               ("2u5" "2u4" "2u3"))
+                                               ("15x" "15w" "15v"))
                                              #(ribcage
                                                #(pattern keys)
                                                #((top) (top))
-                                               #("2u1" "2u2"))
+                                               #("15t" "15u"))
                                              #(ribcage
                                                (gen-syntax-case
                                                  gen-clause
                                                  build-dispatch-call
                                                  convert-pattern)
                                                ((top) (top) (top) (top))
-                                               ("2u0" "2tz" "2ty" "2tx"))
+                                               ("15s" "15r" "15q" "15p"))
                                              #(ribcage
                                                (lambda-var-list
                                                  gen-var
@@ -13059,157 +13037,157 @@
                                                 (top)
                                                 (top)
                                                 (top))
-                                               ("1tt"
-                                                "1ts"
-                                                "1tr"
-                                                "1tq"
-                                                "1tp"
-                                                "1to"
-                                                "1tn"
-                                                "1tm"
-                                                "1tl"
-                                                "1tk"
-                                                "1tj"
-                                                "1ti"
-                                                "1th"
-                                                "1tg"
-                                                "1tf"
-                                                "1te"
-                                                "1td"
-                                                "1tc"
-                                                "1tb"
-                                                "1ta"
-                                                "1t9"
-                                                "1t8"
-                                                "1t7"
-                                                "1t6"
-                                                "1t5"
-                                                "1t4"
-                                                "1t3"
-                                                "1t2"
-                                                "1t1"
-                                                "1t0"
-                                                "1sz"
-                                                "1sy"
-                                                "1sx"
-                                                "1sw"
-                                                "1sv"
-                                                "1su"
-                                                "1st"
-                                                "1ss"
-                                                "1sr"
-                                                "1sq"
-                                                "1sp"
-                                                "1so"
-                                                "1sn"
-                                                "1sm"
-                                                "1sl"
-                                                "1sk"
-                                                "1sj"
-                                                "1si"
-                                                "1sh"
-                                                "1sg"
-                                                "1sf"
-                                                "1se"
-                                                "1sd"
-                                                "1sc"
-                                                "1sb"
-                                                "1sa"
-                                                "1s9"
-                                                "1s8"
-                                                "1s7"
-                                                "1s6"
-                                                "1s5"
-                                                "1s4"
-                                                "1s3"
-                                                "1s2"
-                                                "1s1"
-                                                "1s0"
-                                                "1rz"
-                                                "1ry"
-                                                "1rx"
-                                                "1rw"
-                                                "1rv"
-                                                "1ru"
-                                                "1rt"
-                                                "1rs"
-                                                "1rr"
-                                                "1rq"
-                                                "1rp"
-                                                "1ro"
-                                                "1rn"
-                                                "1rm"
-                                                "1rl"
-                                                "1rk"
-                                                "1rj"
-                                                "1ri"
-                                                "1rh"
-                                                "1rg"
-                                                "1rf"
-                                                "1re"
-                                                "1rd"
-                                                "1rc"
-                                                "1rb"
-                                                "1ra"
-                                                "1r9"
-                                                "1r8"
-                                                "1r7"
-                                                "1r6"
-                                                "1r5"
-                                                "1r4"
-                                                "1r3"
-                                                "1r2"
-                                                "1r1"
-                                                "1r0"
-                                                "1qz"
-                                                "1qy"
-                                                "1qx"
-                                                "1qw"
-                                                "1qv"
-                                                "1qu"
-                                                "1qt"
-                                                "1qs"
-                                                "1qr"
-                                                "1qq"
-                                                "1qp"
-                                                "1qo"
-                                                "1qn"
-                                                "1qm"
-                                                "1ql"
-                                                "1qk"
-                                                "1qj"
-                                                "1qi"
-                                                "1qh"
-                                                "1qg"
-                                                "1qf"
-                                                "1qe"
-                                                "1qd"
-                                                "1qc"
-                                                "1qb"
-                                                "1qa"
-                                                "1q9"
-                                                "1q8"
-                                                "1q7"
-                                                "1q6"
-                                                "1q5"
-                                                "1q4"
-                                                "1q3"
-                                                "1q2"
-                                                "1q1"
-                                                "1q0"
-                                                "1pz"
-                                                "1py"))
+                                               ("5l"
+                                                "5k"
+                                                "5j"
+                                                "5i"
+                                                "5h"
+                                                "5g"
+                                                "5f"
+                                                "5e"
+                                                "5d"
+                                                "5c"
+                                                "5b"
+                                                "5a"
+                                                "59"
+                                                "58"
+                                                "57"
+                                                "56"
+                                                "55"
+                                                "54"
+                                                "53"
+                                                "52"
+                                                "51"
+                                                "50"
+                                                "4z"
+                                                "4y"
+                                                "4x"
+                                                "4w"
+                                                "4v"
+                                                "4u"
+                                                "4t"
+                                                "4s"
+                                                "4r"
+                                                "4q"
+                                                "4p"
+                                                "4o"
+                                                "4n"
+                                                "4m"
+                                                "4l"
+                                                "4k"
+                                                "4j"
+                                                "4i"
+                                                "4h"
+                                                "4g"
+                                                "4f"
+                                                "4e"
+                                                "4d"
+                                                "4c"
+                                                "4b"
+                                                "4a"
+                                                "49"
+                                                "48"
+                                                "47"
+                                                "46"
+                                                "45"
+                                                "44"
+                                                "43"
+                                                "42"
+                                                "41"
+                                                "40"
+                                                "3z"
+                                                "3y"
+                                                "3x"
+                                                "3w"
+                                                "3v"
+                                                "3u"
+                                                "3t"
+                                                "3s"
+                                                "3r"
+                                                "3q"
+                                                "3p"
+                                                "3o"
+                                                "3n"
+                                                "3m"
+                                                "3l"
+                                                "3k"
+                                                "3j"
+                                                "3i"
+                                                "3h"
+                                                "3g"
+                                                "3f"
+                                                "3e"
+                                                "3d"
+                                                "3c"
+                                                "3b"
+                                                "3a"
+                                                "39"
+                                                "38"
+                                                "37"
+                                                "36"
+                                                "35"
+                                                "34"
+                                                "33"
+                                                "32"
+                                                "31"
+                                                "30"
+                                                "2z"
+                                                "2y"
+                                                "2x"
+                                                "2w"
+                                                "2v"
+                                                "2u"
+                                                "2t"
+                                                "2s"
+                                                "2r"
+                                                "2q"
+                                                "2p"
+                                                "2o"
+                                                "2n"
+                                                "2m"
+                                                "2l"
+                                                "2k"
+                                                "2j"
+                                                "2i"
+                                                "2h"
+                                                "2g"
+                                                "2f"
+                                                "2e"
+                                                "2d"
+                                                "2c"
+                                                "2b"
+                                                "2a"
+                                                "29"
+                                                "28"
+                                                "27"
+                                                "26"
+                                                "25"
+                                                "24"
+                                                "23"
+                                                "22"
+                                                "21"
+                                                "20"
+                                                "1z"
+                                                "1y"
+                                                "1x"
+                                                "1w"
+                                                "1v"
+                                                "1u"
+                                                "1t"
+                                                "1s"
+                                                "1r"
+                                                "1q"))
                                              #(ribcage
                                                (define-structure
                                                  define-expansion-accessors
                                                  define-expansion-constructors)
                                                ((top) (top) (top))
-                                               ("1og" "1of" "1oe")))
+                                               ("8" "7" "6")))
                                             (hygiene guile))))
-                                (eq? (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                                       #{p _hoQGWMnyQPAh3k2jhWJTs}#
+                                (eq? (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                                       #{p -ANAU$bmvAmthP7L7xwpOL}#
                                        '(()))
-                                     (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
+                                     (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
                                        '#(syntax-object
                                           _
                                           ((top)
@@ -13217,22 +13195,22 @@
                                            #(ribcage
                                              #(p n ids)
                                              #((top) (top) (top))
-                                             #("2uh" "2ui" "2uj"))
+                                             #("169" "16a" "16b"))
                                            #(ribcage
                                              (cvt v-reverse cvt*)
                                              ((top) (top) (top))
-                                             ("2u5" "2u4" "2u3"))
+                                             ("15x" "15w" "15v"))
                                            #(ribcage
                                              #(pattern keys)
                                              #((top) (top))
-                                             #("2u1" "2u2"))
+                                             #("15t" "15u"))
                                            #(ribcage
                                              (gen-syntax-case
                                                gen-clause
                                                build-dispatch-call
                                                convert-pattern)
                                              ((top) (top) (top) (top))
-                                             ("2u0" "2tz" "2ty" "2tx"))
+                                             ("15s" "15r" "15q" "15p"))
                                            #(ribcage
                                              (lambda-var-list
                                                gen-var
@@ -13514,200 +13492,200 @@
                                               (top)
                                               (top)
                                               (top))
-                                             ("1tt"
-                                              "1ts"
-                                              "1tr"
-                                              "1tq"
-                                              "1tp"
-                                              "1to"
-                                              "1tn"
-                                              "1tm"
-                                              "1tl"
-                                              "1tk"
-                                              "1tj"
-                                              "1ti"
-                                              "1th"
-                                              "1tg"
-                                              "1tf"
-                                              "1te"
-                                              "1td"
-                                              "1tc"
-                                              "1tb"
-                                              "1ta"
-                                              "1t9"
-                                              "1t8"
-                                              "1t7"
-                                              "1t6"
-                                              "1t5"
-                                              "1t4"
-                                              "1t3"
-                                              "1t2"
-                                              "1t1"
-                                              "1t0"
-                                              "1sz"
-                                              "1sy"
-                                              "1sx"
-                                              "1sw"
-                                              "1sv"
-                                              "1su"
-                                              "1st"
-                                              "1ss"
-                                              "1sr"
-                                              "1sq"
-                                              "1sp"
-                                              "1so"
-                                              "1sn"
-                                              "1sm"
-                                              "1sl"
-                                              "1sk"
-                                              "1sj"
-                                              "1si"
-                                              "1sh"
-                                              "1sg"
-                                              "1sf"
-                                              "1se"
-                                              "1sd"
-                                              "1sc"
-                                              "1sb"
-                                              "1sa"
-                                              "1s9"
-                                              "1s8"
-                                              "1s7"
-                                              "1s6"
-                                              "1s5"
-                                              "1s4"
-                                              "1s3"
-                                              "1s2"
-                                              "1s1"
-                                              "1s0"
-                                              "1rz"
-                                              "1ry"
-                                              "1rx"
-                                              "1rw"
-                                              "1rv"
-                                              "1ru"
-                                              "1rt"
-                                              "1rs"
-                                              "1rr"
-                                              "1rq"
-                                              "1rp"
-                                              "1ro"
-                                              "1rn"
-                                              "1rm"
-                                              "1rl"
-                                              "1rk"
-                                              "1rj"
-                                              "1ri"
-                                              "1rh"
-                                              "1rg"
-                                              "1rf"
-                                              "1re"
-                                              "1rd"
-                                              "1rc"
-                                              "1rb"
-                                              "1ra"
-                                              "1r9"
-                                              "1r8"
-                                              "1r7"
-                                              "1r6"
-                                              "1r5"
-                                              "1r4"
-                                              "1r3"
-                                              "1r2"
-                                              "1r1"
-                                              "1r0"
-                                              "1qz"
-                                              "1qy"
-                                              "1qx"
-                                              "1qw"
-                                              "1qv"
-                                              "1qu"
-                                              "1qt"
-                                              "1qs"
-                                              "1qr"
-                                              "1qq"
-                                              "1qp"
-                                              "1qo"
-                                              "1qn"
-                                              "1qm"
-                                              "1ql"
-                                              "1qk"
-                                              "1qj"
-                                              "1qi"
-                                              "1qh"
-                                              "1qg"
-                                              "1qf"
-                                              "1qe"
-                                              "1qd"
-                                              "1qc"
-                                              "1qb"
-                                              "1qa"
-                                              "1q9"
-                                              "1q8"
-                                              "1q7"
-                                              "1q6"
-                                              "1q5"
-                                              "1q4"
-                                              "1q3"
-                                              "1q2"
-                                              "1q1"
-                                              "1q0"
-                                              "1pz"
-                                              "1py"))
+                                             ("5l"
+                                              "5k"
+                                              "5j"
+                                              "5i"
+                                              "5h"
+                                              "5g"
+                                              "5f"
+                                              "5e"
+                                              "5d"
+                                              "5c"
+                                              "5b"
+                                              "5a"
+                                              "59"
+                                              "58"
+                                              "57"
+                                              "56"
+                                              "55"
+                                              "54"
+                                              "53"
+                                              "52"
+                                              "51"
+                                              "50"
+                                              "4z"
+                                              "4y"
+                                              "4x"
+                                              "4w"
+                                              "4v"
+                                              "4u"
+                                              "4t"
+                                              "4s"
+                                              "4r"
+                                              "4q"
+                                              "4p"
+                                              "4o"
+                                              "4n"
+                                              "4m"
+                                              "4l"
+                                              "4k"
+                                              "4j"
+                                              "4i"
+                                              "4h"
+                                              "4g"
+                                              "4f"
+                                              "4e"
+                                              "4d"
+                                              "4c"
+                                              "4b"
+                                              "4a"
+                                              "49"
+                                              "48"
+                                              "47"
+                                              "46"
+                                              "45"
+                                              "44"
+                                              "43"
+                                              "42"
+                                              "41"
+                                              "40"
+                                              "3z"
+                                              "3y"
+                                              "3x"
+                                              "3w"
+                                              "3v"
+                                              "3u"
+                                              "3t"
+                                              "3s"
+                                              "3r"
+                                              "3q"
+                                              "3p"
+                                              "3o"
+                                              "3n"
+                                              "3m"
+                                              "3l"
+                                              "3k"
+                                              "3j"
+                                              "3i"
+                                              "3h"
+                                              "3g"
+                                              "3f"
+                                              "3e"
+                                              "3d"
+                                              "3c"
+                                              "3b"
+                                              "3a"
+                                              "39"
+                                              "38"
+                                              "37"
+                                              "36"
+                                              "35"
+                                              "34"
+                                              "33"
+                                              "32"
+                                              "31"
+                                              "30"
+                                              "2z"
+                                              "2y"
+                                              "2x"
+                                              "2w"
+                                              "2v"
+                                              "2u"
+                                              "2t"
+                                              "2s"
+                                              "2r"
+                                              "2q"
+                                              "2p"
+                                              "2o"
+                                              "2n"
+                                              "2m"
+                                              "2l"
+                                              "2k"
+                                              "2j"
+                                              "2i"
+                                              "2h"
+                                              "2g"
+                                              "2f"
+                                              "2e"
+                                              "2d"
+                                              "2c"
+                                              "2b"
+                                              "2a"
+                                              "29"
+                                              "28"
+                                              "27"
+                                              "26"
+                                              "25"
+                                              "24"
+                                              "23"
+                                              "22"
+                                              "21"
+                                              "20"
+                                              "1z"
+                                              "1y"
+                                              "1x"
+                                              "1w"
+                                              "1v"
+                                              "1u"
+                                              "1t"
+                                              "1s"
+                                              "1r"
+                                              "1q"))
                                            #(ribcage
                                              (define-structure
                                                define-expansion-accessors
                                                define-expansion-constructors)
                                              ((top) (top) (top))
-                                             ("1og" "1of" "1oe")))
+                                             ("8" "7" "6")))
                                           (hygiene guile))
                                        '(())))
                                 #f)
-                            (values '_ #{ids _hoQGWMnyQPAh3k2jhWJTu}#)
+                            (values '_ #{ids -ANAU$bmvAmthP7L7xwpON}#)
                             (values
                               'any
-                              (cons (cons #{p _hoQGWMnyQPAh3k2jhWJTs}#
-                                          #{n _hoQGWMnyQPAh3k2jhWJTt}#)
-                                    #{ids _hoQGWMnyQPAh3k2jhWJTu}#))))
-                        (let ((#{tmp _hoQGWMnyQPAh3k2jhWJYu}#
+                              (cons (cons #{p -ANAU$bmvAmthP7L7xwpOL}#
+                                          #{n -ANAU$bmvAmthP7L7xwpOM}#)
+                                    #{ids -ANAU$bmvAmthP7L7xwpON}#))))
+                        (let ((#{tmp -ANAU$bmvAmthP7L7xwpTN}#
                                 ($sc-dispatch
-                                  #{p _hoQGWMnyQPAh3k2jhWJTs}#
+                                  #{p -ANAU$bmvAmthP7L7xwpOL}#
                                   '(any any))))
-                          (if (if #{tmp _hoQGWMnyQPAh3k2jhWJYu}#
+                          (if (if #{tmp -ANAU$bmvAmthP7L7xwpTN}#
                                 (@apply
-                                  (lambda (#{x _hoQGWMnyQPAh3k2jhWJYy}#
-                                           #{dots _hoQGWMnyQPAh3k2jhWJYz}#)
+                                  (lambda (#{x -ANAU$bmvAmthP7L7xwpTR}#
+                                           #{dots -ANAU$bmvAmthP7L7xwpTS}#)
                                     (if (if (if (vector?
-                                                  #{dots _hoQGWMnyQPAh3k2jhWJYz}#)
+                                                  #{dots -ANAU$bmvAmthP7L7xwpTS}#)
                                               (if (= (vector-length
-                                                       #{dots _hoQGWMnyQPAh3k2jhWJYz}#)
+                                                       #{dots -ANAU$bmvAmthP7L7xwpTS}#)
                                                      4)
                                                 (eq? (vector-ref
-                                                       #{dots _hoQGWMnyQPAh3k2jhWJYz}#
+                                                       #{dots -ANAU$bmvAmthP7L7xwpTS}#
                                                        0)
                                                      'syntax-object)
                                                 #f)
                                               #f)
                                           (symbol?
                                             (vector-ref
-                                              #{dots _hoQGWMnyQPAh3k2jhWJYz}#
+                                              #{dots -ANAU$bmvAmthP7L7xwpTS}#
                                               1))
                                           #f)
                                       (if (eq? (if (if (vector?
-                                                         #{dots _hoQGWMnyQPAh3k2jhWJYz}#)
+                                                         #{dots -ANAU$bmvAmthP7L7xwpTS}#)
                                                      (if (= (vector-length
-                                                              #{dots _hoQGWMnyQPAh3k2jhWJYz}#)
+                                                              #{dots -ANAU$bmvAmthP7L7xwpTS}#)
                                                             4)
                                                        (eq? (vector-ref
-                                                              #{dots _hoQGWMnyQPAh3k2jhWJYz}#
+                                                              #{dots -ANAU$bmvAmthP7L7xwpTS}#
                                                               0)
                                                             'syntax-object)
                                                        #f)
                                                      #f)
                                                  (vector-ref
-                                                   #{dots _hoQGWMnyQPAh3k2jhWJYz}#
+                                                   #{dots -ANAU$bmvAmthP7L7xwpTS}#
                                                    1)
-                                                 #{dots _hoQGWMnyQPAh3k2jhWJYz}#)
+                                                 #{dots -ANAU$bmvAmthP7L7xwpTS}#)
                                                (if (if (= (vector-length
                                                             '#(syntax-object
                                                                ...
@@ -13723,7 +13701,7 @@
                                                                 #(ribcage
                                                                   #(x)
                                                                   #((top))
-                                                                  #("2de"))
+                                                                  #("p6"))
                                                                 #(ribcage
                                                                   (lambda-var-list
                                                                     gen-var
@@ -14005,146 +13983,146 @@
                                                                    (top)
                                                                    (top)
                                                                    (top))
-                                                                  ("1tt"
-                                                                   "1ts"
-                                                                   "1tr"
-                                                                   "1tq"
-                                                                   "1tp"
-                                                                   "1to"
-                                                                   "1tn"
-                                                                   "1tm"
-                                                                   "1tl"
-                                                                   "1tk"
-                                                                   "1tj"
-                                                                   "1ti"
-                                                                   "1th"
-                                                                   "1tg"
-                                                                   "1tf"
-                                                                   "1te"
-                                                                   "1td"
-                                                                   "1tc"
-                                                                   "1tb"
-                                                                   "1ta"
-                                                                   "1t9"
-                                                                   "1t8"
-                                                                   "1t7"
-                                                                   "1t6"
-                                                                   "1t5"
-                                                                   "1t4"
-                                                                   "1t3"
-                                                                   "1t2"
-                                                                   "1t1"
-                                                                   "1t0"
-                                                                   "1sz"
-                                                                   "1sy"
-                                                                   "1sx"
-                                                                   "1sw"
-                                                                   "1sv"
-                                                                   "1su"
-                                                                   "1st"
-                                                                   "1ss"
-                                                                   "1sr"
-                                                                   "1sq"
-                                                                   "1sp"
-                                                                   "1so"
-                                                                   "1sn"
-                                                                   "1sm"
-                                                                   "1sl"
-                                                                   "1sk"
-                                                                   "1sj"
-                                                                   "1si"
-                                                                   "1sh"
-                                                                   "1sg"
-                                                                   "1sf"
-                                                                   "1se"
-                                                                   "1sd"
-                                                                   "1sc"
-                                                                   "1sb"
-                                                                   "1sa"
-                                                                   "1s9"
-                                                                   "1s8"
-                                                                   "1s7"
-                                                                   "1s6"
-                                                                   "1s5"
-                                                                   "1s4"
-                                                                   "1s3"
-                                                                   "1s2"
-                                                                   "1s1"
-                                                                   "1s0"
-                                                                   "1rz"
-                                                                   "1ry"
-                                                                   "1rx"
-                                                                   "1rw"
-                                                                   "1rv"
-                                                                   "1ru"
-                                                                   "1rt"
-                                                                   "1rs"
-                                                                   "1rr"
-                                                                   "1rq"
-                                                                   "1rp"
-                                                                   "1ro"
-                                                                   "1rn"
-                                                                   "1rm"
-                                                                   "1rl"
-                                                                   "1rk"
-                                                                   "1rj"
-                                                                   "1ri"
-                                                                   "1rh"
-                                                                   "1rg"
-                                                                   "1rf"
-                                                                   "1re"
-                                                                   "1rd"
-                                                                   "1rc"
-                                                                   "1rb"
-                                                                   "1ra"
-                                                                   "1r9"
-                                                                   "1r8"
-                                                                   "1r7"
-                                                                   "1r6"
-                                                                   "1r5"
-                                                                   "1r4"
-                                                                   "1r3"
-                                                                   "1r2"
-                                                                   "1r1"
-                                                                   "1r0"
-                                                                   "1qz"
-                                                                   "1qy"
-                                                                   "1qx"
-                                                                   "1qw"
-                                                                   "1qv"
-                                                                   "1qu"
-                                                                   "1qt"
-                                                                   "1qs"
-                                                                   "1qr"
-                                                                   "1qq"
-                                                                   "1qp"
-                                                                   "1qo"
-                                                                   "1qn"
-                                                                   "1qm"
-                                                                   "1ql"
-                                                                   "1qk"
-                                                                   "1qj"
-                                                                   "1qi"
-                                                                   "1qh"
-                                                                   "1qg"
-                                                                   "1qf"
-                                                                   "1qe"
-                                                                   "1qd"
-                                                                   "1qc"
-                                                                   "1qb"
-                                                                   "1qa"
-                                                                   "1q9"
-                                                                   "1q8"
-                                                                   "1q7"
-                                                                   "1q6"
-                                                                   "1q5"
-                                                                   "1q4"
-                                                                   "1q3"
-                                                                   "1q2"
-                                                                   "1q1"
-                                                                   "1q0"
-                                                                   "1pz"
-                                                                   "1py"))
+                                                                  ("5l"
+                                                                   "5k"
+                                                                   "5j"
+                                                                   "5i"
+                                                                   "5h"
+                                                                   "5g"
+                                                                   "5f"
+                                                                   "5e"
+                                                                   "5d"
+                                                                   "5c"
+                                                                   "5b"
+                                                                   "5a"
+                                                                   "59"
+                                                                   "58"
+                                                                   "57"
+                                                                   "56"
+                                                                   "55"
+                                                                   "54"
+                                                                   "53"
+                                                                   "52"
+                                                                   "51"
+                                                                   "50"
+                                                                   "4z"
+                                                                   "4y"
+                                                                   "4x"
+                                                                   "4w"
+                                                                   "4v"
+                                                                   "4u"
+                                                                   "4t"
+                                                                   "4s"
+                                                                   "4r"
+                                                                   "4q"
+                                                                   "4p"
+                                                                   "4o"
+                                                                   "4n"
+                                                                   "4m"
+                                                                   "4l"
+                                                                   "4k"
+                                                                   "4j"
+                                                                   "4i"
+                                                                   "4h"
+                                                                   "4g"
+                                                                   "4f"
+                                                                   "4e"
+                                                                   "4d"
+                                                                   "4c"
+                                                                   "4b"
+                                                                   "4a"
+                                                                   "49"
+                                                                   "48"
+                                                                   "47"
+                                                                   "46"
+                                                                   "45"
+                                                                   "44"
+                                                                   "43"
+                                                                   "42"
+                                                                   "41"
+                                                                   "40"
+                                                                   "3z"
+                                                                   "3y"
+                                                                   "3x"
+                                                                   "3w"
+                                                                   "3v"
+                                                                   "3u"
+                                                                   "3t"
+                                                                   "3s"
+                                                                   "3r"
+                                                                   "3q"
+                                                                   "3p"
+                                                                   "3o"
+                                                                   "3n"
+                                                                   "3m"
+                                                                   "3l"
+                                                                   "3k"
+                                                                   "3j"
+                                                                   "3i"
+                                                                   "3h"
+                                                                   "3g"
+                                                                   "3f"
+                                                                   "3e"
+                                                                   "3d"
+                                                                   "3c"
+                                                                   "3b"
+                                                                   "3a"
+                                                                   "39"
+                                                                   "38"
+                                                                   "37"
+                                                                   "36"
+                                                                   "35"
+                                                                   "34"
+                                                                   "33"
+                                                                   "32"
+                                                                   "31"
+                                                                   "30"
+                                                                   "2z"
+                                                                   "2y"
+                                                                   "2x"
+                                                                   "2w"
+                                                                   "2v"
+                                                                   "2u"
+                                                                   "2t"
+                                                                   "2s"
+                                                                   "2r"
+                                                                   "2q"
+                                                                   "2p"
+                                                                   "2o"
+                                                                   "2n"
+                                                                   "2m"
+                                                                   "2l"
+                                                                   "2k"
+                                                                   "2j"
+                                                                   "2i"
+                                                                   "2h"
+                                                                   "2g"
+                                                                   "2f"
+                                                                   "2e"
+                                                                   "2d"
+                                                                   "2c"
+                                                                   "2b"
+                                                                   "2a"
+                                                                   "29"
+                                                                   "28"
+                                                                   "27"
+                                                                   "26"
+                                                                   "25"
+                                                                   "24"
+                                                                   "23"
+                                                                   "22"
+                                                                   "21"
+                                                                   "20"
+                                                                   "1z"
+                                                                   "1y"
+                                                                   "1x"
+                                                                   "1w"
+                                                                   "1v"
+                                                                   "1u"
+                                                                   "1t"
+                                                                   "1s"
+                                                                   "1r"
+                                                                   "1q"))
                                                                 #(ribcage
                                                                   (define-structure
                                                                     define-expansion-accessors
@@ -14152,9 +14130,9 @@
                                                                   ((top)
                                                                    (top)
                                                                    (top))
-                                                                  ("1og"
-                                                                   "1of"
-                                                                   "1oe")))
+                                                                  ("8"
+                                                                   "7"
+                                                                   "6")))
                                                                (hygiene
                                                                  guile)))
                                                           4)
@@ -14169,7 +14147,7 @@
                                                      #(ribcage
                                                        #(x)
                                                        #((top))
-                                                       #("2de"))
+                                                       #("p6"))
                                                      #(ribcage
                                                        (lambda-var-list
                                                          gen-var
@@ -14451,157 +14429,157 @@
                                                         (top)
                                                         (top)
                                                         (top))
-                                                       ("1tt"
-                                                        "1ts"
-                                                        "1tr"
-                                                        "1tq"
-                                                        "1tp"
-                                                        "1to"
-                                                        "1tn"
-                                                        "1tm"
-                                                        "1tl"
-                                                        "1tk"
-                                                        "1tj"
-                                                        "1ti"
-                                                        "1th"
-                                                        "1tg"
-                                                        "1tf"
-                                                        "1te"
-                                                        "1td"
-                                                        "1tc"
-                                                        "1tb"
-                                                        "1ta"
-                                                        "1t9"
-                                                        "1t8"
-                                                        "1t7"
-                                                        "1t6"
-                                                        "1t5"
-                                                        "1t4"
-                                                        "1t3"
-                                                        "1t2"
-                                                        "1t1"
-                                                        "1t0"
-                                                        "1sz"
-                                                        "1sy"
-                                                        "1sx"
-                                                        "1sw"
-                                                        "1sv"
-                                                        "1su"
-                                                        "1st"
-                                                        "1ss"
-                                                        "1sr"
-                                                        "1sq"
-                                                        "1sp"
-                                                        "1so"
-                                                        "1sn"
-                                                        "1sm"
-                                                        "1sl"
-                                                        "1sk"
-                                                        "1sj"
-                                                        "1si"
-                                                        "1sh"
-                                                        "1sg"
-                                                        "1sf"
-                                                        "1se"
-                                                        "1sd"
-                                                        "1sc"
-                                                        "1sb"
-                                                        "1sa"
-                                                        "1s9"
-                                                        "1s8"
-                                                        "1s7"
-                                                        "1s6"
-                                                        "1s5"
-                                                        "1s4"
-                                                        "1s3"
-                                                        "1s2"
-                                                        "1s1"
-                                                        "1s0"
-                                                        "1rz"
-                                                        "1ry"
-                                                        "1rx"
-                                                        "1rw"
-                                                        "1rv"
-                                                        "1ru"
-                                                        "1rt"
-                                                        "1rs"
-                                                        "1rr"
-                                                        "1rq"
-                                                        "1rp"
-                                                        "1ro"
-                                                        "1rn"
-                                                        "1rm"
-                                                        "1rl"
-                                                        "1rk"
-                                                        "1rj"
-                                                        "1ri"
-                                                        "1rh"
-                                                        "1rg"
-                                                        "1rf"
-                                                        "1re"
-                                                        "1rd"
-                                                        "1rc"
-                                                        "1rb"
-                                                        "1ra"
-                                                        "1r9"
-                                                        "1r8"
-                                                        "1r7"
-                                                        "1r6"
-                                                        "1r5"
-                                                        "1r4"
-                                                        "1r3"
-                                                        "1r2"
-                                                        "1r1"
-                                                        "1r0"
-                                                        "1qz"
-                                                        "1qy"
-                                                        "1qx"
-                                                        "1qw"
-                                                        "1qv"
-                                                        "1qu"
-                                                        "1qt"
-                                                        "1qs"
-                                                        "1qr"
-                                                        "1qq"
-                                                        "1qp"
-                                                        "1qo"
-                                                        "1qn"
-                                                        "1qm"
-                                                        "1ql"
-                                                        "1qk"
-                                                        "1qj"
-                                                        "1qi"
-                                                        "1qh"
-                                                        "1qg"
-                                                        "1qf"
-                                                        "1qe"
-                                                        "1qd"
-                                                        "1qc"
-                                                        "1qb"
-                                                        "1qa"
-                                                        "1q9"
-                                                        "1q8"
-                                                        "1q7"
-                                                        "1q6"
-                                                        "1q5"
-                                                        "1q4"
-                                                        "1q3"
-                                                        "1q2"
-                                                        "1q1"
-                                                        "1q0"
-                                                        "1pz"
-                                                        "1py"))
+                                                       ("5l"
+                                                        "5k"
+                                                        "5j"
+                                                        "5i"
+                                                        "5h"
+                                                        "5g"
+                                                        "5f"
+                                                        "5e"
+                                                        "5d"
+                                                        "5c"
+                                                        "5b"
+                                                        "5a"
+                                                        "59"
+                                                        "58"
+                                                        "57"
+                                                        "56"
+                                                        "55"
+                                                        "54"
+                                                        "53"
+                                                        "52"
+                                                        "51"
+                                                        "50"
+                                                        "4z"
+                                                        "4y"
+                                                        "4x"
+                                                        "4w"
+                                                        "4v"
+                                                        "4u"
+                                                        "4t"
+                                                        "4s"
+                                                        "4r"
+                                                        "4q"
+                                                        "4p"
+                                                        "4o"
+                                                        "4n"
+                                                        "4m"
+                                                        "4l"
+                                                        "4k"
+                                                        "4j"
+                                                        "4i"
+                                                        "4h"
+                                                        "4g"
+                                                        "4f"
+                                                        "4e"
+                                                        "4d"
+                                                        "4c"
+                                                        "4b"
+                                                        "4a"
+                                                        "49"
+                                                        "48"
+                                                        "47"
+                                                        "46"
+                                                        "45"
+                                                        "44"
+                                                        "43"
+                                                        "42"
+                                                        "41"
+                                                        "40"
+                                                        "3z"
+                                                        "3y"
+                                                        "3x"
+                                                        "3w"
+                                                        "3v"
+                                                        "3u"
+                                                        "3t"
+                                                        "3s"
+                                                        "3r"
+                                                        "3q"
+                                                        "3p"
+                                                        "3o"
+                                                        "3n"
+                                                        "3m"
+                                                        "3l"
+                                                        "3k"
+                                                        "3j"
+                                                        "3i"
+                                                        "3h"
+                                                        "3g"
+                                                        "3f"
+                                                        "3e"
+                                                        "3d"
+                                                        "3c"
+                                                        "3b"
+                                                        "3a"
+                                                        "39"
+                                                        "38"
+                                                        "37"
+                                                        "36"
+                                                        "35"
+                                                        "34"
+                                                        "33"
+                                                        "32"
+                                                        "31"
+                                                        "30"
+                                                        "2z"
+                                                        "2y"
+                                                        "2x"
+                                                        "2w"
+                                                        "2v"
+                                                        "2u"
+                                                        "2t"
+                                                        "2s"
+                                                        "2r"
+                                                        "2q"
+                                                        "2p"
+                                                        "2o"
+                                                        "2n"
+                                                        "2m"
+                                                        "2l"
+                                                        "2k"
+                                                        "2j"
+                                                        "2i"
+                                                        "2h"
+                                                        "2g"
+                                                        "2f"
+                                                        "2e"
+                                                        "2d"
+                                                        "2c"
+                                                        "2b"
+                                                        "2a"
+                                                        "29"
+                                                        "28"
+                                                        "27"
+                                                        "26"
+                                                        "25"
+                                                        "24"
+                                                        "23"
+                                                        "22"
+                                                        "21"
+                                                        "20"
+                                                        "1z"
+                                                        "1y"
+                                                        "1x"
+                                                        "1w"
+                                                        "1v"
+                                                        "1u"
+                                                        "1t"
+                                                        "1s"
+                                                        "1r"
+                                                        "1q"))
                                                      #(ribcage
                                                        (define-structure
                                                          define-expansion-accessors
                                                          define-expansion-constructors)
                                                        ((top) (top) (top))
-                                                       ("1og" "1of" "1oe")))
+                                                       ("8" "7" "6")))
                                                     (hygiene guile))))
-                                        (eq? (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                                               #{dots _hoQGWMnyQPAh3k2jhWJYz}#
+                                        (eq? (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                                               #{dots -ANAU$bmvAmthP7L7xwpTS}#
                                                '(()))
-                                             (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
+                                             (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
                                                '#(syntax-object
                                                   ...
                                                   ((top)
@@ -14610,7 +14588,7 @@
                                                    #(ribcage
                                                      #(x)
                                                      #((top))
-                                                     #("2de"))
+                                                     #("p6"))
                                                    #(ribcage
                                                      (lambda-var-list
                                                        gen-var
@@ -14892,218 +14870,218 @@
                                                       (top)
                                                       (top)
                                                       (top))
-                                                     ("1tt"
-                                                      "1ts"
-                                                      "1tr"
-                                                      "1tq"
-                                                      "1tp"
-                                                      "1to"
-                                                      "1tn"
-                                                      "1tm"
-                                                      "1tl"
-                                                      "1tk"
-                                                      "1tj"
-                                                      "1ti"
-                                                      "1th"
-                                                      "1tg"
-                                                      "1tf"
-                                                      "1te"
-                                                      "1td"
-                                                      "1tc"
-                                                      "1tb"
-                                                      "1ta"
-                                                      "1t9"
-                                                      "1t8"
-                                                      "1t7"
-                                                      "1t6"
-                                                      "1t5"
-                                                      "1t4"
-                                                      "1t3"
-                                                      "1t2"
-                                                      "1t1"
-                                                      "1t0"
-                                                      "1sz"
-                                                      "1sy"
-                                                      "1sx"
-                                                      "1sw"
-                                                      "1sv"
-                                                      "1su"
-                                                      "1st"
-                                                      "1ss"
-                                                      "1sr"
-                                                      "1sq"
-                                                      "1sp"
-                                                      "1so"
-                                                      "1sn"
-                                                      "1sm"
-                                                      "1sl"
-                                                      "1sk"
-                                                      "1sj"
-                                                      "1si"
-                                                      "1sh"
-                                                      "1sg"
-                                                      "1sf"
-                                                      "1se"
-                                                      "1sd"
-                                                      "1sc"
-                                                      "1sb"
-                                                      "1sa"
-                                                      "1s9"
-                                                      "1s8"
-                                                      "1s7"
-                                                      "1s6"
-                                                      "1s5"
-                                                      "1s4"
-                                                      "1s3"
-                                                      "1s2"
-                                                      "1s1"
-                                                      "1s0"
-                                                      "1rz"
-                                                      "1ry"
-                                                      "1rx"
-                                                      "1rw"
-                                                      "1rv"
-                                                      "1ru"
-                                                      "1rt"
-                                                      "1rs"
-                                                      "1rr"
-                                                      "1rq"
-                                                      "1rp"
-                                                      "1ro"
-                                                      "1rn"
-                                                      "1rm"
-                                                      "1rl"
-                                                      "1rk"
-                                                      "1rj"
-                                                      "1ri"
-                                                      "1rh"
-                                                      "1rg"
-                                                      "1rf"
-                                                      "1re"
-                                                      "1rd"
-                                                      "1rc"
-                                                      "1rb"
-                                                      "1ra"
-                                                      "1r9"
-                                                      "1r8"
-                                                      "1r7"
-                                                      "1r6"
-                                                      "1r5"
-                                                      "1r4"
-                                                      "1r3"
-                                                      "1r2"
-                                                      "1r1"
-                                                      "1r0"
-                                                      "1qz"
-                                                      "1qy"
-                                                      "1qx"
-                                                      "1qw"
-                                                      "1qv"
-                                                      "1qu"
-                                                      "1qt"
-                                                      "1qs"
-                                                      "1qr"
-                                                      "1qq"
-                                                      "1qp"
-                                                      "1qo"
-                                                      "1qn"
-                                                      "1qm"
-                                                      "1ql"
-                                                      "1qk"
-                                                      "1qj"
-                                                      "1qi"
-                                                      "1qh"
-                                                      "1qg"
-                                                      "1qf"
-                                                      "1qe"
-                                                      "1qd"
-                                                      "1qc"
-                                                      "1qb"
-                                                      "1qa"
-                                                      "1q9"
-                                                      "1q8"
-                                                      "1q7"
-                                                      "1q6"
-                                                      "1q5"
-                                                      "1q4"
-                                                      "1q3"
-                                                      "1q2"
-                                                      "1q1"
-                                                      "1q0"
-                                                      "1pz"
-                                                      "1py"))
+                                                     ("5l"
+                                                      "5k"
+                                                      "5j"
+                                                      "5i"
+                                                      "5h"
+                                                      "5g"
+                                                      "5f"
+                                                      "5e"
+                                                      "5d"
+                                                      "5c"
+                                                      "5b"
+                                                      "5a"
+                                                      "59"
+                                                      "58"
+                                                      "57"
+                                                      "56"
+                                                      "55"
+                                                      "54"
+                                                      "53"
+                                                      "52"
+                                                      "51"
+                                                      "50"
+                                                      "4z"
+                                                      "4y"
+                                                      "4x"
+                                                      "4w"
+                                                      "4v"
+                                                      "4u"
+                                                      "4t"
+                                                      "4s"
+                                                      "4r"
+                                                      "4q"
+                                                      "4p"
+                                                      "4o"
+                                                      "4n"
+                                                      "4m"
+                                                      "4l"
+                                                      "4k"
+                                                      "4j"
+                                                      "4i"
+                                                      "4h"
+                                                      "4g"
+                                                      "4f"
+                                                      "4e"
+                                                      "4d"
+                                                      "4c"
+                                                      "4b"
+                                                      "4a"
+                                                      "49"
+                                                      "48"
+                                                      "47"
+                                                      "46"
+                                                      "45"
+                                                      "44"
+                                                      "43"
+                                                      "42"
+                                                      "41"
+                                                      "40"
+                                                      "3z"
+                                                      "3y"
+                                                      "3x"
+                                                      "3w"
+                                                      "3v"
+                                                      "3u"
+                                                      "3t"
+                                                      "3s"
+                                                      "3r"
+                                                      "3q"
+                                                      "3p"
+                                                      "3o"
+                                                      "3n"
+                                                      "3m"
+                                                      "3l"
+                                                      "3k"
+                                                      "3j"
+                                                      "3i"
+                                                      "3h"
+                                                      "3g"
+                                                      "3f"
+                                                      "3e"
+                                                      "3d"
+                                                      "3c"
+                                                      "3b"
+                                                      "3a"
+                                                      "39"
+                                                      "38"
+                                                      "37"
+                                                      "36"
+                                                      "35"
+                                                      "34"
+                                                      "33"
+                                                      "32"
+                                                      "31"
+                                                      "30"
+                                                      "2z"
+                                                      "2y"
+                                                      "2x"
+                                                      "2w"
+                                                      "2v"
+                                                      "2u"
+                                                      "2t"
+                                                      "2s"
+                                                      "2r"
+                                                      "2q"
+                                                      "2p"
+                                                      "2o"
+                                                      "2n"
+                                                      "2m"
+                                                      "2l"
+                                                      "2k"
+                                                      "2j"
+                                                      "2i"
+                                                      "2h"
+                                                      "2g"
+                                                      "2f"
+                                                      "2e"
+                                                      "2d"
+                                                      "2c"
+                                                      "2b"
+                                                      "2a"
+                                                      "29"
+                                                      "28"
+                                                      "27"
+                                                      "26"
+                                                      "25"
+                                                      "24"
+                                                      "23"
+                                                      "22"
+                                                      "21"
+                                                      "20"
+                                                      "1z"
+                                                      "1y"
+                                                      "1x"
+                                                      "1w"
+                                                      "1v"
+                                                      "1u"
+                                                      "1t"
+                                                      "1s"
+                                                      "1r"
+                                                      "1q"))
                                                    #(ribcage
                                                      (define-structure
                                                        define-expansion-accessors
                                                        define-expansion-constructors)
                                                      ((top) (top) (top))
-                                                     ("1og" "1of" "1oe")))
+                                                     ("8" "7" "6")))
                                                   (hygiene guile))
                                                '(())))
                                         #f)
                                       #f))
-                                  #{tmp _hoQGWMnyQPAh3k2jhWJYu}#)
+                                  #{tmp -ANAU$bmvAmthP7L7xwpTN}#)
                                 #f)
                             (@apply
-                              (lambda (#{x _hoQGWMnyQPAh3k2jhWJaX}#
-                                       #{dots _hoQGWMnyQPAh3k2jhWJaY}#)
+                              (lambda (#{x -ANAU$bmvAmthP7L7xwpU2}#
+                                       #{dots -ANAU$bmvAmthP7L7xwpU3}#)
                                 (call-with-values
                                   (lambda ()
-                                    (#{cvt _hoQGWMnyQPAh3k2jhWJTp}#
-                                      #{x _hoQGWMnyQPAh3k2jhWJaX}#
-                                      (#{1+}# #{n _hoQGWMnyQPAh3k2jhWJTt}#)
-                                      #{ids _hoQGWMnyQPAh3k2jhWJTu}#))
-                                  (lambda (#{p _hoQGWMnyQPAh3k2jhWJaZ}#
-                                           #{ids _hoQGWMnyQPAh3k2jhWJaa}#)
+                                    (#{cvt -ANAU$bmvAmthP7L7xwpOI}#
+                                      #{x -ANAU$bmvAmthP7L7xwpU2}#
+                                      (#{1+}# #{n -ANAU$bmvAmthP7L7xwpOM}#)
+                                      #{ids -ANAU$bmvAmthP7L7xwpON}#))
+                                  (lambda (#{p -ANAU$bmvAmthP7L7xwpU4}#
+                                           #{ids -ANAU$bmvAmthP7L7xwpU5}#)
                                     (values
-                                      (if (eq? #{p _hoQGWMnyQPAh3k2jhWJaZ}#
+                                      (if (eq? #{p -ANAU$bmvAmthP7L7xwpU4}#
                                                'any)
                                         'each-any
                                         (vector
                                           'each
-                                          #{p _hoQGWMnyQPAh3k2jhWJaZ}#))
-                                      #{ids _hoQGWMnyQPAh3k2jhWJaa}#))))
-                              #{tmp _hoQGWMnyQPAh3k2jhWJYu}#)
-                            (let ((#{tmp _hoQGWMnyQPAh3k2jhWJab}#
+                                          #{p -ANAU$bmvAmthP7L7xwpU4}#))
+                                      #{ids -ANAU$bmvAmthP7L7xwpU5}#))))
+                              #{tmp -ANAU$bmvAmthP7L7xwpTN}#)
+                            (let ((#{tmp -ANAU$bmvAmthP7L7xwpU6}#
                                     ($sc-dispatch
-                                      #{p _hoQGWMnyQPAh3k2jhWJTs}#
+                                      #{p -ANAU$bmvAmthP7L7xwpOL}#
                                       '(any any . any))))
-                              (if (if #{tmp _hoQGWMnyQPAh3k2jhWJab}#
+                              (if (if #{tmp -ANAU$bmvAmthP7L7xwpU6}#
                                     (@apply
-                                      (lambda (#{x _hoQGWMnyQPAh3k2jhWJaf}#
-                                               #{dots _hoQGWMnyQPAh3k2jhWJag}#
-                                               #{ys _hoQGWMnyQPAh3k2jhWJah}#)
+                                      (lambda (#{x -ANAU$bmvAmthP7L7xwpU$}#
+                                               #{dots -ANAU$bmvAmthP7L7xwpU@}#
+                                               #{ys -ANAU$bmvAmthP7L7xwpVA}#)
                                         (if (if (if (vector?
-                                                      #{dots _hoQGWMnyQPAh3k2jhWJag}#)
+                                                      #{dots -ANAU$bmvAmthP7L7xwpU@}#)
                                                   (if (= (vector-length
-                                                           #{dots _hoQGWMnyQPAh3k2jhWJag}#)
+                                                           #{dots -ANAU$bmvAmthP7L7xwpU@}#)
                                                          4)
                                                     (eq? (vector-ref
-                                                           #{dots _hoQGWMnyQPAh3k2jhWJag}#
+                                                           #{dots -ANAU$bmvAmthP7L7xwpU@}#
                                                            0)
                                                          'syntax-object)
                                                     #f)
                                                   #f)
                                               (symbol?
                                                 (vector-ref
-                                                  #{dots _hoQGWMnyQPAh3k2jhWJag}#
+                                                  #{dots -ANAU$bmvAmthP7L7xwpU@}#
                                                   1))
                                               #f)
                                           (if (eq? (if (if (vector?
-                                                             #{dots _hoQGWMnyQPAh3k2jhWJag}#)
+                                                             #{dots -ANAU$bmvAmthP7L7xwpU@}#)
                                                          (if (= (vector-length
-                                                                  #{dots _hoQGWMnyQPAh3k2jhWJag}#)
+                                                                  #{dots -ANAU$bmvAmthP7L7xwpU@}#)
                                                                 4)
                                                            (eq? (vector-ref
-                                                                  #{dots _hoQGWMnyQPAh3k2jhWJag}#
+                                                                  #{dots -ANAU$bmvAmthP7L7xwpU@}#
                                                                   0)
                                                                 'syntax-object)
                                                            #f)
                                                          #f)
                                                      (vector-ref
-                                                       #{dots _hoQGWMnyQPAh3k2jhWJag}#
+                                                       #{dots -ANAU$bmvAmthP7L7xwpU@}#
                                                        1)
-                                                     #{dots _hoQGWMnyQPAh3k2jhWJag}#)
+                                                     #{dots -ANAU$bmvAmthP7L7xwpU@}#)
                                                    (if (if (= (vector-length
                                                                 '#(syntax-object
                                                                    ...
@@ -15119,7 +15097,7 @@
                                                                     #(ribcage
                                                                       #(x)
                                                                       #((top))
-                                                                      #("2de"))
+                                                                      #("p6"))
                                                                     #(ribcage
                                                                       (lambda-var-list
                                                                         gen-var
@@ -15401,146 +15379,146 @@
                                                                        (top)
                                                                        (top)
                                                                        (top))
-                                                                      ("1tt"
-                                                                       "1ts"
-                                                                       "1tr"
-                                                                       "1tq"
-                                                                       "1tp"
-                                                                       "1to"
-                                                                       "1tn"
-                                                                       "1tm"
-                                                                       "1tl"
-                                                                       "1tk"
-                                                                       "1tj"
-                                                                       "1ti"
-                                                                       "1th"
-                                                                       "1tg"
-                                                                       "1tf"
-                                                                       "1te"
-                                                                       "1td"
-                                                                       "1tc"
-                                                                       "1tb"
-                                                                       "1ta"
-                                                                       "1t9"
-                                                                       "1t8"
-                                                                       "1t7"
-                                                                       "1t6"
-                                                                       "1t5"
-                                                                       "1t4"
-                                                                       "1t3"
-                                                                       "1t2"
-                                                                       "1t1"
-                                                                       "1t0"
-                                                                       "1sz"
-                                                                       "1sy"
-                                                                       "1sx"
-                                                                       "1sw"
-                                                                       "1sv"
-                                                                       "1su"
-                                                                       "1st"
-                                                                       "1ss"
-                                                                       "1sr"
-                                                                       "1sq"
-                                                                       "1sp"
-                                                                       "1so"
-                                                                       "1sn"
-                                                                       "1sm"
-                                                                       "1sl"
-                                                                       "1sk"
-                                                                       "1sj"
-                                                                       "1si"
-                                                                       "1sh"
-                                                                       "1sg"
-                                                                       "1sf"
-                                                                       "1se"
-                                                                       "1sd"
-                                                                       "1sc"
-                                                                       "1sb"
-                                                                       "1sa"
-                                                                       "1s9"
-                                                                       "1s8"
-                                                                       "1s7"
-                                                                       "1s6"
-                                                                       "1s5"
-                                                                       "1s4"
-                                                                       "1s3"
-                                                                       "1s2"
-                                                                       "1s1"
-                                                                       "1s0"
-                                                                       "1rz"
-                                                                       "1ry"
-                                                                       "1rx"
-                                                                       "1rw"
-                                                                       "1rv"
-                                                                       "1ru"
-                                                                       "1rt"
-                                                                       "1rs"
-                                                                       "1rr"
-                                                                       "1rq"
-                                                                       "1rp"
-                                                                       "1ro"
-                                                                       "1rn"
-                                                                       "1rm"
-                                                                       "1rl"
-                                                                       "1rk"
-                                                                       "1rj"
-                                                                       "1ri"
-                                                                       "1rh"
-                                                                       "1rg"
-                                                                       "1rf"
-                                                                       "1re"
-                                                                       "1rd"
-                                                                       "1rc"
-                                                                       "1rb"
-                                                                       "1ra"
-                                                                       "1r9"
-                                                                       "1r8"
-                                                                       "1r7"
-                                                                       "1r6"
-                                                                       "1r5"
-                                                                       "1r4"
-                                                                       "1r3"
-                                                                       "1r2"
-                                                                       "1r1"
-                                                                       "1r0"
-                                                                       "1qz"
-                                                                       "1qy"
-                                                                       "1qx"
-                                                                       "1qw"
-                                                                       "1qv"
-                                                                       "1qu"
-                                                                       "1qt"
-                                                                       "1qs"
-                                                                       "1qr"
-                                                                       "1qq"
-                                                                       "1qp"
-                                                                       "1qo"
-                                                                       "1qn"
-                                                                       "1qm"
-                                                                       "1ql"
-                                                                       "1qk"
-                                                                       "1qj"
-                                                                       "1qi"
-                                                                       "1qh"
-                                                                       "1qg"
-                                                                       "1qf"
-                                                                       "1qe"
-                                                                       "1qd"
-                                                                       "1qc"
-                                                                       "1qb"
-                                                                       "1qa"
-                                                                       "1q9"
-                                                                       "1q8"
-                                                                       "1q7"
-                                                                       "1q6"
-                                                                       "1q5"
-                                                                       "1q4"
-                                                                       "1q3"
-                                                                       "1q2"
-                                                                       "1q1"
-                                                                       "1q0"
-                                                                       "1pz"
-                                                                       "1py"))
+                                                                      ("5l"
+                                                                       "5k"
+                                                                       "5j"
+                                                                       "5i"
+                                                                       "5h"
+                                                                       "5g"
+                                                                       "5f"
+                                                                       "5e"
+                                                                       "5d"
+                                                                       "5c"
+                                                                       "5b"
+                                                                       "5a"
+                                                                       "59"
+                                                                       "58"
+                                                                       "57"
+                                                                       "56"
+                                                                       "55"
+                                                                       "54"
+                                                                       "53"
+                                                                       "52"
+                                                                       "51"
+                                                                       "50"
+                                                                       "4z"
+                                                                       "4y"
+                                                                       "4x"
+                                                                       "4w"
+                                                                       "4v"
+                                                                       "4u"
+                                                                       "4t"
+                                                                       "4s"
+                                                                       "4r"
+                                                                       "4q"
+                                                                       "4p"
+                                                                       "4o"
+                                                                       "4n"
+                                                                       "4m"
+                                                                       "4l"
+                                                                       "4k"
+                                                                       "4j"
+                                                                       "4i"
+                                                                       "4h"
+                                                                       "4g"
+                                                                       "4f"
+                                                                       "4e"
+                                                                       "4d"
+                                                                       "4c"
+                                                                       "4b"
+                                                                       "4a"
+                                                                       "49"
+                                                                       "48"
+                                                                       "47"
+                                                                       "46"
+                                                                       "45"
+                                                                       "44"
+                                                                       "43"
+                                                                       "42"
+                                                                       "41"
+                                                                       "40"
+                                                                       "3z"
+                                                                       "3y"
+                                                                       "3x"
+                                                                       "3w"
+                                                                       "3v"
+                                                                       "3u"
+                                                                       "3t"
+                                                                       "3s"
+                                                                       "3r"
+                                                                       "3q"
+                                                                       "3p"
+                                                                       "3o"
+                                                                       "3n"
+                                                                       "3m"
+                                                                       "3l"
+                                                                       "3k"
+                                                                       "3j"
+                                                                       "3i"
+                                                                       "3h"
+                                                                       "3g"
+                                                                       "3f"
+                                                                       "3e"
+                                                                       "3d"
+                                                                       "3c"
+                                                                       "3b"
+                                                                       "3a"
+                                                                       "39"
+                                                                       "38"
+                                                                       "37"
+                                                                       "36"
+                                                                       "35"
+                                                                       "34"
+                                                                       "33"
+                                                                       "32"
+                                                                       "31"
+                                                                       "30"
+                                                                       "2z"
+                                                                       "2y"
+                                                                       "2x"
+                                                                       "2w"
+                                                                       "2v"
+                                                                       "2u"
+                                                                       "2t"
+                                                                       "2s"
+                                                                       "2r"
+                                                                       "2q"
+                                                                       "2p"
+                                                                       "2o"
+                                                                       "2n"
+                                                                       "2m"
+                                                                       "2l"
+                                                                       "2k"
+                                                                       "2j"
+                                                                       "2i"
+                                                                       "2h"
+                                                                       "2g"
+                                                                       "2f"
+                                                                       "2e"
+                                                                       "2d"
+                                                                       "2c"
+                                                                       "2b"
+                                                                       "2a"
+                                                                       "29"
+                                                                       "28"
+                                                                       "27"
+                                                                       "26"
+                                                                       "25"
+                                                                       "24"
+                                                                       "23"
+                                                                       "22"
+                                                                       "21"
+                                                                       "20"
+                                                                       "1z"
+                                                                       "1y"
+                                                                       "1x"
+                                                                       "1w"
+                                                                       "1v"
+                                                                       "1u"
+                                                                       "1t"
+                                                                       "1s"
+                                                                       "1r"
+                                                                       "1q"))
                                                                     #(ribcage
                                                                       (define-structure
                                                                         define-expansion-accessors
@@ -15548,9 +15526,9 @@
                                                                       ((top)
                                                                        (top)
                                                                        (top))
-                                                                      ("1og"
-                                                                       "1of"
-                                                                       "1oe")))
+                                                                      ("8"
+                                                                       "7"
+                                                                       "6")))
                                                                    (hygiene
                                                                      guile)))
                                                               4)
@@ -15565,7 +15543,7 @@
                                                          #(ribcage
                                                            #(x)
                                                            #((top))
-                                                           #("2de"))
+                                                           #("p6"))
                                                          #(ribcage
                                                            (lambda-var-list
                                                              gen-var
@@ -15847,159 +15825,157 @@
                                                             (top)
                                                             (top)
                                                             (top))
-                                                           ("1tt"
-                                                            "1ts"
-                                                            "1tr"
-                                                            "1tq"
-                                                            "1tp"
-                                                            "1to"
-                                                            "1tn"
-                                                            "1tm"
-                                                            "1tl"
-                                                            "1tk"
-                                                            "1tj"
-                                                            "1ti"
-                                                            "1th"
-                                                            "1tg"
-                                                            "1tf"
-                                                            "1te"
-                                                            "1td"
-                                                            "1tc"
-                                                            "1tb"
-                                                            "1ta"
-                                                            "1t9"
-                                                            "1t8"
-                                                            "1t7"
-                                                            "1t6"
-                                                            "1t5"
-                                                            "1t4"
-                                                            "1t3"
-                                                            "1t2"
-                                                            "1t1"
-                                                            "1t0"
-                                                            "1sz"
-                                                            "1sy"
-                                                            "1sx"
-                                                            "1sw"
-                                                            "1sv"
-                                                            "1su"
-                                                            "1st"
-                                                            "1ss"
-                                                            "1sr"
-                                                            "1sq"
-                                                            "1sp"
-                                                            "1so"
-                                                            "1sn"
-                                                            "1sm"
-                                                            "1sl"
-                                                            "1sk"
-                                                            "1sj"
-                                                            "1si"
-                                                            "1sh"
-                                                            "1sg"
-                                                            "1sf"
-                                                            "1se"
-                                                            "1sd"
-                                                            "1sc"
-                                                            "1sb"
-                                                            "1sa"
-                                                            "1s9"
-                                                            "1s8"
-                                                            "1s7"
-                                                            "1s6"
-                                                            "1s5"
-                                                            "1s4"
-                                                            "1s3"
-                                                            "1s2"
-                                                            "1s1"
-                                                            "1s0"
-                                                            "1rz"
-                                                            "1ry"
-                                                            "1rx"
-                                                            "1rw"
-                                                            "1rv"
-                                                            "1ru"
-                                                            "1rt"
-                                                            "1rs"
-                                                            "1rr"
-                                                            "1rq"
-                                                            "1rp"
-                                                            "1ro"
-                                                            "1rn"
-                                                            "1rm"
-                                                            "1rl"
-                                                            "1rk"
-                                                            "1rj"
-                                                            "1ri"
-                                                            "1rh"
-                                                            "1rg"
-                                                            "1rf"
-                                                            "1re"
-                                                            "1rd"
-                                                            "1rc"
-                                                            "1rb"
-                                                            "1ra"
-                                                            "1r9"
-                                                            "1r8"
-                                                            "1r7"
-                                                            "1r6"
-                                                            "1r5"
-                                                            "1r4"
-                                                            "1r3"
-                                                            "1r2"
-                                                            "1r1"
-                                                            "1r0"
-                                                            "1qz"
-                                                            "1qy"
-                                                            "1qx"
-                                                            "1qw"
-                                                            "1qv"
-                                                            "1qu"
-                                                            "1qt"
-                                                            "1qs"
-                                                            "1qr"
-                                                            "1qq"
-                                                            "1qp"
-                                                            "1qo"
-                                                            "1qn"
-                                                            "1qm"
-                                                            "1ql"
-                                                            "1qk"
-                                                            "1qj"
-                                                            "1qi"
-                                                            "1qh"
-                                                            "1qg"
-                                                            "1qf"
-                                                            "1qe"
-                                                            "1qd"
-                                                            "1qc"
-                                                            "1qb"
-                                                            "1qa"
-                                                            "1q9"
-                                                            "1q8"
-                                                            "1q7"
-                                                            "1q6"
-                                                            "1q5"
-                                                            "1q4"
-                                                            "1q3"
-                                                            "1q2"
-                                                            "1q1"
-                                                            "1q0"
-                                                            "1pz"
-                                                            "1py"))
+                                                           ("5l"
+                                                            "5k"
+                                                            "5j"
+                                                            "5i"
+                                                            "5h"
+                                                            "5g"
+                                                            "5f"
+                                                            "5e"
+                                                            "5d"
+                                                            "5c"
+                                                            "5b"
+                                                            "5a"
+                                                            "59"
+                                                            "58"
+                                                            "57"
+                                                            "56"
+                                                            "55"
+                                                            "54"
+                                                            "53"
+                                                            "52"
+                                                            "51"
+                                                            "50"
+                                                            "4z"
+                                                            "4y"
+                                                            "4x"
+                                                            "4w"
+                                                            "4v"
+                                                            "4u"
+                                                            "4t"
+                                                            "4s"
+                                                            "4r"
+                                                            "4q"
+                                                            "4p"
+                                                            "4o"
+                                                            "4n"
+                                                            "4m"
+                                                            "4l"
+                                                            "4k"
+                                                            "4j"
+                                                            "4i"
+                                                            "4h"
+                                                            "4g"
+                                                            "4f"
+                                                            "4e"
+                                                            "4d"
+                                                            "4c"
+                                                            "4b"
+                                                            "4a"
+                                                            "49"
+                                                            "48"
+                                                            "47"
+                                                            "46"
+                                                            "45"
+                                                            "44"
+                                                            "43"
+                                                            "42"
+                                                            "41"
+                                                            "40"
+                                                            "3z"
+                                                            "3y"
+                                                            "3x"
+                                                            "3w"
+                                                            "3v"
+                                                            "3u"
+                                                            "3t"
+                                                            "3s"
+                                                            "3r"
+                                                            "3q"
+                                                            "3p"
+                                                            "3o"
+                                                            "3n"
+                                                            "3m"
+                                                            "3l"
+                                                            "3k"
+                                                            "3j"
+                                                            "3i"
+                                                            "3h"
+                                                            "3g"
+                                                            "3f"
+                                                            "3e"
+                                                            "3d"
+                                                            "3c"
+                                                            "3b"
+                                                            "3a"
+                                                            "39"
+                                                            "38"
+                                                            "37"
+                                                            "36"
+                                                            "35"
+                                                            "34"
+                                                            "33"
+                                                            "32"
+                                                            "31"
+                                                            "30"
+                                                            "2z"
+                                                            "2y"
+                                                            "2x"
+                                                            "2w"
+                                                            "2v"
+                                                            "2u"
+                                                            "2t"
+                                                            "2s"
+                                                            "2r"
+                                                            "2q"
+                                                            "2p"
+                                                            "2o"
+                                                            "2n"
+                                                            "2m"
+                                                            "2l"
+                                                            "2k"
+                                                            "2j"
+                                                            "2i"
+                                                            "2h"
+                                                            "2g"
+                                                            "2f"
+                                                            "2e"
+                                                            "2d"
+                                                            "2c"
+                                                            "2b"
+                                                            "2a"
+                                                            "29"
+                                                            "28"
+                                                            "27"
+                                                            "26"
+                                                            "25"
+                                                            "24"
+                                                            "23"
+                                                            "22"
+                                                            "21"
+                                                            "20"
+                                                            "1z"
+                                                            "1y"
+                                                            "1x"
+                                                            "1w"
+                                                            "1v"
+                                                            "1u"
+                                                            "1t"
+                                                            "1s"
+                                                            "1r"
+                                                            "1q"))
                                                          #(ribcage
                                                            (define-structure
                                                              define-expansion-accessors
                                                              define-expansion-constructors)
                                                            ((top) (top) (top))
-                                                           ("1og"
-                                                            "1of"
-                                                            "1oe")))
+                                                           ("8" "7" "6")))
                                                         (hygiene guile))))
-                                            (eq? (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                                                   #{dots _hoQGWMnyQPAh3k2jhWJag}#
+                                            (eq? (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                                                   #{dots -ANAU$bmvAmthP7L7xwpU@}#
                                                    '(()))
-                                                 (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
+                                                 (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
                                                    '#(syntax-object
                                                       ...
                                                       ((top)
@@ -16008,7 +15984,7 @@
                                                        #(ribcage
                                                          #(x)
                                                          #((top))
-                                                         #("2de"))
+                                                         #("p6"))
                                                        #(ribcage
                                                          (lambda-var-list
                                                            gen-var
@@ -16290,281 +16266,281 @@
                                                           (top)
                                                           (top)
                                                           (top))
-                                                         ("1tt"
-                                                          "1ts"
-                                                          "1tr"
-                                                          "1tq"
-                                                          "1tp"
-                                                          "1to"
-                                                          "1tn"
-                                                          "1tm"
-                                                          "1tl"
-                                                          "1tk"
-                                                          "1tj"
-                                                          "1ti"
-                                                          "1th"
-                                                          "1tg"
-                                                          "1tf"
-                                                          "1te"
-                                                          "1td"
-                                                          "1tc"
-                                                          "1tb"
-                                                          "1ta"
-                                                          "1t9"
-                                                          "1t8"
-                                                          "1t7"
-                                                          "1t6"
-                                                          "1t5"
-                                                          "1t4"
-                                                          "1t3"
-                                                          "1t2"
-                                                          "1t1"
-                                                          "1t0"
-                                                          "1sz"
-                                                          "1sy"
-                                                          "1sx"
-                                                          "1sw"
-                                                          "1sv"
-                                                          "1su"
-                                                          "1st"
-                                                          "1ss"
-                                                          "1sr"
-                                                          "1sq"
-                                                          "1sp"
-                                                          "1so"
-                                                          "1sn"
-                                                          "1sm"
-                                                          "1sl"
-                                                          "1sk"
-                                                          "1sj"
-                                                          "1si"
-                                                          "1sh"
-                                                          "1sg"
-                                                          "1sf"
-                                                          "1se"
-                                                          "1sd"
-                                                          "1sc"
-                                                          "1sb"
-                                                          "1sa"
-                                                          "1s9"
-                                                          "1s8"
-                                                          "1s7"
-                                                          "1s6"
-                                                          "1s5"
-                                                          "1s4"
-                                                          "1s3"
-                                                          "1s2"
-                                                          "1s1"
-                                                          "1s0"
-                                                          "1rz"
-                                                          "1ry"
-                                                          "1rx"
-                                                          "1rw"
-                                                          "1rv"
-                                                          "1ru"
-                                                          "1rt"
-                                                          "1rs"
-                                                          "1rr"
-                                                          "1rq"
-                                                          "1rp"
-                                                          "1ro"
-                                                          "1rn"
-                                                          "1rm"
-                                                          "1rl"
-                                                          "1rk"
-                                                          "1rj"
-                                                          "1ri"
-                                                          "1rh"
-                                                          "1rg"
-                                                          "1rf"
-                                                          "1re"
-                                                          "1rd"
-                                                          "1rc"
-                                                          "1rb"
-                                                          "1ra"
-                                                          "1r9"
-                                                          "1r8"
-                                                          "1r7"
-                                                          "1r6"
-                                                          "1r5"
-                                                          "1r4"
-                                                          "1r3"
-                                                          "1r2"
-                                                          "1r1"
-                                                          "1r0"
-                                                          "1qz"
-                                                          "1qy"
-                                                          "1qx"
-                                                          "1qw"
-                                                          "1qv"
-                                                          "1qu"
-                                                          "1qt"
-                                                          "1qs"
-                                                          "1qr"
-                                                          "1qq"
-                                                          "1qp"
-                                                          "1qo"
-                                                          "1qn"
-                                                          "1qm"
-                                                          "1ql"
-                                                          "1qk"
-                                                          "1qj"
-                                                          "1qi"
-                                                          "1qh"
-                                                          "1qg"
-                                                          "1qf"
-                                                          "1qe"
-                                                          "1qd"
-                                                          "1qc"
-                                                          "1qb"
-                                                          "1qa"
-                                                          "1q9"
-                                                          "1q8"
-                                                          "1q7"
-                                                          "1q6"
-                                                          "1q5"
-                                                          "1q4"
-                                                          "1q3"
-                                                          "1q2"
-                                                          "1q1"
-                                                          "1q0"
-                                                          "1pz"
-                                                          "1py"))
+                                                         ("5l"
+                                                          "5k"
+                                                          "5j"
+                                                          "5i"
+                                                          "5h"
+                                                          "5g"
+                                                          "5f"
+                                                          "5e"
+                                                          "5d"
+                                                          "5c"
+                                                          "5b"
+                                                          "5a"
+                                                          "59"
+                                                          "58"
+                                                          "57"
+                                                          "56"
+                                                          "55"
+                                                          "54"
+                                                          "53"
+                                                          "52"
+                                                          "51"
+                                                          "50"
+                                                          "4z"
+                                                          "4y"
+                                                          "4x"
+                                                          "4w"
+                                                          "4v"
+                                                          "4u"
+                                                          "4t"
+                                                          "4s"
+                                                          "4r"
+                                                          "4q"
+                                                          "4p"
+                                                          "4o"
+                                                          "4n"
+                                                          "4m"
+                                                          "4l"
+                                                          "4k"
+                                                          "4j"
+                                                          "4i"
+                                                          "4h"
+                                                          "4g"
+                                                          "4f"
+                                                          "4e"
+                                                          "4d"
+                                                          "4c"
+                                                          "4b"
+                                                          "4a"
+                                                          "49"
+                                                          "48"
+                                                          "47"
+                                                          "46"
+                                                          "45"
+                                                          "44"
+                                                          "43"
+                                                          "42"
+                                                          "41"
+                                                          "40"
+                                                          "3z"
+                                                          "3y"
+                                                          "3x"
+                                                          "3w"
+                                                          "3v"
+                                                          "3u"
+                                                          "3t"
+                                                          "3s"
+                                                          "3r"
+                                                          "3q"
+                                                          "3p"
+                                                          "3o"
+                                                          "3n"
+                                                          "3m"
+                                                          "3l"
+                                                          "3k"
+                                                          "3j"
+                                                          "3i"
+                                                          "3h"
+                                                          "3g"
+                                                          "3f"
+                                                          "3e"
+                                                          "3d"
+                                                          "3c"
+                                                          "3b"
+                                                          "3a"
+                                                          "39"
+                                                          "38"
+                                                          "37"
+                                                          "36"
+                                                          "35"
+                                                          "34"
+                                                          "33"
+                                                          "32"
+                                                          "31"
+                                                          "30"
+                                                          "2z"
+                                                          "2y"
+                                                          "2x"
+                                                          "2w"
+                                                          "2v"
+                                                          "2u"
+                                                          "2t"
+                                                          "2s"
+                                                          "2r"
+                                                          "2q"
+                                                          "2p"
+                                                          "2o"
+                                                          "2n"
+                                                          "2m"
+                                                          "2l"
+                                                          "2k"
+                                                          "2j"
+                                                          "2i"
+                                                          "2h"
+                                                          "2g"
+                                                          "2f"
+                                                          "2e"
+                                                          "2d"
+                                                          "2c"
+                                                          "2b"
+                                                          "2a"
+                                                          "29"
+                                                          "28"
+                                                          "27"
+                                                          "26"
+                                                          "25"
+                                                          "24"
+                                                          "23"
+                                                          "22"
+                                                          "21"
+                                                          "20"
+                                                          "1z"
+                                                          "1y"
+                                                          "1x"
+                                                          "1w"
+                                                          "1v"
+                                                          "1u"
+                                                          "1t"
+                                                          "1s"
+                                                          "1r"
+                                                          "1q"))
                                                        #(ribcage
                                                          (define-structure
                                                            define-expansion-accessors
                                                            define-expansion-constructors)
                                                          ((top) (top) (top))
-                                                         ("1og" "1of" "1oe")))
+                                                         ("8" "7" "6")))
                                                       (hygiene guile))
                                                    '(())))
                                             #f)
                                           #f))
-                                      #{tmp _hoQGWMnyQPAh3k2jhWJab}#)
+                                      #{tmp -ANAU$bmvAmthP7L7xwpU6}#)
                                     #f)
                                 (@apply
-                                  (lambda (#{x _hoQGWMnyQPAh3k2jhWJcF}#
-                                           #{dots _hoQGWMnyQPAh3k2jhWJcG}#
-                                           #{ys _hoQGWMnyQPAh3k2jhWJcH}#)
+                                  (lambda (#{x -ANAU$bmvAmthP7L7xwpWk}#
+                                           #{dots -ANAU$bmvAmthP7L7xwpWl}#
+                                           #{ys -ANAU$bmvAmthP7L7xwpWm}#)
                                     (call-with-values
                                       (lambda ()
-                                        (#{cvt* _hoQGWMnyQPAh3k2jhWJTn}#
-                                          #{ys _hoQGWMnyQPAh3k2jhWJcH}#
-                                          #{n _hoQGWMnyQPAh3k2jhWJTt}#
-                                          #{ids _hoQGWMnyQPAh3k2jhWJTu}#))
-                                      (lambda (#{ys _hoQGWMnyQPAh3k2jhWJcK}#
-                                               #{ids _hoQGWMnyQPAh3k2jhWJcL}#)
+                                        (#{cvt* -ANAU$bmvAmthP7L7xwpOG}#
+                                          #{ys -ANAU$bmvAmthP7L7xwpWm}#
+                                          #{n -ANAU$bmvAmthP7L7xwpOM}#
+                                          #{ids -ANAU$bmvAmthP7L7xwpON}#))
+                                      (lambda (#{ys -ANAU$bmvAmthP7L7xwpWp}#
+                                               #{ids -ANAU$bmvAmthP7L7xwpWq}#)
                                         (call-with-values
                                           (lambda ()
-                                            (#{cvt _hoQGWMnyQPAh3k2jhWJTp}#
-                                              #{x _hoQGWMnyQPAh3k2jhWJcF}#
-                                              (#{1+}# #{n _hoQGWMnyQPAh3k2jhWJTt}#)
-                                              #{ids _hoQGWMnyQPAh3k2jhWJcL}#))
-                                          (lambda (#{x _hoQGWMnyQPAh3k2jhWJcM}#
-                                                   #{ids _hoQGWMnyQPAh3k2jhWJcN}#)
+                                            (#{cvt -ANAU$bmvAmthP7L7xwpOI}#
+                                              #{x -ANAU$bmvAmthP7L7xwpWk}#
+                                              (#{1+}# #{n -ANAU$bmvAmthP7L7xwpOM}#)
+                                              #{ids -ANAU$bmvAmthP7L7xwpWq}#))
+                                          (lambda (#{x -ANAU$bmvAmthP7L7xwpWr}#
+                                                   #{ids -ANAU$bmvAmthP7L7xwpWs}#)
                                             (call-with-values
                                               (lambda ()
-                                                (#{v-reverse _hoQGWMnyQPAh3k2jhWJTo}#
-                                                  #{ys _hoQGWMnyQPAh3k2jhWJcK}#))
-                                              (lambda (#{ys _hoQGWMnyQPAh3k2jhWJcu}#
-                                                       #{e _hoQGWMnyQPAh3k2jhWJcv}#)
+                                                (#{v-reverse -ANAU$bmvAmthP7L7xwpOH}#
+                                                  #{ys -ANAU$bmvAmthP7L7xwpWp}#))
+                                              (lambda (#{ys -ANAU$bmvAmthP7L7xwpXN}#
+                                                       #{e -ANAU$bmvAmthP7L7xwpXO}#)
                                                 (values
                                                   (vector
                                                     'each+
-                                                    #{x _hoQGWMnyQPAh3k2jhWJcM}#
-                                                    #{ys _hoQGWMnyQPAh3k2jhWJcu}#
-                                                    #{e _hoQGWMnyQPAh3k2jhWJcv}#)
-                                                  #{ids _hoQGWMnyQPAh3k2jhWJcN}#))))))))
-                                  #{tmp _hoQGWMnyQPAh3k2jhWJab}#)
-                                (let ((#{tmp _hoQGWMnyQPAh3k2jhWJcw}#
+                                                    #{x -ANAU$bmvAmthP7L7xwpWr}#
+                                                    #{ys -ANAU$bmvAmthP7L7xwpXN}#
+                                                    #{e -ANAU$bmvAmthP7L7xwpXO}#)
+                                                  #{ids -ANAU$bmvAmthP7L7xwpWs}#))))))))
+                                  #{tmp -ANAU$bmvAmthP7L7xwpU6}#)
+                                (let ((#{tmp -ANAU$bmvAmthP7L7xwpXP}#
                                         ($sc-dispatch
-                                          #{p _hoQGWMnyQPAh3k2jhWJTs}#
+                                          #{p -ANAU$bmvAmthP7L7xwpOL}#
                                           '(any . any))))
-                                  (if #{tmp _hoQGWMnyQPAh3k2jhWJcw}#
+                                  (if #{tmp -ANAU$bmvAmthP7L7xwpXP}#
                                     (@apply
-                                      (lambda (#{x _hoQGWMnyQPAh3k2jhWJc0}#
-                                               #{y _hoQGWMnyQPAh3k2jhWJc1}#)
+                                      (lambda (#{x -ANAU$bmvAmthP7L7xwpXT}#
+                                               #{y -ANAU$bmvAmthP7L7xwpXU}#)
                                         (call-with-values
                                           (lambda ()
-                                            (#{cvt _hoQGWMnyQPAh3k2jhWJTp}#
-                                              #{y _hoQGWMnyQPAh3k2jhWJc1}#
-                                              #{n _hoQGWMnyQPAh3k2jhWJTt}#
-                                              #{ids _hoQGWMnyQPAh3k2jhWJTu}#))
-                                          (lambda (#{y _hoQGWMnyQPAh3k2jhWJc2}#
-                                                   #{ids _hoQGWMnyQPAh3k2jhWJc3}#)
+                                            (#{cvt -ANAU$bmvAmthP7L7xwpOI}#
+                                              #{y -ANAU$bmvAmthP7L7xwpXU}#
+                                              #{n -ANAU$bmvAmthP7L7xwpOM}#
+                                              #{ids -ANAU$bmvAmthP7L7xwpON}#))
+                                          (lambda (#{y -ANAU$bmvAmthP7L7xwpXV}#
+                                                   #{ids -ANAU$bmvAmthP7L7xwpXW}#)
                                             (call-with-values
                                               (lambda ()
-                                                (#{cvt _hoQGWMnyQPAh3k2jhWJTp}#
-                                                  #{x _hoQGWMnyQPAh3k2jhWJc0}#
-                                                  #{n _hoQGWMnyQPAh3k2jhWJTt}#
-                                                  #{ids _hoQGWMnyQPAh3k2jhWJc3}#))
-                                              (lambda (#{x _hoQGWMnyQPAh3k2jhWJc4}#
-                                                       #{ids _hoQGWMnyQPAh3k2jhWJc5}#)
+                                                (#{cvt -ANAU$bmvAmthP7L7xwpOI}#
+                                                  #{x -ANAU$bmvAmthP7L7xwpXT}#
+                                                  #{n -ANAU$bmvAmthP7L7xwpOM}#
+                                                  #{ids -ANAU$bmvAmthP7L7xwpXW}#))
+                                              (lambda (#{x -ANAU$bmvAmthP7L7xwpXX}#
+                                                       #{ids -ANAU$bmvAmthP7L7xwpXY}#)
                                                 (values
-                                                  (cons #{x _hoQGWMnyQPAh3k2jhWJc4}#
-                                                        #{y _hoQGWMnyQPAh3k2jhWJc2}#)
-                                                  #{ids _hoQGWMnyQPAh3k2jhWJc5}#))))))
-                                      #{tmp _hoQGWMnyQPAh3k2jhWJcw}#)
-                                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWJc6}#
+                                                  (cons #{x -ANAU$bmvAmthP7L7xwpXX}#
+                                                        #{y -ANAU$bmvAmthP7L7xwpXV}#)
+                                                  #{ids -ANAU$bmvAmthP7L7xwpXY}#))))))
+                                      #{tmp -ANAU$bmvAmthP7L7xwpXP}#)
+                                    (let ((#{tmp -ANAU$bmvAmthP7L7xwpXZ}#
                                             ($sc-dispatch
-                                              #{p _hoQGWMnyQPAh3k2jhWJTs}#
+                                              #{p -ANAU$bmvAmthP7L7xwpOL}#
                                               '())))
-                                      (if #{tmp _hoQGWMnyQPAh3k2jhWJc6}#
+                                      (if #{tmp -ANAU$bmvAmthP7L7xwpXZ}#
                                         (@apply
                                           (lambda ()
                                             (values
                                               '()
-                                              #{ids _hoQGWMnyQPAh3k2jhWJTu}#))
-                                          #{tmp _hoQGWMnyQPAh3k2jhWJc6}#)
-                                        (let ((#{tmp _hoQGWMnyQPAh3k2jhWJc$}#
+                                              #{ids -ANAU$bmvAmthP7L7xwpON}#))
+                                          #{tmp -ANAU$bmvAmthP7L7xwpXZ}#)
+                                        (let ((#{tmp -ANAU$bmvAmthP7L7xwpXd}#
                                                 ($sc-dispatch
-                                                  #{p _hoQGWMnyQPAh3k2jhWJTs}#
+                                                  #{p -ANAU$bmvAmthP7L7xwpOL}#
                                                   '#(vector each-any))))
-                                          (if #{tmp _hoQGWMnyQPAh3k2jhWJc$}#
+                                          (if #{tmp -ANAU$bmvAmthP7L7xwpXd}#
                                             (@apply
-                                              (lambda (#{x _hoQGWMnyQPAh3k2jhWJdC}#)
+                                              (lambda (#{x -ANAU$bmvAmthP7L7xwpXh}#)
                                                 (call-with-values
                                                   (lambda ()
-                                                    (#{cvt _hoQGWMnyQPAh3k2jhWJTp}#
-                                                      #{x _hoQGWMnyQPAh3k2jhWJdC}#
-                                                      #{n _hoQGWMnyQPAh3k2jhWJTt}#
-                                                      #{ids _hoQGWMnyQPAh3k2jhWJTu}#))
-                                                  (lambda (#{p _hoQGWMnyQPAh3k2jhWJdD}#
-                                                           #{ids _hoQGWMnyQPAh3k2jhWJdE}#)
+                                                    (#{cvt -ANAU$bmvAmthP7L7xwpOI}#
+                                                      #{x -ANAU$bmvAmthP7L7xwpXh}#
+                                                      #{n -ANAU$bmvAmthP7L7xwpOM}#
+                                                      #{ids -ANAU$bmvAmthP7L7xwpON}#))
+                                                  (lambda (#{p -ANAU$bmvAmthP7L7xwpXi}#
+                                                           #{ids -ANAU$bmvAmthP7L7xwpXj}#)
                                                     (values
                                                       (vector
                                                         'vector
-                                                        #{p _hoQGWMnyQPAh3k2jhWJdD}#)
-                                                      #{ids _hoQGWMnyQPAh3k2jhWJdE}#))))
-                                              #{tmp _hoQGWMnyQPAh3k2jhWJc$}#)
+                                                        #{p -ANAU$bmvAmthP7L7xwpXi}#)
+                                                      #{ids -ANAU$bmvAmthP7L7xwpXj}#))))
+                                              #{tmp -ANAU$bmvAmthP7L7xwpXd}#)
                                             (values
                                               (vector
                                                 'atom
-                                                (#{strip _hoQGWMnyQPAh3k2jhWHTy}#
-                                                  #{p _hoQGWMnyQPAh3k2jhWJTs}#
+                                                (#{strip -ANAU$bmvAmthP7L7xwnOR}#
+                                                  #{p -ANAU$bmvAmthP7L7xwpOL}#
                                                   '(())))
-                                              #{ids _hoQGWMnyQPAh3k2jhWJTu}#)))))))))))))))
-                 (#{cvt _hoQGWMnyQPAh3k2jhWJTp}#
-                   #{pattern _hoQGWMnyQPAh3k2jhWJTl}#
+                                              #{ids -ANAU$bmvAmthP7L7xwpON}#)))))))))))))))
+                 (#{cvt -ANAU$bmvAmthP7L7xwpOI}#
+                   #{pattern -ANAU$bmvAmthP7L7xwpOE}#
                    0
                    '()))))
-           (#{build-dispatch-call _hoQGWMnyQPAh3k2jhWI6r}#
-             (lambda (#{pvars _hoQGWMnyQPAh3k2jhWJe1}#
-                      #{exp _hoQGWMnyQPAh3k2jhWJe2}#
-                      #{y _hoQGWMnyQPAh3k2jhWJe3}#
-                      #{r _hoQGWMnyQPAh3k2jhWJe4}#
-                      #{mod _hoQGWMnyQPAh3k2jhWJe5}#)
-               (let ((#{ids _hoQGWMnyQPAh3k2jhWJe6}#
-                       (map car #{pvars _hoQGWMnyQPAh3k2jhWJe1}#)))
+           (#{build-dispatch-call -ANAU$bmvAmthP7L7xwo1K}#
+             (lambda (#{pvars -ANAU$bmvAmthP7L7xwpZU}#
+                      #{exp -ANAU$bmvAmthP7L7xwpZV}#
+                      #{y -ANAU$bmvAmthP7L7xwpZW}#
+                      #{r -ANAU$bmvAmthP7L7xwpZX}#
+                      #{mod -ANAU$bmvAmthP7L7xwpZY}#)
+               (let ((#{ids -ANAU$bmvAmthP7L7xwpZZ}#
+                       (map car #{pvars -ANAU$bmvAmthP7L7xwpZU}#)))
                  (begin
-                   (map cdr #{pvars _hoQGWMnyQPAh3k2jhWJe1}#)
-                   (let ((#{labels _hoQGWMnyQPAh3k2jhWJe8}#
-                           (#{gen-labels _hoQGWMnyQPAh3k2jhWHTE}#
-                             #{ids _hoQGWMnyQPAh3k2jhWJe6}#))
-                         (#{new-vars _hoQGWMnyQPAh3k2jhWJe9}#
-                           (map #{gen-var _hoQGWMnyQPAh3k2jhWHTz}#
-                                #{ids _hoQGWMnyQPAh3k2jhWJe6}#)))
-                     (#{build-application _hoQGWMnyQPAh3k2jhWHSg}#
+                   (map cdr #{pvars -ANAU$bmvAmthP7L7xwpZU}#)
+                   (let ((#{labels -ANAU$bmvAmthP7L7xwpZb}#
+                           (#{gen-labels -ANAU$bmvAmthP7L7xwnNj}#
+                             #{ids -ANAU$bmvAmthP7L7xwpZZ}#))
+                         (#{new-vars -ANAU$bmvAmthP7L7xwpZc}#
+                           (map #{gen-var -ANAU$bmvAmthP7L7xwnOS}#
+                                #{ids -ANAU$bmvAmthP7L7xwpZZ}#)))
+                     (#{build-application -ANAU$bmvAmthP7L7xwnM@}#
                        #f
                        (if (equal? (module-name (current-module)) '(guile))
                          (make-struct/no-tail
@@ -16577,89 +16553,89 @@
                            '(guile)
                            'apply
                            #f))
-                       (list (#{build-simple-lambda _hoQGWMnyQPAh3k2jhWHSp}#
+                       (list (#{build-simple-lambda -ANAU$bmvAmthP7L7xwnNI}#
                                #f
                                (map syntax->datum
-                                    #{ids _hoQGWMnyQPAh3k2jhWJe6}#)
+                                    #{ids -ANAU$bmvAmthP7L7xwpZZ}#)
                                #f
-                               #{new-vars _hoQGWMnyQPAh3k2jhWJe9}#
+                               #{new-vars -ANAU$bmvAmthP7L7xwpZc}#
                                '()
-                               (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                 #{exp _hoQGWMnyQPAh3k2jhWJe2}#
-                                 (#{extend-env _hoQGWMnyQPAh3k2jhWHS7}#
-                                   #{labels _hoQGWMnyQPAh3k2jhWJe8}#
-                                   (map (lambda (#{var _hoQGWMnyQPAh3k2jhWJj8}#
-                                                 #{level _hoQGWMnyQPAh3k2jhWJj9}#)
+                               (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                 #{exp -ANAU$bmvAmthP7L7xwpZV}#
+                                 (#{extend-env -ANAU$bmvAmthP7L7xwnNa}#
+                                   #{labels -ANAU$bmvAmthP7L7xwpZb}#
+                                   (map (lambda (#{var -ANAU$bmvAmthP7L7xwpeb}#
+                                                 #{level -ANAU$bmvAmthP7L7xwpec}#)
                                           (cons 'syntax
-                                                (cons #{var _hoQGWMnyQPAh3k2jhWJj8}#
-                                                      #{level _hoQGWMnyQPAh3k2jhWJj9}#)))
-                                        #{new-vars _hoQGWMnyQPAh3k2jhWJe9}#
+                                                (cons #{var -ANAU$bmvAmthP7L7xwpeb}#
+                                                      #{level -ANAU$bmvAmthP7L7xwpec}#)))
+                                        #{new-vars -ANAU$bmvAmthP7L7xwpZc}#
                                         (map cdr
-                                             #{pvars _hoQGWMnyQPAh3k2jhWJe1}#))
-                                   #{r _hoQGWMnyQPAh3k2jhWJe4}#)
-                                 (#{make-binding-wrap _hoQGWMnyQPAh3k2jhWHTP}#
-                                   #{ids _hoQGWMnyQPAh3k2jhWJe6}#
-                                   #{labels _hoQGWMnyQPAh3k2jhWJe8}#
+                                             #{pvars -ANAU$bmvAmthP7L7xwpZU}#))
+                                   #{r -ANAU$bmvAmthP7L7xwpZX}#)
+                                 (#{make-binding-wrap -ANAU$bmvAmthP7L7xwnNu}#
+                                   #{ids -ANAU$bmvAmthP7L7xwpZZ}#
+                                   #{labels -ANAU$bmvAmthP7L7xwpZb}#
                                    '(()))
-                                 #{mod _hoQGWMnyQPAh3k2jhWJe5}#))
-                             #{y _hoQGWMnyQPAh3k2jhWJe3}#)))))))
-           (#{gen-clause _hoQGWMnyQPAh3k2jhWI6s}#
-             (lambda (#{x _hoQGWMnyQPAh3k2jhWJJx}#
-                      #{keys _hoQGWMnyQPAh3k2jhWJJy}#
-                      #{clauses _hoQGWMnyQPAh3k2jhWJJz}#
-                      #{r _hoQGWMnyQPAh3k2jhWJJ0}#
-                      #{pat _hoQGWMnyQPAh3k2jhWJJ1}#
-                      #{fender _hoQGWMnyQPAh3k2jhWJJ2}#
-                      #{exp _hoQGWMnyQPAh3k2jhWJJ3}#
-                      #{mod _hoQGWMnyQPAh3k2jhWJJ4}#)
+                                 #{mod -ANAU$bmvAmthP7L7xwpZY}#))
+                             #{y -ANAU$bmvAmthP7L7xwpZW}#)))))))
+           (#{gen-clause -ANAU$bmvAmthP7L7xwo1L}#
+             (lambda (#{x -ANAU$bmvAmthP7L7xwpEQ}#
+                      #{keys -ANAU$bmvAmthP7L7xwpER}#
+                      #{clauses -ANAU$bmvAmthP7L7xwpES}#
+                      #{r -ANAU$bmvAmthP7L7xwpET}#
+                      #{pat -ANAU$bmvAmthP7L7xwpEU}#
+                      #{fender -ANAU$bmvAmthP7L7xwpEV}#
+                      #{exp -ANAU$bmvAmthP7L7xwpEW}#
+                      #{mod -ANAU$bmvAmthP7L7xwpEX}#)
                (call-with-values
                  (lambda ()
-                   (#{convert-pattern _hoQGWMnyQPAh3k2jhWI6q}#
-                     #{pat _hoQGWMnyQPAh3k2jhWJJ1}#
-                     #{keys _hoQGWMnyQPAh3k2jhWJJy}#))
-                 (lambda (#{p _hoQGWMnyQPAh3k2jhWJMT}#
-                          #{pvars _hoQGWMnyQPAh3k2jhWJMU}#)
-                   (if (not (#{distinct-bound-ids? _hoQGWMnyQPAh3k2jhWHTc}#
-                              (map car #{pvars _hoQGWMnyQPAh3k2jhWJMU}#)))
+                   (#{convert-pattern -ANAU$bmvAmthP7L7xwo1J}#
+                     #{pat -ANAU$bmvAmthP7L7xwpEU}#
+                     #{keys -ANAU$bmvAmthP7L7xwpER}#))
+                 (lambda (#{p -ANAU$bmvAmthP7L7xwpGy}#
+                          #{pvars -ANAU$bmvAmthP7L7xwpGz}#)
+                   (if (not (#{distinct-bound-ids? -ANAU$bmvAmthP7L7xwnN7}#
+                              (map car #{pvars -ANAU$bmvAmthP7L7xwpGz}#)))
                      (syntax-violation
                        'syntax-case
                        "duplicate pattern variable"
-                       #{pat _hoQGWMnyQPAh3k2jhWJJ1}#)
+                       #{pat -ANAU$bmvAmthP7L7xwpEU}#)
                      (if (not (and-map
-                                (lambda (#{x _hoQGWMnyQPAh3k2jhWJOI}#)
-                                  (not (let ((#{x _hoQGWMnyQPAh3k2jhWJOM}#
-                                               (car #{x _hoQGWMnyQPAh3k2jhWJOI}#)))
+                                (lambda (#{x -ANAU$bmvAmthP7L7xwpIn}#)
+                                  (not (let ((#{x -ANAU$bmvAmthP7L7xwpIr}#
+                                               (car #{x -ANAU$bmvAmthP7L7xwpIn}#)))
                                          (if (if (if (vector?
-                                                       #{x _hoQGWMnyQPAh3k2jhWJOM}#)
+                                                       #{x -ANAU$bmvAmthP7L7xwpIr}#)
                                                    (if (= (vector-length
-                                                            #{x _hoQGWMnyQPAh3k2jhWJOM}#)
+                                                            #{x -ANAU$bmvAmthP7L7xwpIr}#)
                                                           4)
                                                      (eq? (vector-ref
-                                                            #{x _hoQGWMnyQPAh3k2jhWJOM}#
+                                                            #{x -ANAU$bmvAmthP7L7xwpIr}#
                                                             0)
                                                           'syntax-object)
                                                      #f)
                                                    #f)
                                                (symbol?
                                                  (vector-ref
-                                                   #{x _hoQGWMnyQPAh3k2jhWJOM}#
+                                                   #{x -ANAU$bmvAmthP7L7xwpIr}#
                                                    1))
                                                #f)
                                            (if (eq? (if (if (vector?
-                                                              #{x _hoQGWMnyQPAh3k2jhWJOM}#)
+                                                              #{x -ANAU$bmvAmthP7L7xwpIr}#)
                                                           (if (= (vector-length
-                                                                   #{x _hoQGWMnyQPAh3k2jhWJOM}#)
+                                                                   #{x -ANAU$bmvAmthP7L7xwpIr}#)
                                                                  4)
                                                             (eq? (vector-ref
-                                                                   #{x _hoQGWMnyQPAh3k2jhWJOM}#
+                                                                   #{x -ANAU$bmvAmthP7L7xwpIr}#
                                                                    0)
                                                                  'syntax-object)
                                                             #f)
                                                           #f)
                                                       (vector-ref
-                                                        #{x _hoQGWMnyQPAh3k2jhWJOM}#
+                                                        #{x -ANAU$bmvAmthP7L7xwpIr}#
                                                         1)
-                                                      #{x _hoQGWMnyQPAh3k2jhWJOM}#)
+                                                      #{x -ANAU$bmvAmthP7L7xwpIr}#)
                                                     (if (if (= (vector-length
                                                                  '#(syntax-object
                                                                     ...
@@ -16675,7 +16651,7 @@
                                                                      #(ribcage
                                                                        #(x)
                                                                        #((top))
-                                                                       #("2de"))
+                                                                       #("p6"))
                                                                      #(ribcage
                                                                        (lambda-var-list
                                                                          gen-var
@@ -16957,146 +16933,146 @@
                                                                         (top)
                                                                         (top)
                                                                         (top))
-                                                                       ("1tt"
-                                                                        "1ts"
-                                                                        "1tr"
-                                                                        "1tq"
-                                                                        "1tp"
-                                                                        "1to"
-                                                                        "1tn"
-                                                                        "1tm"
-                                                                        "1tl"
-                                                                        "1tk"
-                                                                        "1tj"
-                                                                        "1ti"
-                                                                        "1th"
-                                                                        "1tg"
-                                                                        "1tf"
-                                                                        "1te"
-                                                                        "1td"
-                                                                        "1tc"
-                                                                        "1tb"
-                                                                        "1ta"
-                                                                        "1t9"
-                                                                        "1t8"
-                                                                        "1t7"
-                                                                        "1t6"
-                                                                        "1t5"
-                                                                        "1t4"
-                                                                        "1t3"
-                                                                        "1t2"
-                                                                        "1t1"
-                                                                        "1t0"
-                                                                        "1sz"
-                                                                        "1sy"
-                                                                        "1sx"
-                                                                        "1sw"
-                                                                        "1sv"
-                                                                        "1su"
-                                                                        "1st"
-                                                                        "1ss"
-                                                                        "1sr"
-                                                                        "1sq"
-                                                                        "1sp"
-                                                                        "1so"
-                                                                        "1sn"
-                                                                        "1sm"
-                                                                        "1sl"
-                                                                        "1sk"
-                                                                        "1sj"
-                                                                        "1si"
-                                                                        "1sh"
-                                                                        "1sg"
-                                                                        "1sf"
-                                                                        "1se"
-                                                                        "1sd"
-                                                                        "1sc"
-                                                                        "1sb"
-                                                                        "1sa"
-                                                                        "1s9"
-                                                                        "1s8"
-                                                                        "1s7"
-                                                                        "1s6"
-                                                                        "1s5"
-                                                                        "1s4"
-                                                                        "1s3"
-                                                                        "1s2"
-                                                                        "1s1"
-                                                                        "1s0"
-                                                                        "1rz"
-                                                                        "1ry"
-                                                                        "1rx"
-                                                                        "1rw"
-                                                                        "1rv"
-                                                                        "1ru"
-                                                                        "1rt"
-                                                                        "1rs"
-                                                                        "1rr"
-                                                                        "1rq"
-                                                                        "1rp"
-                                                                        "1ro"
-                                                                        "1rn"
-                                                                        "1rm"
-                                                                        "1rl"
-                                                                        "1rk"
-                                                                        "1rj"
-                                                                        "1ri"
-                                                                        "1rh"
-                                                                        "1rg"
-                                                                        "1rf"
-                                                                        "1re"
-                                                                        "1rd"
-                                                                        "1rc"
-                                                                        "1rb"
-                                                                        "1ra"
-                                                                        "1r9"
-                                                                        "1r8"
-                                                                        "1r7"
-                                                                        "1r6"
-                                                                        "1r5"
-                                                                        "1r4"
-                                                                        "1r3"
-                                                                        "1r2"
-                                                                        "1r1"
-                                                                        "1r0"
-                                                                        "1qz"
-                                                                        "1qy"
-                                                                        "1qx"
-                                                                        "1qw"
-                                                                        "1qv"
-                                                                        "1qu"
-                                                                        "1qt"
-                                                                        "1qs"
-                                                                        "1qr"
-                                                                        "1qq"
-                                                                        "1qp"
-                                                                        "1qo"
-                                                                        "1qn"
-                                                                        "1qm"
-                                                                        "1ql"
-                                                                        "1qk"
-                                                                        "1qj"
-                                                                        "1qi"
-                                                                        "1qh"
-                                                                        "1qg"
-                                                                        "1qf"
-                                                                        "1qe"
-                                                                        "1qd"
-                                                                        "1qc"
-                                                                        "1qb"
-                                                                        "1qa"
-                                                                        "1q9"
-                                                                        "1q8"
-                                                                        "1q7"
-                                                                        "1q6"
-                                                                        "1q5"
-                                                                        "1q4"
-                                                                        "1q3"
-                                                                        "1q2"
-                                                                        "1q1"
-                                                                        "1q0"
-                                                                        "1pz"
-                                                                        "1py"))
+                                                                       ("5l"
+                                                                        "5k"
+                                                                        "5j"
+                                                                        "5i"
+                                                                        "5h"
+                                                                        "5g"
+                                                                        "5f"
+                                                                        "5e"
+                                                                        "5d"
+                                                                        "5c"
+                                                                        "5b"
+                                                                        "5a"
+                                                                        "59"
+                                                                        "58"
+                                                                        "57"
+                                                                        "56"
+                                                                        "55"
+                                                                        "54"
+                                                                        "53"
+                                                                        "52"
+                                                                        "51"
+                                                                        "50"
+                                                                        "4z"
+                                                                        "4y"
+                                                                        "4x"
+                                                                        "4w"
+                                                                        "4v"
+                                                                        "4u"
+                                                                        "4t"
+                                                                        "4s"
+                                                                        "4r"
+                                                                        "4q"
+                                                                        "4p"
+                                                                        "4o"
+                                                                        "4n"
+                                                                        "4m"
+                                                                        "4l"
+                                                                        "4k"
+                                                                        "4j"
+                                                                        "4i"
+                                                                        "4h"
+                                                                        "4g"
+                                                                        "4f"
+                                                                        "4e"
+                                                                        "4d"
+                                                                        "4c"
+                                                                        "4b"
+                                                                        "4a"
+                                                                        "49"
+                                                                        "48"
+                                                                        "47"
+                                                                        "46"
+                                                                        "45"
+                                                                        "44"
+                                                                        "43"
+                                                                        "42"
+                                                                        "41"
+                                                                        "40"
+                                                                        "3z"
+                                                                        "3y"
+                                                                        "3x"
+                                                                        "3w"
+                                                                        "3v"
+                                                                        "3u"
+                                                                        "3t"
+                                                                        "3s"
+                                                                        "3r"
+                                                                        "3q"
+                                                                        "3p"
+                                                                        "3o"
+                                                                        "3n"
+                                                                        "3m"
+                                                                        "3l"
+                                                                        "3k"
+                                                                        "3j"
+                                                                        "3i"
+                                                                        "3h"
+                                                                        "3g"
+                                                                        "3f"
+                                                                        "3e"
+                                                                        "3d"
+                                                                        "3c"
+                                                                        "3b"
+                                                                        "3a"
+                                                                        "39"
+                                                                        "38"
+                                                                        "37"
+                                                                        "36"
+                                                                        "35"
+                                                                        "34"
+                                                                        "33"
+                                                                        "32"
+                                                                        "31"
+                                                                        "30"
+                                                                        "2z"
+                                                                        "2y"
+                                                                        "2x"
+                                                                        "2w"
+                                                                        "2v"
+                                                                        "2u"
+                                                                        "2t"
+                                                                        "2s"
+                                                                        "2r"
+                                                                        "2q"
+                                                                        "2p"
+                                                                        "2o"
+                                                                        "2n"
+                                                                        "2m"
+                                                                        "2l"
+                                                                        "2k"
+                                                                        "2j"
+                                                                        "2i"
+                                                                        "2h"
+                                                                        "2g"
+                                                                        "2f"
+                                                                        "2e"
+                                                                        "2d"
+                                                                        "2c"
+                                                                        "2b"
+                                                                        "2a"
+                                                                        "29"
+                                                                        "28"
+                                                                        "27"
+                                                                        "26"
+                                                                        "25"
+                                                                        "24"
+                                                                        "23"
+                                                                        "22"
+                                                                        "21"
+                                                                        "20"
+                                                                        "1z"
+                                                                        "1y"
+                                                                        "1x"
+                                                                        "1w"
+                                                                        "1v"
+                                                                        "1u"
+                                                                        "1t"
+                                                                        "1s"
+                                                                        "1r"
+                                                                        "1q"))
                                                                      #(ribcage
                                                                        (define-structure
                                                                          define-expansion-accessors
@@ -17104,9 +17080,9 @@
                                                                        ((top)
                                                                         (top)
                                                                         (top))
-                                                                       ("1og"
-                                                                        "1of"
-                                                                        "1oe")))
+                                                                       ("8"
+                                                                        "7"
+                                                                        "6")))
                                                                     (hygiene
                                                                       guile)))
                                                                4)
@@ -17121,7 +17097,7 @@
                                                           #(ribcage
                                                             #(x)
                                                             #((top))
-                                                            #("2de"))
+                                                            #("p6"))
                                                           #(ribcage
                                                             (lambda-var-list
                                                               gen-var
@@ -17403,159 +17379,157 @@
                                                              (top)
                                                              (top)
                                                              (top))
-                                                            ("1tt"
-                                                             "1ts"
-                                                             "1tr"
-                                                             "1tq"
-                                                             "1tp"
-                                                             "1to"
-                                                             "1tn"
-                                                             "1tm"
-                                                             "1tl"
-                                                             "1tk"
-                                                             "1tj"
-                                                             "1ti"
-                                                             "1th"
-                                                             "1tg"
-                                                             "1tf"
-                                                             "1te"
-                                                             "1td"
-                                                             "1tc"
-                                                             "1tb"
-                                                             "1ta"
-                                                             "1t9"
-                                                             "1t8"
-                                                             "1t7"
-                                                             "1t6"
-                                                             "1t5"
-                                                             "1t4"
-                                                             "1t3"
-                                                             "1t2"
-                                                             "1t1"
-                                                             "1t0"
-                                                             "1sz"
-                                                             "1sy"
-                                                             "1sx"
-                                                             "1sw"
-                                                             "1sv"
-                                                             "1su"
-                                                             "1st"
-                                                             "1ss"
-                                                             "1sr"
-                                                             "1sq"
-                                                             "1sp"
-                                                             "1so"
-                                                             "1sn"
-                                                             "1sm"
-                                                             "1sl"
-                                                             "1sk"
-                                                             "1sj"
-                                                             "1si"
-                                                             "1sh"
-                                                             "1sg"
-                                                             "1sf"
-                                                             "1se"
-                                                             "1sd"
-                                                             "1sc"
-                                                             "1sb"
-                                                             "1sa"
-                                                             "1s9"
-                                                             "1s8"
-                                                             "1s7"
-                                                             "1s6"
-                                                             "1s5"
-                                                             "1s4"
-                                                             "1s3"
-                                                             "1s2"
-                                                             "1s1"
-                                                             "1s0"
-                                                             "1rz"
-                                                             "1ry"
-                                                             "1rx"
-                                                             "1rw"
-                                                             "1rv"
-                                                             "1ru"
-                                                             "1rt"
-                                                             "1rs"
-                                                             "1rr"
-                                                             "1rq"
-                                                             "1rp"
-                                                             "1ro"
-                                                             "1rn"
-                                                             "1rm"
-                                                             "1rl"
-                                                             "1rk"
-                                                             "1rj"
-                                                             "1ri"
-                                                             "1rh"
-                                                             "1rg"
-                                                             "1rf"
-                                                             "1re"
-                                                             "1rd"
-                                                             "1rc"
-                                                             "1rb"
-                                                             "1ra"
-                                                             "1r9"
-                                                             "1r8"
-                                                             "1r7"
-                                                             "1r6"
-                                                             "1r5"
-                                                             "1r4"
-                                                             "1r3"
-                                                             "1r2"
-                                                             "1r1"
-                                                             "1r0"
-                                                             "1qz"
-                                                             "1qy"
-                                                             "1qx"
-                                                             "1qw"
-                                                             "1qv"
-                                                             "1qu"
-                                                             "1qt"
-                                                             "1qs"
-                                                             "1qr"
-                                                             "1qq"
-                                                             "1qp"
-                                                             "1qo"
-                                                             "1qn"
-                                                             "1qm"
-                                                             "1ql"
-                                                             "1qk"
-                                                             "1qj"
-                                                             "1qi"
-                                                             "1qh"
-                                                             "1qg"
-                                                             "1qf"
-                                                             "1qe"
-                                                             "1qd"
-                                                             "1qc"
-                                                             "1qb"
-                                                             "1qa"
-                                                             "1q9"
-                                                             "1q8"
-                                                             "1q7"
-                                                             "1q6"
-                                                             "1q5"
-                                                             "1q4"
-                                                             "1q3"
-                                                             "1q2"
-                                                             "1q1"
-                                                             "1q0"
-                                                             "1pz"
-                                                             "1py"))
+                                                            ("5l"
+                                                             "5k"
+                                                             "5j"
+                                                             "5i"
+                                                             "5h"
+                                                             "5g"
+                                                             "5f"
+                                                             "5e"
+                                                             "5d"
+                                                             "5c"
+                                                             "5b"
+                                                             "5a"
+                                                             "59"
+                                                             "58"
+                                                             "57"
+                                                             "56"
+                                                             "55"
+                                                             "54"
+                                                             "53"
+                                                             "52"
+                                                             "51"
+                                                             "50"
+                                                             "4z"
+                                                             "4y"
+                                                             "4x"
+                                                             "4w"
+                                                             "4v"
+                                                             "4u"
+                                                             "4t"
+                                                             "4s"
+                                                             "4r"
+                                                             "4q"
+                                                             "4p"
+                                                             "4o"
+                                                             "4n"
+                                                             "4m"
+                                                             "4l"
+                                                             "4k"
+                                                             "4j"
+                                                             "4i"
+                                                             "4h"
+                                                             "4g"
+                                                             "4f"
+                                                             "4e"
+                                                             "4d"
+                                                             "4c"
+                                                             "4b"
+                                                             "4a"
+                                                             "49"
+                                                             "48"
+                                                             "47"
+                                                             "46"
+                                                             "45"
+                                                             "44"
+                                                             "43"
+                                                             "42"
+                                                             "41"
+                                                             "40"
+                                                             "3z"
+                                                             "3y"
+                                                             "3x"
+                                                             "3w"
+                                                             "3v"
+                                                             "3u"
+                                                             "3t"
+                                                             "3s"
+                                                             "3r"
+                                                             "3q"
+                                                             "3p"
+                                                             "3o"
+                                                             "3n"
+                                                             "3m"
+                                                             "3l"
+                                                             "3k"
+                                                             "3j"
+                                                             "3i"
+                                                             "3h"
+                                                             "3g"
+                                                             "3f"
+                                                             "3e"
+                                                             "3d"
+                                                             "3c"
+                                                             "3b"
+                                                             "3a"
+                                                             "39"
+                                                             "38"
+                                                             "37"
+                                                             "36"
+                                                             "35"
+                                                             "34"
+                                                             "33"
+                                                             "32"
+                                                             "31"
+                                                             "30"
+                                                             "2z"
+                                                             "2y"
+                                                             "2x"
+                                                             "2w"
+                                                             "2v"
+                                                             "2u"
+                                                             "2t"
+                                                             "2s"
+                                                             "2r"
+                                                             "2q"
+                                                             "2p"
+                                                             "2o"
+                                                             "2n"
+                                                             "2m"
+                                                             "2l"
+                                                             "2k"
+                                                             "2j"
+                                                             "2i"
+                                                             "2h"
+                                                             "2g"
+                                                             "2f"
+                                                             "2e"
+                                                             "2d"
+                                                             "2c"
+                                                             "2b"
+                                                             "2a"
+                                                             "29"
+                                                             "28"
+                                                             "27"
+                                                             "26"
+                                                             "25"
+                                                             "24"
+                                                             "23"
+                                                             "22"
+                                                             "21"
+                                                             "20"
+                                                             "1z"
+                                                             "1y"
+                                                             "1x"
+                                                             "1w"
+                                                             "1v"
+                                                             "1u"
+                                                             "1t"
+                                                             "1s"
+                                                             "1r"
+                                                             "1q"))
                                                           #(ribcage
                                                             (define-structure
                                                               define-expansion-accessors
                                                               define-expansion-constructors)
                                                             ((top) (top) (top))
-                                                            ("1og"
-                                                             "1of"
-                                                             "1oe")))
+                                                            ("8" "7" "6")))
                                                          (hygiene guile))))
-                                             (eq? (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                                                    #{x _hoQGWMnyQPAh3k2jhWJOM}#
+                                             (eq? (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                                                    #{x -ANAU$bmvAmthP7L7xwpIr}#
                                                     '(()))
-                                                  (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
+                                                  (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
                                                     '#(syntax-object
                                                        ...
                                                        ((top)
@@ -17564,7 +17538,7 @@
                                                         #(ribcage
                                                           #(x)
                                                           #((top))
-                                                          #("2de"))
+                                                          #("p6"))
                                                         #(ribcage
                                                           (lambda-var-list
                                                             gen-var
@@ -17846,194 +17820,194 @@
                                                            (top)
                                                            (top)
                                                            (top))
-                                                          ("1tt"
-                                                           "1ts"
-                                                           "1tr"
-                                                           "1tq"
-                                                           "1tp"
-                                                           "1to"
-                                                           "1tn"
-                                                           "1tm"
-                                                           "1tl"
-                                                           "1tk"
-                                                           "1tj"
-                                                           "1ti"
-                                                           "1th"
-                                                           "1tg"
-                                                           "1tf"
-                                                           "1te"
-                                                           "1td"
-                                                           "1tc"
-                                                           "1tb"
-                                                           "1ta"
-                                                           "1t9"
-                                                           "1t8"
-                                                           "1t7"
-                                                           "1t6"
-                                                           "1t5"
-                                                           "1t4"
-                                                           "1t3"
-                                                           "1t2"
-                                                           "1t1"
-                                                           "1t0"
-                                                           "1sz"
-                                                           "1sy"
-                                                           "1sx"
-                                                           "1sw"
-                                                           "1sv"
-                                                           "1su"
-                                                           "1st"
-                                                           "1ss"
-                                                           "1sr"
-                                                           "1sq"
-                                                           "1sp"
-                                                           "1so"
-                                                           "1sn"
-                                                           "1sm"
-                                                           "1sl"
-                                                           "1sk"
-                                                           "1sj"
-                                                           "1si"
-                                                           "1sh"
-                                                           "1sg"
-                                                           "1sf"
-                                                           "1se"
-                                                           "1sd"
-                                                           "1sc"
-                                                           "1sb"
-                                                           "1sa"
-                                                           "1s9"
-                                                           "1s8"
-                                                           "1s7"
-                                                           "1s6"
-                                                           "1s5"
-                                                           "1s4"
-                                                           "1s3"
-                                                           "1s2"
-                                                           "1s1"
-                                                           "1s0"
-                                                           "1rz"
-                                                           "1ry"
-                                                           "1rx"
-                                                           "1rw"
-                                                           "1rv"
-                                                           "1ru"
-                                                           "1rt"
-                                                           "1rs"
-                                                           "1rr"
-                                                           "1rq"
-                                                           "1rp"
-                                                           "1ro"
-                                                           "1rn"
-                                                           "1rm"
-                                                           "1rl"
-                                                           "1rk"
-                                                           "1rj"
-                                                           "1ri"
-                                                           "1rh"
-                                                           "1rg"
-                                                           "1rf"
-                                                           "1re"
-                                                           "1rd"
-                                                           "1rc"
-                                                           "1rb"
-                                                           "1ra"
-                                                           "1r9"
-                                                           "1r8"
-                                                           "1r7"
-                                                           "1r6"
-                                                           "1r5"
-                                                           "1r4"
-                                                           "1r3"
-                                                           "1r2"
-                                                           "1r1"
-                                                           "1r0"
-                                                           "1qz"
-                                                           "1qy"
-                                                           "1qx"
-                                                           "1qw"
-                                                           "1qv"
-                                                           "1qu"
-                                                           "1qt"
-                                                           "1qs"
-                                                           "1qr"
-                                                           "1qq"
-                                                           "1qp"
-                                                           "1qo"
-                                                           "1qn"
-                                                           "1qm"
-                                                           "1ql"
-                                                           "1qk"
-                                                           "1qj"
-                                                           "1qi"
-                                                           "1qh"
-                                                           "1qg"
-                                                           "1qf"
-                                                           "1qe"
-                                                           "1qd"
-                                                           "1qc"
-                                                           "1qb"
-                                                           "1qa"
-                                                           "1q9"
-                                                           "1q8"
-                                                           "1q7"
-                                                           "1q6"
-                                                           "1q5"
-                                                           "1q4"
-                                                           "1q3"
-                                                           "1q2"
-                                                           "1q1"
-                                                           "1q0"
-                                                           "1pz"
-                                                           "1py"))
+                                                          ("5l"
+                                                           "5k"
+                                                           "5j"
+                                                           "5i"
+                                                           "5h"
+                                                           "5g"
+                                                           "5f"
+                                                           "5e"
+                                                           "5d"
+                                                           "5c"
+                                                           "5b"
+                                                           "5a"
+                                                           "59"
+                                                           "58"
+                                                           "57"
+                                                           "56"
+                                                           "55"
+                                                           "54"
+                                                           "53"
+                                                           "52"
+                                                           "51"
+                                                           "50"
+                                                           "4z"
+                                                           "4y"
+                                                           "4x"
+                                                           "4w"
+                                                           "4v"
+                                                           "4u"
+                                                           "4t"
+                                                           "4s"
+                                                           "4r"
+                                                           "4q"
+                                                           "4p"
+                                                           "4o"
+                                                           "4n"
+                                                           "4m"
+                                                           "4l"
+                                                           "4k"
+                                                           "4j"
+                                                           "4i"
+                                                           "4h"
+                                                           "4g"
+                                                           "4f"
+                                                           "4e"
+                                                           "4d"
+                                                           "4c"
+                                                           "4b"
+                                                           "4a"
+                                                           "49"
+                                                           "48"
+                                                           "47"
+                                                           "46"
+                                                           "45"
+                                                           "44"
+                                                           "43"
+                                                           "42"
+                                                           "41"
+                                                           "40"
+                                                           "3z"
+                                                           "3y"
+                                                           "3x"
+                                                           "3w"
+                                                           "3v"
+                                                           "3u"
+                                                           "3t"
+                                                           "3s"
+                                                           "3r"
+                                                           "3q"
+                                                           "3p"
+                                                           "3o"
+                                                           "3n"
+                                                           "3m"
+                                                           "3l"
+                                                           "3k"
+                                                           "3j"
+                                                           "3i"
+                                                           "3h"
+                                                           "3g"
+                                                           "3f"
+                                                           "3e"
+                                                           "3d"
+                                                           "3c"
+                                                           "3b"
+                                                           "3a"
+                                                           "39"
+                                                           "38"
+                                                           "37"
+                                                           "36"
+                                                           "35"
+                                                           "34"
+                                                           "33"
+                                                           "32"
+                                                           "31"
+                                                           "30"
+                                                           "2z"
+                                                           "2y"
+                                                           "2x"
+                                                           "2w"
+                                                           "2v"
+                                                           "2u"
+                                                           "2t"
+                                                           "2s"
+                                                           "2r"
+                                                           "2q"
+                                                           "2p"
+                                                           "2o"
+                                                           "2n"
+                                                           "2m"
+                                                           "2l"
+                                                           "2k"
+                                                           "2j"
+                                                           "2i"
+                                                           "2h"
+                                                           "2g"
+                                                           "2f"
+                                                           "2e"
+                                                           "2d"
+                                                           "2c"
+                                                           "2b"
+                                                           "2a"
+                                                           "29"
+                                                           "28"
+                                                           "27"
+                                                           "26"
+                                                           "25"
+                                                           "24"
+                                                           "23"
+                                                           "22"
+                                                           "21"
+                                                           "20"
+                                                           "1z"
+                                                           "1y"
+                                                           "1x"
+                                                           "1w"
+                                                           "1v"
+                                                           "1u"
+                                                           "1t"
+                                                           "1s"
+                                                           "1r"
+                                                           "1q"))
                                                         #(ribcage
                                                           (define-structure
                                                             define-expansion-accessors
                                                             define-expansion-constructors)
                                                           ((top) (top) (top))
-                                                          ("1og" "1of" "1oe")))
+                                                          ("8" "7" "6")))
                                                        (hygiene guile))
                                                     '(())))
                                              #f)
                                            #f))))
-                                #{pvars _hoQGWMnyQPAh3k2jhWJMU}#))
+                                #{pvars -ANAU$bmvAmthP7L7xwpGz}#))
                        (syntax-violation
                          'syntax-case
                          "misplaced ellipsis"
-                         #{pat _hoQGWMnyQPAh3k2jhWJJ1}#)
-                       (let ((#{y _hoQGWMnyQPAh3k2jhWJPY}#
+                         #{pat -ANAU$bmvAmthP7L7xwpEU}#)
+                       (let ((#{y -ANAU$bmvAmthP7L7xwpJ3}#
                                (gensym
                                  (string-append (symbol->string 'tmp) " "))))
-                         (#{build-application _hoQGWMnyQPAh3k2jhWHSg}#
+                         (#{build-application -ANAU$bmvAmthP7L7xwnM@}#
                            #f
-                           (let ((#{req _hoQGWMnyQPAh3k2jhWJRn}# (list 'tmp))
-                                 (#{vars _hoQGWMnyQPAh3k2jhWJRp}#
-                                   (list #{y _hoQGWMnyQPAh3k2jhWJPY}#))
-                                 (#{exp _hoQGWMnyQPAh3k2jhWJRr}#
-                                   (let ((#{y _hoQGWMnyQPAh3k2jhWJR8}#
+                           (let ((#{req -ANAU$bmvAmthP7L7xwpMG}# (list 'tmp))
+                                 (#{vars -ANAU$bmvAmthP7L7xwpMI}#
+                                   (list #{y -ANAU$bmvAmthP7L7xwpJ3}#))
+                                 (#{exp -ANAU$bmvAmthP7L7xwpMK}#
+                                   (let ((#{y -ANAU$bmvAmthP7L7xwpMb}#
                                            (make-struct/no-tail
                                              (vector-ref %expanded-vtables 3)
                                              #f
                                              'tmp
-                                             #{y _hoQGWMnyQPAh3k2jhWJPY}#)))
-                                     (let ((#{test-exp _hoQGWMnyQPAh3k2jhWJSA}#
-                                             (let ((#{tmp _hoQGWMnyQPAh3k2jhWJSJ}#
+                                             #{y -ANAU$bmvAmthP7L7xwpJ3}#)))
+                                     (let ((#{test-exp -ANAU$bmvAmthP7L7xwpMf}#
+                                             (let ((#{tmp -ANAU$bmvAmthP7L7xwpMo}#
                                                      ($sc-dispatch
-                                                       #{fender _hoQGWMnyQPAh3k2jhWJJ2}#
+                                                       #{fender -ANAU$bmvAmthP7L7xwpEV}#
                                                        '#(atom #t))))
-                                               (if #{tmp _hoQGWMnyQPAh3k2jhWJSJ}#
+                                               (if #{tmp -ANAU$bmvAmthP7L7xwpMo}#
                                                  (@apply
                                                    (lambda ()
-                                                     #{y _hoQGWMnyQPAh3k2jhWJR8}#)
-                                                   #{tmp _hoQGWMnyQPAh3k2jhWJSJ}#)
-                                                 (let ((#{then-exp _hoQGWMnyQPAh3k2jhWJSb}#
-                                                         (#{build-dispatch-call _hoQGWMnyQPAh3k2jhWI6r}#
-                                                           #{pvars _hoQGWMnyQPAh3k2jhWJMU}#
-                                                           #{fender _hoQGWMnyQPAh3k2jhWJJ2}#
-                                                           #{y _hoQGWMnyQPAh3k2jhWJR8}#
-                                                           #{r _hoQGWMnyQPAh3k2jhWJJ0}#
-                                                           #{mod _hoQGWMnyQPAh3k2jhWJJ4}#))
-                                                       (#{else-exp _hoQGWMnyQPAh3k2jhWJSc}#
+                                                     #{y -ANAU$bmvAmthP7L7xwpMb}#)
+                                                   #{tmp -ANAU$bmvAmthP7L7xwpMo}#)
+                                                 (let ((#{then-exp -ANAU$bmvAmthP7L7xwpM6}#
+                                                         (#{build-dispatch-call -ANAU$bmvAmthP7L7xwo1K}#
+                                                           #{pvars -ANAU$bmvAmthP7L7xwpGz}#
+                                                           #{fender -ANAU$bmvAmthP7L7xwpEV}#
+                                                           #{y -ANAU$bmvAmthP7L7xwpMb}#
+                                                           #{r -ANAU$bmvAmthP7L7xwpET}#
+                                                           #{mod -ANAU$bmvAmthP7L7xwpEX}#))
+                                                       (#{else-exp -ANAU$bmvAmthP7L7xwpM7}#
                                                          (make-struct/no-tail
                                                            (vector-ref
                                                              %expanded-vtables
@@ -18045,48 +18019,48 @@
                                                        %expanded-vtables
                                                        10)
                                                      #f
-                                                     #{y _hoQGWMnyQPAh3k2jhWJR8}#
-                                                     #{then-exp _hoQGWMnyQPAh3k2jhWJSb}#
-                                                     #{else-exp _hoQGWMnyQPAh3k2jhWJSc}#)))))
-                                           (#{then-exp _hoQGWMnyQPAh3k2jhWJSB}#
-                                             (#{build-dispatch-call _hoQGWMnyQPAh3k2jhWI6r}#
-                                               #{pvars _hoQGWMnyQPAh3k2jhWJMU}#
-                                               #{exp _hoQGWMnyQPAh3k2jhWJJ3}#
-                                               #{y _hoQGWMnyQPAh3k2jhWJR8}#
-                                               #{r _hoQGWMnyQPAh3k2jhWJJ0}#
-                                               #{mod _hoQGWMnyQPAh3k2jhWJJ4}#))
-                                           (#{else-exp _hoQGWMnyQPAh3k2jhWJSC}#
-                                             (#{gen-syntax-case _hoQGWMnyQPAh3k2jhWI6t}#
-                                               #{x _hoQGWMnyQPAh3k2jhWJJx}#
-                                               #{keys _hoQGWMnyQPAh3k2jhWJJy}#
-                                               #{clauses _hoQGWMnyQPAh3k2jhWJJz}#
-                                               #{r _hoQGWMnyQPAh3k2jhWJJ0}#
-                                               #{mod _hoQGWMnyQPAh3k2jhWJJ4}#)))
+                                                     #{y -ANAU$bmvAmthP7L7xwpMb}#
+                                                     #{then-exp -ANAU$bmvAmthP7L7xwpM6}#
+                                                     #{else-exp -ANAU$bmvAmthP7L7xwpM7}#)))))
+                                           (#{then-exp -ANAU$bmvAmthP7L7xwpMg}#
+                                             (#{build-dispatch-call -ANAU$bmvAmthP7L7xwo1K}#
+                                               #{pvars -ANAU$bmvAmthP7L7xwpGz}#
+                                               #{exp -ANAU$bmvAmthP7L7xwpEW}#
+                                               #{y -ANAU$bmvAmthP7L7xwpMb}#
+                                               #{r -ANAU$bmvAmthP7L7xwpET}#
+                                               #{mod -ANAU$bmvAmthP7L7xwpEX}#))
+                                           (#{else-exp -ANAU$bmvAmthP7L7xwpMh}#
+                                             (#{gen-syntax-case -ANAU$bmvAmthP7L7xwo1M}#
+                                               #{x -ANAU$bmvAmthP7L7xwpEQ}#
+                                               #{keys -ANAU$bmvAmthP7L7xwpER}#
+                                               #{clauses -ANAU$bmvAmthP7L7xwpES}#
+                                               #{r -ANAU$bmvAmthP7L7xwpET}#
+                                               #{mod -ANAU$bmvAmthP7L7xwpEX}#)))
                                        (make-struct/no-tail
                                          (vector-ref %expanded-vtables 10)
                                          #f
-                                         #{test-exp _hoQGWMnyQPAh3k2jhWJSA}#
-                                         #{then-exp _hoQGWMnyQPAh3k2jhWJSB}#
-                                         #{else-exp _hoQGWMnyQPAh3k2jhWJSC}#)))))
-                             (let ((#{body _hoQGWMnyQPAh3k2jhWJRw}#
+                                         #{test-exp -ANAU$bmvAmthP7L7xwpMf}#
+                                         #{then-exp -ANAU$bmvAmthP7L7xwpMg}#
+                                         #{else-exp -ANAU$bmvAmthP7L7xwpMh}#)))))
+                             (let ((#{body -ANAU$bmvAmthP7L7xwpMP}#
                                      (make-struct/no-tail
                                        (vector-ref %expanded-vtables 14)
                                        #f
-                                       #{req _hoQGWMnyQPAh3k2jhWJRn}#
+                                       #{req -ANAU$bmvAmthP7L7xwpMG}#
                                        #f
                                        #f
                                        #f
                                        '()
-                                       #{vars _hoQGWMnyQPAh3k2jhWJRp}#
-                                       #{exp _hoQGWMnyQPAh3k2jhWJRr}#
+                                       #{vars -ANAU$bmvAmthP7L7xwpMI}#
+                                       #{exp -ANAU$bmvAmthP7L7xwpMK}#
                                        #f)))
                                (make-struct/no-tail
                                  (vector-ref %expanded-vtables 13)
                                  #f
                                  '()
-                                 #{body _hoQGWMnyQPAh3k2jhWJRw}#)))
-                           (list (if (eq? #{p _hoQGWMnyQPAh3k2jhWJMT}# 'any)
-                                   (let ((#{fun-exp _hoQGWMnyQPAh3k2jhWJSy}#
+                                 #{body -ANAU$bmvAmthP7L7xwpMP}#)))
+                           (list (if (eq? #{p -ANAU$bmvAmthP7L7xwpGy}# 'any)
+                                   (let ((#{fun-exp -ANAU$bmvAmthP7L7xwpNR}#
                                            (if (equal?
                                                  (module-name (current-module))
                                                  '(guile))
@@ -18100,14 +18074,14 @@
                                                '(guile)
                                                'list
                                                #f)))
-                                         (#{arg-exps _hoQGWMnyQPAh3k2jhWJSz}#
-                                           (list #{x _hoQGWMnyQPAh3k2jhWJJx}#)))
+                                         (#{arg-exps -ANAU$bmvAmthP7L7xwpNS}#
+                                           (list #{x -ANAU$bmvAmthP7L7xwpEQ}#)))
                                      (make-struct/no-tail
                                        (vector-ref %expanded-vtables 11)
                                        #f
-                                       #{fun-exp _hoQGWMnyQPAh3k2jhWJSy}#
-                                       #{arg-exps _hoQGWMnyQPAh3k2jhWJSz}#))
-                                   (let ((#{fun-exp _hoQGWMnyQPAh3k2jhWJTK}#
+                                       #{fun-exp -ANAU$bmvAmthP7L7xwpNR}#
+                                       #{arg-exps -ANAU$bmvAmthP7L7xwpNS}#))
+                                   (let ((#{fun-exp -ANAU$bmvAmthP7L7xwpNp}#
                                            (if (equal?
                                                  (module-name (current-module))
                                                  '(guile))
@@ -18121,27 +18095,27 @@
                                                '(guile)
                                                '$sc-dispatch
                                                #f)))
-                                         (#{arg-exps _hoQGWMnyQPAh3k2jhWJTL}#
-                                           (list #{x _hoQGWMnyQPAh3k2jhWJJx}#
+                                         (#{arg-exps -ANAU$bmvAmthP7L7xwpNq}#
+                                           (list #{x -ANAU$bmvAmthP7L7xwpEQ}#
                                                  (make-struct/no-tail
                                                    (vector-ref
                                                      %expanded-vtables
                                                      1)
                                                    #f
-                                                   #{p _hoQGWMnyQPAh3k2jhWJMT}#))))
+                                                   #{p -ANAU$bmvAmthP7L7xwpGy}#))))
                                      (make-struct/no-tail
                                        (vector-ref %expanded-vtables 11)
                                        #f
-                                       #{fun-exp _hoQGWMnyQPAh3k2jhWJTK}#
-                                       #{arg-exps _hoQGWMnyQPAh3k2jhWJTL}#))))))))))))
-           (#{gen-syntax-case _hoQGWMnyQPAh3k2jhWI6t}#
-             (lambda (#{x _hoQGWMnyQPAh3k2jhWJA8}#
-                      #{keys _hoQGWMnyQPAh3k2jhWJA9}#
-                      #{clauses _hoQGWMnyQPAh3k2jhWJA$}#
-                      #{r _hoQGWMnyQPAh3k2jhWJA@}#
-                      #{mod _hoQGWMnyQPAh3k2jhWJBA}#)
-               (if (null? #{clauses _hoQGWMnyQPAh3k2jhWJA$}#)
-                 (let ((#{fun-exp _hoQGWMnyQPAh3k2jhWJBF}#
+                                       #{fun-exp -ANAU$bmvAmthP7L7xwpNp}#
+                                       #{arg-exps -ANAU$bmvAmthP7L7xwpNq}#))))))))))))
+           (#{gen-syntax-case -ANAU$bmvAmthP7L7xwo1M}#
+             (lambda (#{x -ANAU$bmvAmthP7L7xwo7b}#
+                      #{keys -ANAU$bmvAmthP7L7xwo7c}#
+                      #{clauses -ANAU$bmvAmthP7L7xwo7d}#
+                      #{r -ANAU$bmvAmthP7L7xwo7e}#
+                      #{mod -ANAU$bmvAmthP7L7xwo7f}#)
+               (if (null? #{clauses -ANAU$bmvAmthP7L7xwo7d}#)
+                 (let ((#{fun-exp -ANAU$bmvAmthP7L7xwo7k}#
                          (if (equal? (module-name (current-module)) '(guile))
                            (make-struct/no-tail
                              (vector-ref %expanded-vtables 7)
@@ -18153,7 +18127,7 @@
                              '(guile)
                              'syntax-violation
                              #f)))
-                       (#{arg-exps _hoQGWMnyQPAh3k2jhWJBG}#
+                       (#{arg-exps -ANAU$bmvAmthP7L7xwo7l}#
                          (list (make-struct/no-tail
                                  (vector-ref %expanded-vtables 1)
                                  #f
@@ -18162,77 +18136,77 @@
                                  (vector-ref %expanded-vtables 1)
                                  #f
                                  "source expression failed to match any pattern")
-                               #{x _hoQGWMnyQPAh3k2jhWJA8}#)))
+                               #{x -ANAU$bmvAmthP7L7xwo7b}#)))
                    (make-struct/no-tail
                      (vector-ref %expanded-vtables 11)
                      #f
-                     #{fun-exp _hoQGWMnyQPAh3k2jhWJBF}#
-                     #{arg-exps _hoQGWMnyQPAh3k2jhWJBG}#))
-                 (let ((#{tmp _hoQGWMnyQPAh3k2jhWJBn}#
-                         (car #{clauses _hoQGWMnyQPAh3k2jhWJA$}#)))
-                   (let ((#{tmp _hoQGWMnyQPAh3k2jhWJBo}#
+                     #{fun-exp -ANAU$bmvAmthP7L7xwo7k}#
+                     #{arg-exps -ANAU$bmvAmthP7L7xwo7l}#))
+                 (let ((#{tmp -ANAU$bmvAmthP7L7xwo8G}#
+                         (car #{clauses -ANAU$bmvAmthP7L7xwo7d}#)))
+                   (let ((#{tmp -ANAU$bmvAmthP7L7xwo8H}#
                            ($sc-dispatch
-                             #{tmp _hoQGWMnyQPAh3k2jhWJBn}#
+                             #{tmp -ANAU$bmvAmthP7L7xwo8G}#
                              '(any any))))
-                     (if #{tmp _hoQGWMnyQPAh3k2jhWJBo}#
+                     (if #{tmp -ANAU$bmvAmthP7L7xwo8H}#
                        (@apply
-                         (lambda (#{pat _hoQGWMnyQPAh3k2jhWJBq}#
-                                  #{exp _hoQGWMnyQPAh3k2jhWJBr}#)
-                           (if (if (if (symbol? #{pat _hoQGWMnyQPAh3k2jhWJBq}#)
+                         (lambda (#{pat -ANAU$bmvAmthP7L7xwo8J}#
+                                  #{exp -ANAU$bmvAmthP7L7xwo8K}#)
+                           (if (if (if (symbol? #{pat -ANAU$bmvAmthP7L7xwo8J}#)
                                      #t
                                      (if (if (vector?
-                                               #{pat _hoQGWMnyQPAh3k2jhWJBq}#)
+                                               #{pat -ANAU$bmvAmthP7L7xwo8J}#)
                                            (if (= (vector-length
-                                                    #{pat _hoQGWMnyQPAh3k2jhWJBq}#)
+                                                    #{pat -ANAU$bmvAmthP7L7xwo8J}#)
                                                   4)
                                              (eq? (vector-ref
-                                                    #{pat _hoQGWMnyQPAh3k2jhWJBq}#
+                                                    #{pat -ANAU$bmvAmthP7L7xwo8J}#
                                                     0)
                                                   'syntax-object)
                                              #f)
                                            #f)
                                        (symbol?
                                          (vector-ref
-                                           #{pat _hoQGWMnyQPAh3k2jhWJBq}#
+                                           #{pat -ANAU$bmvAmthP7L7xwo8J}#
                                            1))
                                        #f))
                                  (and-map
-                                   (lambda (#{x _hoQGWMnyQPAh3k2jhWJCG}#)
+                                   (lambda (#{x -ANAU$bmvAmthP7L7xwo8l}#)
                                      (not (if (eq? (if (if (vector?
-                                                             #{pat _hoQGWMnyQPAh3k2jhWJBq}#)
+                                                             #{pat -ANAU$bmvAmthP7L7xwo8J}#)
                                                          (if (= (vector-length
-                                                                  #{pat _hoQGWMnyQPAh3k2jhWJBq}#)
+                                                                  #{pat -ANAU$bmvAmthP7L7xwo8J}#)
                                                                 4)
                                                            (eq? (vector-ref
-                                                                  #{pat _hoQGWMnyQPAh3k2jhWJBq}#
+                                                                  #{pat -ANAU$bmvAmthP7L7xwo8J}#
                                                                   0)
                                                                 'syntax-object)
                                                            #f)
                                                          #f)
                                                      (vector-ref
-                                                       #{pat _hoQGWMnyQPAh3k2jhWJBq}#
+                                                       #{pat -ANAU$bmvAmthP7L7xwo8J}#
                                                        1)
-                                                     #{pat _hoQGWMnyQPAh3k2jhWJBq}#)
+                                                     #{pat -ANAU$bmvAmthP7L7xwo8J}#)
                                                    (if (if (vector?
-                                                             #{x _hoQGWMnyQPAh3k2jhWJCG}#)
+                                                             #{x -ANAU$bmvAmthP7L7xwo8l}#)
                                                          (if (= (vector-length
-                                                                  #{x _hoQGWMnyQPAh3k2jhWJCG}#)
+                                                                  #{x -ANAU$bmvAmthP7L7xwo8l}#)
                                                                 4)
                                                            (eq? (vector-ref
-                                                                  #{x _hoQGWMnyQPAh3k2jhWJCG}#
+                                                                  #{x -ANAU$bmvAmthP7L7xwo8l}#
                                                                   0)
                                                                 'syntax-object)
                                                            #f)
                                                          #f)
                                                      (vector-ref
-                                                       #{x _hoQGWMnyQPAh3k2jhWJCG}#
+                                                       #{x -ANAU$bmvAmthP7L7xwo8l}#
                                                        1)
-                                                     #{x _hoQGWMnyQPAh3k2jhWJCG}#))
-                                            (eq? (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                                                   #{pat _hoQGWMnyQPAh3k2jhWJBq}#
+                                                     #{x -ANAU$bmvAmthP7L7xwo8l}#))
+                                            (eq? (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                                                   #{pat -ANAU$bmvAmthP7L7xwo8J}#
                                                    '(()))
-                                                 (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                                                   #{x _hoQGWMnyQPAh3k2jhWJCG}#
+                                                 (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                                                   #{x -ANAU$bmvAmthP7L7xwo8l}#
                                                    '(())))
                                             #f)))
                                    (cons '#(syntax-object
@@ -18241,23 +18215,23 @@
                                              #(ribcage
                                                #(pat exp)
                                                #((top) (top))
-                                               #("2w6" "2w7"))
+                                               #("17y" "17z"))
                                              #(ribcage () () ())
                                              #(ribcage
                                                #(x keys clauses r mod)
                                                #((top) (top) (top) (top) (top))
-                                               #("2w1"
-                                                 "2w2"
-                                                 "2w3"
-                                                 "2w4"
-                                                 "2w5"))
+                                               #("17t"
+                                                 "17u"
+                                                 "17v"
+                                                 "17w"
+                                                 "17x"))
                                              #(ribcage
                                                (gen-syntax-case
                                                  gen-clause
                                                  build-dispatch-call
                                                  convert-pattern)
                                                ((top) (top) (top) (top))
-                                               ("2u0" "2tz" "2ty" "2tx"))
+                                               ("15s" "15r" "15q" "15p"))
                                              #(ribcage
                                                (lambda-var-list
                                                  gen-var
@@ -18539,154 +18513,154 @@
                                                 (top)
                                                 (top)
                                                 (top))
-                                               ("1tt"
-                                                "1ts"
-                                                "1tr"
-                                                "1tq"
-                                                "1tp"
-                                                "1to"
-                                                "1tn"
-                                                "1tm"
-                                                "1tl"
-                                                "1tk"
-                                                "1tj"
-                                                "1ti"
-                                                "1th"
-                                                "1tg"
-                                                "1tf"
-                                                "1te"
-                                                "1td"
-                                                "1tc"
-                                                "1tb"
-                                                "1ta"
-                                                "1t9"
-                                                "1t8"
-                                                "1t7"
-                                                "1t6"
-                                                "1t5"
-                                                "1t4"
-                                                "1t3"
-                                                "1t2"
-                                                "1t1"
-                                                "1t0"
-                                                "1sz"
-                                                "1sy"
-                                                "1sx"
-                                                "1sw"
-                                                "1sv"
-                                                "1su"
-                                                "1st"
-                                                "1ss"
-                                                "1sr"
-                                                "1sq"
-                                                "1sp"
-                                                "1so"
-                                                "1sn"
-                                                "1sm"
-                                                "1sl"
-                                                "1sk"
-                                                "1sj"
-                                                "1si"
-                                                "1sh"
-                                                "1sg"
-                                                "1sf"
-                                                "1se"
-                                                "1sd"
-                                                "1sc"
-                                                "1sb"
-                                                "1sa"
-                                                "1s9"
-                                                "1s8"
-                                                "1s7"
-                                                "1s6"
-                                                "1s5"
-                                                "1s4"
-                                                "1s3"
-                                                "1s2"
-                                                "1s1"
-                                                "1s0"
-                                                "1rz"
-                                                "1ry"
-                                                "1rx"
-                                                "1rw"
-                                                "1rv"
-                                                "1ru"
-                                                "1rt"
-                                                "1rs"
-                                                "1rr"
-                                                "1rq"
-                                                "1rp"
-                                                "1ro"
-                                                "1rn"
-                                                "1rm"
-                                                "1rl"
-                                                "1rk"
-                                                "1rj"
-                                                "1ri"
-                                                "1rh"
-                                                "1rg"
-                                                "1rf"
-                                                "1re"
-                                                "1rd"
-                                                "1rc"
-                                                "1rb"
-                                                "1ra"
-                                                "1r9"
-                                                "1r8"
-                                                "1r7"
-                                                "1r6"
-                                                "1r5"
-                                                "1r4"
-                                                "1r3"
-                                                "1r2"
-                                                "1r1"
-                                                "1r0"
-                                                "1qz"
-                                                "1qy"
-                                                "1qx"
-                                                "1qw"
-                                                "1qv"
-                                                "1qu"
-                                                "1qt"
-                                                "1qs"
-                                                "1qr"
-                                                "1qq"
-                                                "1qp"
-                                                "1qo"
-                                                "1qn"
-                                                "1qm"
-                                                "1ql"
-                                                "1qk"
-                                                "1qj"
-                                                "1qi"
-                                                "1qh"
-                                                "1qg"
-                                                "1qf"
-                                                "1qe"
-                                                "1qd"
-                                                "1qc"
-                                                "1qb"
-                                                "1qa"
-                                                "1q9"
-                                                "1q8"
-                                                "1q7"
-                                                "1q6"
-                                                "1q5"
-                                                "1q4"
-                                                "1q3"
-                                                "1q2"
-                                                "1q1"
-                                                "1q0"
-                                                "1pz"
-                                                "1py"))
+                                               ("5l"
+                                                "5k"
+                                                "5j"
+                                                "5i"
+                                                "5h"
+                                                "5g"
+                                                "5f"
+                                                "5e"
+                                                "5d"
+                                                "5c"
+                                                "5b"
+                                                "5a"
+                                                "59"
+                                                "58"
+                                                "57"
+                                                "56"
+                                                "55"
+                                                "54"
+                                                "53"
+                                                "52"
+                                                "51"
+                                                "50"
+                                                "4z"
+                                                "4y"
+                                                "4x"
+                                                "4w"
+                                                "4v"
+                                                "4u"
+                                                "4t"
+                                                "4s"
+                                                "4r"
+                                                "4q"
+                                                "4p"
+                                                "4o"
+                                                "4n"
+                                                "4m"
+                                                "4l"
+                                                "4k"
+                                                "4j"
+                                                "4i"
+                                                "4h"
+                                                "4g"
+                                                "4f"
+                                                "4e"
+                                                "4d"
+                                                "4c"
+                                                "4b"
+                                                "4a"
+                                                "49"
+                                                "48"
+                                                "47"
+                                                "46"
+                                                "45"
+                                                "44"
+                                                "43"
+                                                "42"
+                                                "41"
+                                                "40"
+                                                "3z"
+                                                "3y"
+                                                "3x"
+                                                "3w"
+                                                "3v"
+                                                "3u"
+                                                "3t"
+                                                "3s"
+                                                "3r"
+                                                "3q"
+                                                "3p"
+                                                "3o"
+                                                "3n"
+                                                "3m"
+                                                "3l"
+                                                "3k"
+                                                "3j"
+                                                "3i"
+                                                "3h"
+                                                "3g"
+                                                "3f"
+                                                "3e"
+                                                "3d"
+                                                "3c"
+                                                "3b"
+                                                "3a"
+                                                "39"
+                                                "38"
+                                                "37"
+                                                "36"
+                                                "35"
+                                                "34"
+                                                "33"
+                                                "32"
+                                                "31"
+                                                "30"
+                                                "2z"
+                                                "2y"
+                                                "2x"
+                                                "2w"
+                                                "2v"
+                                                "2u"
+                                                "2t"
+                                                "2s"
+                                                "2r"
+                                                "2q"
+                                                "2p"
+                                                "2o"
+                                                "2n"
+                                                "2m"
+                                                "2l"
+                                                "2k"
+                                                "2j"
+                                                "2i"
+                                                "2h"
+                                                "2g"
+                                                "2f"
+                                                "2e"
+                                                "2d"
+                                                "2c"
+                                                "2b"
+                                                "2a"
+                                                "29"
+                                                "28"
+                                                "27"
+                                                "26"
+                                                "25"
+                                                "24"
+                                                "23"
+                                                "22"
+                                                "21"
+                                                "20"
+                                                "1z"
+                                                "1y"
+                                                "1x"
+                                                "1w"
+                                                "1v"
+                                                "1u"
+                                                "1t"
+                                                "1s"
+                                                "1r"
+                                                "1q"))
                                              #(ribcage
                                                (define-structure
                                                  define-expansion-accessors
                                                  define-expansion-constructors)
                                                ((top) (top) (top))
-                                               ("1og" "1of" "1oe")))
+                                               ("8" "7" "6")))
                                             (hygiene guile))
-                                         #{keys _hoQGWMnyQPAh3k2jhWJA9}#))
+                                         #{keys -ANAU$bmvAmthP7L7xwo7c}#))
                                  #f)
                              (if (if (eq? (if (if (= (vector-length
                                                        '#(syntax-object
@@ -18695,7 +18669,7 @@
                                                            #(ribcage
                                                              #(pat exp)
                                                              #((top) (top))
-                                                             #("2w6" "2w7"))
+                                                             #("17y" "17z"))
                                                            #(ribcage () () ())
                                                            #(ribcage
                                                              #(x
@@ -18708,11 +18682,11 @@
                                                                (top)
                                                                (top)
                                                                (top))
-                                                             #("2w1"
-                                                               "2w2"
-                                                               "2w3"
-                                                               "2w4"
-                                                               "2w5"))
+                                                             #("17t"
+                                                               "17u"
+                                                               "17v"
+                                                               "17w"
+                                                               "17x"))
                                                            #(ribcage
                                                              (gen-syntax-case
                                                                gen-clause
@@ -18722,10 +18696,10 @@
                                                               (top)
                                                               (top)
                                                               (top))
-                                                             ("2u0"
-                                                              "2tz"
-                                                              "2ty"
-                                                              "2tx"))
+                                                             ("15s"
+                                                              "15r"
+                                                              "15q"
+                                                              "15p"))
                                                            #(ribcage
                                                              (lambda-var-list
                                                                gen-var
@@ -19007,146 +18981,146 @@
                                                               (top)
                                                               (top)
                                                               (top))
-                                                             ("1tt"
-                                                              "1ts"
-                                                              "1tr"
-                                                              "1tq"
-                                                              "1tp"
-                                                              "1to"
-                                                              "1tn"
-                                                              "1tm"
-                                                              "1tl"
-                                                              "1tk"
-                                                              "1tj"
-                                                              "1ti"
-                                                              "1th"
-                                                              "1tg"
-                                                              "1tf"
-                                                              "1te"
-                                                              "1td"
-                                                              "1tc"
-                                                              "1tb"
-                                                              "1ta"
-                                                              "1t9"
-                                                              "1t8"
-                                                              "1t7"
-                                                              "1t6"
-                                                              "1t5"
-                                                              "1t4"
-                                                              "1t3"
-                                                              "1t2"
-                                                              "1t1"
-                                                              "1t0"
-                                                              "1sz"
-                                                              "1sy"
-                                                              "1sx"
-                                                              "1sw"
-                                                              "1sv"
-                                                              "1su"
-                                                              "1st"
-                                                              "1ss"
-                                                              "1sr"
-                                                              "1sq"
-                                                              "1sp"
-                                                              "1so"
-                                                              "1sn"
-                                                              "1sm"
-                                                              "1sl"
-                                                              "1sk"
-                                                              "1sj"
-                                                              "1si"
-                                                              "1sh"
-                                                              "1sg"
-                                                              "1sf"
-                                                              "1se"
-                                                              "1sd"
-                                                              "1sc"
-                                                              "1sb"
-                                                              "1sa"
-                                                              "1s9"
-                                                              "1s8"
-                                                              "1s7"
-                                                              "1s6"
-                                                              "1s5"
-                                                              "1s4"
-                                                              "1s3"
-                                                              "1s2"
-                                                              "1s1"
-                                                              "1s0"
-                                                              "1rz"
-                                                              "1ry"
-                                                              "1rx"
-                                                              "1rw"
-                                                              "1rv"
-                                                              "1ru"
-                                                              "1rt"
-                                                              "1rs"
-                                                              "1rr"
-                                                              "1rq"
-                                                              "1rp"
-                                                              "1ro"
-                                                              "1rn"
-                                                              "1rm"
-                                                              "1rl"
-                                                              "1rk"
-                                                              "1rj"
-                                                              "1ri"
-                                                              "1rh"
-                                                              "1rg"
-                                                              "1rf"
-                                                              "1re"
-                                                              "1rd"
-                                                              "1rc"
-                                                              "1rb"
-                                                              "1ra"
-                                                              "1r9"
-                                                              "1r8"
-                                                              "1r7"
-                                                              "1r6"
-                                                              "1r5"
-                                                              "1r4"
-                                                              "1r3"
-                                                              "1r2"
-                                                              "1r1"
-                                                              "1r0"
-                                                              "1qz"
-                                                              "1qy"
-                                                              "1qx"
-                                                              "1qw"
-                                                              "1qv"
-                                                              "1qu"
-                                                              "1qt"
-                                                              "1qs"
-                                                              "1qr"
-                                                              "1qq"
-                                                              "1qp"
-                                                              "1qo"
-                                                              "1qn"
-                                                              "1qm"
-                                                              "1ql"
-                                                              "1qk"
-                                                              "1qj"
-                                                              "1qi"
-                                                              "1qh"
-                                                              "1qg"
-                                                              "1qf"
-                                                              "1qe"
-                                                              "1qd"
-                                                              "1qc"
-                                                              "1qb"
-                                                              "1qa"
-                                                              "1q9"
-                                                              "1q8"
-                                                              "1q7"
-                                                              "1q6"
-                                                              "1q5"
-                                                              "1q4"
-                                                              "1q3"
-                                                              "1q2"
-                                                              "1q1"
-                                                              "1q0"
-                                                              "1pz"
-                                                              "1py"))
+                                                             ("5l"
+                                                              "5k"
+                                                              "5j"
+                                                              "5i"
+                                                              "5h"
+                                                              "5g"
+                                                              "5f"
+                                                              "5e"
+                                                              "5d"
+                                                              "5c"
+                                                              "5b"
+                                                              "5a"
+                                                              "59"
+                                                              "58"
+                                                              "57"
+                                                              "56"
+                                                              "55"
+                                                              "54"
+                                                              "53"
+                                                              "52"
+                                                              "51"
+                                                              "50"
+                                                              "4z"
+                                                              "4y"
+                                                              "4x"
+                                                              "4w"
+                                                              "4v"
+                                                              "4u"
+                                                              "4t"
+                                                              "4s"
+                                                              "4r"
+                                                              "4q"
+                                                              "4p"
+                                                              "4o"
+                                                              "4n"
+                                                              "4m"
+                                                              "4l"
+                                                              "4k"
+                                                              "4j"
+                                                              "4i"
+                                                              "4h"
+                                                              "4g"
+                                                              "4f"
+                                                              "4e"
+                                                              "4d"
+                                                              "4c"
+                                                              "4b"
+                                                              "4a"
+                                                              "49"
+                                                              "48"
+                                                              "47"
+                                                              "46"
+                                                              "45"
+                                                              "44"
+                                                              "43"
+                                                              "42"
+                                                              "41"
+                                                              "40"
+                                                              "3z"
+                                                              "3y"
+                                                              "3x"
+                                                              "3w"
+                                                              "3v"
+                                                              "3u"
+                                                              "3t"
+                                                              "3s"
+                                                              "3r"
+                                                              "3q"
+                                                              "3p"
+                                                              "3o"
+                                                              "3n"
+                                                              "3m"
+                                                              "3l"
+                                                              "3k"
+                                                              "3j"
+                                                              "3i"
+                                                              "3h"
+                                                              "3g"
+                                                              "3f"
+                                                              "3e"
+                                                              "3d"
+                                                              "3c"
+                                                              "3b"
+                                                              "3a"
+                                                              "39"
+                                                              "38"
+                                                              "37"
+                                                              "36"
+                                                              "35"
+                                                              "34"
+                                                              "33"
+                                                              "32"
+                                                              "31"
+                                                              "30"
+                                                              "2z"
+                                                              "2y"
+                                                              "2x"
+                                                              "2w"
+                                                              "2v"
+                                                              "2u"
+                                                              "2t"
+                                                              "2s"
+                                                              "2r"
+                                                              "2q"
+                                                              "2p"
+                                                              "2o"
+                                                              "2n"
+                                                              "2m"
+                                                              "2l"
+                                                              "2k"
+                                                              "2j"
+                                                              "2i"
+                                                              "2h"
+                                                              "2g"
+                                                              "2f"
+                                                              "2e"
+                                                              "2d"
+                                                              "2c"
+                                                              "2b"
+                                                              "2a"
+                                                              "29"
+                                                              "28"
+                                                              "27"
+                                                              "26"
+                                                              "25"
+                                                              "24"
+                                                              "23"
+                                                              "22"
+                                                              "21"
+                                                              "20"
+                                                              "1z"
+                                                              "1y"
+                                                              "1x"
+                                                              "1w"
+                                                              "1v"
+                                                              "1u"
+                                                              "1t"
+                                                              "1s"
+                                                              "1r"
+                                                              "1q"))
                                                            #(ribcage
                                                              (define-structure
                                                                define-expansion-accessors
@@ -19154,9 +19128,7 @@
                                                              ((top)
                                                               (top)
                                                               (top))
-                                                             ("1og"
-                                                              "1of"
-                                                              "1oe")))
+                                                             ("8" "7" "6")))
                                                           (hygiene guile)))
                                                      4)
                                                 #t
@@ -19168,7 +19140,7 @@
                                                 #(ribcage
                                                   #(pat exp)
                                                   #((top) (top))
-                                                  #("2w6" "2w7"))
+                                                  #("17y" "17z"))
                                                 #(ribcage () () ())
                                                 #(ribcage
                                                   #(x keys clauses r mod)
@@ -19177,18 +19149,18 @@
                                                     (top)
                                                     (top)
                                                     (top))
-                                                  #("2w1"
-                                                    "2w2"
-                                                    "2w3"
-                                                    "2w4"
-                                                    "2w5"))
+                                                  #("17t"
+                                                    "17u"
+                                                    "17v"
+                                                    "17w"
+                                                    "17x"))
                                                 #(ribcage
                                                   (gen-syntax-case
                                                     gen-clause
                                                     build-dispatch-call
                                                     convert-pattern)
                                                   ((top) (top) (top) (top))
-                                                  ("2u0" "2tz" "2ty" "2tx"))
+                                                  ("15s" "15r" "15q" "15p"))
                                                 #(ribcage
                                                   (lambda-var-list
                                                     gen-var
@@ -19470,152 +19442,152 @@
                                                    (top)
                                                    (top)
                                                    (top))
-                                                  ("1tt"
-                                                   "1ts"
-                                                   "1tr"
-                                                   "1tq"
-                                                   "1tp"
-                                                   "1to"
-                                                   "1tn"
-                                                   "1tm"
-                                                   "1tl"
-                                                   "1tk"
-                                                   "1tj"
-                                                   "1ti"
-                                                   "1th"
-                                                   "1tg"
-                                                   "1tf"
-                                                   "1te"
-                                                   "1td"
-                                                   "1tc"
-                                                   "1tb"
-                                                   "1ta"
-                                                   "1t9"
-                                                   "1t8"
-                                                   "1t7"
-                                                   "1t6"
-                                                   "1t5"
-                                                   "1t4"
-                                                   "1t3"
-                                                   "1t2"
-                                                   "1t1"
-                                                   "1t0"
-                                                   "1sz"
-                                                   "1sy"
-                                                   "1sx"
-                                                   "1sw"
-                                                   "1sv"
-                                                   "1su"
-                                                   "1st"
-                                                   "1ss"
-                                                   "1sr"
-                                                   "1sq"
-                                                   "1sp"
-                                                   "1so"
-                                                   "1sn"
-                                                   "1sm"
-                                                   "1sl"
-                                                   "1sk"
-                                                   "1sj"
-                                                   "1si"
-                                                   "1sh"
-                                                   "1sg"
-                                                   "1sf"
-                                                   "1se"
-                                                   "1sd"
-                                                   "1sc"
-                                                   "1sb"
-                                                   "1sa"
-                                                   "1s9"
-                                                   "1s8"
-                                                   "1s7"
-                                                   "1s6"
-                                                   "1s5"
-                                                   "1s4"
-                                                   "1s3"
-                                                   "1s2"
-                                                   "1s1"
-                                                   "1s0"
-                                                   "1rz"
-                                                   "1ry"
-                                                   "1rx"
-                                                   "1rw"
-                                                   "1rv"
-                                                   "1ru"
-                                                   "1rt"
-                                                   "1rs"
-                                                   "1rr"
-                                                   "1rq"
-                                                   "1rp"
-                                                   "1ro"
-                                                   "1rn"
-                                                   "1rm"
-                                                   "1rl"
-                                                   "1rk"
-                                                   "1rj"
-                                                   "1ri"
-                                                   "1rh"
-                                                   "1rg"
-                                                   "1rf"
-                                                   "1re"
-                                                   "1rd"
-                                                   "1rc"
-                                                   "1rb"
-                                                   "1ra"
-                                                   "1r9"
-                                                   "1r8"
-                                                   "1r7"
-                                                   "1r6"
-                                                   "1r5"
-                                                   "1r4"
-                                                   "1r3"
-                                                   "1r2"
-                                                   "1r1"
-                                                   "1r0"
-                                                   "1qz"
-                                                   "1qy"
-                                                   "1qx"
-                                                   "1qw"
-                                                   "1qv"
-                                                   "1qu"
-                                                   "1qt"
-                                                   "1qs"
-                                                   "1qr"
-                                                   "1qq"
-                                                   "1qp"
-                                                   "1qo"
-                                                   "1qn"
-                                                   "1qm"
-                                                   "1ql"
-                                                   "1qk"
-                                                   "1qj"
-                                                   "1qi"
-                                                   "1qh"
-                                                   "1qg"
-                                                   "1qf"
-                                                   "1qe"
-                                                   "1qd"
-                                                   "1qc"
-                                                   "1qb"
-                                                   "1qa"
-                                                   "1q9"
-                                                   "1q8"
-                                                   "1q7"
-                                                   "1q6"
-                                                   "1q5"
-                                                   "1q4"
-                                                   "1q3"
-                                                   "1q2"
-                                                   "1q1"
-                                                   "1q0"
-                                                   "1pz"
-                                                   "1py"))
+                                                  ("5l"
+                                                   "5k"
+                                                   "5j"
+                                                   "5i"
+                                                   "5h"
+                                                   "5g"
+                                                   "5f"
+                                                   "5e"
+                                                   "5d"
+                                                   "5c"
+                                                   "5b"
+                                                   "5a"
+                                                   "59"
+                                                   "58"
+                                                   "57"
+                                                   "56"
+                                                   "55"
+                                                   "54"
+                                                   "53"
+                                                   "52"
+                                                   "51"
+                                                   "50"
+                                                   "4z"
+                                                   "4y"
+                                                   "4x"
+                                                   "4w"
+                                                   "4v"
+                                                   "4u"
+                                                   "4t"
+                                                   "4s"
+                                                   "4r"
+                                                   "4q"
+                                                   "4p"
+                                                   "4o"
+                                                   "4n"
+                                                   "4m"
+                                                   "4l"
+                                                   "4k"
+                                                   "4j"
+                                                   "4i"
+                                                   "4h"
+                                                   "4g"
+                                                   "4f"
+                                                   "4e"
+                                                   "4d"
+                                                   "4c"
+                                                   "4b"
+                                                   "4a"
+                                                   "49"
+                                                   "48"
+                                                   "47"
+                                                   "46"
+                                                   "45"
+                                                   "44"
+                                                   "43"
+                                                   "42"
+                                                   "41"
+                                                   "40"
+                                                   "3z"
+                                                   "3y"
+                                                   "3x"
+                                                   "3w"
+                                                   "3v"
+                                                   "3u"
+                                                   "3t"
+                                                   "3s"
+                                                   "3r"
+                                                   "3q"
+                                                   "3p"
+                                                   "3o"
+                                                   "3n"
+                                                   "3m"
+                                                   "3l"
+                                                   "3k"
+                                                   "3j"
+                                                   "3i"
+                                                   "3h"
+                                                   "3g"
+                                                   "3f"
+                                                   "3e"
+                                                   "3d"
+                                                   "3c"
+                                                   "3b"
+                                                   "3a"
+                                                   "39"
+                                                   "38"
+                                                   "37"
+                                                   "36"
+                                                   "35"
+                                                   "34"
+                                                   "33"
+                                                   "32"
+                                                   "31"
+                                                   "30"
+                                                   "2z"
+                                                   "2y"
+                                                   "2x"
+                                                   "2w"
+                                                   "2v"
+                                                   "2u"
+                                                   "2t"
+                                                   "2s"
+                                                   "2r"
+                                                   "2q"
+                                                   "2p"
+                                                   "2o"
+                                                   "2n"
+                                                   "2m"
+                                                   "2l"
+                                                   "2k"
+                                                   "2j"
+                                                   "2i"
+                                                   "2h"
+                                                   "2g"
+                                                   "2f"
+                                                   "2e"
+                                                   "2d"
+                                                   "2c"
+                                                   "2b"
+                                                   "2a"
+                                                   "29"
+                                                   "28"
+                                                   "27"
+                                                   "26"
+                                                   "25"
+                                                   "24"
+                                                   "23"
+                                                   "22"
+                                                   "21"
+                                                   "20"
+                                                   "1z"
+                                                   "1y"
+                                                   "1x"
+                                                   "1w"
+                                                   "1v"
+                                                   "1u"
+                                                   "1t"
+                                                   "1s"
+                                                   "1r"
+                                                   "1q"))
                                                 #(ribcage
                                                   (define-structure
                                                     define-expansion-accessors
                                                     define-expansion-constructors)
                                                   ((top) (top) (top))
-                                                  ("1og" "1of" "1oe")))
+                                                  ("8" "7" "6")))
                                                (hygiene guile)))
                                           (if (if (= (vector-length
                                                        '#(syntax-object
@@ -19624,7 +19596,7 @@
                                                            #(ribcage
                                                              #(pat exp)
                                                              #((top) (top))
-                                                             #("2w6" "2w7"))
+                                                             #("17y" "17z"))
                                                            #(ribcage () () ())
                                                            #(ribcage
                                                              #(x
@@ -19637,11 +19609,11 @@
                                                                (top)
                                                                (top)
                                                                (top))
-                                                             #("2w1"
-                                                               "2w2"
-                                                               "2w3"
-                                                               "2w4"
-                                                               "2w5"))
+                                                             #("17t"
+                                                               "17u"
+                                                               "17v"
+                                                               "17w"
+                                                               "17x"))
                                                            #(ribcage
                                                              (gen-syntax-case
                                                                gen-clause
@@ -19651,10 +19623,10 @@
                                                               (top)
                                                               (top)
                                                               (top))
-                                                             ("2u0"
-                                                              "2tz"
-                                                              "2ty"
-                                                              "2tx"))
+                                                             ("15s"
+                                                              "15r"
+                                                              "15q"
+                                                              "15p"))
                                                            #(ribcage
                                                              (lambda-var-list
                                                                gen-var
@@ -19936,146 +19908,146 @@
                                                               (top)
                                                               (top)
                                                               (top))
-                                                             ("1tt"
-                                                              "1ts"
-                                                              "1tr"
-                                                              "1tq"
-                                                              "1tp"
-                                                              "1to"
-                                                              "1tn"
-                                                              "1tm"
-                                                              "1tl"
-                                                              "1tk"
-                                                              "1tj"
-                                                              "1ti"
-                                                              "1th"
-                                                              "1tg"
-                                                              "1tf"
-                                                              "1te"
-                                                              "1td"
-                                                              "1tc"
-                                                              "1tb"
-                                                              "1ta"
-                                                              "1t9"
-                                                              "1t8"
-                                                              "1t7"
-                                                              "1t6"
-                                                              "1t5"
-                                                              "1t4"
-                                                              "1t3"
-                                                              "1t2"
-                                                              "1t1"
-                                                              "1t0"
-                                                              "1sz"
-                                                              "1sy"
-                                                              "1sx"
-                                                              "1sw"
-                                                              "1sv"
-                                                              "1su"
-                                                              "1st"
-                                                              "1ss"
-                                                              "1sr"
-                                                              "1sq"
-                                                              "1sp"
-                                                              "1so"
-                                                              "1sn"
-                                                              "1sm"
-                                                              "1sl"
-                                                              "1sk"
-                                                              "1sj"
-                                                              "1si"
-                                                              "1sh"
-                                                              "1sg"
-                                                              "1sf"
-                                                              "1se"
-                                                              "1sd"
-                                                              "1sc"
-                                                              "1sb"
-                                                              "1sa"
-                                                              "1s9"
-                                                              "1s8"
-                                                              "1s7"
-                                                              "1s6"
-                                                              "1s5"
-                                                              "1s4"
-                                                              "1s3"
-                                                              "1s2"
-                                                              "1s1"
-                                                              "1s0"
-                                                              "1rz"
-                                                              "1ry"
-                                                              "1rx"
-                                                              "1rw"
-                                                              "1rv"
-                                                              "1ru"
-                                                              "1rt"
-                                                              "1rs"
-                                                              "1rr"
-                                                              "1rq"
-                                                              "1rp"
-                                                              "1ro"
-                                                              "1rn"
-                                                              "1rm"
-                                                              "1rl"
-                                                              "1rk"
-                                                              "1rj"
-                                                              "1ri"
-                                                              "1rh"
-                                                              "1rg"
-                                                              "1rf"
-                                                              "1re"
-                                                              "1rd"
-                                                              "1rc"
-                                                              "1rb"
-                                                              "1ra"
-                                                              "1r9"
-                                                              "1r8"
-                                                              "1r7"
-                                                              "1r6"
-                                                              "1r5"
-                                                              "1r4"
-                                                              "1r3"
-                                                              "1r2"
-                                                              "1r1"
-                                                              "1r0"
-                                                              "1qz"
-                                                              "1qy"
-                                                              "1qx"
-                                                              "1qw"
-                                                              "1qv"
-                                                              "1qu"
-                                                              "1qt"
-                                                              "1qs"
-                                                              "1qr"
-                                                              "1qq"
-                                                              "1qp"
-                                                              "1qo"
-                                                              "1qn"
-                                                              "1qm"
-                                                              "1ql"
-                                                              "1qk"
-                                                              "1qj"
-                                                              "1qi"
-                                                              "1qh"
-                                                              "1qg"
-                                                              "1qf"
-                                                              "1qe"
-                                                              "1qd"
-                                                              "1qc"
-                                                              "1qb"
-                                                              "1qa"
-                                                              "1q9"
-                                                              "1q8"
-                                                              "1q7"
-                                                              "1q6"
-                                                              "1q5"
-                                                              "1q4"
-                                                              "1q3"
-                                                              "1q2"
-                                                              "1q1"
-                                                              "1q0"
-                                                              "1pz"
-                                                              "1py"))
+                                                             ("5l"
+                                                              "5k"
+                                                              "5j"
+                                                              "5i"
+                                                              "5h"
+                                                              "5g"
+                                                              "5f"
+                                                              "5e"
+                                                              "5d"
+                                                              "5c"
+                                                              "5b"
+                                                              "5a"
+                                                              "59"
+                                                              "58"
+                                                              "57"
+                                                              "56"
+                                                              "55"
+                                                              "54"
+                                                              "53"
+                                                              "52"
+                                                              "51"
+                                                              "50"
+                                                              "4z"
+                                                              "4y"
+                                                              "4x"
+                                                              "4w"
+                                                              "4v"
+                                                              "4u"
+                                                              "4t"
+                                                              "4s"
+                                                              "4r"
+                                                              "4q"
+                                                              "4p"
+                                                              "4o"
+                                                              "4n"
+                                                              "4m"
+                                                              "4l"
+                                                              "4k"
+                                                              "4j"
+                                                              "4i"
+                                                              "4h"
+                                                              "4g"
+                                                              "4f"
+                                                              "4e"
+                                                              "4d"
+                                                              "4c"
+                                                              "4b"
+                                                              "4a"
+                                                              "49"
+                                                              "48"
+                                                              "47"
+                                                              "46"
+                                                              "45"
+                                                              "44"
+                                                              "43"
+                                                              "42"
+                                                              "41"
+                                                              "40"
+                                                              "3z"
+                                                              "3y"
+                                                              "3x"
+                                                              "3w"
+                                                              "3v"
+                                                              "3u"
+                                                              "3t"
+                                                              "3s"
+                                                              "3r"
+                                                              "3q"
+                                                              "3p"
+                                                              "3o"
+                                                              "3n"
+                                                              "3m"
+                                                              "3l"
+                                                              "3k"
+                                                              "3j"
+                                                              "3i"
+                                                              "3h"
+                                                              "3g"
+                                                              "3f"
+                                                              "3e"
+                                                              "3d"
+                                                              "3c"
+                                                              "3b"
+                                                              "3a"
+                                                              "39"
+                                                              "38"
+                                                              "37"
+                                                              "36"
+                                                              "35"
+                                                              "34"
+                                                              "33"
+                                                              "32"
+                                                              "31"
+                                                              "30"
+                                                              "2z"
+                                                              "2y"
+                                                              "2x"
+                                                              "2w"
+                                                              "2v"
+                                                              "2u"
+                                                              "2t"
+                                                              "2s"
+                                                              "2r"
+                                                              "2q"
+                                                              "2p"
+                                                              "2o"
+                                                              "2n"
+                                                              "2m"
+                                                              "2l"
+                                                              "2k"
+                                                              "2j"
+                                                              "2i"
+                                                              "2h"
+                                                              "2g"
+                                                              "2f"
+                                                              "2e"
+                                                              "2d"
+                                                              "2c"
+                                                              "2b"
+                                                              "2a"
+                                                              "29"
+                                                              "28"
+                                                              "27"
+                                                              "26"
+                                                              "25"
+                                                              "24"
+                                                              "23"
+                                                              "22"
+                                                              "21"
+                                                              "20"
+                                                              "1z"
+                                                              "1y"
+                                                              "1x"
+                                                              "1w"
+                                                              "1v"
+                                                              "1u"
+                                                              "1t"
+                                                              "1s"
+                                                              "1r"
+                                                              "1q"))
                                                            #(ribcage
                                                              (define-structure
                                                                define-expansion-accessors
@@ -20083,9 +20055,7 @@
                                                              ((top)
                                                               (top)
                                                               (top))
-                                                             ("1og"
-                                                              "1of"
-                                                              "1oe")))
+                                                             ("8" "7" "6")))
                                                           (hygiene guile)))
                                                      4)
                                                 #t
@@ -20097,7 +20067,7 @@
                                                 #(ribcage
                                                   #(pat exp)
                                                   #((top) (top))
-                                                  #("2w6" "2w7"))
+                                                  #("17y" "17z"))
                                                 #(ribcage () () ())
                                                 #(ribcage
                                                   #(x keys clauses r mod)
@@ -20106,18 +20076,18 @@
                                                     (top)
                                                     (top)
                                                     (top))
-                                                  #("2w1"
-                                                    "2w2"
-                                                    "2w3"
-                                                    "2w4"
-                                                    "2w5"))
+                                                  #("17t"
+                                                    "17u"
+                                                    "17v"
+                                                    "17w"
+                                                    "17x"))
                                                 #(ribcage
                                                   (gen-syntax-case
                                                     gen-clause
                                                     build-dispatch-call
                                                     convert-pattern)
                                                   ((top) (top) (top) (top))
-                                                  ("2u0" "2tz" "2ty" "2tx"))
+                                                  ("15s" "15r" "15q" "15p"))
                                                 #(ribcage
                                                   (lambda-var-list
                                                     gen-var
@@ -20399,161 +20369,161 @@
                                                    (top)
                                                    (top)
                                                    (top))
-                                                  ("1tt"
-                                                   "1ts"
-                                                   "1tr"
-                                                   "1tq"
-                                                   "1tp"
-                                                   "1to"
-                                                   "1tn"
-                                                   "1tm"
-                                                   "1tl"
-                                                   "1tk"
-                                                   "1tj"
-                                                   "1ti"
-                                                   "1th"
-                                                   "1tg"
-                                                   "1tf"
-                                                   "1te"
-                                                   "1td"
-                                                   "1tc"
-                                                   "1tb"
-                                                   "1ta"
-                                                   "1t9"
-                                                   "1t8"
-                                                   "1t7"
-                                                   "1t6"
-                                                   "1t5"
-                                                   "1t4"
-                                                   "1t3"
-                                                   "1t2"
-                                                   "1t1"
-                                                   "1t0"
-                                                   "1sz"
-                                                   "1sy"
-                                                   "1sx"
-                                                   "1sw"
-                                                   "1sv"
-                                                   "1su"
-                                                   "1st"
-                                                   "1ss"
-                                                   "1sr"
-                                                   "1sq"
-                                                   "1sp"
-                                                   "1so"
-                                                   "1sn"
-                                                   "1sm"
-                                                   "1sl"
-                                                   "1sk"
-                                                   "1sj"
-                                                   "1si"
-                                                   "1sh"
-                                                   "1sg"
-                                                   "1sf"
-                                                   "1se"
-                                                   "1sd"
-                                                   "1sc"
-                                                   "1sb"
-                                                   "1sa"
-                                                   "1s9"
-                                                   "1s8"
-                                                   "1s7"
-                                                   "1s6"
-                                                   "1s5"
-                                                   "1s4"
-                                                   "1s3"
-                                                   "1s2"
-                                                   "1s1"
-                                                   "1s0"
-                                                   "1rz"
-                                                   "1ry"
-                                                   "1rx"
-                                                   "1rw"
-                                                   "1rv"
-                                                   "1ru"
-                                                   "1rt"
-                                                   "1rs"
-                                                   "1rr"
-                                                   "1rq"
-                                                   "1rp"
-                                                   "1ro"
-                                                   "1rn"
-                                                   "1rm"
-                                                   "1rl"
-                                                   "1rk"
-                                                   "1rj"
-                                                   "1ri"
-                                                   "1rh"
-                                                   "1rg"
-                                                   "1rf"
-                                                   "1re"
-                                                   "1rd"
-                                                   "1rc"
-                                                   "1rb"
-                                                   "1ra"
-                                                   "1r9"
-                                                   "1r8"
-                                                   "1r7"
-                                                   "1r6"
-                                                   "1r5"
-                                                   "1r4"
-                                                   "1r3"
-                                                   "1r2"
-                                                   "1r1"
-                                                   "1r0"
-                                                   "1qz"
-                                                   "1qy"
-                                                   "1qx"
-                                                   "1qw"
-                                                   "1qv"
-                                                   "1qu"
-                                                   "1qt"
-                                                   "1qs"
-                                                   "1qr"
-                                                   "1qq"
-                                                   "1qp"
-                                                   "1qo"
-                                                   "1qn"
-                                                   "1qm"
-                                                   "1ql"
-                                                   "1qk"
-                                                   "1qj"
-                                                   "1qi"
-                                                   "1qh"
-                                                   "1qg"
-                                                   "1qf"
-                                                   "1qe"
-                                                   "1qd"
-                                                   "1qc"
-                                                   "1qb"
-                                                   "1qa"
-                                                   "1q9"
-                                                   "1q8"
-                                                   "1q7"
-                                                   "1q6"
-                                                   "1q5"
-                                                   "1q4"
-                                                   "1q3"
-                                                   "1q2"
-                                                   "1q1"
-                                                   "1q0"
-                                                   "1pz"
-                                                   "1py"))
+                                                  ("5l"
+                                                   "5k"
+                                                   "5j"
+                                                   "5i"
+                                                   "5h"
+                                                   "5g"
+                                                   "5f"
+                                                   "5e"
+                                                   "5d"
+                                                   "5c"
+                                                   "5b"
+                                                   "5a"
+                                                   "59"
+                                                   "58"
+                                                   "57"
+                                                   "56"
+                                                   "55"
+                                                   "54"
+                                                   "53"
+                                                   "52"
+                                                   "51"
+                                                   "50"
+                                                   "4z"
+                                                   "4y"
+                                                   "4x"
+                                                   "4w"
+                                                   "4v"
+                                                   "4u"
+                                                   "4t"
+                                                   "4s"
+                                                   "4r"
+                                                   "4q"
+                                                   "4p"
+                                                   "4o"
+                                                   "4n"
+                                                   "4m"
+                                                   "4l"
+                                                   "4k"
+                                                   "4j"
+                                                   "4i"
+                                                   "4h"
+                                                   "4g"
+                                                   "4f"
+                                                   "4e"
+                                                   "4d"
+                                                   "4c"
+                                                   "4b"
+                                                   "4a"
+                                                   "49"
+                                                   "48"
+                                                   "47"
+                                                   "46"
+                                                   "45"
+                                                   "44"
+                                                   "43"
+                                                   "42"
+                                                   "41"
+                                                   "40"
+                                                   "3z"
+                                                   "3y"
+                                                   "3x"
+                                                   "3w"
+                                                   "3v"
+                                                   "3u"
+                                                   "3t"
+                                                   "3s"
+                                                   "3r"
+                                                   "3q"
+                                                   "3p"
+                                                   "3o"
+                                                   "3n"
+                                                   "3m"
+                                                   "3l"
+                                                   "3k"
+                                                   "3j"
+                                                   "3i"
+                                                   "3h"
+                                                   "3g"
+                                                   "3f"
+                                                   "3e"
+                                                   "3d"
+                                                   "3c"
+                                                   "3b"
+                                                   "3a"
+                                                   "39"
+                                                   "38"
+                                                   "37"
+                                                   "36"
+                                                   "35"
+                                                   "34"
+                                                   "33"
+                                                   "32"
+                                                   "31"
+                                                   "30"
+                                                   "2z"
+                                                   "2y"
+                                                   "2x"
+                                                   "2w"
+                                                   "2v"
+                                                   "2u"
+                                                   "2t"
+                                                   "2s"
+                                                   "2r"
+                                                   "2q"
+                                                   "2p"
+                                                   "2o"
+                                                   "2n"
+                                                   "2m"
+                                                   "2l"
+                                                   "2k"
+                                                   "2j"
+                                                   "2i"
+                                                   "2h"
+                                                   "2g"
+                                                   "2f"
+                                                   "2e"
+                                                   "2d"
+                                                   "2c"
+                                                   "2b"
+                                                   "2a"
+                                                   "29"
+                                                   "28"
+                                                   "27"
+                                                   "26"
+                                                   "25"
+                                                   "24"
+                                                   "23"
+                                                   "22"
+                                                   "21"
+                                                   "20"
+                                                   "1z"
+                                                   "1y"
+                                                   "1x"
+                                                   "1w"
+                                                   "1v"
+                                                   "1u"
+                                                   "1t"
+                                                   "1s"
+                                                   "1r"
+                                                   "1q"))
                                                 #(ribcage
                                                   (define-structure
                                                     define-expansion-accessors
                                                     define-expansion-constructors)
                                                   ((top) (top) (top))
-                                                  ("1og" "1of" "1oe")))
+                                                  ("8" "7" "6")))
                                                (hygiene guile))))
-                                   (eq? (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
+                                   (eq? (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
                                           '#(syntax-object
                                              pad
                                              ((top)
                                               #(ribcage
                                                 #(pat exp)
                                                 #((top) (top))
-                                                #("2w6" "2w7"))
+                                                #("17y" "17z"))
                                               #(ribcage () () ())
                                               #(ribcage
                                                 #(x keys clauses r mod)
@@ -20562,18 +20532,18 @@
                                                   (top)
                                                   (top)
                                                   (top))
-                                                #("2w1"
-                                                  "2w2"
-                                                  "2w3"
-                                                  "2w4"
-                                                  "2w5"))
+                                                #("17t"
+                                                  "17u"
+                                                  "17v"
+                                                  "17w"
+                                                  "17x"))
                                               #(ribcage
                                                 (gen-syntax-case
                                                   gen-clause
                                                   build-dispatch-call
                                                   convert-pattern)
                                                 ((top) (top) (top) (top))
-                                                ("2u0" "2tz" "2ty" "2tx"))
+                                                ("15s" "15r" "15q" "15p"))
                                               #(ribcage
                                                 (lambda-var-list
                                                   gen-var
@@ -20855,162 +20825,162 @@
                                                  (top)
                                                  (top)
                                                  (top))
-                                                ("1tt"
-                                                 "1ts"
-                                                 "1tr"
-                                                 "1tq"
-                                                 "1tp"
-                                                 "1to"
-                                                 "1tn"
-                                                 "1tm"
-                                                 "1tl"
-                                                 "1tk"
-                                                 "1tj"
-                                                 "1ti"
-                                                 "1th"
-                                                 "1tg"
-                                                 "1tf"
-                                                 "1te"
-                                                 "1td"
-                                                 "1tc"
-                                                 "1tb"
-                                                 "1ta"
-                                                 "1t9"
-                                                 "1t8"
-                                                 "1t7"
-                                                 "1t6"
-                                                 "1t5"
-                                                 "1t4"
-                                                 "1t3"
-                                                 "1t2"
-                                                 "1t1"
-                                                 "1t0"
-                                                 "1sz"
-                                                 "1sy"
-                                                 "1sx"
-                                                 "1sw"
-                                                 "1sv"
-                                                 "1su"
-                                                 "1st"
-                                                 "1ss"
-                                                 "1sr"
-                                                 "1sq"
-                                                 "1sp"
-                                                 "1so"
-                                                 "1sn"
-                                                 "1sm"
-                                                 "1sl"
-                                                 "1sk"
-                                                 "1sj"
-                                                 "1si"
-                                                 "1sh"
-                                                 "1sg"
-                                                 "1sf"
-                                                 "1se"
-                                                 "1sd"
-                                                 "1sc"
-                                                 "1sb"
-                                                 "1sa"
-                                                 "1s9"
-                                                 "1s8"
-                                                 "1s7"
-                                                 "1s6"
-                                                 "1s5"
-                                                 "1s4"
-                                                 "1s3"
-                                                 "1s2"
-                                                 "1s1"
-                                                 "1s0"
-                                                 "1rz"
-                                                 "1ry"
-                                                 "1rx"
-                                                 "1rw"
-                                                 "1rv"
-                                                 "1ru"
-                                                 "1rt"
-                                                 "1rs"
-                                                 "1rr"
-                                                 "1rq"
-                                                 "1rp"
-                                                 "1ro"
-                                                 "1rn"
-                                                 "1rm"
-                                                 "1rl"
-                                                 "1rk"
-                                                 "1rj"
-                                                 "1ri"
-                                                 "1rh"
-                                                 "1rg"
-                                                 "1rf"
-                                                 "1re"
-                                                 "1rd"
-                                                 "1rc"
-                                                 "1rb"
-                                                 "1ra"
-                                                 "1r9"
-                                                 "1r8"
-                                                 "1r7"
-                                                 "1r6"
-                                                 "1r5"
-                                                 "1r4"
-                                                 "1r3"
-                                                 "1r2"
-                                                 "1r1"
-                                                 "1r0"
-                                                 "1qz"
-                                                 "1qy"
-                                                 "1qx"
-                                                 "1qw"
-                                                 "1qv"
-                                                 "1qu"
-                                                 "1qt"
-                                                 "1qs"
-                                                 "1qr"
-                                                 "1qq"
-                                                 "1qp"
-                                                 "1qo"
-                                                 "1qn"
-                                                 "1qm"
-                                                 "1ql"
-                                                 "1qk"
-                                                 "1qj"
-                                                 "1qi"
-                                                 "1qh"
-                                                 "1qg"
-                                                 "1qf"
-                                                 "1qe"
-                                                 "1qd"
-                                                 "1qc"
-                                                 "1qb"
-                                                 "1qa"
-                                                 "1q9"
-                                                 "1q8"
-                                                 "1q7"
-                                                 "1q6"
-                                                 "1q5"
-                                                 "1q4"
-                                                 "1q3"
-                                                 "1q2"
-                                                 "1q1"
-                                                 "1q0"
-                                                 "1pz"
-                                                 "1py"))
+                                                ("5l"
+                                                 "5k"
+                                                 "5j"
+                                                 "5i"
+                                                 "5h"
+                                                 "5g"
+                                                 "5f"
+                                                 "5e"
+                                                 "5d"
+                                                 "5c"
+                                                 "5b"
+                                                 "5a"
+                                                 "59"
+                                                 "58"
+                                                 "57"
+                                                 "56"
+                                                 "55"
+                                                 "54"
+                                                 "53"
+                                                 "52"
+                                                 "51"
+                                                 "50"
+                                                 "4z"
+                                                 "4y"
+                                                 "4x"
+                                                 "4w"
+                                                 "4v"
+                                                 "4u"
+                                                 "4t"
+                                                 "4s"
+                                                 "4r"
+                                                 "4q"
+                                                 "4p"
+                                                 "4o"
+                                                 "4n"
+                                                 "4m"
+                                                 "4l"
+                                                 "4k"
+                                                 "4j"
+                                                 "4i"
+                                                 "4h"
+                                                 "4g"
+                                                 "4f"
+                                                 "4e"
+                                                 "4d"
+                                                 "4c"
+                                                 "4b"
+                                                 "4a"
+                                                 "49"
+                                                 "48"
+                                                 "47"
+                                                 "46"
+                                                 "45"
+                                                 "44"
+                                                 "43"
+                                                 "42"
+                                                 "41"
+                                                 "40"
+                                                 "3z"
+                                                 "3y"
+                                                 "3x"
+                                                 "3w"
+                                                 "3v"
+                                                 "3u"
+                                                 "3t"
+                                                 "3s"
+                                                 "3r"
+                                                 "3q"
+                                                 "3p"
+                                                 "3o"
+                                                 "3n"
+                                                 "3m"
+                                                 "3l"
+                                                 "3k"
+                                                 "3j"
+                                                 "3i"
+                                                 "3h"
+                                                 "3g"
+                                                 "3f"
+                                                 "3e"
+                                                 "3d"
+                                                 "3c"
+                                                 "3b"
+                                                 "3a"
+                                                 "39"
+                                                 "38"
+                                                 "37"
+                                                 "36"
+                                                 "35"
+                                                 "34"
+                                                 "33"
+                                                 "32"
+                                                 "31"
+                                                 "30"
+                                                 "2z"
+                                                 "2y"
+                                                 "2x"
+                                                 "2w"
+                                                 "2v"
+                                                 "2u"
+                                                 "2t"
+                                                 "2s"
+                                                 "2r"
+                                                 "2q"
+                                                 "2p"
+                                                 "2o"
+                                                 "2n"
+                                                 "2m"
+                                                 "2l"
+                                                 "2k"
+                                                 "2j"
+                                                 "2i"
+                                                 "2h"
+                                                 "2g"
+                                                 "2f"
+                                                 "2e"
+                                                 "2d"
+                                                 "2c"
+                                                 "2b"
+                                                 "2a"
+                                                 "29"
+                                                 "28"
+                                                 "27"
+                                                 "26"
+                                                 "25"
+                                                 "24"
+                                                 "23"
+                                                 "22"
+                                                 "21"
+                                                 "20"
+                                                 "1z"
+                                                 "1y"
+                                                 "1x"
+                                                 "1w"
+                                                 "1v"
+                                                 "1u"
+                                                 "1t"
+                                                 "1s"
+                                                 "1r"
+                                                 "1q"))
                                               #(ribcage
                                                 (define-structure
                                                   define-expansion-accessors
                                                   define-expansion-constructors)
                                                 ((top) (top) (top))
-                                                ("1og" "1of" "1oe")))
+                                                ("8" "7" "6")))
                                              (hygiene guile))
                                           '(()))
-                                        (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
+                                        (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
                                           '#(syntax-object
                                              _
                                              ((top)
                                               #(ribcage
                                                 #(pat exp)
                                                 #((top) (top))
-                                                #("2w6" "2w7"))
+                                                #("17y" "17z"))
                                               #(ribcage () () ())
                                               #(ribcage
                                                 #(x keys clauses r mod)
@@ -21019,18 +20989,18 @@
                                                   (top)
                                                   (top)
                                                   (top))
-                                                #("2w1"
-                                                  "2w2"
-                                                  "2w3"
-                                                  "2w4"
-                                                  "2w5"))
+                                                #("17t"
+                                                  "17u"
+                                                  "17v"
+                                                  "17w"
+                                                  "17x"))
                                               #(ribcage
                                                 (gen-syntax-case
                                                   gen-clause
                                                   build-dispatch-call
                                                   convert-pattern)
                                                 ((top) (top) (top) (top))
-                                                ("2u0" "2tz" "2ty" "2tx"))
+                                                ("15s" "15r" "15q" "15p"))
                                               #(ribcage
                                                 (lambda-var-list
                                                   gen-var
@@ -21312,317 +21282,317 @@
                                                  (top)
                                                  (top)
                                                  (top))
-                                                ("1tt"
-                                                 "1ts"
-                                                 "1tr"
-                                                 "1tq"
-                                                 "1tp"
-                                                 "1to"
-                                                 "1tn"
-                                                 "1tm"
-                                                 "1tl"
-                                                 "1tk"
-                                                 "1tj"
-                                                 "1ti"
-                                                 "1th"
-                                                 "1tg"
-                                                 "1tf"
-                                                 "1te"
-                                                 "1td"
-                                                 "1tc"
-                                                 "1tb"
-                                                 "1ta"
-                                                 "1t9"
-                                                 "1t8"
-                                                 "1t7"
-                                                 "1t6"
-                                                 "1t5"
-                                                 "1t4"
-                                                 "1t3"
-                                                 "1t2"
-                                                 "1t1"
-                                                 "1t0"
-                                                 "1sz"
-                                                 "1sy"
-                                                 "1sx"
-                                                 "1sw"
-                                                 "1sv"
-                                                 "1su"
-                                                 "1st"
-                                                 "1ss"
-                                                 "1sr"
-                                                 "1sq"
-                                                 "1sp"
-                                                 "1so"
-                                                 "1sn"
-                                                 "1sm"
-                                                 "1sl"
-                                                 "1sk"
-                                                 "1sj"
-                                                 "1si"
-                                                 "1sh"
-                                                 "1sg"
-                                                 "1sf"
-                                                 "1se"
-                                                 "1sd"
-                                                 "1sc"
-                                                 "1sb"
-                                                 "1sa"
-                                                 "1s9"
-                                                 "1s8"
-                                                 "1s7"
-                                                 "1s6"
-                                                 "1s5"
-                                                 "1s4"
-                                                 "1s3"
-                                                 "1s2"
-                                                 "1s1"
-                                                 "1s0"
-                                                 "1rz"
-                                                 "1ry"
-                                                 "1rx"
-                                                 "1rw"
-                                                 "1rv"
-                                                 "1ru"
-                                                 "1rt"
-                                                 "1rs"
-                                                 "1rr"
-                                                 "1rq"
-                                                 "1rp"
-                                                 "1ro"
-                                                 "1rn"
-                                                 "1rm"
-                                                 "1rl"
-                                                 "1rk"
-                                                 "1rj"
-                                                 "1ri"
-                                                 "1rh"
-                                                 "1rg"
-                                                 "1rf"
-                                                 "1re"
-                                                 "1rd"
-                                                 "1rc"
-                                                 "1rb"
-                                                 "1ra"
-                                                 "1r9"
-                                                 "1r8"
-                                                 "1r7"
-                                                 "1r6"
-                                                 "1r5"
-                                                 "1r4"
-                                                 "1r3"
-                                                 "1r2"
-                                                 "1r1"
-                                                 "1r0"
-                                                 "1qz"
-                                                 "1qy"
-                                                 "1qx"
-                                                 "1qw"
-                                                 "1qv"
-                                                 "1qu"
-                                                 "1qt"
-                                                 "1qs"
-                                                 "1qr"
-                                                 "1qq"
-                                                 "1qp"
-                                                 "1qo"
-                                                 "1qn"
-                                                 "1qm"
-                                                 "1ql"
-                                                 "1qk"
-                                                 "1qj"
-                                                 "1qi"
-                                                 "1qh"
-                                                 "1qg"
-                                                 "1qf"
-                                                 "1qe"
-                                                 "1qd"
-                                                 "1qc"
-                                                 "1qb"
-                                                 "1qa"
-                                                 "1q9"
-                                                 "1q8"
-                                                 "1q7"
-                                                 "1q6"
-                                                 "1q5"
-                                                 "1q4"
-                                                 "1q3"
-                                                 "1q2"
-                                                 "1q1"
-                                                 "1q0"
-                                                 "1pz"
-                                                 "1py"))
+                                                ("5l"
+                                                 "5k"
+                                                 "5j"
+                                                 "5i"
+                                                 "5h"
+                                                 "5g"
+                                                 "5f"
+                                                 "5e"
+                                                 "5d"
+                                                 "5c"
+                                                 "5b"
+                                                 "5a"
+                                                 "59"
+                                                 "58"
+                                                 "57"
+                                                 "56"
+                                                 "55"
+                                                 "54"
+                                                 "53"
+                                                 "52"
+                                                 "51"
+                                                 "50"
+                                                 "4z"
+                                                 "4y"
+                                                 "4x"
+                                                 "4w"
+                                                 "4v"
+                                                 "4u"
+                                                 "4t"
+                                                 "4s"
+                                                 "4r"
+                                                 "4q"
+                                                 "4p"
+                                                 "4o"
+                                                 "4n"
+                                                 "4m"
+                                                 "4l"
+                                                 "4k"
+                                                 "4j"
+                                                 "4i"
+                                                 "4h"
+                                                 "4g"
+                                                 "4f"
+                                                 "4e"
+                                                 "4d"
+                                                 "4c"
+                                                 "4b"
+                                                 "4a"
+                                                 "49"
+                                                 "48"
+                                                 "47"
+                                                 "46"
+                                                 "45"
+                                                 "44"
+                                                 "43"
+                                                 "42"
+                                                 "41"
+                                                 "40"
+                                                 "3z"
+                                                 "3y"
+                                                 "3x"
+                                                 "3w"
+                                                 "3v"
+                                                 "3u"
+                                                 "3t"
+                                                 "3s"
+                                                 "3r"
+                                                 "3q"
+                                                 "3p"
+                                                 "3o"
+                                                 "3n"
+                                                 "3m"
+                                                 "3l"
+                                                 "3k"
+                                                 "3j"
+                                                 "3i"
+                                                 "3h"
+                                                 "3g"
+                                                 "3f"
+                                                 "3e"
+                                                 "3d"
+                                                 "3c"
+                                                 "3b"
+                                                 "3a"
+                                                 "39"
+                                                 "38"
+                                                 "37"
+                                                 "36"
+                                                 "35"
+                                                 "34"
+                                                 "33"
+                                                 "32"
+                                                 "31"
+                                                 "30"
+                                                 "2z"
+                                                 "2y"
+                                                 "2x"
+                                                 "2w"
+                                                 "2v"
+                                                 "2u"
+                                                 "2t"
+                                                 "2s"
+                                                 "2r"
+                                                 "2q"
+                                                 "2p"
+                                                 "2o"
+                                                 "2n"
+                                                 "2m"
+                                                 "2l"
+                                                 "2k"
+                                                 "2j"
+                                                 "2i"
+                                                 "2h"
+                                                 "2g"
+                                                 "2f"
+                                                 "2e"
+                                                 "2d"
+                                                 "2c"
+                                                 "2b"
+                                                 "2a"
+                                                 "29"
+                                                 "28"
+                                                 "27"
+                                                 "26"
+                                                 "25"
+                                                 "24"
+                                                 "23"
+                                                 "22"
+                                                 "21"
+                                                 "20"
+                                                 "1z"
+                                                 "1y"
+                                                 "1x"
+                                                 "1w"
+                                                 "1v"
+                                                 "1u"
+                                                 "1t"
+                                                 "1s"
+                                                 "1r"
+                                                 "1q"))
                                               #(ribcage
                                                 (define-structure
                                                   define-expansion-accessors
                                                   define-expansion-constructors)
                                                 ((top) (top) (top))
-                                                ("1og" "1of" "1oe")))
+                                                ("8" "7" "6")))
                                              (hygiene guile))
                                           '(())))
                                    #f)
-                               (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                 #{exp _hoQGWMnyQPAh3k2jhWJBr}#
-                                 #{r _hoQGWMnyQPAh3k2jhWJA@}#
+                               (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                 #{exp -ANAU$bmvAmthP7L7xwo8K}#
+                                 #{r -ANAU$bmvAmthP7L7xwo7e}#
                                  '(())
-                                 #{mod _hoQGWMnyQPAh3k2jhWJBA}#)
-                               (let ((#{labels _hoQGWMnyQPAh3k2jhWJE2}#
-                                       (list (#{gen-label _hoQGWMnyQPAh3k2jhWHTD}#)))
-                                     (#{var _hoQGWMnyQPAh3k2jhWJE3}#
-                                       (let ((#{id _hoQGWMnyQPAh3k2jhWJFd}#
+                                 #{mod -ANAU$bmvAmthP7L7xwo7f}#)
+                               (let ((#{labels -ANAU$bmvAmthP7L7xwo@V}#
+                                       (list (#{gen-label -ANAU$bmvAmthP7L7xwnNi}#)))
+                                     (#{var -ANAU$bmvAmthP7L7xwo@W}#
+                                       (let ((#{id -ANAU$bmvAmthP7L7xwo@8}#
                                                (if (if (vector?
-                                                         #{pat _hoQGWMnyQPAh3k2jhWJBq}#)
+                                                         #{pat -ANAU$bmvAmthP7L7xwo8J}#)
                                                      (if (= (vector-length
-                                                              #{pat _hoQGWMnyQPAh3k2jhWJBq}#)
+                                                              #{pat -ANAU$bmvAmthP7L7xwo8J}#)
                                                             4)
                                                        (eq? (vector-ref
-                                                              #{pat _hoQGWMnyQPAh3k2jhWJBq}#
+                                                              #{pat -ANAU$bmvAmthP7L7xwo8J}#
                                                               0)
                                                             'syntax-object)
                                                        #f)
                                                      #f)
                                                  (vector-ref
-                                                   #{pat _hoQGWMnyQPAh3k2jhWJBq}#
+                                                   #{pat -ANAU$bmvAmthP7L7xwo8J}#
                                                    1)
-                                                 #{pat _hoQGWMnyQPAh3k2jhWJBq}#)))
+                                                 #{pat -ANAU$bmvAmthP7L7xwo8J}#)))
                                          (gensym
                                            (string-append
                                              (symbol->string
-                                               #{id _hoQGWMnyQPAh3k2jhWJFd}#)
+                                               #{id -ANAU$bmvAmthP7L7xwo@8}#)
                                              " ")))))
-                                 (#{build-application _hoQGWMnyQPAh3k2jhWHSg}#
+                                 (#{build-application -ANAU$bmvAmthP7L7xwnM@}#
                                    #f
-                                   (#{build-simple-lambda _hoQGWMnyQPAh3k2jhWHSp}#
+                                   (#{build-simple-lambda -ANAU$bmvAmthP7L7xwnNI}#
                                      #f
                                      (list (syntax->datum
-                                             #{pat _hoQGWMnyQPAh3k2jhWJBq}#))
+                                             #{pat -ANAU$bmvAmthP7L7xwo8J}#))
                                      #f
-                                     (list #{var _hoQGWMnyQPAh3k2jhWJE3}#)
+                                     (list #{var -ANAU$bmvAmthP7L7xwo@W}#)
                                      '()
-                                     (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                       #{exp _hoQGWMnyQPAh3k2jhWJBr}#
-                                       (#{extend-env _hoQGWMnyQPAh3k2jhWHS7}#
-                                         #{labels _hoQGWMnyQPAh3k2jhWJE2}#
+                                     (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                       #{exp -ANAU$bmvAmthP7L7xwo8K}#
+                                       (#{extend-env -ANAU$bmvAmthP7L7xwnNa}#
+                                         #{labels -ANAU$bmvAmthP7L7xwo@V}#
                                          (list (cons 'syntax
-                                                     (cons #{var _hoQGWMnyQPAh3k2jhWJE3}#
+                                                     (cons #{var -ANAU$bmvAmthP7L7xwo@W}#
                                                            0)))
-                                         #{r _hoQGWMnyQPAh3k2jhWJA@}#)
-                                       (#{make-binding-wrap _hoQGWMnyQPAh3k2jhWHTP}#
-                                         (list #{pat _hoQGWMnyQPAh3k2jhWJBq}#)
-                                         #{labels _hoQGWMnyQPAh3k2jhWJE2}#
+                                         #{r -ANAU$bmvAmthP7L7xwo7e}#)
+                                       (#{make-binding-wrap -ANAU$bmvAmthP7L7xwnNu}#
+                                         (list #{pat -ANAU$bmvAmthP7L7xwo8J}#)
+                                         #{labels -ANAU$bmvAmthP7L7xwo@V}#
                                          '(()))
-                                       #{mod _hoQGWMnyQPAh3k2jhWJBA}#))
-                                   (list #{x _hoQGWMnyQPAh3k2jhWJA8}#))))
-                             (#{gen-clause _hoQGWMnyQPAh3k2jhWI6s}#
-                               #{x _hoQGWMnyQPAh3k2jhWJA8}#
-                               #{keys _hoQGWMnyQPAh3k2jhWJA9}#
-                               (cdr #{clauses _hoQGWMnyQPAh3k2jhWJA$}#)
-                               #{r _hoQGWMnyQPAh3k2jhWJA@}#
-                               #{pat _hoQGWMnyQPAh3k2jhWJBq}#
+                                       #{mod -ANAU$bmvAmthP7L7xwo7f}#))
+                                   (list #{x -ANAU$bmvAmthP7L7xwo7b}#))))
+                             (#{gen-clause -ANAU$bmvAmthP7L7xwo1L}#
+                               #{x -ANAU$bmvAmthP7L7xwo7b}#
+                               #{keys -ANAU$bmvAmthP7L7xwo7c}#
+                               (cdr #{clauses -ANAU$bmvAmthP7L7xwo7d}#)
+                               #{r -ANAU$bmvAmthP7L7xwo7e}#
+                               #{pat -ANAU$bmvAmthP7L7xwo8J}#
                                #t
-                               #{exp _hoQGWMnyQPAh3k2jhWJBr}#
-                               #{mod _hoQGWMnyQPAh3k2jhWJBA}#)))
-                         #{tmp _hoQGWMnyQPAh3k2jhWJBo}#)
-                       (let ((#{tmp _hoQGWMnyQPAh3k2jhWJJp}#
+                               #{exp -ANAU$bmvAmthP7L7xwo8K}#
+                               #{mod -ANAU$bmvAmthP7L7xwo7f}#)))
+                         #{tmp -ANAU$bmvAmthP7L7xwo8H}#)
+                       (let ((#{tmp -ANAU$bmvAmthP7L7xwpEI}#
                                ($sc-dispatch
-                                 #{tmp _hoQGWMnyQPAh3k2jhWJBn}#
+                                 #{tmp -ANAU$bmvAmthP7L7xwo8G}#
                                  '(any any any))))
-                         (if #{tmp _hoQGWMnyQPAh3k2jhWJJp}#
+                         (if #{tmp -ANAU$bmvAmthP7L7xwpEI}#
                            (@apply
-                             (lambda (#{pat _hoQGWMnyQPAh3k2jhWJJr}#
-                                      #{fender _hoQGWMnyQPAh3k2jhWJJs}#
-                                      #{exp _hoQGWMnyQPAh3k2jhWJJt}#)
-                               (#{gen-clause _hoQGWMnyQPAh3k2jhWI6s}#
-                                 #{x _hoQGWMnyQPAh3k2jhWJA8}#
-                                 #{keys _hoQGWMnyQPAh3k2jhWJA9}#
-                                 (cdr #{clauses _hoQGWMnyQPAh3k2jhWJA$}#)
-                                 #{r _hoQGWMnyQPAh3k2jhWJA@}#
-                                 #{pat _hoQGWMnyQPAh3k2jhWJJr}#
-                                 #{fender _hoQGWMnyQPAh3k2jhWJJs}#
-                                 #{exp _hoQGWMnyQPAh3k2jhWJJt}#
-                                 #{mod _hoQGWMnyQPAh3k2jhWJBA}#))
-                             #{tmp _hoQGWMnyQPAh3k2jhWJJp}#)
+                             (lambda (#{pat -ANAU$bmvAmthP7L7xwpEK}#
+                                      #{fender -ANAU$bmvAmthP7L7xwpEL}#
+                                      #{exp -ANAU$bmvAmthP7L7xwpEM}#)
+                               (#{gen-clause -ANAU$bmvAmthP7L7xwo1L}#
+                                 #{x -ANAU$bmvAmthP7L7xwo7b}#
+                                 #{keys -ANAU$bmvAmthP7L7xwo7c}#
+                                 (cdr #{clauses -ANAU$bmvAmthP7L7xwo7d}#)
+                                 #{r -ANAU$bmvAmthP7L7xwo7e}#
+                                 #{pat -ANAU$bmvAmthP7L7xwpEK}#
+                                 #{fender -ANAU$bmvAmthP7L7xwpEL}#
+                                 #{exp -ANAU$bmvAmthP7L7xwpEM}#
+                                 #{mod -ANAU$bmvAmthP7L7xwo7f}#))
+                             #{tmp -ANAU$bmvAmthP7L7xwpEI}#)
                            (syntax-violation
                              'syntax-case
                              "invalid clause"
-                             (car #{clauses _hoQGWMnyQPAh3k2jhWJA$}#)))))))))))
-          (lambda (#{e _hoQGWMnyQPAh3k2jhWI6u}#
-                   #{r _hoQGWMnyQPAh3k2jhWI6v}#
-                   #{w _hoQGWMnyQPAh3k2jhWI6w}#
-                   #{s _hoQGWMnyQPAh3k2jhWI6x}#
-                   #{mod _hoQGWMnyQPAh3k2jhWI6y}#)
-            (let ((#{e _hoQGWMnyQPAh3k2jhWI6z}#
-                    (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+                             (car #{clauses -ANAU$bmvAmthP7L7xwo7d}#)))))))))))
+          (lambda (#{e -ANAU$bmvAmthP7L7xwo1N}#
+                   #{r -ANAU$bmvAmthP7L7xwo1O}#
+                   #{w -ANAU$bmvAmthP7L7xwo1P}#
+                   #{s -ANAU$bmvAmthP7L7xwo1Q}#
+                   #{mod -ANAU$bmvAmthP7L7xwo1R}#)
+            (let ((#{e -ANAU$bmvAmthP7L7xwo1S}#
+                    (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                       (begin
-                        (if (if (pair? #{e _hoQGWMnyQPAh3k2jhWI6u}#)
-                              #{s _hoQGWMnyQPAh3k2jhWI6x}#
+                        (if (if (pair? #{e -ANAU$bmvAmthP7L7xwo1N}#)
+                              #{s -ANAU$bmvAmthP7L7xwo1Q}#
                               #f)
                           (set-source-properties!
-                            #{e _hoQGWMnyQPAh3k2jhWI6u}#
-                            #{s _hoQGWMnyQPAh3k2jhWI6x}#))
-                        #{e _hoQGWMnyQPAh3k2jhWI6u}#)
-                      #{w _hoQGWMnyQPAh3k2jhWI6w}#
-                      #{mod _hoQGWMnyQPAh3k2jhWI6y}#)))
-              (let ((#{tmp _hoQGWMnyQPAh3k2jhWI61}#
+                            #{e -ANAU$bmvAmthP7L7xwo1N}#
+                            #{s -ANAU$bmvAmthP7L7xwo1Q}#))
+                        #{e -ANAU$bmvAmthP7L7xwo1N}#)
+                      #{w -ANAU$bmvAmthP7L7xwo1P}#
+                      #{mod -ANAU$bmvAmthP7L7xwo1R}#)))
+              (let ((#{tmp -ANAU$bmvAmthP7L7xwo1U}#
                       ($sc-dispatch
-                        #{e _hoQGWMnyQPAh3k2jhWI6z}#
+                        #{e -ANAU$bmvAmthP7L7xwo1S}#
                         '(_ any each-any . each-any))))
-                (if #{tmp _hoQGWMnyQPAh3k2jhWI61}#
+                (if #{tmp -ANAU$bmvAmthP7L7xwo1U}#
                   (@apply
-                    (lambda (#{val _hoQGWMnyQPAh3k2jhWI7O}#
-                             #{key _hoQGWMnyQPAh3k2jhWI7P}#
-                             #{m _hoQGWMnyQPAh3k2jhWI7Q}#)
+                    (lambda (#{val -ANAU$bmvAmthP7L7xwo1t}#
+                             #{key -ANAU$bmvAmthP7L7xwo1u}#
+                             #{m -ANAU$bmvAmthP7L7xwo1v}#)
                       (if (and-map
-                            (lambda (#{x _hoQGWMnyQPAh3k2jhWI7R}#)
-                              (if (if (symbol? #{x _hoQGWMnyQPAh3k2jhWI7R}#)
+                            (lambda (#{x -ANAU$bmvAmthP7L7xwo1w}#)
+                              (if (if (symbol? #{x -ANAU$bmvAmthP7L7xwo1w}#)
                                     #t
                                     (if (if (vector?
-                                              #{x _hoQGWMnyQPAh3k2jhWI7R}#)
+                                              #{x -ANAU$bmvAmthP7L7xwo1w}#)
                                           (if (= (vector-length
-                                                   #{x _hoQGWMnyQPAh3k2jhWI7R}#)
+                                                   #{x -ANAU$bmvAmthP7L7xwo1w}#)
                                                  4)
                                             (eq? (vector-ref
-                                                   #{x _hoQGWMnyQPAh3k2jhWI7R}#
+                                                   #{x -ANAU$bmvAmthP7L7xwo1w}#
                                                    0)
                                                  'syntax-object)
                                             #f)
                                           #f)
                                       (symbol?
                                         (vector-ref
-                                          #{x _hoQGWMnyQPAh3k2jhWI7R}#
+                                          #{x -ANAU$bmvAmthP7L7xwo1w}#
                                           1))
                                       #f))
                                 (not (if (if (if (vector?
-                                                   #{x _hoQGWMnyQPAh3k2jhWI7R}#)
+                                                   #{x -ANAU$bmvAmthP7L7xwo1w}#)
                                                (if (= (vector-length
-                                                        #{x _hoQGWMnyQPAh3k2jhWI7R}#)
+                                                        #{x -ANAU$bmvAmthP7L7xwo1w}#)
                                                       4)
                                                  (eq? (vector-ref
-                                                        #{x _hoQGWMnyQPAh3k2jhWI7R}#
+                                                        #{x -ANAU$bmvAmthP7L7xwo1w}#
                                                         0)
                                                       'syntax-object)
                                                  #f)
                                                #f)
                                            (symbol?
                                              (vector-ref
-                                               #{x _hoQGWMnyQPAh3k2jhWI7R}#
+                                               #{x -ANAU$bmvAmthP7L7xwo1w}#
                                                1))
                                            #f)
                                        (if (eq? (if (if (vector?
-                                                          #{x _hoQGWMnyQPAh3k2jhWI7R}#)
+                                                          #{x -ANAU$bmvAmthP7L7xwo1w}#)
                                                       (if (= (vector-length
-                                                               #{x _hoQGWMnyQPAh3k2jhWI7R}#)
+                                                               #{x -ANAU$bmvAmthP7L7xwo1w}#)
                                                              4)
                                                         (eq? (vector-ref
-                                                               #{x _hoQGWMnyQPAh3k2jhWI7R}#
+                                                               #{x -ANAU$bmvAmthP7L7xwo1w}#
                                                                0)
                                                              'syntax-object)
                                                         #f)
                                                       #f)
                                                   (vector-ref
-                                                    #{x _hoQGWMnyQPAh3k2jhWI7R}#
+                                                    #{x -ANAU$bmvAmthP7L7xwo1w}#
                                                     1)
-                                                  #{x _hoQGWMnyQPAh3k2jhWI7R}#)
+                                                  #{x -ANAU$bmvAmthP7L7xwo1w}#)
                                                 (if (if (= (vector-length
                                                              '#(syntax-object
                                                                 ...
@@ -21638,7 +21608,7 @@
                                                                  #(ribcage
                                                                    #(x)
                                                                    #((top))
-                                                                   #("2de"))
+                                                                   #("p6"))
                                                                  #(ribcage
                                                                    (lambda-var-list
                                                                      gen-var
@@ -21920,146 +21890,146 @@
                                                                     (top)
                                                                     (top)
                                                                     (top))
-                                                                   ("1tt"
-                                                                    "1ts"
-                                                                    "1tr"
-                                                                    "1tq"
-                                                                    "1tp"
-                                                                    "1to"
-                                                                    "1tn"
-                                                                    "1tm"
-                                                                    "1tl"
-                                                                    "1tk"
-                                                                    "1tj"
-                                                                    "1ti"
-                                                                    "1th"
-                                                                    "1tg"
-                                                                    "1tf"
-                                                                    "1te"
-                                                                    "1td"
-                                                                    "1tc"
-                                                                    "1tb"
-                                                                    "1ta"
-                                                                    "1t9"
-                                                                    "1t8"
-                                                                    "1t7"
-                                                                    "1t6"
-                                                                    "1t5"
-                                                                    "1t4"
-                                                                    "1t3"
-                                                                    "1t2"
-                                                                    "1t1"
-                                                                    "1t0"
-                                                                    "1sz"
-                                                                    "1sy"
-                                                                    "1sx"
-                                                                    "1sw"
-                                                                    "1sv"
-                                                                    "1su"
-                                                                    "1st"
-                                                                    "1ss"
-                                                                    "1sr"
-                                                                    "1sq"
-                                                                    "1sp"
-                                                                    "1so"
-                                                                    "1sn"
-                                                                    "1sm"
-                                                                    "1sl"
-                                                                    "1sk"
-                                                                    "1sj"
-                                                                    "1si"
-                                                                    "1sh"
-                                                                    "1sg"
-                                                                    "1sf"
-                                                                    "1se"
-                                                                    "1sd"
-                                                                    "1sc"
-                                                                    "1sb"
-                                                                    "1sa"
-                                                                    "1s9"
-                                                                    "1s8"
-                                                                    "1s7"
-                                                                    "1s6"
-                                                                    "1s5"
-                                                                    "1s4"
-                                                                    "1s3"
-                                                                    "1s2"
-                                                                    "1s1"
-                                                                    "1s0"
-                                                                    "1rz"
-                                                                    "1ry"
-                                                                    "1rx"
-                                                                    "1rw"
-                                                                    "1rv"
-                                                                    "1ru"
-                                                                    "1rt"
-                                                                    "1rs"
-                                                                    "1rr"
-                                                                    "1rq"
-                                                                    "1rp"
-                                                                    "1ro"
-                                                                    "1rn"
-                                                                    "1rm"
-                                                                    "1rl"
-                                                                    "1rk"
-                                                                    "1rj"
-                                                                    "1ri"
-                                                                    "1rh"
-                                                                    "1rg"
-                                                                    "1rf"
-                                                                    "1re"
-                                                                    "1rd"
-                                                                    "1rc"
-                                                                    "1rb"
-                                                                    "1ra"
-                                                                    "1r9"
-                                                                    "1r8"
-                                                                    "1r7"
-                                                                    "1r6"
-                                                                    "1r5"
-                                                                    "1r4"
-                                                                    "1r3"
-                                                                    "1r2"
-                                                                    "1r1"
-                                                                    "1r0"
-                                                                    "1qz"
-                                                                    "1qy"
-                                                                    "1qx"
-                                                                    "1qw"
-                                                                    "1qv"
-                                                                    "1qu"
-                                                                    "1qt"
-                                                                    "1qs"
-                                                                    "1qr"
-                                                                    "1qq"
-                                                                    "1qp"
-                                                                    "1qo"
-                                                                    "1qn"
-                                                                    "1qm"
-                                                                    "1ql"
-                                                                    "1qk"
-                                                                    "1qj"
-                                                                    "1qi"
-                                                                    "1qh"
-                                                                    "1qg"
-                                                                    "1qf"
-                                                                    "1qe"
-                                                                    "1qd"
-                                                                    "1qc"
-                                                                    "1qb"
-                                                                    "1qa"
-                                                                    "1q9"
-                                                                    "1q8"
-                                                                    "1q7"
-                                                                    "1q6"
-                                                                    "1q5"
-                                                                    "1q4"
-                                                                    "1q3"
-                                                                    "1q2"
-                                                                    "1q1"
-                                                                    "1q0"
-                                                                    "1pz"
-                                                                    "1py"))
+                                                                   ("5l"
+                                                                    "5k"
+                                                                    "5j"
+                                                                    "5i"
+                                                                    "5h"
+                                                                    "5g"
+                                                                    "5f"
+                                                                    "5e"
+                                                                    "5d"
+                                                                    "5c"
+                                                                    "5b"
+                                                                    "5a"
+                                                                    "59"
+                                                                    "58"
+                                                                    "57"
+                                                                    "56"
+                                                                    "55"
+                                                                    "54"
+                                                                    "53"
+                                                                    "52"
+                                                                    "51"
+                                                                    "50"
+                                                                    "4z"
+                                                                    "4y"
+                                                                    "4x"
+                                                                    "4w"
+                                                                    "4v"
+                                                                    "4u"
+                                                                    "4t"
+                                                                    "4s"
+                                                                    "4r"
+                                                                    "4q"
+                                                                    "4p"
+                                                                    "4o"
+                                                                    "4n"
+                                                                    "4m"
+                                                                    "4l"
+                                                                    "4k"
+                                                                    "4j"
+                                                                    "4i"
+                                                                    "4h"
+                                                                    "4g"
+                                                                    "4f"
+                                                                    "4e"
+                                                                    "4d"
+                                                                    "4c"
+                                                                    "4b"
+                                                                    "4a"
+                                                                    "49"
+                                                                    "48"
+                                                                    "47"
+                                                                    "46"
+                                                                    "45"
+                                                                    "44"
+                                                                    "43"
+                                                                    "42"
+                                                                    "41"
+                                                                    "40"
+                                                                    "3z"
+                                                                    "3y"
+                                                                    "3x"
+                                                                    "3w"
+                                                                    "3v"
+                                                                    "3u"
+                                                                    "3t"
+                                                                    "3s"
+                                                                    "3r"
+                                                                    "3q"
+                                                                    "3p"
+                                                                    "3o"
+                                                                    "3n"
+                                                                    "3m"
+                                                                    "3l"
+                                                                    "3k"
+                                                                    "3j"
+                                                                    "3i"
+                                                                    "3h"
+                                                                    "3g"
+                                                                    "3f"
+                                                                    "3e"
+                                                                    "3d"
+                                                                    "3c"
+                                                                    "3b"
+                                                                    "3a"
+                                                                    "39"
+                                                                    "38"
+                                                                    "37"
+                                                                    "36"
+                                                                    "35"
+                                                                    "34"
+                                                                    "33"
+                                                                    "32"
+                                                                    "31"
+                                                                    "30"
+                                                                    "2z"
+                                                                    "2y"
+                                                                    "2x"
+                                                                    "2w"
+                                                                    "2v"
+                                                                    "2u"
+                                                                    "2t"
+                                                                    "2s"
+                                                                    "2r"
+                                                                    "2q"
+                                                                    "2p"
+                                                                    "2o"
+                                                                    "2n"
+                                                                    "2m"
+                                                                    "2l"
+                                                                    "2k"
+                                                                    "2j"
+                                                                    "2i"
+                                                                    "2h"
+                                                                    "2g"
+                                                                    "2f"
+                                                                    "2e"
+                                                                    "2d"
+                                                                    "2c"
+                                                                    "2b"
+                                                                    "2a"
+                                                                    "29"
+                                                                    "28"
+                                                                    "27"
+                                                                    "26"
+                                                                    "25"
+                                                                    "24"
+                                                                    "23"
+                                                                    "22"
+                                                                    "21"
+                                                                    "20"
+                                                                    "1z"
+                                                                    "1y"
+                                                                    "1x"
+                                                                    "1w"
+                                                                    "1v"
+                                                                    "1u"
+                                                                    "1t"
+                                                                    "1s"
+                                                                    "1r"
+                                                                    "1q"))
                                                                  #(ribcage
                                                                    (define-structure
                                                                      define-expansion-accessors
@@ -22067,9 +22037,9 @@
                                                                    ((top)
                                                                     (top)
                                                                     (top))
-                                                                   ("1og"
-                                                                    "1of"
-                                                                    "1oe")))
+                                                                   ("8"
+                                                                    "7"
+                                                                    "6")))
                                                                 (hygiene
                                                                   guile)))
                                                            4)
@@ -22084,7 +22054,7 @@
                                                       #(ribcage
                                                         #(x)
                                                         #((top))
-                                                        #("2de"))
+                                                        #("p6"))
                                                       #(ribcage
                                                         (lambda-var-list
                                                           gen-var
@@ -22366,157 +22336,157 @@
                                                          (top)
                                                          (top)
                                                          (top))
-                                                        ("1tt"
-                                                         "1ts"
-                                                         "1tr"
-                                                         "1tq"
-                                                         "1tp"
-                                                         "1to"
-                                                         "1tn"
-                                                         "1tm"
-                                                         "1tl"
-                                                         "1tk"
-                                                         "1tj"
-                                                         "1ti"
-                                                         "1th"
-                                                         "1tg"
-                                                         "1tf"
-                                                         "1te"
-                                                         "1td"
-                                                         "1tc"
-                                                         "1tb"
-                                                         "1ta"
-                                                         "1t9"
-                                                         "1t8"
-                                                         "1t7"
-                                                         "1t6"
-                                                         "1t5"
-                                                         "1t4"
-                                                         "1t3"
-                                                         "1t2"
-                                                         "1t1"
-                                                         "1t0"
-                                                         "1sz"
-                                                         "1sy"
-                                                         "1sx"
-                                                         "1sw"
-                                                         "1sv"
-                                                         "1su"
-                                                         "1st"
-                                                         "1ss"
-                                                         "1sr"
-                                                         "1sq"
-                                                         "1sp"
-                                                         "1so"
-                                                         "1sn"
-                                                         "1sm"
-                                                         "1sl"
-                                                         "1sk"
-                                                         "1sj"
-                                                         "1si"
-                                                         "1sh"
-                                                         "1sg"
-                                                         "1sf"
-                                                         "1se"
-                                                         "1sd"
-                                                         "1sc"
-                                                         "1sb"
-                                                         "1sa"
-                                                         "1s9"
-                                                         "1s8"
-                                                         "1s7"
-                                                         "1s6"
-                                                         "1s5"
-                                                         "1s4"
-                                                         "1s3"
-                                                         "1s2"
-                                                         "1s1"
-                                                         "1s0"
-                                                         "1rz"
-                                                         "1ry"
-                                                         "1rx"
-                                                         "1rw"
-                                                         "1rv"
-                                                         "1ru"
-                                                         "1rt"
-                                                         "1rs"
-                                                         "1rr"
-                                                         "1rq"
-                                                         "1rp"
-                                                         "1ro"
-                                                         "1rn"
-                                                         "1rm"
-                                                         "1rl"
-                                                         "1rk"
-                                                         "1rj"
-                                                         "1ri"
-                                                         "1rh"
-                                                         "1rg"
-                                                         "1rf"
-                                                         "1re"
-                                                         "1rd"
-                                                         "1rc"
-                                                         "1rb"
-                                                         "1ra"
-                                                         "1r9"
-                                                         "1r8"
-                                                         "1r7"
-                                                         "1r6"
-                                                         "1r5"
-                                                         "1r4"
-                                                         "1r3"
-                                                         "1r2"
-                                                         "1r1"
-                                                         "1r0"
-                                                         "1qz"
-                                                         "1qy"
-                                                         "1qx"
-                                                         "1qw"
-                                                         "1qv"
-                                                         "1qu"
-                                                         "1qt"
-                                                         "1qs"
-                                                         "1qr"
-                                                         "1qq"
-                                                         "1qp"
-                                                         "1qo"
-                                                         "1qn"
-                                                         "1qm"
-                                                         "1ql"
-                                                         "1qk"
-                                                         "1qj"
-                                                         "1qi"
-                                                         "1qh"
-                                                         "1qg"
-                                                         "1qf"
-                                                         "1qe"
-                                                         "1qd"
-                                                         "1qc"
-                                                         "1qb"
-                                                         "1qa"
-                                                         "1q9"
-                                                         "1q8"
-                                                         "1q7"
-                                                         "1q6"
-                                                         "1q5"
-                                                         "1q4"
-                                                         "1q3"
-                                                         "1q2"
-                                                         "1q1"
-                                                         "1q0"
-                                                         "1pz"
-                                                         "1py"))
+                                                        ("5l"
+                                                         "5k"
+                                                         "5j"
+                                                         "5i"
+                                                         "5h"
+                                                         "5g"
+                                                         "5f"
+                                                         "5e"
+                                                         "5d"
+                                                         "5c"
+                                                         "5b"
+                                                         "5a"
+                                                         "59"
+                                                         "58"
+                                                         "57"
+                                                         "56"
+                                                         "55"
+                                                         "54"
+                                                         "53"
+                                                         "52"
+                                                         "51"
+                                                         "50"
+                                                         "4z"
+                                                         "4y"
+                                                         "4x"
+                                                         "4w"
+                                                         "4v"
+                                                         "4u"
+                                                         "4t"
+                                                         "4s"
+                                                         "4r"
+                                                         "4q"
+                                                         "4p"
+                                                         "4o"
+                                                         "4n"
+                                                         "4m"
+                                                         "4l"
+                                                         "4k"
+                                                         "4j"
+                                                         "4i"
+                                                         "4h"
+                                                         "4g"
+                                                         "4f"
+                                                         "4e"
+                                                         "4d"
+                                                         "4c"
+                                                         "4b"
+                                                         "4a"
+                                                         "49"
+                                                         "48"
+                                                         "47"
+                                                         "46"
+                                                         "45"
+                                                         "44"
+                                                         "43"
+                                                         "42"
+                                                         "41"
+                                                         "40"
+                                                         "3z"
+                                                         "3y"
+                                                         "3x"
+                                                         "3w"
+                                                         "3v"
+                                                         "3u"
+                                                         "3t"
+                                                         "3s"
+                                                         "3r"
+                                                         "3q"
+                                                         "3p"
+                                                         "3o"
+                                                         "3n"
+                                                         "3m"
+                                                         "3l"
+                                                         "3k"
+                                                         "3j"
+                                                         "3i"
+                                                         "3h"
+                                                         "3g"
+                                                         "3f"
+                                                         "3e"
+                                                         "3d"
+                                                         "3c"
+                                                         "3b"
+                                                         "3a"
+                                                         "39"
+                                                         "38"
+                                                         "37"
+                                                         "36"
+                                                         "35"
+                                                         "34"
+                                                         "33"
+                                                         "32"
+                                                         "31"
+                                                         "30"
+                                                         "2z"
+                                                         "2y"
+                                                         "2x"
+                                                         "2w"
+                                                         "2v"
+                                                         "2u"
+                                                         "2t"
+                                                         "2s"
+                                                         "2r"
+                                                         "2q"
+                                                         "2p"
+                                                         "2o"
+                                                         "2n"
+                                                         "2m"
+                                                         "2l"
+                                                         "2k"
+                                                         "2j"
+                                                         "2i"
+                                                         "2h"
+                                                         "2g"
+                                                         "2f"
+                                                         "2e"
+                                                         "2d"
+                                                         "2c"
+                                                         "2b"
+                                                         "2a"
+                                                         "29"
+                                                         "28"
+                                                         "27"
+                                                         "26"
+                                                         "25"
+                                                         "24"
+                                                         "23"
+                                                         "22"
+                                                         "21"
+                                                         "20"
+                                                         "1z"
+                                                         "1y"
+                                                         "1x"
+                                                         "1w"
+                                                         "1v"
+                                                         "1u"
+                                                         "1t"
+                                                         "1s"
+                                                         "1r"
+                                                         "1q"))
                                                       #(ribcage
                                                         (define-structure
                                                           define-expansion-accessors
                                                           define-expansion-constructors)
                                                         ((top) (top) (top))
-                                                        ("1og" "1of" "1oe")))
+                                                        ("8" "7" "6")))
                                                      (hygiene guile))))
-                                         (eq? (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                                                #{x _hoQGWMnyQPAh3k2jhWI7R}#
+                                         (eq? (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                                                #{x -ANAU$bmvAmthP7L7xwo1w}#
                                                 '(()))
-                                              (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
+                                              (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
                                                 '#(syntax-object
                                                    ...
                                                    ((top)
@@ -22525,7 +22495,7 @@
                                                     #(ribcage
                                                       #(x)
                                                       #((top))
-                                                      #("2de"))
+                                                      #("p6"))
                                                     #(ribcage
                                                       (lambda-var-list
                                                         gen-var
@@ -22807,1042 +22777,1063 @@
                                                        (top)
                                                        (top)
                                                        (top))
-                                                      ("1tt"
-                                                       "1ts"
-                                                       "1tr"
-                                                       "1tq"
-                                                       "1tp"
-                                                       "1to"
-                                                       "1tn"
-                                                       "1tm"
-                                                       "1tl"
-                                                       "1tk"
-                                                       "1tj"
-                                                       "1ti"
-                                                       "1th"
-                                                       "1tg"
-                                                       "1tf"
-                                                       "1te"
-                                                       "1td"
-                                                       "1tc"
-                                                       "1tb"
-                                                       "1ta"
-                                                       "1t9"
-                                                       "1t8"
-                                                       "1t7"
-                                                       "1t6"
-                                                       "1t5"
-                                                       "1t4"
-                                                       "1t3"
-                                                       "1t2"
-                                                       "1t1"
-                                                       "1t0"
-                                                       "1sz"
-                                                       "1sy"
-                                                       "1sx"
-                                                       "1sw"
-                                                       "1sv"
-                                                       "1su"
-                                                       "1st"
-                                                       "1ss"
-                                                       "1sr"
-                                                       "1sq"
-                                                       "1sp"
-                                                       "1so"
-                                                       "1sn"
-                                                       "1sm"
-                                                       "1sl"
-                                                       "1sk"
-                                                       "1sj"
-                                                       "1si"
-                                                       "1sh"
-                                                       "1sg"
-                                                       "1sf"
-                                                       "1se"
-                                                       "1sd"
-                                                       "1sc"
-                                                       "1sb"
-                                                       "1sa"
-                                                       "1s9"
-                                                       "1s8"
-                                                       "1s7"
-                                                       "1s6"
-                                                       "1s5"
-                                                       "1s4"
-                                                       "1s3"
-                                                       "1s2"
-                                                       "1s1"
-                                                       "1s0"
-                                                       "1rz"
-                                                       "1ry"
-                                                       "1rx"
-                                                       "1rw"
-                                                       "1rv"
-                                                       "1ru"
-                                                       "1rt"
-                                                       "1rs"
-                                                       "1rr"
-                                                       "1rq"
-                                                       "1rp"
-                                                       "1ro"
-                                                       "1rn"
-                                                       "1rm"
-                                                       "1rl"
-                                                       "1rk"
-                                                       "1rj"
-                                                       "1ri"
-                                                       "1rh"
-                                                       "1rg"
-                                                       "1rf"
-                                                       "1re"
-                                                       "1rd"
-                                                       "1rc"
-                                                       "1rb"
-                                                       "1ra"
-                                                       "1r9"
-                                                       "1r8"
-                                                       "1r7"
-                                                       "1r6"
-                                                       "1r5"
-                                                       "1r4"
-                                                       "1r3"
-                                                       "1r2"
-                                                       "1r1"
-                                                       "1r0"
-                                                       "1qz"
-                                                       "1qy"
-                                                       "1qx"
-                                                       "1qw"
-                                                       "1qv"
-                                                       "1qu"
-                                                       "1qt"
-                                                       "1qs"
-                                                       "1qr"
-                                                       "1qq"
-                                                       "1qp"
-                                                       "1qo"
-                                                       "1qn"
-                                                       "1qm"
-                                                       "1ql"
-                                                       "1qk"
-                                                       "1qj"
-                                                       "1qi"
-                                                       "1qh"
-                                                       "1qg"
-                                                       "1qf"
-                                                       "1qe"
-                                                       "1qd"
-                                                       "1qc"
-                                                       "1qb"
-                                                       "1qa"
-                                                       "1q9"
-                                                       "1q8"
-                                                       "1q7"
-                                                       "1q6"
-                                                       "1q5"
-                                                       "1q4"
-                                                       "1q3"
-                                                       "1q2"
-                                                       "1q1"
-                                                       "1q0"
-                                                       "1pz"
-                                                       "1py"))
+                                                      ("5l"
+                                                       "5k"
+                                                       "5j"
+                                                       "5i"
+                                                       "5h"
+                                                       "5g"
+                                                       "5f"
+                                                       "5e"
+                                                       "5d"
+                                                       "5c"
+                                                       "5b"
+                                                       "5a"
+                                                       "59"
+                                                       "58"
+                                                       "57"
+                                                       "56"
+                                                       "55"
+                                                       "54"
+                                                       "53"
+                                                       "52"
+                                                       "51"
+                                                       "50"
+                                                       "4z"
+                                                       "4y"
+                                                       "4x"
+                                                       "4w"
+                                                       "4v"
+                                                       "4u"
+                                                       "4t"
+                                                       "4s"
+                                                       "4r"
+                                                       "4q"
+                                                       "4p"
+                                                       "4o"
+                                                       "4n"
+                                                       "4m"
+                                                       "4l"
+                                                       "4k"
+                                                       "4j"
+                                                       "4i"
+                                                       "4h"
+                                                       "4g"
+                                                       "4f"
+                                                       "4e"
+                                                       "4d"
+                                                       "4c"
+                                                       "4b"
+                                                       "4a"
+                                                       "49"
+                                                       "48"
+                                                       "47"
+                                                       "46"
+                                                       "45"
+                                                       "44"
+                                                       "43"
+                                                       "42"
+                                                       "41"
+                                                       "40"
+                                                       "3z"
+                                                       "3y"
+                                                       "3x"
+                                                       "3w"
+                                                       "3v"
+                                                       "3u"
+                                                       "3t"
+                                                       "3s"
+                                                       "3r"
+                                                       "3q"
+                                                       "3p"
+                                                       "3o"
+                                                       "3n"
+                                                       "3m"
+                                                       "3l"
+                                                       "3k"
+                                                       "3j"
+                                                       "3i"
+                                                       "3h"
+                                                       "3g"
+                                                       "3f"
+                                                       "3e"
+                                                       "3d"
+                                                       "3c"
+                                                       "3b"
+                                                       "3a"
+                                                       "39"
+                                                       "38"
+                                                       "37"
+                                                       "36"
+                                                       "35"
+                                                       "34"
+                                                       "33"
+                                                       "32"
+                                                       "31"
+                                                       "30"
+                                                       "2z"
+                                                       "2y"
+                                                       "2x"
+                                                       "2w"
+                                                       "2v"
+                                                       "2u"
+                                                       "2t"
+                                                       "2s"
+                                                       "2r"
+                                                       "2q"
+                                                       "2p"
+                                                       "2o"
+                                                       "2n"
+                                                       "2m"
+                                                       "2l"
+                                                       "2k"
+                                                       "2j"
+                                                       "2i"
+                                                       "2h"
+                                                       "2g"
+                                                       "2f"
+                                                       "2e"
+                                                       "2d"
+                                                       "2c"
+                                                       "2b"
+                                                       "2a"
+                                                       "29"
+                                                       "28"
+                                                       "27"
+                                                       "26"
+                                                       "25"
+                                                       "24"
+                                                       "23"
+                                                       "22"
+                                                       "21"
+                                                       "20"
+                                                       "1z"
+                                                       "1y"
+                                                       "1x"
+                                                       "1w"
+                                                       "1v"
+                                                       "1u"
+                                                       "1t"
+                                                       "1s"
+                                                       "1r"
+                                                       "1q"))
                                                     #(ribcage
                                                       (define-structure
                                                         define-expansion-accessors
                                                         define-expansion-constructors)
                                                       ((top) (top) (top))
-                                                      ("1og" "1of" "1oe")))
+                                                      ("8" "7" "6")))
                                                    (hygiene guile))
                                                 '(())))
                                          #f)
                                        #f))
                                 #f))
-                            #{key _hoQGWMnyQPAh3k2jhWI7P}#)
-                        (let ((#{x _hoQGWMnyQPAh3k2jhWI9P}#
+                            #{key -ANAU$bmvAmthP7L7xwo1u}#)
+                        (let ((#{x -ANAU$bmvAmthP7L7xwo3u}#
                                 (gensym
                                   (string-append (symbol->string 'tmp) " "))))
-                          (#{build-application _hoQGWMnyQPAh3k2jhWHSg}#
-                            #{s _hoQGWMnyQPAh3k2jhWI6x}#
-                            (let ((#{req _hoQGWMnyQPAh3k2jhWI@R}# (list 'tmp))
-                                  (#{vars _hoQGWMnyQPAh3k2jhWI@T}#
-                                    (list #{x _hoQGWMnyQPAh3k2jhWI9P}#))
-                                  (#{exp _hoQGWMnyQPAh3k2jhWI@V}#
-                                    (#{gen-syntax-case _hoQGWMnyQPAh3k2jhWI6t}#
+                          (#{build-application -ANAU$bmvAmthP7L7xwnM@}#
+                            #{s -ANAU$bmvAmthP7L7xwo1Q}#
+                            (let ((#{req -ANAU$bmvAmthP7L7xwo5w}# (list 'tmp))
+                                  (#{vars -ANAU$bmvAmthP7L7xwo5y}#
+                                    (list #{x -ANAU$bmvAmthP7L7xwo3u}#))
+                                  (#{exp -ANAU$bmvAmthP7L7xwo50}#
+                                    (#{gen-syntax-case -ANAU$bmvAmthP7L7xwo1M}#
                                       (make-struct/no-tail
                                         (vector-ref %expanded-vtables 3)
                                         #f
                                         'tmp
-                                        #{x _hoQGWMnyQPAh3k2jhWI9P}#)
-                                      #{key _hoQGWMnyQPAh3k2jhWI7P}#
-                                      #{m _hoQGWMnyQPAh3k2jhWI7Q}#
-                                      #{r _hoQGWMnyQPAh3k2jhWI6v}#
-                                      #{mod _hoQGWMnyQPAh3k2jhWI6y}#)))
-                              (let ((#{body _hoQGWMnyQPAh3k2jhWI@a}#
+                                        #{x -ANAU$bmvAmthP7L7xwo3u}#)
+                                      #{key -ANAU$bmvAmthP7L7xwo1u}#
+                                      #{m -ANAU$bmvAmthP7L7xwo1v}#
+                                      #{r -ANAU$bmvAmthP7L7xwo1O}#
+                                      #{mod -ANAU$bmvAmthP7L7xwo1R}#)))
+                              (let ((#{body -ANAU$bmvAmthP7L7xwo55}#
                                       (make-struct/no-tail
                                         (vector-ref %expanded-vtables 14)
                                         #f
-                                        #{req _hoQGWMnyQPAh3k2jhWI@R}#
+                                        #{req -ANAU$bmvAmthP7L7xwo5w}#
                                         #f
                                         #f
                                         #f
                                         '()
-                                        #{vars _hoQGWMnyQPAh3k2jhWI@T}#
-                                        #{exp _hoQGWMnyQPAh3k2jhWI@V}#
+                                        #{vars -ANAU$bmvAmthP7L7xwo5y}#
+                                        #{exp -ANAU$bmvAmthP7L7xwo50}#
                                         #f)))
                                 (make-struct/no-tail
                                   (vector-ref %expanded-vtables 13)
                                   #f
                                   '()
-                                  #{body _hoQGWMnyQPAh3k2jhWI@a}#)))
-                            (list (#{expand _hoQGWMnyQPAh3k2jhWHTl}#
-                                    #{val _hoQGWMnyQPAh3k2jhWI7O}#
-                                    #{r _hoQGWMnyQPAh3k2jhWI6v}#
+                                  #{body -ANAU$bmvAmthP7L7xwo55}#)))
+                            (list (#{expand -ANAU$bmvAmthP7L7xwnOE}#
+                                    #{val -ANAU$bmvAmthP7L7xwo1t}#
+                                    #{r -ANAU$bmvAmthP7L7xwo1O}#
                                     '(())
-                                    #{mod _hoQGWMnyQPAh3k2jhWI6y}#))))
+                                    #{mod -ANAU$bmvAmthP7L7xwo1R}#))))
                         (syntax-violation
                           'syntax-case
                           "invalid literals list"
-                          #{e _hoQGWMnyQPAh3k2jhWI6z}#)))
-                    #{tmp _hoQGWMnyQPAh3k2jhWI61}#)
+                          #{e -ANAU$bmvAmthP7L7xwo1S}#)))
+                    #{tmp -ANAU$bmvAmthP7L7xwo1U}#)
                   (syntax-violation
                     #f
                     "source expression failed to match any pattern"
-                    #{e _hoQGWMnyQPAh3k2jhWI6z}#)))))))
+                    #{e -ANAU$bmvAmthP7L7xwo1S}#)))))))
       (set! macroexpand
         (lambda*
-          (#{x _hoQGWMnyQPAh3k2jhWJlC}#
+          (#{x -ANAU$bmvAmthP7L7xwpfh}#
             #:optional
-            (#{m _hoQGWMnyQPAh3k2jhWJlD}# 'e)
-            (#{esew _hoQGWMnyQPAh3k2jhWJlE}# '(eval)))
-          (#{expand-top-sequence _hoQGWMnyQPAh3k2jhWHTh}#
-            (list #{x _hoQGWMnyQPAh3k2jhWJlC}#)
+            (#{m -ANAU$bmvAmthP7L7xwpfi}# 'e)
+            (#{esew -ANAU$bmvAmthP7L7xwpfj}# '(eval)))
+          (#{expand-top-sequence -ANAU$bmvAmthP7L7xwnOA}#
+            (list #{x -ANAU$bmvAmthP7L7xwpfh}#)
             '()
             '((top))
             #f
-            #{m _hoQGWMnyQPAh3k2jhWJlD}#
-            #{esew _hoQGWMnyQPAh3k2jhWJlE}#
+            #{m -ANAU$bmvAmthP7L7xwpfi}#
+            #{esew -ANAU$bmvAmthP7L7xwpfj}#
             (cons 'hygiene (module-name (current-module))))))
       (set! identifier?
-        (lambda (#{x _hoQGWMnyQPAh3k2jhWJlH}#)
-          (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWJlH}#)
-                (if (= (vector-length #{x _hoQGWMnyQPAh3k2jhWJlH}#)
+        (lambda (#{x -ANAU$bmvAmthP7L7xwpfm}#)
+          (if (if (vector? #{x -ANAU$bmvAmthP7L7xwpfm}#)
+                (if (= (vector-length #{x -ANAU$bmvAmthP7L7xwpfm}#)
                        4)
-                  (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWJlH}# 0)
+                  (eq? (vector-ref #{x -ANAU$bmvAmthP7L7xwpfm}# 0)
                        'syntax-object)
                   #f)
                 #f)
             (symbol?
-              (vector-ref #{x _hoQGWMnyQPAh3k2jhWJlH}# 1))
+              (vector-ref #{x -ANAU$bmvAmthP7L7xwpfm}# 1))
             #f)))
       (set! datum->syntax
-        (lambda (#{id _hoQGWMnyQPAh3k2jhWJlg}#
-                 #{datum _hoQGWMnyQPAh3k2jhWJlh}#)
-          (let ((#{wrap _hoQGWMnyQPAh3k2jhWJlm}#
-                  (vector-ref #{id _hoQGWMnyQPAh3k2jhWJlg}# 2))
-                (#{module _hoQGWMnyQPAh3k2jhWJln}#
-                  (vector-ref #{id _hoQGWMnyQPAh3k2jhWJlg}# 3)))
+        (lambda (#{id -ANAU$bmvAmthP7L7xwpf@}#
+                 #{datum -ANAU$bmvAmthP7L7xwpgA}#)
+          (let ((#{wrap -ANAU$bmvAmthP7L7xwpgF}#
+                  (vector-ref #{id -ANAU$bmvAmthP7L7xwpf@}# 2))
+                (#{module -ANAU$bmvAmthP7L7xwpgG}#
+                  (vector-ref #{id -ANAU$bmvAmthP7L7xwpf@}# 3)))
             (vector
               'syntax-object
-              #{datum _hoQGWMnyQPAh3k2jhWJlh}#
-              #{wrap _hoQGWMnyQPAh3k2jhWJlm}#
-              #{module _hoQGWMnyQPAh3k2jhWJln}#))))
+              #{datum -ANAU$bmvAmthP7L7xwpgA}#
+              #{wrap -ANAU$bmvAmthP7L7xwpgF}#
+              #{module -ANAU$bmvAmthP7L7xwpgG}#))))
       (set! syntax->datum
-        (lambda (#{x _hoQGWMnyQPAh3k2jhWJlu}#)
-          (#{strip _hoQGWMnyQPAh3k2jhWHTy}#
-            #{x _hoQGWMnyQPAh3k2jhWJlu}#
+        (lambda (#{x -ANAU$bmvAmthP7L7xwpgN}#)
+          (#{strip -ANAU$bmvAmthP7L7xwnOR}#
+            #{x -ANAU$bmvAmthP7L7xwpgN}#
             '(()))))
       (set! syntax-source
-        (lambda (#{x _hoQGWMnyQPAh3k2jhWJlx}#)
-          (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-            #{x _hoQGWMnyQPAh3k2jhWJlx}#)))
-      (set! syntax-module
-        (lambda (#{id _hoQGWMnyQPAh3k2jhWJoK}#)
-          (begin
-            (if (not (if (if (vector? #{id _hoQGWMnyQPAh3k2jhWJoK}#)
-                           (if (= (vector-length #{id _hoQGWMnyQPAh3k2jhWJoK}#)
-                                  4)
-                             (eq? (vector-ref #{id _hoQGWMnyQPAh3k2jhWJoK}# 0)
-                                  'syntax-object)
-                             #f)
-                           #f)
-                       (symbol?
-                         (vector-ref #{id _hoQGWMnyQPAh3k2jhWJoK}# 1))
-                       #f))
-              (syntax-violation
-                'syntax-module
-                "invalid argument"
-                #{id _hoQGWMnyQPAh3k2jhWJoK}#))
-            (cdr (vector-ref #{id _hoQGWMnyQPAh3k2jhWJoK}# 3)))))
-      (set! syntax-local-binding
-        (lambda (#{id _hoQGWMnyQPAh3k2jhWJoz}#)
-          (begin
-            (if (not (if (if (vector? #{id _hoQGWMnyQPAh3k2jhWJoz}#)
-                           (if (= (vector-length #{id _hoQGWMnyQPAh3k2jhWJoz}#)
-                                  4)
-                             (eq? (vector-ref #{id _hoQGWMnyQPAh3k2jhWJoz}# 0)
-                                  'syntax-object)
-                             #f)
-                           #f)
-                       (symbol?
-                         (vector-ref #{id _hoQGWMnyQPAh3k2jhWJoz}# 1))
-                       #f))
-              (syntax-violation
-                'syntax-local-binding
-                "invalid argument"
-                #{id _hoQGWMnyQPAh3k2jhWJoz}#))
-            ((fluid-ref
-               #{transformer-environment _hoQGWMnyQPAh3k2jhWHTX}#)
-             (lambda (#{e _hoQGWMnyQPAh3k2jhWJpc}#
-                      #{r _hoQGWMnyQPAh3k2jhWJpd}#
-                      #{w _hoQGWMnyQPAh3k2jhWJpe}#
-                      #{s _hoQGWMnyQPAh3k2jhWJpf}#
-                      #{rib _hoQGWMnyQPAh3k2jhWJpg}#
-                      #{mod _hoQGWMnyQPAh3k2jhWJph}#)
-               (call-with-values
-                 (lambda ()
-                   (let ((#{id _hoQGWMnyQPAh3k2jhWJpk}#
-                           (vector-ref #{id _hoQGWMnyQPAh3k2jhWJoz}# 1))
-                         (#{w _hoQGWMnyQPAh3k2jhWJpl}#
-                           (let ((#{w _hoQGWMnyQPAh3k2jhWJpw}#
-                                   (vector-ref
-                                     #{id _hoQGWMnyQPAh3k2jhWJoz}#
-                                     2)))
-                             (let ((#{ms _hoQGWMnyQPAh3k2jhWJpx}#
-                                     (car #{w _hoQGWMnyQPAh3k2jhWJpw}#))
-                                   (#{s _hoQGWMnyQPAh3k2jhWJpy}#
-                                     (cdr #{w _hoQGWMnyQPAh3k2jhWJpw}#)))
-                               (if (if (pair? #{ms _hoQGWMnyQPAh3k2jhWJpx}#)
-                                     (eq? (car #{ms _hoQGWMnyQPAh3k2jhWJpx}#)
-                                          #f)
-                                     #f)
-                                 (cons (cdr #{ms _hoQGWMnyQPAh3k2jhWJpx}#)
-                                       (if #{rib _hoQGWMnyQPAh3k2jhWJpg}#
-                                         (cons #{rib _hoQGWMnyQPAh3k2jhWJpg}#
-                                               (cdr #{s _hoQGWMnyQPAh3k2jhWJpy}#))
-                                         (cdr #{s _hoQGWMnyQPAh3k2jhWJpy}#)))
-                                 (cons #{ms _hoQGWMnyQPAh3k2jhWJpx}#
-                                       (if #{rib _hoQGWMnyQPAh3k2jhWJpg}#
-                                         (cons #{rib _hoQGWMnyQPAh3k2jhWJpg}#
-                                               #{s _hoQGWMnyQPAh3k2jhWJpy}#)
-                                         #{s _hoQGWMnyQPAh3k2jhWJpy}#))))))
-                         (#{mod _hoQGWMnyQPAh3k2jhWJpn}#
-                           (vector-ref #{id _hoQGWMnyQPAh3k2jhWJoz}# 3)))
-                     (let ((#{n _hoQGWMnyQPAh3k2jhWJpq}#
-                             (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                               #{id _hoQGWMnyQPAh3k2jhWJpk}#
-                               #{w _hoQGWMnyQPAh3k2jhWJpl}#)))
-                       (if (symbol? #{n _hoQGWMnyQPAh3k2jhWJpq}#)
-                         (let ((#{mod _hoQGWMnyQPAh3k2jhWJp4}#
-                                 (if (if (vector?
-                                           #{id _hoQGWMnyQPAh3k2jhWJpk}#)
-                                       (if (= (vector-length
-                                                #{id _hoQGWMnyQPAh3k2jhWJpk}#)
-                                              4)
-                                         (eq? (vector-ref
-                                                #{id _hoQGWMnyQPAh3k2jhWJpk}#
-                                                0)
-                                              'syntax-object)
-                                         #f)
-                                       #f)
-                                   (vector-ref #{id _hoQGWMnyQPAh3k2jhWJpk}# 3)
-                                   #{mod _hoQGWMnyQPAh3k2jhWJpn}#)))
-                           (let ((#{b _hoQGWMnyQPAh3k2jhWJp5}#
-                                   (let ((#{t _hoQGWMnyQPAh3k2jhWJp6}#
-                                           (#{get-global-definition-hook _hoQGWMnyQPAh3k2jhWHSc}#
-                                             #{n _hoQGWMnyQPAh3k2jhWJpq}#
-                                             #{mod _hoQGWMnyQPAh3k2jhWJp4}#)))
-                                     (if #{t _hoQGWMnyQPAh3k2jhWJp6}#
-                                       #{t _hoQGWMnyQPAh3k2jhWJp6}#
-                                       '(global)))))
-                             (if (eq? (car #{b _hoQGWMnyQPAh3k2jhWJp5}#)
-                                      'global)
-                               (values
-                                 'global
-                                 #{n _hoQGWMnyQPAh3k2jhWJpq}#
-                                 #{mod _hoQGWMnyQPAh3k2jhWJp4}#)
-                               (values
-                                 (car #{b _hoQGWMnyQPAh3k2jhWJp5}#)
-                                 (cdr #{b _hoQGWMnyQPAh3k2jhWJp5}#)
-                                 #{mod _hoQGWMnyQPAh3k2jhWJp4}#))))
-                         (if (string? #{n _hoQGWMnyQPAh3k2jhWJpq}#)
-                           (let ((#{mod _hoQGWMnyQPAh3k2jhWJqU}#
-                                   (if (if (vector?
-                                             #{id _hoQGWMnyQPAh3k2jhWJpk}#)
-                                         (if (= (vector-length
-                                                  #{id _hoQGWMnyQPAh3k2jhWJpk}#)
-                                                4)
-                                           (eq? (vector-ref
-                                                  #{id _hoQGWMnyQPAh3k2jhWJpk}#
-                                                  0)
-                                                'syntax-object)
-                                           #f)
-                                         #f)
-                                     (vector-ref
-                                       #{id _hoQGWMnyQPAh3k2jhWJpk}#
-                                       3)
-                                     #{mod _hoQGWMnyQPAh3k2jhWJpn}#)))
-                             (let ((#{b _hoQGWMnyQPAh3k2jhWJqV}#
-                                     (let ((#{t _hoQGWMnyQPAh3k2jhWJqW}#
-                                             (assq-ref
-                                               #{r _hoQGWMnyQPAh3k2jhWJpd}#
-                                               #{n _hoQGWMnyQPAh3k2jhWJpq}#)))
-                                       (if #{t _hoQGWMnyQPAh3k2jhWJqW}#
-                                         #{t _hoQGWMnyQPAh3k2jhWJqW}#
-                                         '(displaced-lexical)))))
-                               (values
-                                 (car #{b _hoQGWMnyQPAh3k2jhWJqV}#)
-                                 (cdr #{b _hoQGWMnyQPAh3k2jhWJqV}#)
-                                 #{mod _hoQGWMnyQPAh3k2jhWJqU}#)))
-                           (error "unexpected id-var-name"
-                                  #{id _hoQGWMnyQPAh3k2jhWJpk}#
-                                  #{w _hoQGWMnyQPAh3k2jhWJpl}#
-                                  #{n _hoQGWMnyQPAh3k2jhWJpq}#))))))
-                 (lambda (#{type _hoQGWMnyQPAh3k2jhWJqj}#
-                          #{value _hoQGWMnyQPAh3k2jhWJqk}#
-                          #{mod _hoQGWMnyQPAh3k2jhWJql}#)
-                   (if (eqv? #{type _hoQGWMnyQPAh3k2jhWJqj}# 'lexical)
-                     (values
-                       'lexical
-                       #{value _hoQGWMnyQPAh3k2jhWJqk}#)
-                     (if (eqv? #{type _hoQGWMnyQPAh3k2jhWJqj}# 'macro)
-                       (values 'macro #{value _hoQGWMnyQPAh3k2jhWJqk}#)
-                       (if (eqv? #{type _hoQGWMnyQPAh3k2jhWJqj}# 'syntax)
-                         (values
-                           'pattern-variable
-                           #{value _hoQGWMnyQPAh3k2jhWJqk}#)
-                         (if (eqv? #{type _hoQGWMnyQPAh3k2jhWJqj}#
-                                   'displaced-lexical)
-                           (values 'displaced-lexical #f)
-                           (if (eqv? #{type _hoQGWMnyQPAh3k2jhWJqj}# 'global)
-                             (values
-                               'global
-                               (cons #{value _hoQGWMnyQPAh3k2jhWJqk}#
-                                     (cdr #{mod _hoQGWMnyQPAh3k2jhWJql}#)))
-                             (values 'other #f)))))))))))))
-      (set! syntax-locally-bound-identifiers
-        (lambda (#{x _hoQGWMnyQPAh3k2jhWJqw}#)
-          (begin
-            (if (not (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWJqw}#)
-                           (if (= (vector-length #{x _hoQGWMnyQPAh3k2jhWJqw}#)
-                                  4)
-                             (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWJqw}# 0)
-                                  'syntax-object)
-                             #f)
-                           #f)
-                       (symbol?
-                         (vector-ref #{x _hoQGWMnyQPAh3k2jhWJqw}# 1))
-                       #f))
-              (syntax-violation
-                'syntax-locally-bound-identifiers
-                "invalid argument"
-                #{x _hoQGWMnyQPAh3k2jhWJqw}#))
-            (#{locally-bound-identifiers _hoQGWMnyQPAh3k2jhWHTV}#
-              (vector-ref #{x _hoQGWMnyQPAh3k2jhWJqw}# 2)
-              (vector-ref #{x _hoQGWMnyQPAh3k2jhWJqw}# 3)))))
+        (lambda (#{x -ANAU$bmvAmthP7L7xwpgQ}#)
+          (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+            #{x -ANAU$bmvAmthP7L7xwpgQ}#)))
       (set! generate-temporaries
-        (lambda (#{ls _hoQGWMnyQPAh3k2jhWJsb}#)
+        (lambda (#{ls -ANAU$bmvAmthP7L7xwpip}#)
           (begin
-            (if (not (list? #{ls _hoQGWMnyQPAh3k2jhWJsb}#))
+            (if (not (list? #{ls -ANAU$bmvAmthP7L7xwpip}#))
               (syntax-violation
                 'generate-temporaries
                 "invalid argument"
-                #{ls _hoQGWMnyQPAh3k2jhWJsb}#))
-            (let ((#{mod _hoQGWMnyQPAh3k2jhWJsj}#
+                #{ls -ANAU$bmvAmthP7L7xwpip}#))
+            (let ((#{mod -ANAU$bmvAmthP7L7xwpix}#
                     (cons 'hygiene (module-name (current-module)))))
-              (map (lambda (#{x _hoQGWMnyQPAh3k2jhWJsk}#)
-                     (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
+              (map (lambda (#{x -ANAU$bmvAmthP7L7xwpiy}#)
+                     (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
                        (gensym)
                        '((top))
-                       #{mod _hoQGWMnyQPAh3k2jhWJsj}#))
-                   #{ls _hoQGWMnyQPAh3k2jhWJsb}#)))))
+                       #{mod -ANAU$bmvAmthP7L7xwpix}#))
+                   #{ls -ANAU$bmvAmthP7L7xwpip}#)))))
       (set! free-identifier=?
-        (lambda (#{x _hoQGWMnyQPAh3k2jhWJso}#
-                 #{y _hoQGWMnyQPAh3k2jhWJsp}#)
+        (lambda (#{x -ANAU$bmvAmthP7L7xwpi2}#
+                 #{y -ANAU$bmvAmthP7L7xwpi3}#)
           (begin
-            (if (not (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWJso}#)
-                           (if (= (vector-length #{x _hoQGWMnyQPAh3k2jhWJso}#)
+            (if (not (if (if (vector? #{x -ANAU$bmvAmthP7L7xwpi2}#)
+                           (if (= (vector-length #{x -ANAU$bmvAmthP7L7xwpi2}#)
                                   4)
-                             (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWJso}# 0)
+                             (eq? (vector-ref #{x -ANAU$bmvAmthP7L7xwpi2}# 0)
                                   'syntax-object)
                              #f)
                            #f)
                        (symbol?
-                         (vector-ref #{x _hoQGWMnyQPAh3k2jhWJso}# 1))
+                         (vector-ref #{x -ANAU$bmvAmthP7L7xwpi2}# 1))
                        #f))
               (syntax-violation
                 'free-identifier=?
                 "invalid argument"
-                #{x _hoQGWMnyQPAh3k2jhWJso}#))
-            (if (not (if (if (vector? #{y _hoQGWMnyQPAh3k2jhWJsp}#)
-                           (if (= (vector-length #{y _hoQGWMnyQPAh3k2jhWJsp}#)
+                #{x -ANAU$bmvAmthP7L7xwpi2}#))
+            (if (not (if (if (vector? #{y -ANAU$bmvAmthP7L7xwpi3}#)
+                           (if (= (vector-length #{y -ANAU$bmvAmthP7L7xwpi3}#)
                                   4)
-                             (eq? (vector-ref #{y _hoQGWMnyQPAh3k2jhWJsp}# 0)
+                             (eq? (vector-ref #{y -ANAU$bmvAmthP7L7xwpi3}# 0)
                                   'syntax-object)
                              #f)
                            #f)
                        (symbol?
-                         (vector-ref #{y _hoQGWMnyQPAh3k2jhWJsp}# 1))
+                         (vector-ref #{y -ANAU$bmvAmthP7L7xwpi3}# 1))
                        #f))
               (syntax-violation
                 'free-identifier=?
                 "invalid argument"
-                #{y _hoQGWMnyQPAh3k2jhWJsp}#))
-            (if (eq? (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWJso}#)
-                           (if (= (vector-length #{x _hoQGWMnyQPAh3k2jhWJso}#)
+                #{y -ANAU$bmvAmthP7L7xwpi3}#))
+            (if (eq? (if (if (vector? #{x -ANAU$bmvAmthP7L7xwpi2}#)
+                           (if (= (vector-length #{x -ANAU$bmvAmthP7L7xwpi2}#)
                                   4)
-                             (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWJso}# 0)
+                             (eq? (vector-ref #{x -ANAU$bmvAmthP7L7xwpi2}# 0)
                                   'syntax-object)
                              #f)
                            #f)
-                       (vector-ref #{x _hoQGWMnyQPAh3k2jhWJso}# 1)
-                       #{x _hoQGWMnyQPAh3k2jhWJso}#)
-                     (if (if (vector? #{y _hoQGWMnyQPAh3k2jhWJsp}#)
-                           (if (= (vector-length #{y _hoQGWMnyQPAh3k2jhWJsp}#)
+                       (vector-ref #{x -ANAU$bmvAmthP7L7xwpi2}# 1)
+                       #{x -ANAU$bmvAmthP7L7xwpi2}#)
+                     (if (if (vector? #{y -ANAU$bmvAmthP7L7xwpi3}#)
+                           (if (= (vector-length #{y -ANAU$bmvAmthP7L7xwpi3}#)
                                   4)
-                             (eq? (vector-ref #{y _hoQGWMnyQPAh3k2jhWJsp}# 0)
+                             (eq? (vector-ref #{y -ANAU$bmvAmthP7L7xwpi3}# 0)
                                   'syntax-object)
                              #f)
                            #f)
-                       (vector-ref #{y _hoQGWMnyQPAh3k2jhWJsp}# 1)
-                       #{y _hoQGWMnyQPAh3k2jhWJsp}#))
-              (eq? (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                     #{x _hoQGWMnyQPAh3k2jhWJso}#
+                       (vector-ref #{y -ANAU$bmvAmthP7L7xwpi3}# 1)
+                       #{y -ANAU$bmvAmthP7L7xwpi3}#))
+              (eq? (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                     #{x -ANAU$bmvAmthP7L7xwpi2}#
                      '(()))
-                   (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                     #{y _hoQGWMnyQPAh3k2jhWJsp}#
+                   (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                     #{y -ANAU$bmvAmthP7L7xwpi3}#
                      '(())))
               #f))))
       (set! bound-identifier=?
-        (lambda (#{x _hoQGWMnyQPAh3k2jhWJu@}#
-                 #{y _hoQGWMnyQPAh3k2jhWJvA}#)
+        (lambda (#{x -ANAU$bmvAmthP7L7xwplN}#
+                 #{y -ANAU$bmvAmthP7L7xwplO}#)
           (begin
-            (if (not (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWJu@}#)
-                           (if (= (vector-length #{x _hoQGWMnyQPAh3k2jhWJu@}#)
+            (if (not (if (if (vector? #{x -ANAU$bmvAmthP7L7xwplN}#)
+                           (if (= (vector-length #{x -ANAU$bmvAmthP7L7xwplN}#)
                                   4)
-                             (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWJu@}# 0)
+                             (eq? (vector-ref #{x -ANAU$bmvAmthP7L7xwplN}# 0)
                                   'syntax-object)
                              #f)
                            #f)
                        (symbol?
-                         (vector-ref #{x _hoQGWMnyQPAh3k2jhWJu@}# 1))
+                         (vector-ref #{x -ANAU$bmvAmthP7L7xwplN}# 1))
                        #f))
               (syntax-violation
                 'bound-identifier=?
                 "invalid argument"
-                #{x _hoQGWMnyQPAh3k2jhWJu@}#))
-            (if (not (if (if (vector? #{y _hoQGWMnyQPAh3k2jhWJvA}#)
-                           (if (= (vector-length #{y _hoQGWMnyQPAh3k2jhWJvA}#)
+                #{x -ANAU$bmvAmthP7L7xwplN}#))
+            (if (not (if (if (vector? #{y -ANAU$bmvAmthP7L7xwplO}#)
+                           (if (= (vector-length #{y -ANAU$bmvAmthP7L7xwplO}#)
                                   4)
-                             (eq? (vector-ref #{y _hoQGWMnyQPAh3k2jhWJvA}# 0)
+                             (eq? (vector-ref #{y -ANAU$bmvAmthP7L7xwplO}# 0)
                                   'syntax-object)
                              #f)
                            #f)
                        (symbol?
-                         (vector-ref #{y _hoQGWMnyQPAh3k2jhWJvA}# 1))
+                         (vector-ref #{y -ANAU$bmvAmthP7L7xwplO}# 1))
                        #f))
               (syntax-violation
                 'bound-identifier=?
                 "invalid argument"
-                #{y _hoQGWMnyQPAh3k2jhWJvA}#))
-            (if (if (if (vector? #{x _hoQGWMnyQPAh3k2jhWJu@}#)
-                      (if (= (vector-length #{x _hoQGWMnyQPAh3k2jhWJu@}#)
+                #{y -ANAU$bmvAmthP7L7xwplO}#))
+            (if (if (if (vector? #{x -ANAU$bmvAmthP7L7xwplN}#)
+                      (if (= (vector-length #{x -ANAU$bmvAmthP7L7xwplN}#)
                              4)
-                        (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWJu@}# 0)
+                        (eq? (vector-ref #{x -ANAU$bmvAmthP7L7xwplN}# 0)
                              'syntax-object)
                         #f)
                       #f)
-                  (if (vector? #{y _hoQGWMnyQPAh3k2jhWJvA}#)
-                    (if (= (vector-length #{y _hoQGWMnyQPAh3k2jhWJvA}#)
+                  (if (vector? #{y -ANAU$bmvAmthP7L7xwplO}#)
+                    (if (= (vector-length #{y -ANAU$bmvAmthP7L7xwplO}#)
                            4)
-                      (eq? (vector-ref #{y _hoQGWMnyQPAh3k2jhWJvA}# 0)
+                      (eq? (vector-ref #{y -ANAU$bmvAmthP7L7xwplO}# 0)
                            'syntax-object)
                       #f)
                     #f)
                   #f)
-              (if (eq? (vector-ref #{x _hoQGWMnyQPAh3k2jhWJu@}# 1)
-                       (vector-ref #{y _hoQGWMnyQPAh3k2jhWJvA}# 1))
-                (#{same-marks? _hoQGWMnyQPAh3k2jhWHTT}#
-                  (car (vector-ref #{x _hoQGWMnyQPAh3k2jhWJu@}# 2))
-                  (car (vector-ref #{y _hoQGWMnyQPAh3k2jhWJvA}# 2)))
+              (if (eq? (vector-ref #{x -ANAU$bmvAmthP7L7xwplN}# 1)
+                       (vector-ref #{y -ANAU$bmvAmthP7L7xwplO}# 1))
+                (#{same-marks? -ANAU$bmvAmthP7L7xwnNy}#
+                  (car (vector-ref #{x -ANAU$bmvAmthP7L7xwplN}# 2))
+                  (car (vector-ref #{y -ANAU$bmvAmthP7L7xwplO}# 2)))
                 #f)
-              (eq? #{x _hoQGWMnyQPAh3k2jhWJu@}#
-                   #{y _hoQGWMnyQPAh3k2jhWJvA}#)))))
+              (eq? #{x -ANAU$bmvAmthP7L7xwplN}#
+                   #{y -ANAU$bmvAmthP7L7xwplO}#)))))
       (set! syntax-violation
         (lambda*
-          (#{who _hoQGWMnyQPAh3k2jhWJxF}#
-            #{message _hoQGWMnyQPAh3k2jhWJxG}#
-            #{form _hoQGWMnyQPAh3k2jhWJxH}#
+          (#{who -ANAU$bmvAmthP7L7xwpnT}#
+            #{message -ANAU$bmvAmthP7L7xwpnU}#
+            #{form -ANAU$bmvAmthP7L7xwpnV}#
             #:optional
-            (#{subform _hoQGWMnyQPAh3k2jhWJxI}# #f))
+            (#{subform -ANAU$bmvAmthP7L7xwpnW}# #f))
           (begin
-            (if (not (if (not #{who _hoQGWMnyQPAh3k2jhWJxF}#)
-                       (not #{who _hoQGWMnyQPAh3k2jhWJxF}#)
-                       (let ((#{t _hoQGWMnyQPAh3k2jhWJxa}#
-                               (string? #{who _hoQGWMnyQPAh3k2jhWJxF}#)))
-                         (if #{t _hoQGWMnyQPAh3k2jhWJxa}#
-                           #{t _hoQGWMnyQPAh3k2jhWJxa}#
-                           (symbol? #{who _hoQGWMnyQPAh3k2jhWJxF}#)))))
+            (if (not (if (not #{who -ANAU$bmvAmthP7L7xwpnT}#)
+                       (not #{who -ANAU$bmvAmthP7L7xwpnT}#)
+                       (let ((#{t -ANAU$bmvAmthP7L7xwpno}#
+                               (string? #{who -ANAU$bmvAmthP7L7xwpnT}#)))
+                         (if #{t -ANAU$bmvAmthP7L7xwpno}#
+                           #{t -ANAU$bmvAmthP7L7xwpno}#
+                           (symbol? #{who -ANAU$bmvAmthP7L7xwpnT}#)))))
               (syntax-violation
                 'syntax-violation
                 "invalid argument"
-                #{who _hoQGWMnyQPAh3k2jhWJxF}#))
-            (if (not (string? #{message _hoQGWMnyQPAh3k2jhWJxG}#))
+                #{who -ANAU$bmvAmthP7L7xwpnT}#))
+            (if (not (string? #{message -ANAU$bmvAmthP7L7xwpnU}#))
               (syntax-violation
                 'syntax-violation
                 "invalid argument"
-                #{message _hoQGWMnyQPAh3k2jhWJxG}#))
+                #{message -ANAU$bmvAmthP7L7xwpnU}#))
             (throw 'syntax-error
-                   #{who _hoQGWMnyQPAh3k2jhWJxF}#
-                   #{message _hoQGWMnyQPAh3k2jhWJxG}#
-                   (#{source-annotation _hoQGWMnyQPAh3k2jhWHS6}#
-                     (if #{form _hoQGWMnyQPAh3k2jhWJxH}#
-                       #{form _hoQGWMnyQPAh3k2jhWJxH}#
-                       #{subform _hoQGWMnyQPAh3k2jhWJxI}#))
-                   (#{strip _hoQGWMnyQPAh3k2jhWHTy}#
-                     #{form _hoQGWMnyQPAh3k2jhWJxH}#
+                   #{who -ANAU$bmvAmthP7L7xwpnT}#
+                   #{message -ANAU$bmvAmthP7L7xwpnU}#
+                   (#{source-annotation -ANAU$bmvAmthP7L7xwnNZ}#
+                     (if #{form -ANAU$bmvAmthP7L7xwpnV}#
+                       #{form -ANAU$bmvAmthP7L7xwpnV}#
+                       #{subform -ANAU$bmvAmthP7L7xwpnW}#))
+                   (#{strip -ANAU$bmvAmthP7L7xwnOR}#
+                     #{form -ANAU$bmvAmthP7L7xwpnV}#
                      '(()))
-                   (if #{subform _hoQGWMnyQPAh3k2jhWJxI}#
-                     (#{strip _hoQGWMnyQPAh3k2jhWHTy}#
-                       #{subform _hoQGWMnyQPAh3k2jhWJxI}#
+                   (if #{subform -ANAU$bmvAmthP7L7xwpnW}#
+                     (#{strip -ANAU$bmvAmthP7L7xwnOR}#
+                       #{subform -ANAU$bmvAmthP7L7xwpnW}#
                        '(()))
                      #f)))))
       (letrec*
-        ((#{match-each _hoQGWMnyQPAh3k2jhWJ0l}#
-           (lambda (#{e _hoQGWMnyQPAh3k2jhWJ9w}#
-                    #{p _hoQGWMnyQPAh3k2jhWJ9x}#
-                    #{w _hoQGWMnyQPAh3k2jhWJ9y}#
-                    #{mod _hoQGWMnyQPAh3k2jhWJ9z}#)
-             (if (pair? #{e _hoQGWMnyQPAh3k2jhWJ9w}#)
-               (let ((#{first _hoQGWMnyQPAh3k2jhWJ90}#
-                       (#{match _hoQGWMnyQPAh3k2jhWJ0r}#
-                         (car #{e _hoQGWMnyQPAh3k2jhWJ9w}#)
-                         #{p _hoQGWMnyQPAh3k2jhWJ9x}#
-                         #{w _hoQGWMnyQPAh3k2jhWJ9y}#
+        ((#{syntax-local-binding -ANAU$bmvAmthP7L7xwpq0}#
+           (lambda (#{id -ANAU$bmvAmthP7L7xwps5}#)
+             (begin
+               (if (not (if (if (vector? #{id -ANAU$bmvAmthP7L7xwps5}#)
+                              (if (= (vector-length
+                                       #{id -ANAU$bmvAmthP7L7xwps5}#)
+                                     4)
+                                (eq? (vector-ref
+                                       #{id -ANAU$bmvAmthP7L7xwps5}#
+                                       0)
+                                     'syntax-object)
+                                #f)
+                              #f)
+                          (symbol?
+                            (vector-ref #{id -ANAU$bmvAmthP7L7xwps5}# 1))
+                          #f))
+                 (syntax-violation
+                   'syntax-local-binding
+                   "invalid argument"
+                   #{id -ANAU$bmvAmthP7L7xwps5}#))
+               ((fluid-ref
+                  #{transformer-environment -ANAU$bmvAmthP7L7xwnN2}#)
+                (lambda (#{e -ANAU$bmvAmthP7L7xwpth}#
+                         #{r -ANAU$bmvAmthP7L7xwpti}#
+                         #{w -ANAU$bmvAmthP7L7xwptj}#
+                         #{s -ANAU$bmvAmthP7L7xwptk}#
+                         #{rib -ANAU$bmvAmthP7L7xwptl}#
+                         #{mod -ANAU$bmvAmthP7L7xwptm}#)
+                  (call-with-values
+                    (lambda ()
+                      (let ((#{id -ANAU$bmvAmthP7L7xwptp}#
+                              (vector-ref #{id -ANAU$bmvAmthP7L7xwps5}# 1))
+                            (#{w -ANAU$bmvAmthP7L7xwptq}#
+                              (let ((#{w -ANAU$bmvAmthP7L7xwpt1}#
+                                      (vector-ref
+                                        #{id -ANAU$bmvAmthP7L7xwps5}#
+                                        2)))
+                                (let ((#{ms -ANAU$bmvAmthP7L7xwpt2}#
+                                        (car #{w -ANAU$bmvAmthP7L7xwpt1}#))
+                                      (#{s -ANAU$bmvAmthP7L7xwpt3}#
+                                        (cdr #{w -ANAU$bmvAmthP7L7xwpt1}#)))
+                                  (if (if (pair? #{ms -ANAU$bmvAmthP7L7xwpt2}#)
+                                        (eq? (car #{ms -ANAU$bmvAmthP7L7xwpt2}#)
+                                             #f)
+                                        #f)
+                                    (cons (cdr #{ms -ANAU$bmvAmthP7L7xwpt2}#)
+                                          (if #{rib -ANAU$bmvAmthP7L7xwptl}#
+                                            (cons #{rib -ANAU$bmvAmthP7L7xwptl}#
+                                                  (cdr #{s -ANAU$bmvAmthP7L7xwpt3}#))
+                                            (cdr #{s -ANAU$bmvAmthP7L7xwpt3}#)))
+                                    (cons #{ms -ANAU$bmvAmthP7L7xwpt2}#
+                                          (if #{rib -ANAU$bmvAmthP7L7xwptl}#
+                                            (cons #{rib -ANAU$bmvAmthP7L7xwptl}#
+                                                  #{s -ANAU$bmvAmthP7L7xwpt3}#)
+                                            #{s -ANAU$bmvAmthP7L7xwpt3}#))))))
+                            (#{mod -ANAU$bmvAmthP7L7xwpts}#
+                              (vector-ref #{id -ANAU$bmvAmthP7L7xwps5}# 3)))
+                        (let ((#{n -ANAU$bmvAmthP7L7xwptv}#
+                                (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                                  #{id -ANAU$bmvAmthP7L7xwptp}#
+                                  #{w -ANAU$bmvAmthP7L7xwptq}#)))
+                          (if (symbol? #{n -ANAU$bmvAmthP7L7xwptv}#)
+                            (let ((#{mod -ANAU$bmvAmthP7L7xwpt9}#
+                                    (if (if (vector?
+                                              #{id -ANAU$bmvAmthP7L7xwptp}#)
+                                          (if (= (vector-length
+                                                   #{id -ANAU$bmvAmthP7L7xwptp}#)
+                                                 4)
+                                            (eq? (vector-ref
+                                                   #{id -ANAU$bmvAmthP7L7xwptp}#
+                                                   0)
+                                                 'syntax-object)
+                                            #f)
+                                          #f)
+                                      (vector-ref
+                                        #{id -ANAU$bmvAmthP7L7xwptp}#
+                                        3)
+                                      #{mod -ANAU$bmvAmthP7L7xwpts}#)))
+                              (let ((#{b -ANAU$bmvAmthP7L7xwpt$}#
+                                      (let ((#{t -ANAU$bmvAmthP7L7xwpt@}#
+                                              (#{get-global-definition-hook -ANAU$bmvAmthP7L7xwnM7}#
+                                                #{n -ANAU$bmvAmthP7L7xwptv}#
+                                                #{mod -ANAU$bmvAmthP7L7xwpt9}#)))
+                                        (if #{t -ANAU$bmvAmthP7L7xwpt@}#
+                                          #{t -ANAU$bmvAmthP7L7xwpt@}#
+                                          '(global)))))
+                                (if (eq? (car #{b -ANAU$bmvAmthP7L7xwpt$}#)
+                                         'global)
+                                  (values
+                                    'global
+                                    #{n -ANAU$bmvAmthP7L7xwptv}#
+                                    #{mod -ANAU$bmvAmthP7L7xwpt9}#)
+                                  (values
+                                    (car #{b -ANAU$bmvAmthP7L7xwpt$}#)
+                                    (cdr #{b -ANAU$bmvAmthP7L7xwpt$}#)
+                                    #{mod -ANAU$bmvAmthP7L7xwpt9}#))))
+                            (if (string? #{n -ANAU$bmvAmthP7L7xwptv}#)
+                              (let ((#{mod -ANAU$bmvAmthP7L7xwpuZ}#
+                                      (if (if (vector?
+                                                #{id -ANAU$bmvAmthP7L7xwptp}#)
+                                            (if (= (vector-length
+                                                     #{id -ANAU$bmvAmthP7L7xwptp}#)
+                                                   4)
+                                              (eq? (vector-ref
+                                                     #{id -ANAU$bmvAmthP7L7xwptp}#
+                                                     0)
+                                                   'syntax-object)
+                                              #f)
+                                            #f)
+                                        (vector-ref
+                                          #{id -ANAU$bmvAmthP7L7xwptp}#
+                                          3)
+                                        #{mod -ANAU$bmvAmthP7L7xwpts}#)))
+                                (let ((#{b -ANAU$bmvAmthP7L7xwpua}#
+                                        (let ((#{t -ANAU$bmvAmthP7L7xwpub}#
+                                                (assq-ref
+                                                  #{r -ANAU$bmvAmthP7L7xwpti}#
+                                                  #{n -ANAU$bmvAmthP7L7xwptv}#)))
+                                          (if #{t -ANAU$bmvAmthP7L7xwpub}#
+                                            #{t -ANAU$bmvAmthP7L7xwpub}#
+                                            '(displaced-lexical)))))
+                                  (values
+                                    (car #{b -ANAU$bmvAmthP7L7xwpua}#)
+                                    (cdr #{b -ANAU$bmvAmthP7L7xwpua}#)
+                                    #{mod -ANAU$bmvAmthP7L7xwpuZ}#)))
+                              (error "unexpected id-var-name"
+                                     #{id -ANAU$bmvAmthP7L7xwptp}#
+                                     #{w -ANAU$bmvAmthP7L7xwptq}#
+                                     #{n -ANAU$bmvAmthP7L7xwptv}#))))))
+                    (lambda (#{type -ANAU$bmvAmthP7L7xwpuo}#
+                             #{value -ANAU$bmvAmthP7L7xwpup}#
+                             #{mod -ANAU$bmvAmthP7L7xwpuq}#)
+                      (if (eqv? #{type -ANAU$bmvAmthP7L7xwpuo}# 'lexical)
+                        (values
+                          'lexical
+                          #{value -ANAU$bmvAmthP7L7xwpup}#)
+                        (if (eqv? #{type -ANAU$bmvAmthP7L7xwpuo}# 'macro)
+                          (values 'macro #{value -ANAU$bmvAmthP7L7xwpup}#)
+                          (if (eqv? #{type -ANAU$bmvAmthP7L7xwpuo}# 'syntax)
+                            (values
+                              'pattern-variable
+                              #{value -ANAU$bmvAmthP7L7xwpup}#)
+                            (if (eqv? #{type -ANAU$bmvAmthP7L7xwpuo}#
+                                      'displaced-lexical)
+                              (values 'displaced-lexical #f)
+                              (if (eqv? #{type -ANAU$bmvAmthP7L7xwpuo}#
+                                        'global)
+                                (values
+                                  'global
+                                  (cons #{value -ANAU$bmvAmthP7L7xwpup}#
+                                        (cdr #{mod -ANAU$bmvAmthP7L7xwpuq}#)))
+                                (values 'other #f)))))))))))))
+         (#{syntax-locally-bound-identifiers -ANAU$bmvAmthP7L7xwpq1}#
+           (lambda (#{id -ANAU$bmvAmthP7L7xwpu1}#)
+             (begin
+               (if (not (if (if (vector? #{id -ANAU$bmvAmthP7L7xwpu1}#)
+                              (if (= (vector-length
+                                       #{id -ANAU$bmvAmthP7L7xwpu1}#)
+                                     4)
+                                (eq? (vector-ref
+                                       #{id -ANAU$bmvAmthP7L7xwpu1}#
+                                       0)
+                                     'syntax-object)
+                                #f)
+                              #f)
+                          (symbol?
+                            (vector-ref #{id -ANAU$bmvAmthP7L7xwpu1}# 1))
+                          #f))
+                 (syntax-violation
+                   'syntax-locally-bound-identifiers
+                   "invalid argument"
+                   #{id -ANAU$bmvAmthP7L7xwpu1}#))
+               (#{locally-bound-identifiers -ANAU$bmvAmthP7L7xwnN0}#
+                 (vector-ref #{id -ANAU$bmvAmthP7L7xwpu1}# 2)
+                 (vector-ref #{id -ANAU$bmvAmthP7L7xwpu1}# 3))))))
+        (begin
+          (define!
+            'syntax-module
+            (lambda (#{id -ANAU$bmvAmthP7L7xwpq3}#)
+              (begin
+                (if (not (if (if (vector? #{id -ANAU$bmvAmthP7L7xwpq3}#)
+                               (if (= (vector-length
+                                        #{id -ANAU$bmvAmthP7L7xwpq3}#)
+                                      4)
+                                 (eq? (vector-ref
+                                        #{id -ANAU$bmvAmthP7L7xwpq3}#
+                                        0)
+                                      'syntax-object)
+                                 #f)
+                               #f)
+                           (symbol?
+                             (vector-ref #{id -ANAU$bmvAmthP7L7xwpq3}# 1))
+                           #f))
+                  (syntax-violation
+                    'syntax-module
+                    "invalid argument"
+                    #{id -ANAU$bmvAmthP7L7xwpq3}#))
+                (cdr (vector-ref #{id -ANAU$bmvAmthP7L7xwpq3}# 3)))))
+          (define!
+            'syntax-local-binding
+            #{syntax-local-binding -ANAU$bmvAmthP7L7xwpq0}#)
+          (define!
+            'syntax-locally-bound-identifiers
+            #{syntax-locally-bound-identifiers -ANAU$bmvAmthP7L7xwpq1}#)))
+      (letrec*
+        ((#{match-each -ANAU$bmvAmthP7L7xwpwg}#
+           (lambda (#{e -ANAU$bmvAmthP7L7xwp5r}#
+                    #{p -ANAU$bmvAmthP7L7xwp5s}#
+                    #{w -ANAU$bmvAmthP7L7xwp5t}#
+                    #{mod -ANAU$bmvAmthP7L7xwp5u}#)
+             (if (pair? #{e -ANAU$bmvAmthP7L7xwp5r}#)
+               (let ((#{first -ANAU$bmvAmthP7L7xwp5v}#
+                       (#{match -ANAU$bmvAmthP7L7xwpwm}#
+                         (car #{e -ANAU$bmvAmthP7L7xwp5r}#)
+                         #{p -ANAU$bmvAmthP7L7xwp5s}#
+                         #{w -ANAU$bmvAmthP7L7xwp5t}#
                          '()
-                         #{mod _hoQGWMnyQPAh3k2jhWJ9z}#)))
-                 (if #{first _hoQGWMnyQPAh3k2jhWJ90}#
-                   (let ((#{rest _hoQGWMnyQPAh3k2jhWJ93}#
-                           (#{match-each _hoQGWMnyQPAh3k2jhWJ0l}#
-                             (cdr #{e _hoQGWMnyQPAh3k2jhWJ9w}#)
-                             #{p _hoQGWMnyQPAh3k2jhWJ9x}#
-                             #{w _hoQGWMnyQPAh3k2jhWJ9y}#
-                             #{mod _hoQGWMnyQPAh3k2jhWJ9z}#)))
-                     (if #{rest _hoQGWMnyQPAh3k2jhWJ93}#
-                       (cons #{first _hoQGWMnyQPAh3k2jhWJ90}#
-                             #{rest _hoQGWMnyQPAh3k2jhWJ93}#)
+                         #{mod -ANAU$bmvAmthP7L7xwp5u}#)))
+                 (if #{first -ANAU$bmvAmthP7L7xwp5v}#
+                   (let ((#{rest -ANAU$bmvAmthP7L7xwp5y}#
+                           (#{match-each -ANAU$bmvAmthP7L7xwpwg}#
+                             (cdr #{e -ANAU$bmvAmthP7L7xwp5r}#)
+                             #{p -ANAU$bmvAmthP7L7xwp5s}#
+                             #{w -ANAU$bmvAmthP7L7xwp5t}#
+                             #{mod -ANAU$bmvAmthP7L7xwp5u}#)))
+                     (if #{rest -ANAU$bmvAmthP7L7xwp5y}#
+                       (cons #{first -ANAU$bmvAmthP7L7xwp5v}#
+                             #{rest -ANAU$bmvAmthP7L7xwp5y}#)
                        #f))
                    #f))
-               (if (null? #{e _hoQGWMnyQPAh3k2jhWJ9w}#)
+               (if (null? #{e -ANAU$bmvAmthP7L7xwp5r}#)
                  '()
-                 (if (if (vector? #{e _hoQGWMnyQPAh3k2jhWJ9w}#)
-                       (if (= (vector-length #{e _hoQGWMnyQPAh3k2jhWJ9w}#)
+                 (if (if (vector? #{e -ANAU$bmvAmthP7L7xwp5r}#)
+                       (if (= (vector-length #{e -ANAU$bmvAmthP7L7xwp5r}#)
                               4)
-                         (eq? (vector-ref #{e _hoQGWMnyQPAh3k2jhWJ9w}# 0)
+                         (eq? (vector-ref #{e -ANAU$bmvAmthP7L7xwp5r}# 0)
                               'syntax-object)
                          #f)
                        #f)
-                   (#{match-each _hoQGWMnyQPAh3k2jhWJ0l}#
-                     (vector-ref #{e _hoQGWMnyQPAh3k2jhWJ9w}# 1)
-                     #{p _hoQGWMnyQPAh3k2jhWJ9x}#
-                     (#{join-wraps _hoQGWMnyQPAh3k2jhWHTR}#
-                       #{w _hoQGWMnyQPAh3k2jhWJ9y}#
-                       (vector-ref #{e _hoQGWMnyQPAh3k2jhWJ9w}# 2))
-                     (vector-ref #{e _hoQGWMnyQPAh3k2jhWJ9w}# 3))
+                   (#{match-each -ANAU$bmvAmthP7L7xwpwg}#
+                     (vector-ref #{e -ANAU$bmvAmthP7L7xwp5r}# 1)
+                     #{p -ANAU$bmvAmthP7L7xwp5s}#
+                     (#{join-wraps -ANAU$bmvAmthP7L7xwnNw}#
+                       #{w -ANAU$bmvAmthP7L7xwp5t}#
+                       (vector-ref #{e -ANAU$bmvAmthP7L7xwp5r}# 2))
+                     (vector-ref #{e -ANAU$bmvAmthP7L7xwp5r}# 3))
                    #f)))))
-         (#{match-each-any _hoQGWMnyQPAh3k2jhWJ0n}#
-           (lambda (#{e _hoQGWMnyQPAh3k2jhWJ$T}#
-                    #{w _hoQGWMnyQPAh3k2jhWJ$U}#
-                    #{mod _hoQGWMnyQPAh3k2jhWJ$V}#)
-             (if (pair? #{e _hoQGWMnyQPAh3k2jhWJ$T}#)
-               (let ((#{l _hoQGWMnyQPAh3k2jhWJ$W}#
-                       (#{match-each-any _hoQGWMnyQPAh3k2jhWJ0n}#
-                         (cdr #{e _hoQGWMnyQPAh3k2jhWJ$T}#)
-                         #{w _hoQGWMnyQPAh3k2jhWJ$U}#
-                         #{mod _hoQGWMnyQPAh3k2jhWJ$V}#)))
-                 (if #{l _hoQGWMnyQPAh3k2jhWJ$W}#
-                   (cons (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                           (car #{e _hoQGWMnyQPAh3k2jhWJ$T}#)
-                           #{w _hoQGWMnyQPAh3k2jhWJ$U}#
-                           #{mod _hoQGWMnyQPAh3k2jhWJ$V}#)
-                         #{l _hoQGWMnyQPAh3k2jhWJ$W}#)
+         (#{match-each-any -ANAU$bmvAmthP7L7xwpwi}#
+           (lambda (#{e -ANAU$bmvAmthP7L7xwp6O}#
+                    #{w -ANAU$bmvAmthP7L7xwp6P}#
+                    #{mod -ANAU$bmvAmthP7L7xwp6Q}#)
+             (if (pair? #{e -ANAU$bmvAmthP7L7xwp6O}#)
+               (let ((#{l -ANAU$bmvAmthP7L7xwp6R}#
+                       (#{match-each-any -ANAU$bmvAmthP7L7xwpwi}#
+                         (cdr #{e -ANAU$bmvAmthP7L7xwp6O}#)
+                         #{w -ANAU$bmvAmthP7L7xwp6P}#
+                         #{mod -ANAU$bmvAmthP7L7xwp6Q}#)))
+                 (if #{l -ANAU$bmvAmthP7L7xwp6R}#
+                   (cons (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                           (car #{e -ANAU$bmvAmthP7L7xwp6O}#)
+                           #{w -ANAU$bmvAmthP7L7xwp6P}#
+                           #{mod -ANAU$bmvAmthP7L7xwp6Q}#)
+                         #{l -ANAU$bmvAmthP7L7xwp6R}#)
                    #f))
-               (if (null? #{e _hoQGWMnyQPAh3k2jhWJ$T}#)
+               (if (null? #{e -ANAU$bmvAmthP7L7xwp6O}#)
                  '()
-                 (if (if (vector? #{e _hoQGWMnyQPAh3k2jhWJ$T}#)
-                       (if (= (vector-length #{e _hoQGWMnyQPAh3k2jhWJ$T}#)
+                 (if (if (vector? #{e -ANAU$bmvAmthP7L7xwp6O}#)
+                       (if (= (vector-length #{e -ANAU$bmvAmthP7L7xwp6O}#)
                               4)
-                         (eq? (vector-ref #{e _hoQGWMnyQPAh3k2jhWJ$T}# 0)
+                         (eq? (vector-ref #{e -ANAU$bmvAmthP7L7xwp6O}# 0)
                               'syntax-object)
                          #f)
                        #f)
-                   (#{match-each-any _hoQGWMnyQPAh3k2jhWJ0n}#
-                     (vector-ref #{e _hoQGWMnyQPAh3k2jhWJ$T}# 1)
-                     (#{join-wraps _hoQGWMnyQPAh3k2jhWHTR}#
-                       #{w _hoQGWMnyQPAh3k2jhWJ$U}#
-                       (vector-ref #{e _hoQGWMnyQPAh3k2jhWJ$T}# 2))
-                     #{mod _hoQGWMnyQPAh3k2jhWJ$V}#)
+                   (#{match-each-any -ANAU$bmvAmthP7L7xwpwi}#
+                     (vector-ref #{e -ANAU$bmvAmthP7L7xwp6O}# 1)
+                     (#{join-wraps -ANAU$bmvAmthP7L7xwnNw}#
+                       #{w -ANAU$bmvAmthP7L7xwp6P}#
+                       (vector-ref #{e -ANAU$bmvAmthP7L7xwp6O}# 2))
+                     #{mod -ANAU$bmvAmthP7L7xwp6Q}#)
                    #f)))))
-         (#{match-empty _hoQGWMnyQPAh3k2jhWJ0o}#
-           (lambda (#{p _hoQGWMnyQPAh3k2jhWJ$u}#
-                    #{r _hoQGWMnyQPAh3k2jhWJ$v}#)
-             (if (null? #{p _hoQGWMnyQPAh3k2jhWJ$u}#)
-               #{r _hoQGWMnyQPAh3k2jhWJ$v}#
-               (if (eq? #{p _hoQGWMnyQPAh3k2jhWJ$u}# '_)
-                 #{r _hoQGWMnyQPAh3k2jhWJ$v}#
-                 (if (eq? #{p _hoQGWMnyQPAh3k2jhWJ$u}# 'any)
-                   (cons '() #{r _hoQGWMnyQPAh3k2jhWJ$v}#)
-                   (if (pair? #{p _hoQGWMnyQPAh3k2jhWJ$u}#)
-                     (#{match-empty _hoQGWMnyQPAh3k2jhWJ0o}#
-                       (car #{p _hoQGWMnyQPAh3k2jhWJ$u}#)
-                       (#{match-empty _hoQGWMnyQPAh3k2jhWJ0o}#
-                         (cdr #{p _hoQGWMnyQPAh3k2jhWJ$u}#)
-                         #{r _hoQGWMnyQPAh3k2jhWJ$v}#))
-                     (if (eq? #{p _hoQGWMnyQPAh3k2jhWJ$u}# 'each-any)
-                       (cons '() #{r _hoQGWMnyQPAh3k2jhWJ$v}#)
-                       (let ((#{atom-key _hoQGWMnyQPAh3k2jhWJ$w}#
-                               (vector-ref #{p _hoQGWMnyQPAh3k2jhWJ$u}# 0)))
-                         (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWJ$w}# 'each)
-                           (#{match-empty _hoQGWMnyQPAh3k2jhWJ0o}#
-                             (vector-ref #{p _hoQGWMnyQPAh3k2jhWJ$u}# 1)
-                             #{r _hoQGWMnyQPAh3k2jhWJ$v}#)
-                           (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWJ$w}#
+         (#{match-empty -ANAU$bmvAmthP7L7xwpwj}#
+           (lambda (#{p -ANAU$bmvAmthP7L7xwp6p}#
+                    #{r -ANAU$bmvAmthP7L7xwp6q}#)
+             (if (null? #{p -ANAU$bmvAmthP7L7xwp6p}#)
+               #{r -ANAU$bmvAmthP7L7xwp6q}#
+               (if (eq? #{p -ANAU$bmvAmthP7L7xwp6p}# '_)
+                 #{r -ANAU$bmvAmthP7L7xwp6q}#
+                 (if (eq? #{p -ANAU$bmvAmthP7L7xwp6p}# 'any)
+                   (cons '() #{r -ANAU$bmvAmthP7L7xwp6q}#)
+                   (if (pair? #{p -ANAU$bmvAmthP7L7xwp6p}#)
+                     (#{match-empty -ANAU$bmvAmthP7L7xwpwj}#
+                       (car #{p -ANAU$bmvAmthP7L7xwp6p}#)
+                       (#{match-empty -ANAU$bmvAmthP7L7xwpwj}#
+                         (cdr #{p -ANAU$bmvAmthP7L7xwp6p}#)
+                         #{r -ANAU$bmvAmthP7L7xwp6q}#))
+                     (if (eq? #{p -ANAU$bmvAmthP7L7xwp6p}# 'each-any)
+                       (cons '() #{r -ANAU$bmvAmthP7L7xwp6q}#)
+                       (let ((#{atom-key -ANAU$bmvAmthP7L7xwp6r}#
+                               (vector-ref #{p -ANAU$bmvAmthP7L7xwp6p}# 0)))
+                         (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwp6r}# 'each)
+                           (#{match-empty -ANAU$bmvAmthP7L7xwpwj}#
+                             (vector-ref #{p -ANAU$bmvAmthP7L7xwp6p}# 1)
+                             #{r -ANAU$bmvAmthP7L7xwp6q}#)
+                           (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwp6r}#
                                      'each+)
-                             (#{match-empty _hoQGWMnyQPAh3k2jhWJ0o}#
-                               (vector-ref #{p _hoQGWMnyQPAh3k2jhWJ$u}# 1)
-                               (#{match-empty _hoQGWMnyQPAh3k2jhWJ0o}#
+                             (#{match-empty -ANAU$bmvAmthP7L7xwpwj}#
+                               (vector-ref #{p -ANAU$bmvAmthP7L7xwp6p}# 1)
+                               (#{match-empty -ANAU$bmvAmthP7L7xwpwj}#
                                  (reverse
-                                   (vector-ref #{p _hoQGWMnyQPAh3k2jhWJ$u}# 2))
-                                 (#{match-empty _hoQGWMnyQPAh3k2jhWJ0o}#
-                                   (vector-ref #{p _hoQGWMnyQPAh3k2jhWJ$u}# 3)
-                                   #{r _hoQGWMnyQPAh3k2jhWJ$v}#)))
-                             (if (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWJ$w}#
+                                   (vector-ref #{p -ANAU$bmvAmthP7L7xwp6p}# 2))
+                                 (#{match-empty -ANAU$bmvAmthP7L7xwpwj}#
+                                   (vector-ref #{p -ANAU$bmvAmthP7L7xwp6p}# 3)
+                                   #{r -ANAU$bmvAmthP7L7xwp6q}#)))
+                             (if (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwp6r}#
                                            'free-id)
                                    #t
-                                   (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWJ$w}#
+                                   (eqv? #{atom-key -ANAU$bmvAmthP7L7xwp6r}#
                                          'atom))
-                               #{r _hoQGWMnyQPAh3k2jhWJ$v}#
-                               (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWJ$w}#
+                               #{r -ANAU$bmvAmthP7L7xwp6q}#
+                               (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwp6r}#
                                          'vector)
-                                 (#{match-empty _hoQGWMnyQPAh3k2jhWJ0o}#
-                                   (vector-ref #{p _hoQGWMnyQPAh3k2jhWJ$u}# 1)
-                                   #{r _hoQGWMnyQPAh3k2jhWJ$v}#)))))))))))))
-         (#{combine _hoQGWMnyQPAh3k2jhWJ0p}#
-           (lambda (#{r* _hoQGWMnyQPAh3k2jhWJ@D}#
-                    #{r _hoQGWMnyQPAh3k2jhWJ@E}#)
-             (if (null? (car #{r* _hoQGWMnyQPAh3k2jhWJ@D}#))
-               #{r _hoQGWMnyQPAh3k2jhWJ@E}#
-               (cons (map car #{r* _hoQGWMnyQPAh3k2jhWJ@D}#)
-                     (#{combine _hoQGWMnyQPAh3k2jhWJ0p}#
-                       (map cdr #{r* _hoQGWMnyQPAh3k2jhWJ@D}#)
-                       #{r _hoQGWMnyQPAh3k2jhWJ@E}#)))))
-         (#{match* _hoQGWMnyQPAh3k2jhWJ0q}#
-           (lambda (#{e _hoQGWMnyQPAh3k2jhWJ1I}#
-                    #{p _hoQGWMnyQPAh3k2jhWJ1J}#
-                    #{w _hoQGWMnyQPAh3k2jhWJ1K}#
-                    #{r _hoQGWMnyQPAh3k2jhWJ1L}#
-                    #{mod _hoQGWMnyQPAh3k2jhWJ1M}#)
-             (if (null? #{p _hoQGWMnyQPAh3k2jhWJ1J}#)
-               (if (null? #{e _hoQGWMnyQPAh3k2jhWJ1I}#)
-                 #{r _hoQGWMnyQPAh3k2jhWJ1L}#
+                                 (#{match-empty -ANAU$bmvAmthP7L7xwpwj}#
+                                   (vector-ref #{p -ANAU$bmvAmthP7L7xwp6p}# 1)
+                                   #{r -ANAU$bmvAmthP7L7xwp6q}#)))))))))))))
+         (#{combine -ANAU$bmvAmthP7L7xwpwk}#
+           (lambda (#{r* -ANAU$bmvAmthP7L7xwp6$}#
+                    #{r -ANAU$bmvAmthP7L7xwp6@}#)
+             (if (null? (car #{r* -ANAU$bmvAmthP7L7xwp6$}#))
+               #{r -ANAU$bmvAmthP7L7xwp6@}#
+               (cons (map car #{r* -ANAU$bmvAmthP7L7xwp6$}#)
+                     (#{combine -ANAU$bmvAmthP7L7xwpwk}#
+                       (map cdr #{r* -ANAU$bmvAmthP7L7xwp6$}#)
+                       #{r -ANAU$bmvAmthP7L7xwp6@}#)))))
+         (#{match* -ANAU$bmvAmthP7L7xwpwl}#
+           (lambda (#{e -ANAU$bmvAmthP7L7xwpxD}#
+                    #{p -ANAU$bmvAmthP7L7xwpxE}#
+                    #{w -ANAU$bmvAmthP7L7xwpxF}#
+                    #{r -ANAU$bmvAmthP7L7xwpxG}#
+                    #{mod -ANAU$bmvAmthP7L7xwpxH}#)
+             (if (null? #{p -ANAU$bmvAmthP7L7xwpxE}#)
+               (if (null? #{e -ANAU$bmvAmthP7L7xwpxD}#)
+                 #{r -ANAU$bmvAmthP7L7xwpxG}#
                  #f)
-               (if (pair? #{p _hoQGWMnyQPAh3k2jhWJ1J}#)
-                 (if (pair? #{e _hoQGWMnyQPAh3k2jhWJ1I}#)
-                   (#{match _hoQGWMnyQPAh3k2jhWJ0r}#
-                     (car #{e _hoQGWMnyQPAh3k2jhWJ1I}#)
-                     (car #{p _hoQGWMnyQPAh3k2jhWJ1J}#)
-                     #{w _hoQGWMnyQPAh3k2jhWJ1K}#
-                     (#{match _hoQGWMnyQPAh3k2jhWJ0r}#
-                       (cdr #{e _hoQGWMnyQPAh3k2jhWJ1I}#)
-                       (cdr #{p _hoQGWMnyQPAh3k2jhWJ1J}#)
-                       #{w _hoQGWMnyQPAh3k2jhWJ1K}#
-                       #{r _hoQGWMnyQPAh3k2jhWJ1L}#
-                       #{mod _hoQGWMnyQPAh3k2jhWJ1M}#)
-                     #{mod _hoQGWMnyQPAh3k2jhWJ1M}#)
+               (if (pair? #{p -ANAU$bmvAmthP7L7xwpxE}#)
+                 (if (pair? #{e -ANAU$bmvAmthP7L7xwpxD}#)
+                   (#{match -ANAU$bmvAmthP7L7xwpwm}#
+                     (car #{e -ANAU$bmvAmthP7L7xwpxD}#)
+                     (car #{p -ANAU$bmvAmthP7L7xwpxE}#)
+                     #{w -ANAU$bmvAmthP7L7xwpxF}#
+                     (#{match -ANAU$bmvAmthP7L7xwpwm}#
+                       (cdr #{e -ANAU$bmvAmthP7L7xwpxD}#)
+                       (cdr #{p -ANAU$bmvAmthP7L7xwpxE}#)
+                       #{w -ANAU$bmvAmthP7L7xwpxF}#
+                       #{r -ANAU$bmvAmthP7L7xwpxG}#
+                       #{mod -ANAU$bmvAmthP7L7xwpxH}#)
+                     #{mod -ANAU$bmvAmthP7L7xwpxH}#)
                    #f)
-                 (if (eq? #{p _hoQGWMnyQPAh3k2jhWJ1J}# 'each-any)
-                   (let ((#{l _hoQGWMnyQPAh3k2jhWJ1R}#
-                           (#{match-each-any _hoQGWMnyQPAh3k2jhWJ0n}#
-                             #{e _hoQGWMnyQPAh3k2jhWJ1I}#
-                             #{w _hoQGWMnyQPAh3k2jhWJ1K}#
-                             #{mod _hoQGWMnyQPAh3k2jhWJ1M}#)))
-                     (if #{l _hoQGWMnyQPAh3k2jhWJ1R}#
-                       (cons #{l _hoQGWMnyQPAh3k2jhWJ1R}#
-                             #{r _hoQGWMnyQPAh3k2jhWJ1L}#)
+                 (if (eq? #{p -ANAU$bmvAmthP7L7xwpxE}# 'each-any)
+                   (let ((#{l -ANAU$bmvAmthP7L7xwpxM}#
+                           (#{match-each-any -ANAU$bmvAmthP7L7xwpwi}#
+                             #{e -ANAU$bmvAmthP7L7xwpxD}#
+                             #{w -ANAU$bmvAmthP7L7xwpxF}#
+                             #{mod -ANAU$bmvAmthP7L7xwpxH}#)))
+                     (if #{l -ANAU$bmvAmthP7L7xwpxM}#
+                       (cons #{l -ANAU$bmvAmthP7L7xwpxM}#
+                             #{r -ANAU$bmvAmthP7L7xwpxG}#)
                        #f))
-                   (let ((#{atom-key _hoQGWMnyQPAh3k2jhWJ1W}#
-                           (vector-ref #{p _hoQGWMnyQPAh3k2jhWJ1J}# 0)))
-                     (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWJ1W}# 'each)
-                       (if (null? #{e _hoQGWMnyQPAh3k2jhWJ1I}#)
-                         (#{match-empty _hoQGWMnyQPAh3k2jhWJ0o}#
-                           (vector-ref #{p _hoQGWMnyQPAh3k2jhWJ1J}# 1)
-                           #{r _hoQGWMnyQPAh3k2jhWJ1L}#)
-                         (let ((#{l _hoQGWMnyQPAh3k2jhWJ1d}#
-                                 (#{match-each _hoQGWMnyQPAh3k2jhWJ0l}#
-                                   #{e _hoQGWMnyQPAh3k2jhWJ1I}#
-                                   (vector-ref #{p _hoQGWMnyQPAh3k2jhWJ1J}# 1)
-                                   #{w _hoQGWMnyQPAh3k2jhWJ1K}#
-                                   #{mod _hoQGWMnyQPAh3k2jhWJ1M}#)))
-                           (if #{l _hoQGWMnyQPAh3k2jhWJ1d}#
+                   (let ((#{atom-key -ANAU$bmvAmthP7L7xwpxR}#
+                           (vector-ref #{p -ANAU$bmvAmthP7L7xwpxE}# 0)))
+                     (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwpxR}# 'each)
+                       (if (null? #{e -ANAU$bmvAmthP7L7xwpxD}#)
+                         (#{match-empty -ANAU$bmvAmthP7L7xwpwj}#
+                           (vector-ref #{p -ANAU$bmvAmthP7L7xwpxE}# 1)
+                           #{r -ANAU$bmvAmthP7L7xwpxG}#)
+                         (let ((#{l -ANAU$bmvAmthP7L7xwpxY}#
+                                 (#{match-each -ANAU$bmvAmthP7L7xwpwg}#
+                                   #{e -ANAU$bmvAmthP7L7xwpxD}#
+                                   (vector-ref #{p -ANAU$bmvAmthP7L7xwpxE}# 1)
+                                   #{w -ANAU$bmvAmthP7L7xwpxF}#
+                                   #{mod -ANAU$bmvAmthP7L7xwpxH}#)))
+                           (if #{l -ANAU$bmvAmthP7L7xwpxY}#
                              (letrec*
-                               ((#{collect _hoQGWMnyQPAh3k2jhWJ1g}#
-                                  (lambda (#{l _hoQGWMnyQPAh3k2jhWJ2T}#)
-                                    (if (null? (car #{l _hoQGWMnyQPAh3k2jhWJ2T}#))
-                                      #{r _hoQGWMnyQPAh3k2jhWJ1L}#
+                               ((#{collect -ANAU$bmvAmthP7L7xwpxb}#
+                                  (lambda (#{l -ANAU$bmvAmthP7L7xwpyO}#)
+                                    (if (null? (car #{l -ANAU$bmvAmthP7L7xwpyO}#))
+                                      #{r -ANAU$bmvAmthP7L7xwpxG}#
                                       (cons (map car
-                                                 #{l _hoQGWMnyQPAh3k2jhWJ2T}#)
-                                            (#{collect _hoQGWMnyQPAh3k2jhWJ1g}#
+                                                 #{l -ANAU$bmvAmthP7L7xwpyO}#)
+                                            (#{collect -ANAU$bmvAmthP7L7xwpxb}#
                                               (map cdr
-                                                   #{l _hoQGWMnyQPAh3k2jhWJ2T}#)))))))
-                               (#{collect _hoQGWMnyQPAh3k2jhWJ1g}#
-                                 #{l _hoQGWMnyQPAh3k2jhWJ1d}#))
+                                                   #{l -ANAU$bmvAmthP7L7xwpyO}#)))))))
+                               (#{collect -ANAU$bmvAmthP7L7xwpxb}#
+                                 #{l -ANAU$bmvAmthP7L7xwpxY}#))
                              #f)))
-                       (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWJ1W}# 'each+)
+                       (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwpxR}# 'each+)
                          (call-with-values
                            (lambda ()
-                             (let ((#{x-pat _hoQGWMnyQPAh3k2jhWJ2c}#
+                             (let ((#{x-pat -ANAU$bmvAmthP7L7xwpyX}#
                                      (vector-ref
-                                       #{p _hoQGWMnyQPAh3k2jhWJ1J}#
+                                       #{p -ANAU$bmvAmthP7L7xwpxE}#
                                        1))
-                                   (#{y-pat _hoQGWMnyQPAh3k2jhWJ2d}#
+                                   (#{y-pat -ANAU$bmvAmthP7L7xwpyY}#
                                      (vector-ref
-                                       #{p _hoQGWMnyQPAh3k2jhWJ1J}#
+                                       #{p -ANAU$bmvAmthP7L7xwpxE}#
                                        2))
-                                   (#{z-pat _hoQGWMnyQPAh3k2jhWJ2e}#
+                                   (#{z-pat -ANAU$bmvAmthP7L7xwpyZ}#
                                      (vector-ref
-                                       #{p _hoQGWMnyQPAh3k2jhWJ1J}#
+                                       #{p -ANAU$bmvAmthP7L7xwpxE}#
                                        3)))
                                (letrec*
-                                 ((#{f _hoQGWMnyQPAh3k2jhWJ2i}#
-                                    (lambda (#{e _hoQGWMnyQPAh3k2jhWJ2k}#
-                                             #{w _hoQGWMnyQPAh3k2jhWJ2l}#)
-                                      (if (pair? #{e _hoQGWMnyQPAh3k2jhWJ2k}#)
+                                 ((#{f -ANAU$bmvAmthP7L7xwpyd}#
+                                    (lambda (#{e -ANAU$bmvAmthP7L7xwpyf}#
+                                             #{w -ANAU$bmvAmthP7L7xwpyg}#)
+                                      (if (pair? #{e -ANAU$bmvAmthP7L7xwpyf}#)
                                         (call-with-values
                                           (lambda ()
-                                            (#{f _hoQGWMnyQPAh3k2jhWJ2i}#
-                                              (cdr #{e _hoQGWMnyQPAh3k2jhWJ2k}#)
-                                              #{w _hoQGWMnyQPAh3k2jhWJ2l}#))
-                                          (lambda (#{xr* _hoQGWMnyQPAh3k2jhWJ2m}#
-                                                   #{y-pat _hoQGWMnyQPAh3k2jhWJ2n}#
-                                                   #{r _hoQGWMnyQPAh3k2jhWJ2o}#)
-                                            (if #{r _hoQGWMnyQPAh3k2jhWJ2o}#
-                                              (if (null? #{y-pat _hoQGWMnyQPAh3k2jhWJ2n}#)
-                                                (let ((#{xr _hoQGWMnyQPAh3k2jhWJ2p}#
-                                                        (#{match _hoQGWMnyQPAh3k2jhWJ0r}#
-                                                          (car #{e _hoQGWMnyQPAh3k2jhWJ2k}#)
-                                                          #{x-pat _hoQGWMnyQPAh3k2jhWJ2c}#
-                                                          #{w _hoQGWMnyQPAh3k2jhWJ2l}#
+                                            (#{f -ANAU$bmvAmthP7L7xwpyd}#
+                                              (cdr #{e -ANAU$bmvAmthP7L7xwpyf}#)
+                                              #{w -ANAU$bmvAmthP7L7xwpyg}#))
+                                          (lambda (#{xr* -ANAU$bmvAmthP7L7xwpyh}#
+                                                   #{y-pat -ANAU$bmvAmthP7L7xwpyi}#
+                                                   #{r -ANAU$bmvAmthP7L7xwpyj}#)
+                                            (if #{r -ANAU$bmvAmthP7L7xwpyj}#
+                                              (if (null? #{y-pat -ANAU$bmvAmthP7L7xwpyi}#)
+                                                (let ((#{xr -ANAU$bmvAmthP7L7xwpyk}#
+                                                        (#{match -ANAU$bmvAmthP7L7xwpwm}#
+                                                          (car #{e -ANAU$bmvAmthP7L7xwpyf}#)
+                                                          #{x-pat -ANAU$bmvAmthP7L7xwpyX}#
+                                                          #{w -ANAU$bmvAmthP7L7xwpyg}#
                                                           '()
-                                                          #{mod _hoQGWMnyQPAh3k2jhWJ1M}#)))
-                                                  (if #{xr _hoQGWMnyQPAh3k2jhWJ2p}#
+                                                          #{mod -ANAU$bmvAmthP7L7xwpxH}#)))
+                                                  (if #{xr -ANAU$bmvAmthP7L7xwpyk}#
                                                     (values
-                                                      (cons #{xr _hoQGWMnyQPAh3k2jhWJ2p}#
-                                                            #{xr* _hoQGWMnyQPAh3k2jhWJ2m}#)
-                                                      #{y-pat _hoQGWMnyQPAh3k2jhWJ2n}#
-                                                      #{r _hoQGWMnyQPAh3k2jhWJ2o}#)
+                                                      (cons #{xr -ANAU$bmvAmthP7L7xwpyk}#
+                                                            #{xr* -ANAU$bmvAmthP7L7xwpyh}#)
+                                                      #{y-pat -ANAU$bmvAmthP7L7xwpyi}#
+                                                      #{r -ANAU$bmvAmthP7L7xwpyj}#)
                                                     (values #f #f #f)))
                                                 (values
                                                   '()
-                                                  (cdr #{y-pat _hoQGWMnyQPAh3k2jhWJ2n}#)
-                                                  (#{match _hoQGWMnyQPAh3k2jhWJ0r}#
-                                                    (car #{e _hoQGWMnyQPAh3k2jhWJ2k}#)
-                                                    (car #{y-pat _hoQGWMnyQPAh3k2jhWJ2n}#)
-                                                    #{w _hoQGWMnyQPAh3k2jhWJ2l}#
-                                                    #{r _hoQGWMnyQPAh3k2jhWJ2o}#
-                                                    #{mod _hoQGWMnyQPAh3k2jhWJ1M}#)))
+                                                  (cdr #{y-pat -ANAU$bmvAmthP7L7xwpyi}#)
+                                                  (#{match -ANAU$bmvAmthP7L7xwpwm}#
+                                                    (car #{e -ANAU$bmvAmthP7L7xwpyf}#)
+                                                    (car #{y-pat -ANAU$bmvAmthP7L7xwpyi}#)
+                                                    #{w -ANAU$bmvAmthP7L7xwpyg}#
+                                                    #{r -ANAU$bmvAmthP7L7xwpyj}#
+                                                    #{mod -ANAU$bmvAmthP7L7xwpxH}#)))
                                               (values #f #f #f))))
                                         (if (if (vector?
-                                                  #{e _hoQGWMnyQPAh3k2jhWJ2k}#)
+                                                  #{e -ANAU$bmvAmthP7L7xwpyf}#)
                                               (if (= (vector-length
-                                                       #{e _hoQGWMnyQPAh3k2jhWJ2k}#)
+                                                       #{e -ANAU$bmvAmthP7L7xwpyf}#)
                                                      4)
                                                 (eq? (vector-ref
-                                                       #{e _hoQGWMnyQPAh3k2jhWJ2k}#
+                                                       #{e -ANAU$bmvAmthP7L7xwpyf}#
                                                        0)
                                                      'syntax-object)
                                                 #f)
                                               #f)
-                                          (#{f _hoQGWMnyQPAh3k2jhWJ2i}#
+                                          (#{f -ANAU$bmvAmthP7L7xwpyd}#
                                             (vector-ref
-                                              #{e _hoQGWMnyQPAh3k2jhWJ2k}#
+                                              #{e -ANAU$bmvAmthP7L7xwpyf}#
                                               1)
-                                            (#{join-wraps _hoQGWMnyQPAh3k2jhWHTR}#
-                                              #{w _hoQGWMnyQPAh3k2jhWJ2l}#
-                                              #{e _hoQGWMnyQPAh3k2jhWJ2k}#))
+                                            (#{join-wraps -ANAU$bmvAmthP7L7xwnNw}#
+                                              #{w -ANAU$bmvAmthP7L7xwpyg}#
+                                              #{e -ANAU$bmvAmthP7L7xwpyf}#))
                                           (values
                                             '()
-                                            #{y-pat _hoQGWMnyQPAh3k2jhWJ2d}#
-                                            (#{match _hoQGWMnyQPAh3k2jhWJ0r}#
-                                              #{e _hoQGWMnyQPAh3k2jhWJ2k}#
-                                              #{z-pat _hoQGWMnyQPAh3k2jhWJ2e}#
-                                              #{w _hoQGWMnyQPAh3k2jhWJ2l}#
-                                              #{r _hoQGWMnyQPAh3k2jhWJ1L}#
-                                              #{mod _hoQGWMnyQPAh3k2jhWJ1M}#)))))))
-                                 (#{f _hoQGWMnyQPAh3k2jhWJ2i}#
-                                   #{e _hoQGWMnyQPAh3k2jhWJ1I}#
-                                   #{w _hoQGWMnyQPAh3k2jhWJ1K}#))))
-                           (lambda (#{xr* _hoQGWMnyQPAh3k2jhWJ3D}#
-                                    #{y-pat _hoQGWMnyQPAh3k2jhWJ3E}#
-                                    #{r _hoQGWMnyQPAh3k2jhWJ3F}#)
-                             (if #{r _hoQGWMnyQPAh3k2jhWJ3F}#
-                               (if (null? #{y-pat _hoQGWMnyQPAh3k2jhWJ3E}#)
-                                 (if (null? #{xr* _hoQGWMnyQPAh3k2jhWJ3D}#)
-                                   (#{match-empty _hoQGWMnyQPAh3k2jhWJ0o}#
+                                            #{y-pat -ANAU$bmvAmthP7L7xwpyY}#
+                                            (#{match -ANAU$bmvAmthP7L7xwpwm}#
+                                              #{e -ANAU$bmvAmthP7L7xwpyf}#
+                                              #{z-pat -ANAU$bmvAmthP7L7xwpyZ}#
+                                              #{w -ANAU$bmvAmthP7L7xwpyg}#
+                                              #{r -ANAU$bmvAmthP7L7xwpxG}#
+                                              #{mod -ANAU$bmvAmthP7L7xwpxH}#)))))))
+                                 (#{f -ANAU$bmvAmthP7L7xwpyd}#
+                                   #{e -ANAU$bmvAmthP7L7xwpxD}#
+                                   #{w -ANAU$bmvAmthP7L7xwpxF}#))))
+                           (lambda (#{xr* -ANAU$bmvAmthP7L7xwpy$}#
+                                    #{y-pat -ANAU$bmvAmthP7L7xwpy@}#
+                                    #{r -ANAU$bmvAmthP7L7xwpzA}#)
+                             (if #{r -ANAU$bmvAmthP7L7xwpzA}#
+                               (if (null? #{y-pat -ANAU$bmvAmthP7L7xwpy@}#)
+                                 (if (null? #{xr* -ANAU$bmvAmthP7L7xwpy$}#)
+                                   (#{match-empty -ANAU$bmvAmthP7L7xwpwj}#
                                      (vector-ref
-                                       #{p _hoQGWMnyQPAh3k2jhWJ1J}#
+                                       #{p -ANAU$bmvAmthP7L7xwpxE}#
                                        1)
-                                     #{r _hoQGWMnyQPAh3k2jhWJ3F}#)
-                                   (#{combine _hoQGWMnyQPAh3k2jhWJ0p}#
-                                     #{xr* _hoQGWMnyQPAh3k2jhWJ3D}#
-                                     #{r _hoQGWMnyQPAh3k2jhWJ3F}#))
+                                     #{r -ANAU$bmvAmthP7L7xwpzA}#)
+                                   (#{combine -ANAU$bmvAmthP7L7xwpwk}#
+                                     #{xr* -ANAU$bmvAmthP7L7xwpy$}#
+                                     #{r -ANAU$bmvAmthP7L7xwpzA}#))
                                  #f)
                                #f)))
-                         (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWJ1W}#
+                         (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwpxR}#
                                    'free-id)
-                           (if (if (symbol? #{e _hoQGWMnyQPAh3k2jhWJ1I}#)
+                           (if (if (symbol? #{e -ANAU$bmvAmthP7L7xwpxD}#)
                                  #t
-                                 (if (if (vector? #{e _hoQGWMnyQPAh3k2jhWJ1I}#)
+                                 (if (if (vector? #{e -ANAU$bmvAmthP7L7xwpxD}#)
                                        (if (= (vector-length
-                                                #{e _hoQGWMnyQPAh3k2jhWJ1I}#)
+                                                #{e -ANAU$bmvAmthP7L7xwpxD}#)
                                               4)
                                          (eq? (vector-ref
-                                                #{e _hoQGWMnyQPAh3k2jhWJ1I}#
+                                                #{e -ANAU$bmvAmthP7L7xwpxD}#
                                                 0)
                                               'syntax-object)
                                          #f)
                                        #f)
                                    (symbol?
                                      (vector-ref
-                                       #{e _hoQGWMnyQPAh3k2jhWJ1I}#
+                                       #{e -ANAU$bmvAmthP7L7xwpxD}#
                                        1))
                                    #f))
-                             (if (let ((#{i _hoQGWMnyQPAh3k2jhWJ8Q}#
-                                         (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                                           #{e _hoQGWMnyQPAh3k2jhWJ1I}#
-                                           #{w _hoQGWMnyQPAh3k2jhWJ1K}#
-                                           #{mod _hoQGWMnyQPAh3k2jhWJ1M}#))
-                                       (#{j _hoQGWMnyQPAh3k2jhWJ8R}#
+                             (if (let ((#{i -ANAU$bmvAmthP7L7xwp4L}#
+                                         (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                                           #{e -ANAU$bmvAmthP7L7xwpxD}#
+                                           #{w -ANAU$bmvAmthP7L7xwpxF}#
+                                           #{mod -ANAU$bmvAmthP7L7xwpxH}#))
+                                       (#{j -ANAU$bmvAmthP7L7xwp4M}#
                                          (vector-ref
-                                           #{p _hoQGWMnyQPAh3k2jhWJ1J}#
+                                           #{p -ANAU$bmvAmthP7L7xwpxE}#
                                            1)))
                                    (if (eq? (if (if (vector?
-                                                      #{i _hoQGWMnyQPAh3k2jhWJ8Q}#)
+                                                      #{i -ANAU$bmvAmthP7L7xwp4L}#)
                                                   (if (= (vector-length
-                                                           #{i _hoQGWMnyQPAh3k2jhWJ8Q}#)
+                                                           #{i -ANAU$bmvAmthP7L7xwp4L}#)
                                                          4)
                                                     (eq? (vector-ref
-                                                           #{i _hoQGWMnyQPAh3k2jhWJ8Q}#
+                                                           #{i -ANAU$bmvAmthP7L7xwp4L}#
                                                            0)
                                                          'syntax-object)
                                                     #f)
                                                   #f)
                                               (vector-ref
-                                                #{i _hoQGWMnyQPAh3k2jhWJ8Q}#
+                                                #{i -ANAU$bmvAmthP7L7xwp4L}#
                                                 1)
-                                              #{i _hoQGWMnyQPAh3k2jhWJ8Q}#)
+                                              #{i -ANAU$bmvAmthP7L7xwp4L}#)
                                             (if (if (vector?
-                                                      #{j _hoQGWMnyQPAh3k2jhWJ8R}#)
+                                                      #{j -ANAU$bmvAmthP7L7xwp4M}#)
                                                   (if (= (vector-length
-                                                           #{j _hoQGWMnyQPAh3k2jhWJ8R}#)
+                                                           #{j -ANAU$bmvAmthP7L7xwp4M}#)
                                                          4)
                                                     (eq? (vector-ref
-                                                           #{j _hoQGWMnyQPAh3k2jhWJ8R}#
+                                                           #{j -ANAU$bmvAmthP7L7xwp4M}#
                                                            0)
                                                          'syntax-object)
                                                     #f)
                                                   #f)
                                               (vector-ref
-                                                #{j _hoQGWMnyQPAh3k2jhWJ8R}#
+                                                #{j -ANAU$bmvAmthP7L7xwp4M}#
                                                 1)
-                                              #{j _hoQGWMnyQPAh3k2jhWJ8R}#))
-                                     (eq? (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                                            #{i _hoQGWMnyQPAh3k2jhWJ8Q}#
+                                              #{j -ANAU$bmvAmthP7L7xwp4M}#))
+                                     (eq? (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                                            #{i -ANAU$bmvAmthP7L7xwp4L}#
                                             '(()))
-                                          (#{id-var-name _hoQGWMnyQPAh3k2jhWHTU}#
-                                            #{j _hoQGWMnyQPAh3k2jhWJ8R}#
+                                          (#{id-var-name -ANAU$bmvAmthP7L7xwnNz}#
+                                            #{j -ANAU$bmvAmthP7L7xwp4M}#
                                             '(())))
                                      #f))
-                               #{r _hoQGWMnyQPAh3k2jhWJ1L}#
+                               #{r -ANAU$bmvAmthP7L7xwpxG}#
                                #f)
                              #f)
-                           (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWJ1W}# 'atom)
+                           (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwpxR}# 'atom)
                              (if (equal?
-                                   (vector-ref #{p _hoQGWMnyQPAh3k2jhWJ1J}# 1)
-                                   (#{strip _hoQGWMnyQPAh3k2jhWHTy}#
-                                     #{e _hoQGWMnyQPAh3k2jhWJ1I}#
-                                     #{w _hoQGWMnyQPAh3k2jhWJ1K}#))
-                               #{r _hoQGWMnyQPAh3k2jhWJ1L}#
+                                   (vector-ref #{p -ANAU$bmvAmthP7L7xwpxE}# 1)
+                                   (#{strip -ANAU$bmvAmthP7L7xwnOR}#
+                                     #{e -ANAU$bmvAmthP7L7xwpxD}#
+                                     #{w -ANAU$bmvAmthP7L7xwpxF}#))
+                               #{r -ANAU$bmvAmthP7L7xwpxG}#
                                #f)
-                             (if (eqv? #{atom-key _hoQGWMnyQPAh3k2jhWJ1W}#
+                             (if (eqv? #{atom-key -ANAU$bmvAmthP7L7xwpxR}#
                                        'vector)
-                               (if (vector? #{e _hoQGWMnyQPAh3k2jhWJ1I}#)
-                                 (#{match _hoQGWMnyQPAh3k2jhWJ0r}#
-                                   (vector->list #{e _hoQGWMnyQPAh3k2jhWJ1I}#)
-                                   (vector-ref #{p _hoQGWMnyQPAh3k2jhWJ1J}# 1)
-                                   #{w _hoQGWMnyQPAh3k2jhWJ1K}#
-                                   #{r _hoQGWMnyQPAh3k2jhWJ1L}#
-                                   #{mod _hoQGWMnyQPAh3k2jhWJ1M}#)
+                               (if (vector? #{e -ANAU$bmvAmthP7L7xwpxD}#)
+                                 (#{match -ANAU$bmvAmthP7L7xwpwm}#
+                                   (vector->list #{e -ANAU$bmvAmthP7L7xwpxD}#)
+                                   (vector-ref #{p -ANAU$bmvAmthP7L7xwpxE}# 1)
+                                   #{w -ANAU$bmvAmthP7L7xwpxF}#
+                                   #{r -ANAU$bmvAmthP7L7xwpxG}#
+                                   #{mod -ANAU$bmvAmthP7L7xwpxH}#)
                                  #f))))))))))))
-         (#{match _hoQGWMnyQPAh3k2jhWJ0r}#
-           (lambda (#{e _hoQGWMnyQPAh3k2jhWJ9N}#
-                    #{p _hoQGWMnyQPAh3k2jhWJ9O}#
-                    #{w _hoQGWMnyQPAh3k2jhWJ9P}#
-                    #{r _hoQGWMnyQPAh3k2jhWJ9Q}#
-                    #{mod _hoQGWMnyQPAh3k2jhWJ9R}#)
-             (if (not #{r _hoQGWMnyQPAh3k2jhWJ9Q}#)
+         (#{match -ANAU$bmvAmthP7L7xwpwm}#
+           (lambda (#{e -ANAU$bmvAmthP7L7xwp5I}#
+                    #{p -ANAU$bmvAmthP7L7xwp5J}#
+                    #{w -ANAU$bmvAmthP7L7xwp5K}#
+                    #{r -ANAU$bmvAmthP7L7xwp5L}#
+                    #{mod -ANAU$bmvAmthP7L7xwp5M}#)
+             (if (not #{r -ANAU$bmvAmthP7L7xwp5L}#)
                #f
-               (if (eq? #{p _hoQGWMnyQPAh3k2jhWJ9O}# '_)
-                 #{r _hoQGWMnyQPAh3k2jhWJ9Q}#
-                 (if (eq? #{p _hoQGWMnyQPAh3k2jhWJ9O}# 'any)
-                   (cons (#{wrap _hoQGWMnyQPAh3k2jhWHTe}#
-                           #{e _hoQGWMnyQPAh3k2jhWJ9N}#
-                           #{w _hoQGWMnyQPAh3k2jhWJ9P}#
-                           #{mod _hoQGWMnyQPAh3k2jhWJ9R}#)
-                         #{r _hoQGWMnyQPAh3k2jhWJ9Q}#)
-                   (if (if (vector? #{e _hoQGWMnyQPAh3k2jhWJ9N}#)
-                         (if (= (vector-length #{e _hoQGWMnyQPAh3k2jhWJ9N}#)
+               (if (eq? #{p -ANAU$bmvAmthP7L7xwp5J}# '_)
+                 #{r -ANAU$bmvAmthP7L7xwp5L}#
+                 (if (eq? #{p -ANAU$bmvAmthP7L7xwp5J}# 'any)
+                   (cons (#{wrap -ANAU$bmvAmthP7L7xwnN9}#
+                           #{e -ANAU$bmvAmthP7L7xwp5I}#
+                           #{w -ANAU$bmvAmthP7L7xwp5K}#
+                           #{mod -ANAU$bmvAmthP7L7xwp5M}#)
+                         #{r -ANAU$bmvAmthP7L7xwp5L}#)
+                   (if (if (vector? #{e -ANAU$bmvAmthP7L7xwp5I}#)
+                         (if (= (vector-length #{e -ANAU$bmvAmthP7L7xwp5I}#)
                                 4)
-                           (eq? (vector-ref #{e _hoQGWMnyQPAh3k2jhWJ9N}# 0)
+                           (eq? (vector-ref #{e -ANAU$bmvAmthP7L7xwp5I}# 0)
                                 'syntax-object)
                            #f)
                          #f)
-                     (#{match* _hoQGWMnyQPAh3k2jhWJ0q}#
-                       (vector-ref #{e _hoQGWMnyQPAh3k2jhWJ9N}# 1)
-                       #{p _hoQGWMnyQPAh3k2jhWJ9O}#
-                       (#{join-wraps _hoQGWMnyQPAh3k2jhWHTR}#
-                         #{w _hoQGWMnyQPAh3k2jhWJ9P}#
-                         (vector-ref #{e _hoQGWMnyQPAh3k2jhWJ9N}# 2))
-                       #{r _hoQGWMnyQPAh3k2jhWJ9Q}#
-                       (vector-ref #{e _hoQGWMnyQPAh3k2jhWJ9N}# 3))
-                     (#{match* _hoQGWMnyQPAh3k2jhWJ0q}#
-                       #{e _hoQGWMnyQPAh3k2jhWJ9N}#
-                       #{p _hoQGWMnyQPAh3k2jhWJ9O}#
-                       #{w _hoQGWMnyQPAh3k2jhWJ9P}#
-                       #{r _hoQGWMnyQPAh3k2jhWJ9Q}#
-                       #{mod _hoQGWMnyQPAh3k2jhWJ9R}#))))))))
+                     (#{match* -ANAU$bmvAmthP7L7xwpwl}#
+                       (vector-ref #{e -ANAU$bmvAmthP7L7xwp5I}# 1)
+                       #{p -ANAU$bmvAmthP7L7xwp5J}#
+                       (#{join-wraps -ANAU$bmvAmthP7L7xwnNw}#
+                         #{w -ANAU$bmvAmthP7L7xwp5K}#
+                         (vector-ref #{e -ANAU$bmvAmthP7L7xwp5I}# 2))
+                       #{r -ANAU$bmvAmthP7L7xwp5L}#
+                       (vector-ref #{e -ANAU$bmvAmthP7L7xwp5I}# 3))
+                     (#{match* -ANAU$bmvAmthP7L7xwpwl}#
+                       #{e -ANAU$bmvAmthP7L7xwp5I}#
+                       #{p -ANAU$bmvAmthP7L7xwp5J}#
+                       #{w -ANAU$bmvAmthP7L7xwp5K}#
+                       #{r -ANAU$bmvAmthP7L7xwp5L}#
+                       #{mod -ANAU$bmvAmthP7L7xwp5M}#))))))))
         (set! $sc-dispatch
-          (lambda (#{e _hoQGWMnyQPAh3k2jhWJ0s}#
-                   #{p _hoQGWMnyQPAh3k2jhWJ0t}#)
-            (if (eq? #{p _hoQGWMnyQPAh3k2jhWJ0t}# 'any)
-              (list #{e _hoQGWMnyQPAh3k2jhWJ0s}#)
-              (if (eq? #{p _hoQGWMnyQPAh3k2jhWJ0t}# '_)
+          (lambda (#{e -ANAU$bmvAmthP7L7xwpwn}#
+                   #{p -ANAU$bmvAmthP7L7xwpwo}#)
+            (if (eq? #{p -ANAU$bmvAmthP7L7xwpwo}# 'any)
+              (list #{e -ANAU$bmvAmthP7L7xwpwn}#)
+              (if (eq? #{p -ANAU$bmvAmthP7L7xwpwo}# '_)
                 '()
-                (if (if (vector? #{e _hoQGWMnyQPAh3k2jhWJ0s}#)
-                      (if (= (vector-length #{e _hoQGWMnyQPAh3k2jhWJ0s}#)
+                (if (if (vector? #{e -ANAU$bmvAmthP7L7xwpwn}#)
+                      (if (= (vector-length #{e -ANAU$bmvAmthP7L7xwpwn}#)
                              4)
-                        (eq? (vector-ref #{e _hoQGWMnyQPAh3k2jhWJ0s}# 0)
+                        (eq? (vector-ref #{e -ANAU$bmvAmthP7L7xwpwn}# 0)
                              'syntax-object)
                         #f)
                       #f)
-                  (#{match* _hoQGWMnyQPAh3k2jhWJ0q}#
-                    (vector-ref #{e _hoQGWMnyQPAh3k2jhWJ0s}# 1)
-                    #{p _hoQGWMnyQPAh3k2jhWJ0t}#
-                    (vector-ref #{e _hoQGWMnyQPAh3k2jhWJ0s}# 2)
+                  (#{match* -ANAU$bmvAmthP7L7xwpwl}#
+                    (vector-ref #{e -ANAU$bmvAmthP7L7xwpwn}# 1)
+                    #{p -ANAU$bmvAmthP7L7xwpwo}#
+                    (vector-ref #{e -ANAU$bmvAmthP7L7xwpwn}# 2)
                     '()
-                    (vector-ref #{e _hoQGWMnyQPAh3k2jhWJ0s}# 3))
-                  (#{match* _hoQGWMnyQPAh3k2jhWJ0q}#
-                    #{e _hoQGWMnyQPAh3k2jhWJ0s}#
-                    #{p _hoQGWMnyQPAh3k2jhWJ0t}#
+                    (vector-ref #{e -ANAU$bmvAmthP7L7xwpwn}# 3))
+                  (#{match* -ANAU$bmvAmthP7L7xwpwl}#
+                    #{e -ANAU$bmvAmthP7L7xwpwn}#
+                    #{p -ANAU$bmvAmthP7L7xwpwo}#
                     '(())
                     '()
                     #f))))))))))
@@ -23851,82 +23842,82 @@
   (make-syntax-transformer
     'with-syntax
     'macro
-    (lambda (#{x _hoQGWMnyQPAh3k2jhWMwo}#)
-      (let ((#{tmp _hoQGWMnyQPAh3k2jhWMwq}#
+    (lambda (#{x -ANAU$bmvAmthP7L7xws3J}#)
+      (let ((#{tmp -ANAU$bmvAmthP7L7xws3L}#
               ($sc-dispatch
-                #{x _hoQGWMnyQPAh3k2jhWMwo}#
+                #{x -ANAU$bmvAmthP7L7xws3J}#
                 '(_ () any . each-any))))
-        (if #{tmp _hoQGWMnyQPAh3k2jhWMwq}#
+        (if #{tmp -ANAU$bmvAmthP7L7xws3L}#
           (@apply
-            (lambda (#{e1 _hoQGWMnyQPAh3k2jhWMwu}#
-                     #{e2 _hoQGWMnyQPAh3k2jhWMwv}#)
+            (lambda (#{e1 -ANAU$bmvAmthP7L7xws3P}#
+                     #{e2 -ANAU$bmvAmthP7L7xws3Q}#)
               (cons '#(syntax-object
                        let
                        ((top)
-                        #(ribcage #(e1 e2) #((top) (top)) #("2zo" "2zp"))
+                        #(ribcage #(e1 e2) #((top) (top)) #("1bj" "1bk"))
                         #(ribcage () () ())
-                        #(ribcage #(x) #((top)) #("2zn")))
+                        #(ribcage #(x) #((top)) #("1bi")))
                        (hygiene guile))
                     (cons '()
-                          (cons #{e1 _hoQGWMnyQPAh3k2jhWMwu}#
-                                #{e2 _hoQGWMnyQPAh3k2jhWMwv}#))))
-            #{tmp _hoQGWMnyQPAh3k2jhWMwq}#)
-          (let ((#{tmp _hoQGWMnyQPAh3k2jhWMww}#
+                          (cons #{e1 -ANAU$bmvAmthP7L7xws3P}#
+                                #{e2 -ANAU$bmvAmthP7L7xws3Q}#))))
+            #{tmp -ANAU$bmvAmthP7L7xws3L}#)
+          (let ((#{tmp -ANAU$bmvAmthP7L7xws3R}#
                   ($sc-dispatch
-                    #{x _hoQGWMnyQPAh3k2jhWMwo}#
+                    #{x -ANAU$bmvAmthP7L7xws3J}#
                     '(_ ((any any)) any . each-any))))
-            (if #{tmp _hoQGWMnyQPAh3k2jhWMww}#
+            (if #{tmp -ANAU$bmvAmthP7L7xws3R}#
               (@apply
-                (lambda (#{out _hoQGWMnyQPAh3k2jhWMw0}#
-                         #{in _hoQGWMnyQPAh3k2jhWMw1}#
-                         #{e1 _hoQGWMnyQPAh3k2jhWMw2}#
-                         #{e2 _hoQGWMnyQPAh3k2jhWMw3}#)
+                (lambda (#{out -ANAU$bmvAmthP7L7xws3V}#
+                         #{in -ANAU$bmvAmthP7L7xws3W}#
+                         #{e1 -ANAU$bmvAmthP7L7xws3X}#
+                         #{e2 -ANAU$bmvAmthP7L7xws3Y}#)
                   (list '#(syntax-object
                            syntax-case
                            ((top)
                             #(ribcage
                               #(out in e1 e2)
                               #((top) (top) (top) (top))
-                              #("2zq" "2zr" "2zs" "2zt"))
+                              #("1bl" "1bm" "1bn" "1bo"))
                             #(ribcage () () ())
-                            #(ribcage #(x) #((top)) #("2zn")))
+                            #(ribcage #(x) #((top)) #("1bi")))
                            (hygiene guile))
-                        #{in _hoQGWMnyQPAh3k2jhWMw1}#
+                        #{in -ANAU$bmvAmthP7L7xws3W}#
                         '()
-                        (list #{out _hoQGWMnyQPAh3k2jhWMw0}#
+                        (list #{out -ANAU$bmvAmthP7L7xws3V}#
                               (cons '#(syntax-object
                                        let
                                        ((top)
                                         #(ribcage
                                           #(out in e1 e2)
                                           #((top) (top) (top) (top))
-                                          #("2zq" "2zr" "2zs" "2zt"))
+                                          #("1bl" "1bm" "1bn" "1bo"))
                                         #(ribcage () () ())
-                                        #(ribcage #(x) #((top)) #("2zn")))
+                                        #(ribcage #(x) #((top)) #("1bi")))
                                        (hygiene guile))
                                     (cons '()
-                                          (cons #{e1 _hoQGWMnyQPAh3k2jhWMw2}#
-                                                #{e2 _hoQGWMnyQPAh3k2jhWMw3}#))))))
-                #{tmp _hoQGWMnyQPAh3k2jhWMww}#)
-              (let ((#{tmp _hoQGWMnyQPAh3k2jhWMw4}#
+                                          (cons #{e1 -ANAU$bmvAmthP7L7xws3X}#
+                                                #{e2 -ANAU$bmvAmthP7L7xws3Y}#))))))
+                #{tmp -ANAU$bmvAmthP7L7xws3R}#)
+              (let ((#{tmp -ANAU$bmvAmthP7L7xws3Z}#
                       ($sc-dispatch
-                        #{x _hoQGWMnyQPAh3k2jhWMwo}#
+                        #{x -ANAU$bmvAmthP7L7xws3J}#
                         '(_ #(each (any any)) any . each-any))))
-                (if #{tmp _hoQGWMnyQPAh3k2jhWMw4}#
+                (if #{tmp -ANAU$bmvAmthP7L7xws3Z}#
                   (@apply
-                    (lambda (#{out _hoQGWMnyQPAh3k2jhWMw8}#
-                             #{in _hoQGWMnyQPAh3k2jhWMw9}#
-                             #{e1 _hoQGWMnyQPAh3k2jhWMw$}#
-                             #{e2 _hoQGWMnyQPAh3k2jhWMw@}#)
+                    (lambda (#{out -ANAU$bmvAmthP7L7xws3d}#
+                             #{in -ANAU$bmvAmthP7L7xws3e}#
+                             #{e1 -ANAU$bmvAmthP7L7xws3f}#
+                             #{e2 -ANAU$bmvAmthP7L7xws3g}#)
                       (list '#(syntax-object
                                syntax-case
                                ((top)
                                 #(ribcage
                                   #(out in e1 e2)
                                   #((top) (top) (top) (top))
-                                  #("2zu" "2zv" "2zw" "2zx"))
+                                  #("1bp" "1bq" "1br" "1bs"))
                                 #(ribcage () () ())
-                                #(ribcage #(x) #((top)) #("2zn")))
+                                #(ribcage #(x) #((top)) #("1bi")))
                                (hygiene guile))
                             (cons '#(syntax-object
                                      list
@@ -23934,56 +23925,56 @@
                                       #(ribcage
                                         #(out in e1 e2)
                                         #((top) (top) (top) (top))
-                                        #("2zu" "2zv" "2zw" "2zx"))
+                                        #("1bp" "1bq" "1br" "1bs"))
                                       #(ribcage () () ())
-                                      #(ribcage #(x) #((top)) #("2zn")))
+                                      #(ribcage #(x) #((top)) #("1bi")))
                                      (hygiene guile))
-                                  #{in _hoQGWMnyQPAh3k2jhWMw9}#)
+                                  #{in -ANAU$bmvAmthP7L7xws3e}#)
                             '()
-                            (list #{out _hoQGWMnyQPAh3k2jhWMw8}#
+                            (list #{out -ANAU$bmvAmthP7L7xws3d}#
                                   (cons '#(syntax-object
                                            let
                                            ((top)
                                             #(ribcage
                                               #(out in e1 e2)
                                               #((top) (top) (top) (top))
-                                              #("2zu" "2zv" "2zw" "2zx"))
+                                              #("1bp" "1bq" "1br" "1bs"))
                                             #(ribcage () () ())
-                                            #(ribcage #(x) #((top)) #("2zn")))
+                                            #(ribcage #(x) #((top)) #("1bi")))
                                            (hygiene guile))
                                         (cons '()
-                                              (cons #{e1 _hoQGWMnyQPAh3k2jhWMw$}#
-                                                    #{e2 _hoQGWMnyQPAh3k2jhWMw@}#))))))
-                    #{tmp _hoQGWMnyQPAh3k2jhWMw4}#)
+                                              (cons #{e1 -ANAU$bmvAmthP7L7xws3f}#
+                                                    #{e2 -ANAU$bmvAmthP7L7xws3g}#))))))
+                    #{tmp -ANAU$bmvAmthP7L7xws3Z}#)
                   (syntax-violation
                     #f
                     "source expression failed to match any pattern"
-                    #{x _hoQGWMnyQPAh3k2jhWMwo}#))))))))))
+                    #{x -ANAU$bmvAmthP7L7xws3J}#))))))))))
 
 (define syntax-rules
   (make-syntax-transformer
     'syntax-rules
     'macro
-    (lambda (#{x _hoQGWMnyQPAh3k2jhWMxm}#)
-      (let ((#{tmp _hoQGWMnyQPAh3k2jhWMxo}#
+    (lambda (#{x -ANAU$bmvAmthP7L7xws4H}#)
+      (let ((#{tmp -ANAU$bmvAmthP7L7xws4J}#
               ($sc-dispatch
-                #{x _hoQGWMnyQPAh3k2jhWMxm}#
+                #{x -ANAU$bmvAmthP7L7xws4H}#
                 '(_ each-any . #(each ((any . any) any))))))
-        (if #{tmp _hoQGWMnyQPAh3k2jhWMxo}#
+        (if #{tmp -ANAU$bmvAmthP7L7xws4J}#
           (@apply
-            (lambda (#{k _hoQGWMnyQPAh3k2jhWMxs}#
-                     #{keyword _hoQGWMnyQPAh3k2jhWMxt}#
-                     #{pattern _hoQGWMnyQPAh3k2jhWMxu}#
-                     #{template _hoQGWMnyQPAh3k2jhWMxv}#)
+            (lambda (#{k -ANAU$bmvAmthP7L7xws4N}#
+                     #{keyword -ANAU$bmvAmthP7L7xws4O}#
+                     #{pattern -ANAU$bmvAmthP7L7xws4P}#
+                     #{template -ANAU$bmvAmthP7L7xws4Q}#)
               (list '#(syntax-object
                        lambda
                        ((top)
                         #(ribcage
                           #(k keyword pattern template)
                           #((top) (top) (top) (top))
-                          #("2zz" "300" "301" "302"))
+                          #("1bu" "1bv" "1bw" "1bx"))
                         #(ribcage () () ())
-                        #(ribcage #(x) #((top)) #("2zy")))
+                        #(ribcage #(x) #((top)) #("1bt")))
                        (hygiene guile))
                     '(#(syntax-object
                         x
@@ -23991,9 +23982,9 @@
                          #(ribcage
                            #(k keyword pattern template)
                            #((top) (top) (top) (top))
-                           #("2zz" "300" "301" "302"))
+                           #("1bu" "1bv" "1bw" "1bx"))
                          #(ribcage () () ())
-                         #(ribcage #(x) #((top)) #("2zy")))
+                         #(ribcage #(x) #((top)) #("1bt")))
                         (hygiene guile)))
                     (vector
                       '(#(syntax-object
@@ -24002,9 +23993,9 @@
                            #(ribcage
                              #(k keyword pattern template)
                              #((top) (top) (top) (top))
-                             #("2zz" "300" "301" "302"))
+                             #("1bu" "1bv" "1bw" "1bx"))
                            #(ribcage () () ())
-                           #(ribcage #(x) #((top)) #("2zy")))
+                           #(ribcage #(x) #((top)) #("1bt")))
                           (hygiene guile))
                         .
                         #(syntax-object
@@ -24013,9 +24004,9 @@
                            #(ribcage
                              #(k keyword pattern template)
                              #((top) (top) (top) (top))
-                             #("2zz" "300" "301" "302"))
+                             #("1bu" "1bv" "1bw" "1bx"))
                            #(ribcage () () ())
-                           #(ribcage #(x) #((top)) #("2zy")))
+                           #(ribcage #(x) #((top)) #("1bt")))
                           (hygiene guile)))
                       (cons '#(syntax-object
                                patterns
@@ -24023,20 +24014,20 @@
                                 #(ribcage
                                   #(k keyword pattern template)
                                   #((top) (top) (top) (top))
-                                  #("2zz" "300" "301" "302"))
+                                  #("1bu" "1bv" "1bw" "1bx"))
                                 #(ribcage () () ())
-                                #(ribcage #(x) #((top)) #("2zy")))
+                                #(ribcage #(x) #((top)) #("1bt")))
                                (hygiene guile))
-                            #{pattern _hoQGWMnyQPAh3k2jhWMxu}#))
+                            #{pattern -ANAU$bmvAmthP7L7xws4P}#))
                     (cons '#(syntax-object
                              syntax-case
                              ((top)
                               #(ribcage
                                 #(k keyword pattern template)
                                 #((top) (top) (top) (top))
-                                #("2zz" "300" "301" "302"))
+                                #("1bu" "1bv" "1bw" "1bx"))
                               #(ribcage () () ())
-                              #(ribcage #(x) #((top)) #("2zy")))
+                              #(ribcage #(x) #((top)) #("1bt")))
                              (hygiene guile))
                           (cons '#(syntax-object
                                    x
@@ -24044,13 +24035,13 @@
                                     #(ribcage
                                       #(k keyword pattern template)
                                       #((top) (top) (top) (top))
-                                      #("2zz" "300" "301" "302"))
+                                      #("1bu" "1bv" "1bw" "1bx"))
                                     #(ribcage () () ())
-                                    #(ribcage #(x) #((top)) #("2zy")))
+                                    #(ribcage #(x) #((top)) #("1bt")))
                                    (hygiene guile))
-                                (cons #{k _hoQGWMnyQPAh3k2jhWMxs}#
-                                      (map (lambda (#{tmp _hoQGWMnyQPAh3k2jhWMxW _hoQGWMnyQPAh3k2jhWMxw}#
-                                                    #{tmp _hoQGWMnyQPAh3k2jhWMxV _hoQGWMnyQPAh3k2jhWMxx}#)
+                                (cons #{k -ANAU$bmvAmthP7L7xws4N}#
+                                      (map (lambda (#{tmp -ANAU$bmvAmthP7L7xws33 -ANAU$bmvAmthP7L7xws4R}#
+                                                    #{tmp -ANAU$bmvAmthP7L7xws32 -ANAU$bmvAmthP7L7xws4S}#)
                                              (list (cons '#(syntax-object
                                                             dummy
                                                             ((top)
@@ -24063,10 +24054,10 @@
                                                                  (top)
                                                                  (top)
                                                                  (top))
-                                                               #("2zz"
-                                                                 "300"
-                                                                 "301"
-                                                                 "302"))
+                                                               #("1bu"
+                                                                 "1bv"
+                                                                 "1bw"
+                                                                 "1bx"))
                                                              #(ribcage
                                                                ()
                                                                ()
@@ -24074,9 +24065,9 @@
                                                              #(ribcage
                                                                #(x)
                                                                #((top))
-                                                               #("2zy")))
+                                                               #("1bt")))
                                                             (hygiene guile))
-                                                         #{tmp _hoQGWMnyQPAh3k2jhWMxV _hoQGWMnyQPAh3k2jhWMxx}#)
+                                                         #{tmp -ANAU$bmvAmthP7L7xws32 -ANAU$bmvAmthP7L7xws4S}#)
                                                    (list '#(syntax-object
                                                             syntax
                                                             ((top)
@@ -24089,10 +24080,10 @@
                                                                  (top)
                                                                  (top)
                                                                  (top))
-                                                               #("2zz"
-                                                                 "300"
-                                                                 "301"
-                                                                 "302"))
+                                                               #("1bu"
+                                                                 "1bv"
+                                                                 "1bw"
+                                                                 "1bx"))
                                                              #(ribcage
                                                                ()
                                                                ()
@@ -24100,43 +24091,43 @@
                                                              #(ribcage
                                                                #(x)
                                                                #((top))
-                                                               #("2zy")))
+                                                               #("1bt")))
                                                             (hygiene guile))
-                                                         #{tmp _hoQGWMnyQPAh3k2jhWMxW _hoQGWMnyQPAh3k2jhWMxw}#)))
-                                           #{template _hoQGWMnyQPAh3k2jhWMxv}#
-                                           #{pattern _hoQGWMnyQPAh3k2jhWMxu}#))))))
-            #{tmp _hoQGWMnyQPAh3k2jhWMxo}#)
-          (let ((#{tmp _hoQGWMnyQPAh3k2jhWMxy}#
+                                                         #{tmp -ANAU$bmvAmthP7L7xws33 -ANAU$bmvAmthP7L7xws4R}#)))
+                                           #{template -ANAU$bmvAmthP7L7xws4Q}#
+                                           #{pattern -ANAU$bmvAmthP7L7xws4P}#))))))
+            #{tmp -ANAU$bmvAmthP7L7xws4J}#)
+          (let ((#{tmp -ANAU$bmvAmthP7L7xws4T}#
                   ($sc-dispatch
-                    #{x _hoQGWMnyQPAh3k2jhWMxm}#
+                    #{x -ANAU$bmvAmthP7L7xws4H}#
                     '(_ each-any any . #(each ((any . any) any))))))
-            (if (if #{tmp _hoQGWMnyQPAh3k2jhWMxy}#
+            (if (if #{tmp -ANAU$bmvAmthP7L7xws4T}#
                   (@apply
-                    (lambda (#{k _hoQGWMnyQPAh3k2jhWMx2}#
-                             #{docstring _hoQGWMnyQPAh3k2jhWMx3}#
-                             #{keyword _hoQGWMnyQPAh3k2jhWMx4}#
-                             #{pattern _hoQGWMnyQPAh3k2jhWMx5}#
-                             #{template _hoQGWMnyQPAh3k2jhWMx6}#)
+                    (lambda (#{k -ANAU$bmvAmthP7L7xws4X}#
+                             #{docstring -ANAU$bmvAmthP7L7xws4Y}#
+                             #{keyword -ANAU$bmvAmthP7L7xws4Z}#
+                             #{pattern -ANAU$bmvAmthP7L7xws4a}#
+                             #{template -ANAU$bmvAmthP7L7xws4b}#)
                       (string?
                         (syntax->datum
-                          #{docstring _hoQGWMnyQPAh3k2jhWMx3}#)))
-                    #{tmp _hoQGWMnyQPAh3k2jhWMxy}#)
+                          #{docstring -ANAU$bmvAmthP7L7xws4Y}#)))
+                    #{tmp -ANAU$bmvAmthP7L7xws4T}#)
                   #f)
               (@apply
-                (lambda (#{k _hoQGWMnyQPAh3k2jhWMx7}#
-                         #{docstring _hoQGWMnyQPAh3k2jhWMx8}#
-                         #{keyword _hoQGWMnyQPAh3k2jhWMx9}#
-                         #{pattern _hoQGWMnyQPAh3k2jhWMx$}#
-                         #{template _hoQGWMnyQPAh3k2jhWMx@}#)
+                (lambda (#{k -ANAU$bmvAmthP7L7xws4c}#
+                         #{docstring -ANAU$bmvAmthP7L7xws4d}#
+                         #{keyword -ANAU$bmvAmthP7L7xws4e}#
+                         #{pattern -ANAU$bmvAmthP7L7xws4f}#
+                         #{template -ANAU$bmvAmthP7L7xws4g}#)
                   (list '#(syntax-object
                            lambda
                            ((top)
                             #(ribcage
                               #(k docstring keyword pattern template)
                               #((top) (top) (top) (top) (top))
-                              #("308" "309" "30a" "30b" "30c"))
+                              #("1c3" "1c4" "1c5" "1c6" "1c7"))
                             #(ribcage () () ())
-                            #(ribcage #(x) #((top)) #("2zy")))
+                            #(ribcage #(x) #((top)) #("1bt")))
                            (hygiene guile))
                         '(#(syntax-object
                             x
@@ -24144,11 +24135,11 @@
                              #(ribcage
                                #(k docstring keyword pattern template)
                                #((top) (top) (top) (top) (top))
-                               #("308" "309" "30a" "30b" "30c"))
+                               #("1c3" "1c4" "1c5" "1c6" "1c7"))
                              #(ribcage () () ())
-                             #(ribcage #(x) #((top)) #("2zy")))
+                             #(ribcage #(x) #((top)) #("1bt")))
                             (hygiene guile)))
-                        #{docstring _hoQGWMnyQPAh3k2jhWMx8}#
+                        #{docstring -ANAU$bmvAmthP7L7xws4d}#
                         (vector
                           '(#(syntax-object
                               macro-type
@@ -24156,9 +24147,9 @@
                                #(ribcage
                                  #(k docstring keyword pattern template)
                                  #((top) (top) (top) (top) (top))
-                                 #("308" "309" "30a" "30b" "30c"))
+                                 #("1c3" "1c4" "1c5" "1c6" "1c7"))
                                #(ribcage () () ())
-                               #(ribcage #(x) #((top)) #("2zy")))
+                               #(ribcage #(x) #((top)) #("1bt")))
                               (hygiene guile))
                             .
                             #(syntax-object
@@ -24167,9 +24158,9 @@
                                #(ribcage
                                  #(k docstring keyword pattern template)
                                  #((top) (top) (top) (top) (top))
-                                 #("308" "309" "30a" "30b" "30c"))
+                                 #("1c3" "1c4" "1c5" "1c6" "1c7"))
                                #(ribcage () () ())
-                               #(ribcage #(x) #((top)) #("2zy")))
+                               #(ribcage #(x) #((top)) #("1bt")))
                               (hygiene guile)))
                           (cons '#(syntax-object
                                    patterns
@@ -24177,20 +24168,20 @@
                                     #(ribcage
                                       #(k docstring keyword pattern template)
                                       #((top) (top) (top) (top) (top))
-                                      #("308" "309" "30a" "30b" "30c"))
+                                      #("1c3" "1c4" "1c5" "1c6" "1c7"))
                                     #(ribcage () () ())
-                                    #(ribcage #(x) #((top)) #("2zy")))
+                                    #(ribcage #(x) #((top)) #("1bt")))
                                    (hygiene guile))
-                                #{pattern _hoQGWMnyQPAh3k2jhWMx$}#))
+                                #{pattern -ANAU$bmvAmthP7L7xws4f}#))
                         (cons '#(syntax-object
                                  syntax-case
                                  ((top)
                                   #(ribcage
                                     #(k docstring keyword pattern template)
                                     #((top) (top) (top) (top) (top))
-                                    #("308" "309" "30a" "30b" "30c"))
+                                    #("1c3" "1c4" "1c5" "1c6" "1c7"))
                                   #(ribcage () () ())
-                                  #(ribcage #(x) #((top)) #("2zy")))
+                                  #(ribcage #(x) #((top)) #("1bt")))
                                  (hygiene guile))
                               (cons '#(syntax-object
                                        x
@@ -24202,13 +24193,13 @@
                                             pattern
                                             template)
                                           #((top) (top) (top) (top) (top))
-                                          #("308" "309" "30a" "30b" "30c"))
+                                          #("1c3" "1c4" "1c5" "1c6" "1c7"))
                                         #(ribcage () () ())
-                                        #(ribcage #(x) #((top)) #("2zy")))
+                                        #(ribcage #(x) #((top)) #("1bt")))
                                        (hygiene guile))
-                                    (cons #{k _hoQGWMnyQPAh3k2jhWMx7}#
-                                          (map (lambda (#{tmp _hoQGWMnyQPAh3k2jhWMxl _hoQGWMnyQPAh3k2jhWMyA}#
-                                                        #{tmp _hoQGWMnyQPAh3k2jhWMxk _hoQGWMnyQPAh3k2jhWMyB}#)
+                                    (cons #{k -ANAU$bmvAmthP7L7xws4c}#
+                                          (map (lambda (#{tmp -ANAU$bmvAmthP7L7xws4G -ANAU$bmvAmthP7L7xws4h}#
+                                                        #{tmp -ANAU$bmvAmthP7L7xws4F -ANAU$bmvAmthP7L7xws4i}#)
                                                  (list (cons '#(syntax-object
                                                                 dummy
                                                                 ((top)
@@ -24223,11 +24214,11 @@
                                                                      (top)
                                                                      (top)
                                                                      (top))
-                                                                   #("308"
-                                                                     "309"
-                                                                     "30a"
-                                                                     "30b"
-                                                                     "30c"))
+                                                                   #("1c3"
+                                                                     "1c4"
+                                                                     "1c5"
+                                                                     "1c6"
+                                                                     "1c7"))
                                                                  #(ribcage
                                                                    ()
                                                                    ()
@@ -24235,10 +24226,10 @@
                                                                  #(ribcage
                                                                    #(x)
                                                                    #((top))
-                                                                   #("2zy")))
+                                                                   #("1bt")))
                                                                 (hygiene
                                                                   guile))
-                                                             #{tmp _hoQGWMnyQPAh3k2jhWMxk _hoQGWMnyQPAh3k2jhWMyB}#)
+                                                             #{tmp -ANAU$bmvAmthP7L7xws4F -ANAU$bmvAmthP7L7xws4i}#)
                                                        (list '#(syntax-object
                                                                 syntax
                                                                 ((top)
@@ -24253,11 +24244,11 @@
                                                                      (top)
                                                                      (top)
                                                                      (top))
-                                                                   #("308"
-                                                                     "309"
-                                                                     "30a"
-                                                                     "30b"
-                                                                     "30c"))
+                                                                   #("1c3"
+                                                                     "1c4"
+                                                                     "1c5"
+                                                                     "1c6"
+                                                                     "1c7"))
                                                                  #(ribcage
                                                                    ()
                                                                    ()
@@ -24265,52 +24256,52 @@
                                                                  #(ribcage
                                                                    #(x)
                                                                    #((top))
-                                                                   #("2zy")))
+                                                                   #("1bt")))
                                                                 (hygiene
                                                                   guile))
-                                                             #{tmp _hoQGWMnyQPAh3k2jhWMxl _hoQGWMnyQPAh3k2jhWMyA}#)))
-                                               #{template _hoQGWMnyQPAh3k2jhWMx@}#
-                                               #{pattern _hoQGWMnyQPAh3k2jhWMx$}#))))))
-                #{tmp _hoQGWMnyQPAh3k2jhWMxy}#)
+                                                             #{tmp -ANAU$bmvAmthP7L7xws4G -ANAU$bmvAmthP7L7xws4h}#)))
+                                               #{template -ANAU$bmvAmthP7L7xws4g}#
+                                               #{pattern -ANAU$bmvAmthP7L7xws4f}#))))))
+                #{tmp -ANAU$bmvAmthP7L7xws4T}#)
               (syntax-violation
                 #f
                 "source expression failed to match any pattern"
-                #{x _hoQGWMnyQPAh3k2jhWMxm}#))))))))
+                #{x -ANAU$bmvAmthP7L7xws4H}#))))))))
 
 (define define-syntax-rule
   (make-syntax-transformer
     'define-syntax-rule
     'macro
-    (lambda (#{x _hoQGWMnyQPAh3k2jhWMya}#)
-      (let ((#{tmp _hoQGWMnyQPAh3k2jhWMyc}#
+    (lambda (#{x -ANAU$bmvAmthP7L7xws47}#)
+      (let ((#{tmp -ANAU$bmvAmthP7L7xws49}#
               ($sc-dispatch
-                #{x _hoQGWMnyQPAh3k2jhWMya}#
+                #{x -ANAU$bmvAmthP7L7xws47}#
                 '(_ (any . any) any))))
-        (if #{tmp _hoQGWMnyQPAh3k2jhWMyc}#
+        (if #{tmp -ANAU$bmvAmthP7L7xws49}#
           (@apply
-            (lambda (#{name _hoQGWMnyQPAh3k2jhWMyg}#
-                     #{pattern _hoQGWMnyQPAh3k2jhWMyh}#
-                     #{template _hoQGWMnyQPAh3k2jhWMyi}#)
+            (lambda (#{name -ANAU$bmvAmthP7L7xws5B}#
+                     #{pattern -ANAU$bmvAmthP7L7xws5C}#
+                     #{template -ANAU$bmvAmthP7L7xws5D}#)
               (list '#(syntax-object
                        define-syntax
                        ((top)
                         #(ribcage
                           #(name pattern template)
                           #((top) (top) (top))
-                          #("30e" "30f" "30g"))
+                          #("1c9" "1ca" "1cb"))
                         #(ribcage () () ())
-                        #(ribcage #(x) #((top)) #("30d")))
+                        #(ribcage #(x) #((top)) #("1c8")))
                        (hygiene guile))
-                    #{name _hoQGWMnyQPAh3k2jhWMyg}#
+                    #{name -ANAU$bmvAmthP7L7xws5B}#
                     (list '#(syntax-object
                              syntax-rules
                              ((top)
                               #(ribcage
                                 #(name pattern template)
                                 #((top) (top) (top))
-                                #("30e" "30f" "30g"))
+                                #("1c9" "1ca" "1cb"))
                               #(ribcage () () ())
-                              #(ribcage #(x) #((top)) #("30d")))
+                              #(ribcage #(x) #((top)) #("1c8")))
                              (hygiene guile))
                           '()
                           (list (cons '#(syntax-object
@@ -24319,56 +24310,56 @@
                                           #(ribcage
                                             #(name pattern template)
                                             #((top) (top) (top))
-                                            #("30e" "30f" "30g"))
+                                            #("1c9" "1ca" "1cb"))
                                           #(ribcage () () ())
-                                          #(ribcage #(x) #((top)) #("30d")))
+                                          #(ribcage #(x) #((top)) #("1c8")))
                                          (hygiene guile))
-                                      #{pattern _hoQGWMnyQPAh3k2jhWMyh}#)
-                                #{template _hoQGWMnyQPAh3k2jhWMyi}#))))
-            #{tmp _hoQGWMnyQPAh3k2jhWMyc}#)
-          (let ((#{tmp _hoQGWMnyQPAh3k2jhWMyj}#
+                                      #{pattern -ANAU$bmvAmthP7L7xws5C}#)
+                                #{template -ANAU$bmvAmthP7L7xws5D}#))))
+            #{tmp -ANAU$bmvAmthP7L7xws49}#)
+          (let ((#{tmp -ANAU$bmvAmthP7L7xws5E}#
                   ($sc-dispatch
-                    #{x _hoQGWMnyQPAh3k2jhWMya}#
+                    #{x -ANAU$bmvAmthP7L7xws47}#
                     '(_ (any . any) any any))))
-            (if (if #{tmp _hoQGWMnyQPAh3k2jhWMyj}#
+            (if (if #{tmp -ANAU$bmvAmthP7L7xws5E}#
                   (@apply
-                    (lambda (#{name _hoQGWMnyQPAh3k2jhWMyn}#
-                             #{pattern _hoQGWMnyQPAh3k2jhWMyo}#
-                             #{docstring _hoQGWMnyQPAh3k2jhWMyp}#
-                             #{template _hoQGWMnyQPAh3k2jhWMyq}#)
+                    (lambda (#{name -ANAU$bmvAmthP7L7xws5I}#
+                             #{pattern -ANAU$bmvAmthP7L7xws5J}#
+                             #{docstring -ANAU$bmvAmthP7L7xws5K}#
+                             #{template -ANAU$bmvAmthP7L7xws5L}#)
                       (string?
                         (syntax->datum
-                          #{docstring _hoQGWMnyQPAh3k2jhWMyp}#)))
-                    #{tmp _hoQGWMnyQPAh3k2jhWMyj}#)
+                          #{docstring -ANAU$bmvAmthP7L7xws5K}#)))
+                    #{tmp -ANAU$bmvAmthP7L7xws5E}#)
                   #f)
               (@apply
-                (lambda (#{name _hoQGWMnyQPAh3k2jhWMyr}#
-                         #{pattern _hoQGWMnyQPAh3k2jhWMys}#
-                         #{docstring _hoQGWMnyQPAh3k2jhWMyt}#
-                         #{template _hoQGWMnyQPAh3k2jhWMyu}#)
+                (lambda (#{name -ANAU$bmvAmthP7L7xws5M}#
+                         #{pattern -ANAU$bmvAmthP7L7xws5N}#
+                         #{docstring -ANAU$bmvAmthP7L7xws5O}#
+                         #{template -ANAU$bmvAmthP7L7xws5P}#)
                   (list '#(syntax-object
                            define-syntax
                            ((top)
                             #(ribcage
                               #(name pattern docstring template)
                               #((top) (top) (top) (top))
-                              #("30l" "30m" "30n" "30o"))
+                              #("1cg" "1ch" "1ci" "1cj"))
                             #(ribcage () () ())
-                            #(ribcage #(x) #((top)) #("30d")))
+                            #(ribcage #(x) #((top)) #("1c8")))
                            (hygiene guile))
-                        #{name _hoQGWMnyQPAh3k2jhWMyr}#
+                        #{name -ANAU$bmvAmthP7L7xws5M}#
                         (list '#(syntax-object
                                  syntax-rules
                                  ((top)
                                   #(ribcage
                                     #(name pattern docstring template)
                                     #((top) (top) (top) (top))
-                                    #("30l" "30m" "30n" "30o"))
+                                    #("1cg" "1ch" "1ci" "1cj"))
                                   #(ribcage () () ())
-                                  #(ribcage #(x) #((top)) #("30d")))
+                                  #(ribcage #(x) #((top)) #("1c8")))
                                  (hygiene guile))
                               '()
-                              #{docstring _hoQGWMnyQPAh3k2jhWMyt}#
+                              #{docstring -ANAU$bmvAmthP7L7xws5O}#
                               (list (cons '#(syntax-object
                                              _
                                              ((top)
@@ -24378,52 +24369,52 @@
                                                   docstring
                                                   template)
                                                 #((top) (top) (top) (top))
-                                                #("30l" "30m" "30n" "30o"))
+                                                #("1cg" "1ch" "1ci" "1cj"))
                                               #(ribcage () () ())
                                               #(ribcage
                                                 #(x)
                                                 #((top))
-                                                #("30d")))
+                                                #("1c8")))
                                              (hygiene guile))
-                                          #{pattern _hoQGWMnyQPAh3k2jhWMys}#)
-                                    #{template _hoQGWMnyQPAh3k2jhWMyu}#))))
-                #{tmp _hoQGWMnyQPAh3k2jhWMyj}#)
+                                          #{pattern -ANAU$bmvAmthP7L7xws5N}#)
+                                    #{template -ANAU$bmvAmthP7L7xws5P}#))))
+                #{tmp -ANAU$bmvAmthP7L7xws5E}#)
               (syntax-violation
                 #f
                 "source expression failed to match any pattern"
-                #{x _hoQGWMnyQPAh3k2jhWMya}#))))))))
+                #{x -ANAU$bmvAmthP7L7xws47}#))))))))
 
 (define let*
   (make-syntax-transformer
     'let*
     'macro
-    (lambda (#{x _hoQGWMnyQPAh3k2jhWMzQ}#)
-      (let ((#{tmp _hoQGWMnyQPAh3k2jhWMzS}#
+    (lambda (#{x -ANAU$bmvAmthP7L7xws5x}#)
+      (let ((#{tmp -ANAU$bmvAmthP7L7xws5z}#
               ($sc-dispatch
-                #{x _hoQGWMnyQPAh3k2jhWMzQ}#
+                #{x -ANAU$bmvAmthP7L7xws5x}#
                 '(any #(each (any any)) any . each-any))))
-        (if (if #{tmp _hoQGWMnyQPAh3k2jhWMzS}#
+        (if (if #{tmp -ANAU$bmvAmthP7L7xws5z}#
               (@apply
-                (lambda (#{let* _hoQGWMnyQPAh3k2jhWMzW}#
-                         #{x _hoQGWMnyQPAh3k2jhWMzX}#
-                         #{v _hoQGWMnyQPAh3k2jhWMzY}#
-                         #{e1 _hoQGWMnyQPAh3k2jhWMzZ}#
-                         #{e2 _hoQGWMnyQPAh3k2jhWMza}#)
+                (lambda (#{let* -ANAU$bmvAmthP7L7xws53}#
+                         #{x -ANAU$bmvAmthP7L7xws54}#
+                         #{v -ANAU$bmvAmthP7L7xws55}#
+                         #{e1 -ANAU$bmvAmthP7L7xws56}#
+                         #{e2 -ANAU$bmvAmthP7L7xws57}#)
                   (and-map
                     identifier?
-                    #{x _hoQGWMnyQPAh3k2jhWMzX}#))
-                #{tmp _hoQGWMnyQPAh3k2jhWMzS}#)
+                    #{x -ANAU$bmvAmthP7L7xws54}#))
+                #{tmp -ANAU$bmvAmthP7L7xws5z}#)
               #f)
           (@apply
-            (lambda (#{let* _hoQGWMnyQPAh3k2jhWMzb}#
-                     #{x _hoQGWMnyQPAh3k2jhWMzc}#
-                     #{v _hoQGWMnyQPAh3k2jhWMzd}#
-                     #{e1 _hoQGWMnyQPAh3k2jhWMze}#
-                     #{e2 _hoQGWMnyQPAh3k2jhWMzf}#)
+            (lambda (#{let* -ANAU$bmvAmthP7L7xws58}#
+                     #{x -ANAU$bmvAmthP7L7xws59}#
+                     #{v -ANAU$bmvAmthP7L7xws5$}#
+                     #{e1 -ANAU$bmvAmthP7L7xws5@}#
+                     #{e2 -ANAU$bmvAmthP7L7xws6A}#)
               (letrec*
-                ((#{f _hoQGWMnyQPAh3k2jhWMzg}#
-                   (lambda (#{bindings _hoQGWMnyQPAh3k2jhWMzj}#)
-                     (if (null? #{bindings _hoQGWMnyQPAh3k2jhWMzj}#)
+                ((#{f -ANAU$bmvAmthP7L7xws6B}#
+                   (lambda (#{bindings -ANAU$bmvAmthP7L7xws6E}#)
+                     (if (null? #{bindings -ANAU$bmvAmthP7L7xws6E}#)
                        (cons '#(syntax-object
                                 let
                                 ((top)
@@ -24431,29 +24422,29 @@
                                  #(ribcage
                                    #(f bindings)
                                    #((top) (top))
-                                   #("310" "311"))
+                                   #("1cv" "1cw"))
                                  #(ribcage
                                    #(let* x v e1 e2)
                                    #((top) (top) (top) (top) (top))
-                                   #("30v" "30w" "30x" "30y" "30z"))
+                                   #("1cq" "1cr" "1cs" "1ct" "1cu"))
                                  #(ribcage () () ())
-                                 #(ribcage #(x) #((top)) #("30p")))
+                                 #(ribcage #(x) #((top)) #("1ck")))
                                 (hygiene guile))
                              (cons '()
-                                   (cons #{e1 _hoQGWMnyQPAh3k2jhWMze}#
-                                         #{e2 _hoQGWMnyQPAh3k2jhWMzf}#)))
-                       (let ((#{tmp _hoQGWMnyQPAh3k2jhWMzk}#
-                               (list (#{f _hoQGWMnyQPAh3k2jhWMzg}#
-                                       (cdr #{bindings _hoQGWMnyQPAh3k2jhWMzj}#))
-                                     (car #{bindings _hoQGWMnyQPAh3k2jhWMzj}#))))
-                         (let ((#{tmp _hoQGWMnyQPAh3k2jhWMzl}#
+                                   (cons #{e1 -ANAU$bmvAmthP7L7xws5@}#
+                                         #{e2 -ANAU$bmvAmthP7L7xws6A}#)))
+                       (let ((#{tmp -ANAU$bmvAmthP7L7xws6F}#
+                               (list (#{f -ANAU$bmvAmthP7L7xws6B}#
+                                       (cdr #{bindings -ANAU$bmvAmthP7L7xws6E}#))
+                                     (car #{bindings -ANAU$bmvAmthP7L7xws6E}#))))
+                         (let ((#{tmp -ANAU$bmvAmthP7L7xws6G}#
                                  ($sc-dispatch
-                                   #{tmp _hoQGWMnyQPAh3k2jhWMzk}#
+                                   #{tmp -ANAU$bmvAmthP7L7xws6F}#
                                    '(any any))))
-                           (if #{tmp _hoQGWMnyQPAh3k2jhWMzl}#
+                           (if #{tmp -ANAU$bmvAmthP7L7xws6G}#
                              (@apply
-                               (lambda (#{body _hoQGWMnyQPAh3k2jhWMzn}#
-                                        #{binding _hoQGWMnyQPAh3k2jhWMzo}#)
+                               (lambda (#{body -ANAU$bmvAmthP7L7xws6I}#
+                                        #{binding -ANAU$bmvAmthP7L7xws6J}#)
                                  (list '#(syntax-object
                                           let
                                           ((top)
@@ -24461,102 +24452,102 @@
                                            #(ribcage
                                              #(body binding)
                                              #((top) (top))
-                                             #("312" "313"))
+                                             #("1cx" "1cy"))
                                            #(ribcage () () ())
                                            #(ribcage
                                              #(f bindings)
                                              #((top) (top))
-                                             #("310" "311"))
+                                             #("1cv" "1cw"))
                                            #(ribcage
                                              #(let* x v e1 e2)
                                              #((top) (top) (top) (top) (top))
-                                             #("30v" "30w" "30x" "30y" "30z"))
+                                             #("1cq" "1cr" "1cs" "1ct" "1cu"))
                                            #(ribcage () () ())
-                                           #(ribcage #(x) #((top)) #("30p")))
+                                           #(ribcage #(x) #((top)) #("1ck")))
                                           (hygiene guile))
-                                       (list #{binding _hoQGWMnyQPAh3k2jhWMzo}#)
-                                       #{body _hoQGWMnyQPAh3k2jhWMzn}#))
-                               #{tmp _hoQGWMnyQPAh3k2jhWMzl}#)
+                                       (list #{binding -ANAU$bmvAmthP7L7xws6J}#)
+                                       #{body -ANAU$bmvAmthP7L7xws6I}#))
+                               #{tmp -ANAU$bmvAmthP7L7xws6G}#)
                              (syntax-violation
                                #f
                                "source expression failed to match any pattern"
-                               #{tmp _hoQGWMnyQPAh3k2jhWMzk}#))))))))
-                (#{f _hoQGWMnyQPAh3k2jhWMzg}#
+                               #{tmp -ANAU$bmvAmthP7L7xws6F}#))))))))
+                (#{f -ANAU$bmvAmthP7L7xws6B}#
                   (map list
-                       #{x _hoQGWMnyQPAh3k2jhWMzc}#
-                       #{v _hoQGWMnyQPAh3k2jhWMzd}#))))
-            #{tmp _hoQGWMnyQPAh3k2jhWMzS}#)
+                       #{x -ANAU$bmvAmthP7L7xws59}#
+                       #{v -ANAU$bmvAmthP7L7xws5$}#))))
+            #{tmp -ANAU$bmvAmthP7L7xws5z}#)
           (syntax-violation
             #f
             "source expression failed to match any pattern"
-            #{x _hoQGWMnyQPAh3k2jhWMzQ}#))))))
+            #{x -ANAU$bmvAmthP7L7xws5x}#))))))
 
 (define do
   (make-syntax-transformer
     'do
     'macro
-    (lambda (#{orig-x _hoQGWMnyQPAh3k2jhWM0U}#)
-      (let ((#{tmp _hoQGWMnyQPAh3k2jhWM0W}#
+    (lambda (#{orig-x -ANAU$bmvAmthP7L7xws61}#)
+      (let ((#{tmp -ANAU$bmvAmthP7L7xws63}#
               ($sc-dispatch
-                #{orig-x _hoQGWMnyQPAh3k2jhWM0U}#
+                #{orig-x -ANAU$bmvAmthP7L7xws61}#
                 '(_ #(each (any any . any))
                     (any . each-any)
                     .
                     each-any))))
-        (if #{tmp _hoQGWMnyQPAh3k2jhWM0W}#
+        (if #{tmp -ANAU$bmvAmthP7L7xws63}#
           (@apply
-            (lambda (#{var _hoQGWMnyQPAh3k2jhWM0a}#
-                     #{init _hoQGWMnyQPAh3k2jhWM0b}#
-                     #{step _hoQGWMnyQPAh3k2jhWM0c}#
-                     #{e0 _hoQGWMnyQPAh3k2jhWM0d}#
-                     #{e1 _hoQGWMnyQPAh3k2jhWM0e}#
-                     #{c _hoQGWMnyQPAh3k2jhWM0f}#)
-              (let ((#{tmp _hoQGWMnyQPAh3k2jhWM0g}#
-                      (map (lambda (#{v _hoQGWMnyQPAh3k2jhWM0j}#
-                                    #{s _hoQGWMnyQPAh3k2jhWM0k}#)
-                             (let ((#{tmp _hoQGWMnyQPAh3k2jhWM0m}#
+            (lambda (#{var -ANAU$bmvAmthP7L7xws67}#
+                     #{init -ANAU$bmvAmthP7L7xws68}#
+                     #{step -ANAU$bmvAmthP7L7xws69}#
+                     #{e0 -ANAU$bmvAmthP7L7xws6$}#
+                     #{e1 -ANAU$bmvAmthP7L7xws6@}#
+                     #{c -ANAU$bmvAmthP7L7xws7A}#)
+              (let ((#{tmp -ANAU$bmvAmthP7L7xws7B}#
+                      (map (lambda (#{v -ANAU$bmvAmthP7L7xws7E}#
+                                    #{s -ANAU$bmvAmthP7L7xws7F}#)
+                             (let ((#{tmp -ANAU$bmvAmthP7L7xws7H}#
                                      ($sc-dispatch
-                                       #{s _hoQGWMnyQPAh3k2jhWM0k}#
+                                       #{s -ANAU$bmvAmthP7L7xws7F}#
                                        '())))
-                               (if #{tmp _hoQGWMnyQPAh3k2jhWM0m}#
+                               (if #{tmp -ANAU$bmvAmthP7L7xws7H}#
                                  (@apply
-                                   (lambda () #{v _hoQGWMnyQPAh3k2jhWM0j}#)
-                                   #{tmp _hoQGWMnyQPAh3k2jhWM0m}#)
-                                 (let ((#{tmp _hoQGWMnyQPAh3k2jhWM0p}#
+                                   (lambda () #{v -ANAU$bmvAmthP7L7xws7E}#)
+                                   #{tmp -ANAU$bmvAmthP7L7xws7H}#)
+                                 (let ((#{tmp -ANAU$bmvAmthP7L7xws7K}#
                                          ($sc-dispatch
-                                           #{s _hoQGWMnyQPAh3k2jhWM0k}#
+                                           #{s -ANAU$bmvAmthP7L7xws7F}#
                                            '(any))))
-                                   (if #{tmp _hoQGWMnyQPAh3k2jhWM0p}#
+                                   (if #{tmp -ANAU$bmvAmthP7L7xws7K}#
                                      (@apply
-                                       (lambda (#{e _hoQGWMnyQPAh3k2jhWM0s}#)
-                                         #{e _hoQGWMnyQPAh3k2jhWM0s}#)
-                                       #{tmp _hoQGWMnyQPAh3k2jhWM0p}#)
+                                       (lambda (#{e -ANAU$bmvAmthP7L7xws7N}#)
+                                         #{e -ANAU$bmvAmthP7L7xws7N}#)
+                                       #{tmp -ANAU$bmvAmthP7L7xws7K}#)
                                      (syntax-violation
                                        'do
                                        "bad step expression"
-                                       #{orig-x _hoQGWMnyQPAh3k2jhWM0U}#
-                                       #{s _hoQGWMnyQPAh3k2jhWM0k}#))))))
-                           #{var _hoQGWMnyQPAh3k2jhWM0a}#
-                           #{step _hoQGWMnyQPAh3k2jhWM0c}#)))
-                (let ((#{tmp _hoQGWMnyQPAh3k2jhWM0h}#
+                                       #{orig-x -ANAU$bmvAmthP7L7xws61}#
+                                       #{s -ANAU$bmvAmthP7L7xws7F}#))))))
+                           #{var -ANAU$bmvAmthP7L7xws67}#
+                           #{step -ANAU$bmvAmthP7L7xws69}#)))
+                (let ((#{tmp -ANAU$bmvAmthP7L7xws7C}#
                         ($sc-dispatch
-                          #{tmp _hoQGWMnyQPAh3k2jhWM0g}#
+                          #{tmp -ANAU$bmvAmthP7L7xws7B}#
                           'each-any)))
-                  (if #{tmp _hoQGWMnyQPAh3k2jhWM0h}#
+                  (if #{tmp -ANAU$bmvAmthP7L7xws7C}#
                     (@apply
-                      (lambda (#{step _hoQGWMnyQPAh3k2jhWM0y}#)
-                        (let ((#{tmp _hoQGWMnyQPAh3k2jhWM00}#
+                      (lambda (#{step -ANAU$bmvAmthP7L7xws7T}#)
+                        (let ((#{tmp -ANAU$bmvAmthP7L7xws7V}#
                                 ($sc-dispatch
-                                  #{e1 _hoQGWMnyQPAh3k2jhWM0e}#
+                                  #{e1 -ANAU$bmvAmthP7L7xws6@}#
                                   '())))
-                          (if #{tmp _hoQGWMnyQPAh3k2jhWM00}#
+                          (if #{tmp -ANAU$bmvAmthP7L7xws7V}#
                             (@apply
                               (lambda ()
                                 (list '#(syntax-object
                                          let
                                          ((top)
                                           #(ribcage () () ())
-                                          #(ribcage #(step) #((top)) #("31b"))
+                                          #(ribcage #(step) #((top)) #("1d6"))
                                           #(ribcage
                                             #(var init step e0 e1 c)
                                             #((top)
@@ -24565,23 +24556,23 @@
                                               (top)
                                               (top)
                                               (top))
-                                            #("315"
-                                              "316"
-                                              "317"
-                                              "318"
-                                              "319"
-                                              "31a"))
+                                            #("1d0"
+                                              "1d1"
+                                              "1d2"
+                                              "1d3"
+                                              "1d4"
+                                              "1d5"))
                                           #(ribcage () () ())
                                           #(ribcage
                                             #(orig-x)
                                             #((top))
-                                            #("314")))
+                                            #("1cz")))
                                          (hygiene guile))
                                       '#(syntax-object
                                          doloop
                                          ((top)
                                           #(ribcage () () ())
-                                          #(ribcage #(step) #((top)) #("31b"))
+                                          #(ribcage #(step) #((top)) #("1d6"))
                                           #(ribcage
                                             #(var init step e0 e1 c)
                                             #((top)
@@ -24590,21 +24581,21 @@
                                               (top)
                                               (top)
                                               (top))
-                                            #("315"
-                                              "316"
-                                              "317"
-                                              "318"
-                                              "319"
-                                              "31a"))
+                                            #("1d0"
+                                              "1d1"
+                                              "1d2"
+                                              "1d3"
+                                              "1d4"
+                                              "1d5"))
                                           #(ribcage () () ())
                                           #(ribcage
                                             #(orig-x)
                                             #((top))
-                                            #("314")))
+                                            #("1cz")))
                                          (hygiene guile))
                                       (map list
-                                           #{var _hoQGWMnyQPAh3k2jhWM0a}#
-                                           #{init _hoQGWMnyQPAh3k2jhWM0b}#)
+                                           #{var -ANAU$bmvAmthP7L7xws67}#
+                                           #{init -ANAU$bmvAmthP7L7xws68}#)
                                       (list '#(syntax-object
                                                if
                                                ((top)
@@ -24612,7 +24603,7 @@
                                                 #(ribcage
                                                   #(step)
                                                   #((top))
-                                                  #("31b"))
+                                                  #("1d6"))
                                                 #(ribcage
                                                   #(var init step e0 e1 c)
                                                   #((top)
@@ -24621,17 +24612,17 @@
                                                     (top)
                                                     (top)
                                                     (top))
-                                                  #("315"
-                                                    "316"
-                                                    "317"
-                                                    "318"
-                                                    "319"
-                                                    "31a"))
+                                                  #("1d0"
+                                                    "1d1"
+                                                    "1d2"
+                                                    "1d3"
+                                                    "1d4"
+                                                    "1d5"))
                                                 #(ribcage () () ())
                                                 #(ribcage
                                                   #(orig-x)
                                                   #((top))
-                                                  #("314")))
+                                                  #("1cz")))
                                                (hygiene guile))
                                             (list '#(syntax-object
                                                      not
@@ -24640,7 +24631,7 @@
                                                       #(ribcage
                                                         #(step)
                                                         #((top))
-                                                        #("31b"))
+                                                        #("1d6"))
                                                       #(ribcage
                                                         #(var
                                                           init
@@ -24654,19 +24645,19 @@
                                                           (top)
                                                           (top)
                                                           (top))
-                                                        #("315"
-                                                          "316"
-                                                          "317"
-                                                          "318"
-                                                          "319"
-                                                          "31a"))
+                                                        #("1d0"
+                                                          "1d1"
+                                                          "1d2"
+                                                          "1d3"
+                                                          "1d4"
+                                                          "1d5"))
                                                       #(ribcage () () ())
                                                       #(ribcage
                                                         #(orig-x)
                                                         #((top))
-                                                        #("314")))
+                                                        #("1cz")))
                                                      (hygiene guile))
-                                                  #{e0 _hoQGWMnyQPAh3k2jhWM0d}#)
+                                                  #{e0 -ANAU$bmvAmthP7L7xws6$}#)
                                             (cons '#(syntax-object
                                                      begin
                                                      ((top)
@@ -24674,7 +24665,7 @@
                                                       #(ribcage
                                                         #(step)
                                                         #((top))
-                                                        #("31b"))
+                                                        #("1d6"))
                                                       #(ribcage
                                                         #(var
                                                           init
@@ -24688,20 +24679,20 @@
                                                           (top)
                                                           (top)
                                                           (top))
-                                                        #("315"
-                                                          "316"
-                                                          "317"
-                                                          "318"
-                                                          "319"
-                                                          "31a"))
+                                                        #("1d0"
+                                                          "1d1"
+                                                          "1d2"
+                                                          "1d3"
+                                                          "1d4"
+                                                          "1d5"))
                                                       #(ribcage () () ())
                                                       #(ribcage
                                                         #(orig-x)
                                                         #((top))
-                                                        #("314")))
+                                                        #("1cz")))
                                                      (hygiene guile))
                                                   (append
-                                                    #{c _hoQGWMnyQPAh3k2jhWM0f}#
+                                                    #{c -ANAU$bmvAmthP7L7xws7A}#
                                                     (list (cons '#(syntax-object
                                                                    doloop
                                                                    ((top)
@@ -24712,7 +24703,7 @@
                                                                     #(ribcage
                                                                       #(step)
                                                                       #((top))
-                                                                      #("31b"))
+                                                                      #("1d6"))
                                                                     #(ribcage
                                                                       #(var
                                                                         init
@@ -24726,12 +24717,12 @@
                                                                         (top)
                                                                         (top)
                                                                         (top))
-                                                                      #("315"
-                                                                        "316"
-                                                                        "317"
-                                                                        "318"
-                                                                        "319"
-                                                                        "31a"))
+                                                                      #("1d0"
+                                                                        "1d1"
+                                                                        "1d2"
+                                                                        "1d3"
+                                                                        "1d4"
+                                                                        "1d5"))
                                                                     #(ribcage
                                                                       ()
                                                                       ()
@@ -24739,31 +24730,31 @@
                                                                     #(ribcage
                                                                       #(orig-x)
                                                                       #((top))
-                                                                      #("314")))
+                                                                      #("1cz")))
                                                                    (hygiene
                                                                      guile))
-                                                                #{step _hoQGWMnyQPAh3k2jhWM0y}#)))))))
-                              #{tmp _hoQGWMnyQPAh3k2jhWM00}#)
-                            (let ((#{tmp _hoQGWMnyQPAh3k2jhWM04}#
+                                                                #{step -ANAU$bmvAmthP7L7xws7T}#)))))))
+                              #{tmp -ANAU$bmvAmthP7L7xws7V}#)
+                            (let ((#{tmp -ANAU$bmvAmthP7L7xws7Z}#
                                     ($sc-dispatch
-                                      #{e1 _hoQGWMnyQPAh3k2jhWM0e}#
+                                      #{e1 -ANAU$bmvAmthP7L7xws6@}#
                                       '(any . each-any))))
-                              (if #{tmp _hoQGWMnyQPAh3k2jhWM04}#
+                              (if #{tmp -ANAU$bmvAmthP7L7xws7Z}#
                                 (@apply
-                                  (lambda (#{e1 _hoQGWMnyQPAh3k2jhWM08}#
-                                           #{e2 _hoQGWMnyQPAh3k2jhWM09}#)
+                                  (lambda (#{e1 -ANAU$bmvAmthP7L7xws7d}#
+                                           #{e2 -ANAU$bmvAmthP7L7xws7e}#)
                                     (list '#(syntax-object
                                              let
                                              ((top)
                                               #(ribcage
                                                 #(e1 e2)
                                                 #((top) (top))
-                                                #("31c" "31d"))
+                                                #("1d7" "1d8"))
                                               #(ribcage () () ())
                                               #(ribcage
                                                 #(step)
                                                 #((top))
-                                                #("31b"))
+                                                #("1d6"))
                                               #(ribcage
                                                 #(var init step e0 e1 c)
                                                 #((top)
@@ -24772,17 +24763,17 @@
                                                   (top)
                                                   (top)
                                                   (top))
-                                                #("315"
-                                                  "316"
-                                                  "317"
-                                                  "318"
-                                                  "319"
-                                                  "31a"))
+                                                #("1d0"
+                                                  "1d1"
+                                                  "1d2"
+                                                  "1d3"
+                                                  "1d4"
+                                                  "1d5"))
                                               #(ribcage () () ())
                                               #(ribcage
                                                 #(orig-x)
                                                 #((top))
-                                                #("314")))
+                                                #("1cz")))
                                              (hygiene guile))
                                           '#(syntax-object
                                              doloop
@@ -24790,12 +24781,12 @@
                                               #(ribcage
                                                 #(e1 e2)
                                                 #((top) (top))
-                                                #("31c" "31d"))
+                                                #("1d7" "1d8"))
                                               #(ribcage () () ())
                                               #(ribcage
                                                 #(step)
                                                 #((top))
-                                                #("31b"))
+                                                #("1d6"))
                                               #(ribcage
                                                 #(var init step e0 e1 c)
                                                 #((top)
@@ -24804,33 +24795,33 @@
                                                   (top)
                                                   (top)
                                                   (top))
-                                                #("315"
-                                                  "316"
-                                                  "317"
-                                                  "318"
-                                                  "319"
-                                                  "31a"))
+                                                #("1d0"
+                                                  "1d1"
+                                                  "1d2"
+                                                  "1d3"
+                                                  "1d4"
+                                                  "1d5"))
                                               #(ribcage () () ())
                                               #(ribcage
                                                 #(orig-x)
                                                 #((top))
-                                                #("314")))
+                                                #("1cz")))
                                              (hygiene guile))
                                           (map list
-                                               #{var _hoQGWMnyQPAh3k2jhWM0a}#
-                                               #{init _hoQGWMnyQPAh3k2jhWM0b}#)
+                                               #{var -ANAU$bmvAmthP7L7xws67}#
+                                               #{init -ANAU$bmvAmthP7L7xws68}#)
                                           (list '#(syntax-object
                                                    if
                                                    ((top)
                                                     #(ribcage
                                                       #(e1 e2)
                                                       #((top) (top))
-                                                      #("31c" "31d"))
+                                                      #("1d7" "1d8"))
                                                     #(ribcage () () ())
                                                     #(ribcage
                                                       #(step)
                                                       #((top))
-                                                      #("31b"))
+                                                      #("1d6"))
                                                     #(ribcage
                                                       #(var init step e0 e1 c)
                                                       #((top)
@@ -24839,31 +24830,31 @@
                                                         (top)
                                                         (top)
                                                         (top))
-                                                      #("315"
-                                                        "316"
-                                                        "317"
-                                                        "318"
-                                                        "319"
-                                                        "31a"))
+                                                      #("1d0"
+                                                        "1d1"
+                                                        "1d2"
+                                                        "1d3"
+                                                        "1d4"
+                                                        "1d5"))
                                                     #(ribcage () () ())
                                                     #(ribcage
                                                       #(orig-x)
                                                       #((top))
-                                                      #("314")))
+                                                      #("1cz")))
                                                    (hygiene guile))
-                                                #{e0 _hoQGWMnyQPAh3k2jhWM0d}#
+                                                #{e0 -ANAU$bmvAmthP7L7xws6$}#
                                                 (cons '#(syntax-object
                                                          begin
                                                          ((top)
                                                           #(ribcage
                                                             #(e1 e2)
                                                             #((top) (top))
-                                                            #("31c" "31d"))
+                                                            #("1d7" "1d8"))
                                                           #(ribcage () () ())
                                                           #(ribcage
                                                             #(step)
                                                             #((top))
-                                                            #("31b"))
+                                                            #("1d6"))
                                                           #(ribcage
                                                             #(var
                                                               init
@@ -24877,32 +24868,32 @@
                                                               (top)
                                                               (top)
                                                               (top))
-                                                            #("315"
-                                                              "316"
-                                                              "317"
-                                                              "318"
-                                                              "319"
-                                                              "31a"))
+                                                            #("1d0"
+                                                              "1d1"
+                                                              "1d2"
+                                                              "1d3"
+                                                              "1d4"
+                                                              "1d5"))
                                                           #(ribcage () () ())
                                                           #(ribcage
                                                             #(orig-x)
                                                             #((top))
-                                                            #("314")))
+                                                            #("1cz")))
                                                          (hygiene guile))
-                                                      (cons #{e1 _hoQGWMnyQPAh3k2jhWM08}#
-                                                            #{e2 _hoQGWMnyQPAh3k2jhWM09}#))
+                                                      (cons #{e1 -ANAU$bmvAmthP7L7xws7d}#
+                                                            #{e2 -ANAU$bmvAmthP7L7xws7e}#))
                                                 (cons '#(syntax-object
                                                          begin
                                                          ((top)
                                                           #(ribcage
                                                             #(e1 e2)
                                                             #((top) (top))
-                                                            #("31c" "31d"))
+                                                            #("1d7" "1d8"))
                                                           #(ribcage () () ())
                                                           #(ribcage
                                                             #(step)
                                                             #((top))
-                                                            #("31b"))
+                                                            #("1d6"))
                                                           #(ribcage
                                                             #(var
                                                               init
@@ -24916,20 +24907,20 @@
                                                               (top)
                                                               (top)
                                                               (top))
-                                                            #("315"
-                                                              "316"
-                                                              "317"
-                                                              "318"
-                                                              "319"
-                                                              "31a"))
+                                                            #("1d0"
+                                                              "1d1"
+                                                              "1d2"
+                                                              "1d3"
+                                                              "1d4"
+                                                              "1d5"))
                                                           #(ribcage () () ())
                                                           #(ribcage
                                                             #(orig-x)
                                                             #((top))
-                                                            #("314")))
+                                                            #("1cz")))
                                                          (hygiene guile))
                                                       (append
-                                                        #{c _hoQGWMnyQPAh3k2jhWM0f}#
+                                                        #{c -ANAU$bmvAmthP7L7xws7A}#
                                                         (list (cons '#(syntax-object
                                                                        doloop
                                                                        ((top)
@@ -24938,8 +24929,8 @@
                                                                             e2)
                                                                           #((top)
                                                                             (top))
-                                                                          #("31c"
-                                                                            "31d"))
+                                                                          #("1d7"
+                                                                            "1d8"))
                                                                         #(ribcage
                                                                           ()
                                                                           ()
@@ -24947,7 +24938,7 @@
                                                                         #(ribcage
                                                                           #(step)
                                                                           #((top))
-                                                                          #("31b"))
+                                                                          #("1d6"))
                                                                         #(ribcage
                                                                           #(var
                                                                             init
@@ -24961,12 +24952,12 @@
                                                                             (top)
                                                                             (top)
                                                                             (top))
-                                                                          #("315"
-                                                                            "316"
-                                                                            "317"
-                                                                            "318"
-                                                                            "319"
-                                                                            "31a"))
+                                                                          #("1d0"
+                                                                            "1d1"
+                                                                            "1d2"
+                                                                            "1d3"
+                                                                            "1d4"
+                                                                            "1d5"))
                                                                         #(ribcage
                                                                           ()
                                                                           ()
@@ -24974,43 +24965,43 @@
                                                                         #(ribcage
                                                                           #(orig-x)
                                                                           #((top))
-                                                                          #("314")))
+                                                                          #("1cz")))
                                                                        (hygiene
                                                                          guile))
-                                                                    #{step _hoQGWMnyQPAh3k2jhWM0y}#)))))))
-                                  #{tmp _hoQGWMnyQPAh3k2jhWM04}#)
+                                                                    #{step -ANAU$bmvAmthP7L7xws7T}#)))))))
+                                  #{tmp -ANAU$bmvAmthP7L7xws7Z}#)
                                 (syntax-violation
                                   #f
                                   "source expression failed to match any pattern"
-                                  #{e1 _hoQGWMnyQPAh3k2jhWM0e}#))))))
-                      #{tmp _hoQGWMnyQPAh3k2jhWM0h}#)
+                                  #{e1 -ANAU$bmvAmthP7L7xws6@}#))))))
+                      #{tmp -ANAU$bmvAmthP7L7xws7C}#)
                     (syntax-violation
                       #f
                       "source expression failed to match any pattern"
-                      #{tmp _hoQGWMnyQPAh3k2jhWM0g}#)))))
-            #{tmp _hoQGWMnyQPAh3k2jhWM0W}#)
+                      #{tmp -ANAU$bmvAmthP7L7xws7B}#)))))
+            #{tmp -ANAU$bmvAmthP7L7xws63}#)
           (syntax-violation
             #f
             "source expression failed to match any pattern"
-            #{orig-x _hoQGWMnyQPAh3k2jhWM0U}#))))))
+            #{orig-x -ANAU$bmvAmthP7L7xws61}#))))))
 
 (define quasiquote
   (make-syntax-transformer
     'quasiquote
     'macro
     (letrec*
-      ((#{quasi _hoQGWMnyQPAh3k2jhWM4M}#
-         (lambda (#{p _hoQGWMnyQPAh3k2jhWM4k}#
-                  #{lev _hoQGWMnyQPAh3k2jhWM4l}#)
-           (let ((#{tmp _hoQGWMnyQPAh3k2jhWM4n}#
+      ((#{quasi -ANAU$bmvAmthP7L7xws$t}#
+         (lambda (#{p -ANAU$bmvAmthP7L7xws@F}#
+                  #{lev -ANAU$bmvAmthP7L7xws@G}#)
+           (let ((#{tmp -ANAU$bmvAmthP7L7xws@I}#
                    ($sc-dispatch
-                     #{p _hoQGWMnyQPAh3k2jhWM4k}#
+                     #{p -ANAU$bmvAmthP7L7xws@F}#
                      '(#(free-id
                          #(syntax-object
                            unquote
                            ((top)
                             #(ribcage () () ())
-                            #(ribcage #(p lev) #((top) (top)) #("31p" "31q"))
+                            #(ribcage #(p lev) #((top) (top)) #("1dk" "1dl"))
                             #(ribcage
                               (emit quasivector
                                     quasilist*
@@ -25019,22 +25010,22 @@
                                     vquasi
                                     quasi)
                               ((top) (top) (top) (top) (top) (top) (top))
-                              ("31o" "31n" "31m" "31l" "31k" "31j" "31i")))
+                              ("1dj" "1di" "1dh" "1dg" "1df" "1de" "1dd")))
                            (hygiene guile)))
                        any))))
-             (if #{tmp _hoQGWMnyQPAh3k2jhWM4n}#
+             (if #{tmp -ANAU$bmvAmthP7L7xws@I}#
                (@apply
-                 (lambda (#{p _hoQGWMnyQPAh3k2jhWM4r}#)
-                   (if (= #{lev _hoQGWMnyQPAh3k2jhWM4l}# 0)
+                 (lambda (#{p -ANAU$bmvAmthP7L7xws@M}#)
+                   (if (= #{lev -ANAU$bmvAmthP7L7xws@G}# 0)
                      (list '#(syntax-object
                               "value"
                               ((top)
-                               #(ribcage #(p) #((top)) #("31r"))
+                               #(ribcage #(p) #((top)) #("1dm"))
                                #(ribcage () () ())
                                #(ribcage
                                  #(p lev)
                                  #((top) (top))
-                                 #("31p" "31q"))
+                                 #("1dk" "1dl"))
                                #(ribcage
                                  (emit quasivector
                                        quasilist*
@@ -25043,16 +25034,16 @@
                                        vquasi
                                        quasi)
                                  ((top) (top) (top) (top) (top) (top) (top))
-                                 ("31o" "31n" "31m" "31l" "31k" "31j" "31i")))
+                                 ("1dj" "1di" "1dh" "1dg" "1df" "1de" "1dd")))
                               (hygiene guile))
-                           #{p _hoQGWMnyQPAh3k2jhWM4r}#)
-                     (#{quasicons _hoQGWMnyQPAh3k2jhWM4O}#
+                           #{p -ANAU$bmvAmthP7L7xws@M}#)
+                     (#{quasicons -ANAU$bmvAmthP7L7xws$v}#
                        '(#(syntax-object
                            "quote"
                            ((top)
-                            #(ribcage #(p) #((top)) #("31r"))
+                            #(ribcage #(p) #((top)) #("1dm"))
                             #(ribcage () () ())
-                            #(ribcage #(p lev) #((top) (top)) #("31p" "31q"))
+                            #(ribcage #(p lev) #((top) (top)) #("1dk" "1dl"))
                             #(ribcage
                               (emit quasivector
                                     quasilist*
@@ -25061,14 +25052,14 @@
                                     vquasi
                                     quasi)
                               ((top) (top) (top) (top) (top) (top) (top))
-                              ("31o" "31n" "31m" "31l" "31k" "31j" "31i")))
+                              ("1dj" "1di" "1dh" "1dg" "1df" "1de" "1dd")))
                            (hygiene guile))
                          #(syntax-object
                            unquote
                            ((top)
-                            #(ribcage #(p) #((top)) #("31r"))
+                            #(ribcage #(p) #((top)) #("1dm"))
                             #(ribcage () () ())
-                            #(ribcage #(p lev) #((top) (top)) #("31p" "31q"))
+                            #(ribcage #(p lev) #((top) (top)) #("1dk" "1dl"))
                             #(ribcage
                               (emit quasivector
                                     quasilist*
@@ -25077,15 +25068,15 @@
                                     vquasi
                                     quasi)
                               ((top) (top) (top) (top) (top) (top) (top))
-                              ("31o" "31n" "31m" "31l" "31k" "31j" "31i")))
+                              ("1dj" "1di" "1dh" "1dg" "1df" "1de" "1dd")))
                            (hygiene guile)))
-                       (#{quasi _hoQGWMnyQPAh3k2jhWM4M}#
-                         (list #{p _hoQGWMnyQPAh3k2jhWM4r}#)
-                         (#{1-}# #{lev _hoQGWMnyQPAh3k2jhWM4l}#)))))
-                 #{tmp _hoQGWMnyQPAh3k2jhWM4n}#)
-               (let ((#{tmp _hoQGWMnyQPAh3k2jhWM4u}#
+                       (#{quasi -ANAU$bmvAmthP7L7xws$t}#
+                         (list #{p -ANAU$bmvAmthP7L7xws@M}#)
+                         (#{1-}# #{lev -ANAU$bmvAmthP7L7xws@G}#)))))
+                 #{tmp -ANAU$bmvAmthP7L7xws@I}#)
+               (let ((#{tmp -ANAU$bmvAmthP7L7xws@P}#
                        ($sc-dispatch
-                         #{p _hoQGWMnyQPAh3k2jhWM4k}#
+                         #{p -ANAU$bmvAmthP7L7xws@F}#
                          '(#(free-id
                              #(syntax-object
                                quasiquote
@@ -25094,7 +25085,7 @@
                                 #(ribcage
                                   #(p lev)
                                   #((top) (top))
-                                  #("31p" "31q"))
+                                  #("1dk" "1dl"))
                                 #(ribcage
                                   (emit quasivector
                                         quasilist*
@@ -25103,19 +25094,19 @@
                                         vquasi
                                         quasi)
                                   ((top) (top) (top) (top) (top) (top) (top))
-                                  ("31o" "31n" "31m" "31l" "31k" "31j" "31i")))
+                                  ("1dj" "1di" "1dh" "1dg" "1df" "1de" "1dd")))
                                (hygiene guile)))
                            any))))
-                 (if #{tmp _hoQGWMnyQPAh3k2jhWM4u}#
+                 (if #{tmp -ANAU$bmvAmthP7L7xws@P}#
                    (@apply
-                     (lambda (#{p _hoQGWMnyQPAh3k2jhWM4y}#)
-                       (#{quasicons _hoQGWMnyQPAh3k2jhWM4O}#
+                     (lambda (#{p -ANAU$bmvAmthP7L7xws@T}#)
+                       (#{quasicons -ANAU$bmvAmthP7L7xws$v}#
                          '(#(syntax-object
                              "quote"
                              ((top)
-                              #(ribcage #(p) #((top)) #("31s"))
+                              #(ribcage #(p) #((top)) #("1dn"))
                               #(ribcage () () ())
-                              #(ribcage #(p lev) #((top) (top)) #("31p" "31q"))
+                              #(ribcage #(p lev) #((top) (top)) #("1dk" "1dl"))
                               #(ribcage
                                 (emit quasivector
                                       quasilist*
@@ -25124,14 +25115,14 @@
                                       vquasi
                                       quasi)
                                 ((top) (top) (top) (top) (top) (top) (top))
-                                ("31o" "31n" "31m" "31l" "31k" "31j" "31i")))
+                                ("1dj" "1di" "1dh" "1dg" "1df" "1de" "1dd")))
                              (hygiene guile))
                            #(syntax-object
                              quasiquote
                              ((top)
-                              #(ribcage #(p) #((top)) #("31s"))
+                              #(ribcage #(p) #((top)) #("1dn"))
                               #(ribcage () () ())
-                              #(ribcage #(p lev) #((top) (top)) #("31p" "31q"))
+                              #(ribcage #(p lev) #((top) (top)) #("1dk" "1dl"))
                               #(ribcage
                                 (emit quasivector
                                       quasilist*
@@ -25140,23 +25131,23 @@
                                       vquasi
                                       quasi)
                                 ((top) (top) (top) (top) (top) (top) (top))
-                                ("31o" "31n" "31m" "31l" "31k" "31j" "31i")))
+                                ("1dj" "1di" "1dh" "1dg" "1df" "1de" "1dd")))
                              (hygiene guile)))
-                         (#{quasi _hoQGWMnyQPAh3k2jhWM4M}#
-                           (list #{p _hoQGWMnyQPAh3k2jhWM4y}#)
-                           (#{1+}# #{lev _hoQGWMnyQPAh3k2jhWM4l}#))))
-                     #{tmp _hoQGWMnyQPAh3k2jhWM4u}#)
-                   (let ((#{tmp _hoQGWMnyQPAh3k2jhWM41}#
+                         (#{quasi -ANAU$bmvAmthP7L7xws$t}#
+                           (list #{p -ANAU$bmvAmthP7L7xws@T}#)
+                           (#{1+}# #{lev -ANAU$bmvAmthP7L7xws@G}#))))
+                     #{tmp -ANAU$bmvAmthP7L7xws@P}#)
+                   (let ((#{tmp -ANAU$bmvAmthP7L7xws@W}#
                            ($sc-dispatch
-                             #{p _hoQGWMnyQPAh3k2jhWM4k}#
+                             #{p -ANAU$bmvAmthP7L7xws@F}#
                              '(any . any))))
-                     (if #{tmp _hoQGWMnyQPAh3k2jhWM41}#
+                     (if #{tmp -ANAU$bmvAmthP7L7xws@W}#
                        (@apply
-                         (lambda (#{p _hoQGWMnyQPAh3k2jhWM45}#
-                                  #{q _hoQGWMnyQPAh3k2jhWM46}#)
-                           (let ((#{tmp _hoQGWMnyQPAh3k2jhWM48}#
+                         (lambda (#{p -ANAU$bmvAmthP7L7xws@a}#
+                                  #{q -ANAU$bmvAmthP7L7xws@b}#)
+                           (let ((#{tmp -ANAU$bmvAmthP7L7xws@d}#
                                    ($sc-dispatch
-                                     #{p _hoQGWMnyQPAh3k2jhWM45}#
+                                     #{p -ANAU$bmvAmthP7L7xws@a}#
                                      '(#(free-id
                                          #(syntax-object
                                            unquote
@@ -25164,12 +25155,12 @@
                                             #(ribcage
                                               #(p q)
                                               #((top) (top))
-                                              #("31t" "31u"))
+                                              #("1do" "1dp"))
                                             #(ribcage () () ())
                                             #(ribcage
                                               #(p lev)
                                               #((top) (top))
-                                              #("31p" "31q"))
+                                              #("1dk" "1dl"))
                                             #(ribcage
                                               (emit quasivector
                                                     quasilist*
@@ -25184,38 +25175,38 @@
                                                (top)
                                                (top)
                                                (top))
-                                              ("31o"
-                                               "31n"
-                                               "31m"
-                                               "31l"
-                                               "31k"
-                                               "31j"
-                                               "31i")))
+                                              ("1dj"
+                                               "1di"
+                                               "1dh"
+                                               "1dg"
+                                               "1df"
+                                               "1de"
+                                               "1dd")))
                                            (hygiene guile)))
                                        .
                                        each-any))))
-                             (if #{tmp _hoQGWMnyQPAh3k2jhWM48}#
+                             (if #{tmp -ANAU$bmvAmthP7L7xws@d}#
                                (@apply
-                                 (lambda (#{p _hoQGWMnyQPAh3k2jhWM5A}#)
-                                   (if (= #{lev _hoQGWMnyQPAh3k2jhWM4l}# 0)
-                                     (#{quasilist* _hoQGWMnyQPAh3k2jhWM4Q}#
-                                       (map (lambda (#{tmp _hoQGWMnyQPAh3k2jhWM1h _hoQGWMnyQPAh3k2jhWM5k}#)
+                                 (lambda (#{p -ANAU$bmvAmthP7L7xws@h}#)
+                                   (if (= #{lev -ANAU$bmvAmthP7L7xws@G}# 0)
+                                     (#{quasilist* -ANAU$bmvAmthP7L7xws$x}#
+                                       (map (lambda (#{tmp -ANAU$bmvAmthP7L7xws8C -ANAU$bmvAmthP7L7xwtAF}#)
                                               (list '#(syntax-object
                                                        "value"
                                                        ((top)
                                                         #(ribcage
                                                           #(p)
                                                           #((top))
-                                                          #("31v"))
+                                                          #("1dq"))
                                                         #(ribcage
                                                           #(p q)
                                                           #((top) (top))
-                                                          #("31t" "31u"))
+                                                          #("1do" "1dp"))
                                                         #(ribcage () () ())
                                                         #(ribcage
                                                           #(p lev)
                                                           #((top) (top))
-                                                          #("31p" "31q"))
+                                                          #("1dk" "1dl"))
                                                         #(ribcage
                                                           (emit quasivector
                                                                 quasilist*
@@ -25230,34 +25221,34 @@
                                                            (top)
                                                            (top)
                                                            (top))
-                                                          ("31o"
-                                                           "31n"
-                                                           "31m"
-                                                           "31l"
-                                                           "31k"
-                                                           "31j"
-                                                           "31i")))
+                                                          ("1dj"
+                                                           "1di"
+                                                           "1dh"
+                                                           "1dg"
+                                                           "1df"
+                                                           "1de"
+                                                           "1dd")))
                                                        (hygiene guile))
-                                                    #{tmp _hoQGWMnyQPAh3k2jhWM1h _hoQGWMnyQPAh3k2jhWM5k}#))
-                                            #{p _hoQGWMnyQPAh3k2jhWM5A}#)
-                                       (#{quasi _hoQGWMnyQPAh3k2jhWM4M}#
-                                         #{q _hoQGWMnyQPAh3k2jhWM46}#
-                                         #{lev _hoQGWMnyQPAh3k2jhWM4l}#))
-                                     (#{quasicons _hoQGWMnyQPAh3k2jhWM4O}#
-                                       (#{quasicons _hoQGWMnyQPAh3k2jhWM4O}#
+                                                    #{tmp -ANAU$bmvAmthP7L7xws8C -ANAU$bmvAmthP7L7xwtAF}#))
+                                            #{p -ANAU$bmvAmthP7L7xws@h}#)
+                                       (#{quasi -ANAU$bmvAmthP7L7xws$t}#
+                                         #{q -ANAU$bmvAmthP7L7xws@b}#
+                                         #{lev -ANAU$bmvAmthP7L7xws@G}#))
+                                     (#{quasicons -ANAU$bmvAmthP7L7xws$v}#
+                                       (#{quasicons -ANAU$bmvAmthP7L7xws$v}#
                                          '(#(syntax-object
                                              "quote"
                                              ((top)
-                                              #(ribcage #(p) #((top)) #("31v"))
+                                              #(ribcage #(p) #((top)) #("1dq"))
                                               #(ribcage
                                                 #(p q)
                                                 #((top) (top))
-                                                #("31t" "31u"))
+                                                #("1do" "1dp"))
                                               #(ribcage () () ())
                                               #(ribcage
                                                 #(p lev)
                                                 #((top) (top))
-                                                #("31p" "31q"))
+                                                #("1dk" "1dl"))
                                               #(ribcage
                                                 (emit quasivector
                                                       quasilist*
@@ -25272,27 +25263,27 @@
                                                  (top)
                                                  (top)
                                                  (top))
-                                                ("31o"
-                                                 "31n"
-                                                 "31m"
-                                                 "31l"
-                                                 "31k"
-                                                 "31j"
-                                                 "31i")))
+                                                ("1dj"
+                                                 "1di"
+                                                 "1dh"
+                                                 "1dg"
+                                                 "1df"
+                                                 "1de"
+                                                 "1dd")))
                                              (hygiene guile))
                                            #(syntax-object
                                              unquote
                                              ((top)
-                                              #(ribcage #(p) #((top)) #("31v"))
+                                              #(ribcage #(p) #((top)) #("1dq"))
                                               #(ribcage
                                                 #(p q)
                                                 #((top) (top))
-                                                #("31t" "31u"))
+                                                #("1do" "1dp"))
                                               #(ribcage () () ())
                                               #(ribcage
                                                 #(p lev)
                                                 #((top) (top))
-                                                #("31p" "31q"))
+                                                #("1dk" "1dl"))
                                               #(ribcage
                                                 (emit quasivector
                                                       quasilist*
@@ -25307,24 +25298,24 @@
                                                  (top)
                                                  (top)
                                                  (top))
-                                                ("31o"
-                                                 "31n"
-                                                 "31m"
-                                                 "31l"
-                                                 "31k"
-                                                 "31j"
-                                                 "31i")))
+                                                ("1dj"
+                                                 "1di"
+                                                 "1dh"
+                                                 "1dg"
+                                                 "1df"
+                                                 "1de"
+                                                 "1dd")))
                                              (hygiene guile)))
-                                         (#{quasi _hoQGWMnyQPAh3k2jhWM4M}#
-                                           #{p _hoQGWMnyQPAh3k2jhWM5A}#
-                                           (#{1-}# #{lev _hoQGWMnyQPAh3k2jhWM4l}#)))
-                                       (#{quasi _hoQGWMnyQPAh3k2jhWM4M}#
-                                         #{q _hoQGWMnyQPAh3k2jhWM46}#
-                                         #{lev _hoQGWMnyQPAh3k2jhWM4l}#))))
-                                 #{tmp _hoQGWMnyQPAh3k2jhWM48}#)
-                               (let ((#{tmp _hoQGWMnyQPAh3k2jhWM5p}#
+                                         (#{quasi -ANAU$bmvAmthP7L7xws$t}#
+                                           #{p -ANAU$bmvAmthP7L7xws@h}#
+                                           (#{1-}# #{lev -ANAU$bmvAmthP7L7xws@G}#)))
+                                       (#{quasi -ANAU$bmvAmthP7L7xws$t}#
+                                         #{q -ANAU$bmvAmthP7L7xws@b}#
+                                         #{lev -ANAU$bmvAmthP7L7xws@G}#))))
+                                 #{tmp -ANAU$bmvAmthP7L7xws@d}#)
+                               (let ((#{tmp -ANAU$bmvAmthP7L7xwtAK}#
                                        ($sc-dispatch
-                                         #{p _hoQGWMnyQPAh3k2jhWM45}#
+                                         #{p -ANAU$bmvAmthP7L7xws@a}#
                                          '(#(free-id
                                              #(syntax-object
                                                unquote-splicing
@@ -25332,12 +25323,12 @@
                                                 #(ribcage
                                                   #(p q)
                                                   #((top) (top))
-                                                  #("31t" "31u"))
+                                                  #("1do" "1dp"))
                                                 #(ribcage () () ())
                                                 #(ribcage
                                                   #(p lev)
                                                   #((top) (top))
-                                                  #("31p" "31q"))
+                                                  #("1dk" "1dl"))
                                                 #(ribcage
                                                   (emit quasivector
                                                         quasilist*
@@ -25352,38 +25343,38 @@
                                                    (top)
                                                    (top)
                                                    (top))
-                                                  ("31o"
-                                                   "31n"
-                                                   "31m"
-                                                   "31l"
-                                                   "31k"
-                                                   "31j"
-                                                   "31i")))
+                                                  ("1dj"
+                                                   "1di"
+                                                   "1dh"
+                                                   "1dg"
+                                                   "1df"
+                                                   "1de"
+                                                   "1dd")))
                                                (hygiene guile)))
                                            .
                                            each-any))))
-                                 (if #{tmp _hoQGWMnyQPAh3k2jhWM5p}#
+                                 (if #{tmp -ANAU$bmvAmthP7L7xwtAK}#
                                    (@apply
-                                     (lambda (#{p _hoQGWMnyQPAh3k2jhWM5t}#)
-                                       (if (= #{lev _hoQGWMnyQPAh3k2jhWM4l}# 0)
-                                         (#{quasiappend _hoQGWMnyQPAh3k2jhWM4P}#
-                                           (map (lambda (#{tmp _hoQGWMnyQPAh3k2jhWM1l _hoQGWMnyQPAh3k2jhWM5w}#)
+                                     (lambda (#{p -ANAU$bmvAmthP7L7xwtAO}#)
+                                       (if (= #{lev -ANAU$bmvAmthP7L7xws@G}# 0)
+                                         (#{quasiappend -ANAU$bmvAmthP7L7xws$w}#
+                                           (map (lambda (#{tmp -ANAU$bmvAmthP7L7xws8G -ANAU$bmvAmthP7L7xwtAR}#)
                                                   (list '#(syntax-object
                                                            "value"
                                                            ((top)
                                                             #(ribcage
                                                               #(p)
                                                               #((top))
-                                                              #("31w"))
+                                                              #("1dr"))
                                                             #(ribcage
                                                               #(p q)
                                                               #((top) (top))
-                                                              #("31t" "31u"))
+                                                              #("1do" "1dp"))
                                                             #(ribcage () () ())
                                                             #(ribcage
                                                               #(p lev)
                                                               #((top) (top))
-                                                              #("31p" "31q"))
+                                                              #("1dk" "1dl"))
                                                             #(ribcage
                                                               (emit quasivector
                                                                     quasilist*
@@ -25398,37 +25389,37 @@
                                                                (top)
                                                                (top)
                                                                (top))
-                                                              ("31o"
-                                                               "31n"
-                                                               "31m"
-                                                               "31l"
-                                                               "31k"
-                                                               "31j"
-                                                               "31i")))
+                                                              ("1dj"
+                                                               "1di"
+                                                               "1dh"
+                                                               "1dg"
+                                                               "1df"
+                                                               "1de"
+                                                               "1dd")))
                                                            (hygiene guile))
-                                                        #{tmp _hoQGWMnyQPAh3k2jhWM1l _hoQGWMnyQPAh3k2jhWM5w}#))
-                                                #{p _hoQGWMnyQPAh3k2jhWM5t}#)
-                                           (#{quasi _hoQGWMnyQPAh3k2jhWM4M}#
-                                             #{q _hoQGWMnyQPAh3k2jhWM46}#
-                                             #{lev _hoQGWMnyQPAh3k2jhWM4l}#))
-                                         (#{quasicons _hoQGWMnyQPAh3k2jhWM4O}#
-                                           (#{quasicons _hoQGWMnyQPAh3k2jhWM4O}#
+                                                        #{tmp -ANAU$bmvAmthP7L7xws8G -ANAU$bmvAmthP7L7xwtAR}#))
+                                                #{p -ANAU$bmvAmthP7L7xwtAO}#)
+                                           (#{quasi -ANAU$bmvAmthP7L7xws$t}#
+                                             #{q -ANAU$bmvAmthP7L7xws@b}#
+                                             #{lev -ANAU$bmvAmthP7L7xws@G}#))
+                                         (#{quasicons -ANAU$bmvAmthP7L7xws$v}#
+                                           (#{quasicons -ANAU$bmvAmthP7L7xws$v}#
                                              '(#(syntax-object
                                                  "quote"
                                                  ((top)
                                                   #(ribcage
                                                     #(p)
                                                     #((top))
-                                                    #("31w"))
+                                                    #("1dr"))
                                                   #(ribcage
                                                     #(p q)
                                                     #((top) (top))
-                                                    #("31t" "31u"))
+                                                    #("1do" "1dp"))
                                                   #(ribcage () () ())
                                                   #(ribcage
                                                     #(p lev)
                                                     #((top) (top))
-                                                    #("31p" "31q"))
+                                                    #("1dk" "1dl"))
                                                   #(ribcage
                                                     (emit quasivector
                                                           quasilist*
@@ -25443,13 +25434,13 @@
                                                      (top)
                                                      (top)
                                                      (top))
-                                                    ("31o"
-                                                     "31n"
-                                                     "31m"
-                                                     "31l"
-                                                     "31k"
-                                                     "31j"
-                                                     "31i")))
+                                                    ("1dj"
+                                                     "1di"
+                                                     "1dh"
+                                                     "1dg"
+                                                     "1df"
+                                                     "1de"
+                                                     "1dd")))
                                                  (hygiene guile))
                                                #(syntax-object
                                                  unquote-splicing
@@ -25457,16 +25448,16 @@
                                                   #(ribcage
                                                     #(p)
                                                     #((top))
-                                                    #("31w"))
+                                                    #("1dr"))
                                                   #(ribcage
                                                     #(p q)
                                                     #((top) (top))
-                                                    #("31t" "31u"))
+                                                    #("1do" "1dp"))
                                                   #(ribcage () () ())
                                                   #(ribcage
                                                     #(p lev)
                                                     #((top) (top))
-                                                    #("31p" "31q"))
+                                                    #("1dk" "1dl"))
                                                   #(ribcage
                                                     (emit quasivector
                                                           quasilist*
@@ -25481,59 +25472,59 @@
                                                      (top)
                                                      (top)
                                                      (top))
-                                                    ("31o"
-                                                     "31n"
-                                                     "31m"
-                                                     "31l"
-                                                     "31k"
-                                                     "31j"
-                                                     "31i")))
+                                                    ("1dj"
+                                                     "1di"
+                                                     "1dh"
+                                                     "1dg"
+                                                     "1df"
+                                                     "1de"
+                                                     "1dd")))
                                                  (hygiene guile)))
-                                             (#{quasi _hoQGWMnyQPAh3k2jhWM4M}#
-                                               #{p _hoQGWMnyQPAh3k2jhWM5t}#
-                                               (#{1-}# #{lev _hoQGWMnyQPAh3k2jhWM4l}#)))
-                                           (#{quasi _hoQGWMnyQPAh3k2jhWM4M}#
-                                             #{q _hoQGWMnyQPAh3k2jhWM46}#
-                                             #{lev _hoQGWMnyQPAh3k2jhWM4l}#))))
-                                     #{tmp _hoQGWMnyQPAh3k2jhWM5p}#)
-                                   (#{quasicons _hoQGWMnyQPAh3k2jhWM4O}#
-                                     (#{quasi _hoQGWMnyQPAh3k2jhWM4M}#
-                                       #{p _hoQGWMnyQPAh3k2jhWM45}#
-                                       #{lev _hoQGWMnyQPAh3k2jhWM4l}#)
-                                     (#{quasi _hoQGWMnyQPAh3k2jhWM4M}#
-                                       #{q _hoQGWMnyQPAh3k2jhWM46}#
-                                       #{lev _hoQGWMnyQPAh3k2jhWM4l}#)))))))
-                         #{tmp _hoQGWMnyQPAh3k2jhWM41}#)
-                       (let ((#{tmp _hoQGWMnyQPAh3k2jhWM5$}#
+                                             (#{quasi -ANAU$bmvAmthP7L7xws$t}#
+                                               #{p -ANAU$bmvAmthP7L7xwtAO}#
+                                               (#{1-}# #{lev -ANAU$bmvAmthP7L7xws@G}#)))
+                                           (#{quasi -ANAU$bmvAmthP7L7xws$t}#
+                                             #{q -ANAU$bmvAmthP7L7xws@b}#
+                                             #{lev -ANAU$bmvAmthP7L7xws@G}#))))
+                                     #{tmp -ANAU$bmvAmthP7L7xwtAK}#)
+                                   (#{quasicons -ANAU$bmvAmthP7L7xws$v}#
+                                     (#{quasi -ANAU$bmvAmthP7L7xws$t}#
+                                       #{p -ANAU$bmvAmthP7L7xws@a}#
+                                       #{lev -ANAU$bmvAmthP7L7xws@G}#)
+                                     (#{quasi -ANAU$bmvAmthP7L7xws$t}#
+                                       #{q -ANAU$bmvAmthP7L7xws@b}#
+                                       #{lev -ANAU$bmvAmthP7L7xws@G}#)))))))
+                         #{tmp -ANAU$bmvAmthP7L7xws@W}#)
+                       (let ((#{tmp -ANAU$bmvAmthP7L7xwtAf}#
                                ($sc-dispatch
-                                 #{p _hoQGWMnyQPAh3k2jhWM4k}#
+                                 #{p -ANAU$bmvAmthP7L7xws@F}#
                                  '#(vector each-any))))
-                         (if #{tmp _hoQGWMnyQPAh3k2jhWM5$}#
+                         (if #{tmp -ANAU$bmvAmthP7L7xwtAf}#
                            (@apply
-                             (lambda (#{x _hoQGWMnyQPAh3k2jhWM6C}#)
-                               (let ((#{x _hoQGWMnyQPAh3k2jhWM6F}#
-                                       (#{vquasi _hoQGWMnyQPAh3k2jhWM4N}#
-                                         #{x _hoQGWMnyQPAh3k2jhWM6C}#
-                                         #{lev _hoQGWMnyQPAh3k2jhWM4l}#)))
-                                 (let ((#{tmp _hoQGWMnyQPAh3k2jhWM6H}#
+                             (lambda (#{x -ANAU$bmvAmthP7L7xwtAj}#)
+                               (let ((#{x -ANAU$bmvAmthP7L7xwtAm}#
+                                       (#{vquasi -ANAU$bmvAmthP7L7xws$u}#
+                                         #{x -ANAU$bmvAmthP7L7xwtAj}#
+                                         #{lev -ANAU$bmvAmthP7L7xws@G}#)))
+                                 (let ((#{tmp -ANAU$bmvAmthP7L7xwtAo}#
                                          ($sc-dispatch
-                                           #{x _hoQGWMnyQPAh3k2jhWM6F}#
+                                           #{x -ANAU$bmvAmthP7L7xwtAm}#
                                            '(#(atom "quote") each-any))))
-                                   (if #{tmp _hoQGWMnyQPAh3k2jhWM6H}#
+                                   (if #{tmp -ANAU$bmvAmthP7L7xwtAo}#
                                      (@apply
-                                       (lambda (#{x _hoQGWMnyQPAh3k2jhWM6L}#)
+                                       (lambda (#{x -ANAU$bmvAmthP7L7xwtAs}#)
                                          (list '#(syntax-object
                                                   "quote"
                                                   ((top)
                                                    #(ribcage
                                                      #(x)
                                                      #((top))
-                                                     #("32s"))
+                                                     #("1en"))
                                                    #(ribcage () () ())
                                                    #(ribcage
                                                      #(x)
                                                      #((top))
-                                                     #("32r"))
+                                                     #("1em"))
                                                    #(ribcage
                                                      (emit quasivector
                                                            quasilist*
@@ -25548,38 +25539,38 @@
                                                       (top)
                                                       (top)
                                                       (top))
-                                                     ("31o"
-                                                      "31n"
-                                                      "31m"
-                                                      "31l"
-                                                      "31k"
-                                                      "31j"
-                                                      "31i")))
+                                                     ("1dj"
+                                                      "1di"
+                                                      "1dh"
+                                                      "1dg"
+                                                      "1df"
+                                                      "1de"
+                                                      "1dd")))
                                                   (hygiene guile))
                                                (list->vector
-                                                 #{x _hoQGWMnyQPAh3k2jhWM6L}#)))
-                                       #{tmp _hoQGWMnyQPAh3k2jhWM6H}#)
+                                                 #{x -ANAU$bmvAmthP7L7xwtAs}#)))
+                                       #{tmp -ANAU$bmvAmthP7L7xwtAo}#)
                                      (letrec*
-                                       ((#{f _hoQGWMnyQPAh3k2jhWM6N}#
-                                          (lambda (#{y _hoQGWMnyQPAh3k2jhWM6Z}#
-                                                   #{k _hoQGWMnyQPAh3k2jhWM6a}#)
-                                            (let ((#{tmp _hoQGWMnyQPAh3k2jhWM6c}#
+                                       ((#{f -ANAU$bmvAmthP7L7xwtAu}#
+                                          (lambda (#{y -ANAU$bmvAmthP7L7xwtA6}#
+                                                   #{k -ANAU$bmvAmthP7L7xwtA7}#)
+                                            (let ((#{tmp -ANAU$bmvAmthP7L7xwtA9}#
                                                     ($sc-dispatch
-                                                      #{y _hoQGWMnyQPAh3k2jhWM6Z}#
+                                                      #{y -ANAU$bmvAmthP7L7xwtA6}#
                                                       '(#(atom "quote")
                                                         each-any))))
-                                              (if #{tmp _hoQGWMnyQPAh3k2jhWM6c}#
+                                              (if #{tmp -ANAU$bmvAmthP7L7xwtA9}#
                                                 (@apply
-                                                  (lambda (#{y _hoQGWMnyQPAh3k2jhWM6f}#)
-                                                    (#{k _hoQGWMnyQPAh3k2jhWM6a}#
-                                                      (map (lambda (#{tmp _hoQGWMnyQPAh3k2jhWM3A _hoQGWMnyQPAh3k2jhWM6g}#)
+                                                  (lambda (#{y -ANAU$bmvAmthP7L7xwtBA}#)
+                                                    (#{k -ANAU$bmvAmthP7L7xwtA7}#
+                                                      (map (lambda (#{tmp -ANAU$bmvAmthP7L7xws9h -ANAU$bmvAmthP7L7xwtBB}#)
                                                              (list '#(syntax-object
                                                                       "quote"
                                                                       ((top)
                                                                        #(ribcage
                                                                          #(y)
                                                                          #((top))
-                                                                         #("32z"))
+                                                                         #("1eu"))
                                                                        #(ribcage
                                                                          ()
                                                                          ()
@@ -25591,13 +25582,13 @@
                                                                          #((top)
                                                                            (top)
                                                                            (top))
-                                                                         #("32u"
-                                                                           "32v"
-                                                                           "32w"))
+                                                                         #("1ep"
+                                                                           "1eq"
+                                                                           "1er"))
                                                                        #(ribcage
                                                                          #(_)
                                                                          #((top))
-                                                                         #("32t"))
+                                                                         #("1eo"))
                                                                        #(ribcage
                                                                          ()
                                                                          ()
@@ -25605,7 +25596,7 @@
                                                                        #(ribcage
                                                                          #(x)
                                                                          #((top))
-                                                                         #("32r"))
+                                                                         #("1em"))
                                                                        #(ribcage
                                                                          (emit quasivector
                                                                                quasilist*
@@ -25620,51 +25611,51 @@
                                                                           (top)
                                                                           (top)
                                                                           (top))
-                                                                         ("31o"
-                                                                          "31n"
-                                                                          "31m"
-                                                                          "31l"
-                                                                          "31k"
-                                                                          "31j"
-                                                                          "31i")))
+                                                                         ("1dj"
+                                                                          "1di"
+                                                                          "1dh"
+                                                                          "1dg"
+                                                                          "1df"
+                                                                          "1de"
+                                                                          "1dd")))
                                                                       (hygiene
                                                                         guile))
-                                                                   #{tmp _hoQGWMnyQPAh3k2jhWM3A _hoQGWMnyQPAh3k2jhWM6g}#))
-                                                           #{y _hoQGWMnyQPAh3k2jhWM6f}#)))
-                                                  #{tmp _hoQGWMnyQPAh3k2jhWM6c}#)
-                                                (let ((#{tmp _hoQGWMnyQPAh3k2jhWM6h}#
+                                                                   #{tmp -ANAU$bmvAmthP7L7xws9h -ANAU$bmvAmthP7L7xwtBB}#))
+                                                           #{y -ANAU$bmvAmthP7L7xwtBA}#)))
+                                                  #{tmp -ANAU$bmvAmthP7L7xwtA9}#)
+                                                (let ((#{tmp -ANAU$bmvAmthP7L7xwtBC}#
                                                         ($sc-dispatch
-                                                          #{y _hoQGWMnyQPAh3k2jhWM6Z}#
+                                                          #{y -ANAU$bmvAmthP7L7xwtA6}#
                                                           '(#(atom "list")
                                                             .
                                                             each-any))))
-                                                  (if #{tmp _hoQGWMnyQPAh3k2jhWM6h}#
+                                                  (if #{tmp -ANAU$bmvAmthP7L7xwtBC}#
                                                     (@apply
-                                                      (lambda (#{y _hoQGWMnyQPAh3k2jhWM6k}#)
-                                                        (#{k _hoQGWMnyQPAh3k2jhWM6a}#
-                                                          #{y _hoQGWMnyQPAh3k2jhWM6k}#))
-                                                      #{tmp _hoQGWMnyQPAh3k2jhWM6h}#)
-                                                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWM6l}#
+                                                      (lambda (#{y -ANAU$bmvAmthP7L7xwtBF}#)
+                                                        (#{k -ANAU$bmvAmthP7L7xwtA7}#
+                                                          #{y -ANAU$bmvAmthP7L7xwtBF}#))
+                                                      #{tmp -ANAU$bmvAmthP7L7xwtBC}#)
+                                                    (let ((#{tmp -ANAU$bmvAmthP7L7xwtBG}#
                                                             ($sc-dispatch
-                                                              #{y _hoQGWMnyQPAh3k2jhWM6Z}#
+                                                              #{y -ANAU$bmvAmthP7L7xwtA6}#
                                                               '(#(atom "list*")
                                                                 .
                                                                 #(each+
                                                                   any
                                                                   (any)
                                                                   ())))))
-                                                      (if #{tmp _hoQGWMnyQPAh3k2jhWM6l}#
+                                                      (if #{tmp -ANAU$bmvAmthP7L7xwtBG}#
                                                         (@apply
-                                                          (lambda (#{y _hoQGWMnyQPAh3k2jhWM6o}#
-                                                                   #{z _hoQGWMnyQPAh3k2jhWM6p}#)
-                                                            (#{f _hoQGWMnyQPAh3k2jhWM6N}#
-                                                              #{z _hoQGWMnyQPAh3k2jhWM6p}#
-                                                              (lambda (#{ls _hoQGWMnyQPAh3k2jhWM6q}#)
-                                                                (#{k _hoQGWMnyQPAh3k2jhWM6a}#
+                                                          (lambda (#{y -ANAU$bmvAmthP7L7xwtBJ}#
+                                                                   #{z -ANAU$bmvAmthP7L7xwtBK}#)
+                                                            (#{f -ANAU$bmvAmthP7L7xwtAu}#
+                                                              #{z -ANAU$bmvAmthP7L7xwtBK}#
+                                                              (lambda (#{ls -ANAU$bmvAmthP7L7xwtBL}#)
+                                                                (#{k -ANAU$bmvAmthP7L7xwtA7}#
                                                                   (append
-                                                                    #{y _hoQGWMnyQPAh3k2jhWM6o}#
-                                                                    #{ls _hoQGWMnyQPAh3k2jhWM6q}#)))))
-                                                          #{tmp _hoQGWMnyQPAh3k2jhWM6l}#)
+                                                                    #{y -ANAU$bmvAmthP7L7xwtBJ}#
+                                                                    #{ls -ANAU$bmvAmthP7L7xwtBL}#)))))
+                                                          #{tmp -ANAU$bmvAmthP7L7xwtBG}#)
                                                         (list '#(syntax-object
                                                                  "list->vector"
                                                                  ((top)
@@ -25673,14 +25664,14 @@
                                                                     ()
                                                                     ())
                                                                   #(ribcage
-                                                                    #(#{ g_hoQGWMnyQPAh3k2jhWM3K}#)
-                                                                    #((m_hoQGWMnyQPAh3k2jhWM3L
+                                                                    #(#{ g-ANAU$bmvAmthP7L7xws9r}#)
+                                                                    #((m-ANAU$bmvAmthP7L7xws9s
                                                                         top))
-                                                                    #("335"))
+                                                                    #("1f0"))
                                                                   #(ribcage
                                                                     #(else)
                                                                     #((top))
-                                                                    #("334"))
+                                                                    #("1ez"))
                                                                   #(ribcage
                                                                     ()
                                                                     ()
@@ -25690,13 +25681,13 @@
                                                                     #((top)
                                                                       (top)
                                                                       (top))
-                                                                    #("32u"
-                                                                      "32v"
-                                                                      "32w"))
+                                                                    #("1ep"
+                                                                      "1eq"
+                                                                      "1er"))
                                                                   #(ribcage
                                                                     #(_)
                                                                     #((top))
-                                                                    #("32t"))
+                                                                    #("1eo"))
                                                                   #(ribcage
                                                                     ()
                                                                     ()
@@ -25704,7 +25695,7 @@
                                                                   #(ribcage
                                                                     #(x)
                                                                     #((top))
-                                                                    #("32r"))
+                                                                    #("1em"))
                                                                   #(ribcage
                                                                     (emit quasivector
                                                                           quasilist*
@@ -25719,26 +25710,26 @@
                                                                      (top)
                                                                      (top)
                                                                      (top))
-                                                                    ("31o"
-                                                                     "31n"
-                                                                     "31m"
-                                                                     "31l"
-                                                                     "31k"
-                                                                     "31j"
-                                                                     "31i")))
+                                                                    ("1dj"
+                                                                     "1di"
+                                                                     "1dh"
+                                                                     "1dg"
+                                                                     "1df"
+                                                                     "1de"
+                                                                     "1dd")))
                                                                  (hygiene
                                                                    guile))
-                                                              #{x _hoQGWMnyQPAh3k2jhWM6F}#))))))))))
-                                       (#{f _hoQGWMnyQPAh3k2jhWM6N}#
-                                         #{x _hoQGWMnyQPAh3k2jhWM6F}#
-                                         (lambda (#{ls _hoQGWMnyQPAh3k2jhWM6P}#)
-                                           (let ((#{tmp _hoQGWMnyQPAh3k2jhWM6R}#
+                                                              #{x -ANAU$bmvAmthP7L7xwtAm}#))))))))))
+                                       (#{f -ANAU$bmvAmthP7L7xwtAu}#
+                                         #{x -ANAU$bmvAmthP7L7xwtAm}#
+                                         (lambda (#{ls -ANAU$bmvAmthP7L7xwtAw}#)
+                                           (let ((#{tmp -ANAU$bmvAmthP7L7xwtAy}#
                                                    ($sc-dispatch
-                                                     #{ls _hoQGWMnyQPAh3k2jhWM6P}#
+                                                     #{ls -ANAU$bmvAmthP7L7xwtAw}#
                                                      'each-any)))
-                                             (if #{tmp _hoQGWMnyQPAh3k2jhWM6R}#
+                                             (if #{tmp -ANAU$bmvAmthP7L7xwtAy}#
                                                (@apply
-                                                 (lambda (#{ g_hoQGWMnyQPAh3k2jhWM22 _hoQGWMnyQPAh3k2jhWM6U}#)
+                                                 (lambda (#{ g-ANAU$bmvAmthP7L7xws9X -ANAU$bmvAmthP7L7xwtA1}#)
                                                    (cons '#(syntax-object
                                                             "vector"
                                                             ((top)
@@ -25747,10 +25738,10 @@
                                                                ()
                                                                ())
                                                              #(ribcage
-                                                               #(#{ g_hoQGWMnyQPAh3k2jhWM22}#)
-                                                               #((m_hoQGWMnyQPAh3k2jhWM23
+                                                               #(#{ g-ANAU$bmvAmthP7L7xws9X}#)
+                                                               #((m-ANAU$bmvAmthP7L7xws9Y
                                                                    top))
-                                                               #("32y"))
+                                                               #("1et"))
                                                              #(ribcage
                                                                ()
                                                                ()
@@ -25766,11 +25757,11 @@
                                                              #(ribcage
                                                                #(ls)
                                                                #((top))
-                                                               #("32x"))
+                                                               #("1es"))
                                                              #(ribcage
                                                                #(_)
                                                                #((top))
-                                                               #("32t"))
+                                                               #("1eo"))
                                                              #(ribcage
                                                                ()
                                                                ()
@@ -25778,7 +25769,7 @@
                                                              #(ribcage
                                                                #(x)
                                                                #((top))
-                                                               #("32r"))
+                                                               #("1em"))
                                                              #(ribcage
                                                                (emit quasivector
                                                                      quasilist*
@@ -25793,30 +25784,30 @@
                                                                 (top)
                                                                 (top)
                                                                 (top))
-                                                               ("31o"
-                                                                "31n"
-                                                                "31m"
-                                                                "31l"
-                                                                "31k"
-                                                                "31j"
-                                                                "31i")))
+                                                               ("1dj"
+                                                                "1di"
+                                                                "1dh"
+                                                                "1dg"
+                                                                "1df"
+                                                                "1de"
+                                                                "1dd")))
                                                             (hygiene guile))
-                                                         #{ g_hoQGWMnyQPAh3k2jhWM22 _hoQGWMnyQPAh3k2jhWM6U}#))
-                                                 #{tmp _hoQGWMnyQPAh3k2jhWM6R}#)
+                                                         #{ g-ANAU$bmvAmthP7L7xws9X -ANAU$bmvAmthP7L7xwtA1}#))
+                                                 #{tmp -ANAU$bmvAmthP7L7xwtAy}#)
                                                (syntax-violation
                                                  #f
                                                  "source expression failed to match any pattern"
-                                                 #{ls _hoQGWMnyQPAh3k2jhWM6P}#))))))))))
-                             #{tmp _hoQGWMnyQPAh3k2jhWM5$}#)
+                                                 #{ls -ANAU$bmvAmthP7L7xwtAw}#))))))))))
+                             #{tmp -ANAU$bmvAmthP7L7xwtAf}#)
                            (list '#(syntax-object
                                     "quote"
                                     ((top)
-                                     #(ribcage #(p) #((top)) #("31z"))
+                                     #(ribcage #(p) #((top)) #("1du"))
                                      #(ribcage () () ())
                                      #(ribcage
                                        #(p lev)
                                        #((top) (top))
-                                       #("31p" "31q"))
+                                       #("1dk" "1dl"))
                                      #(ribcage
                                        (emit quasivector
                                              quasilist*
@@ -25831,29 +25822,29 @@
                                         (top)
                                         (top)
                                         (top))
-                                       ("31o"
-                                        "31n"
-                                        "31m"
-                                        "31l"
-                                        "31k"
-                                        "31j"
-                                        "31i")))
+                                       ("1dj"
+                                        "1di"
+                                        "1dh"
+                                        "1dg"
+                                        "1df"
+                                        "1de"
+                                        "1dd")))
                                     (hygiene guile))
-                                 #{p _hoQGWMnyQPAh3k2jhWM4k}#)))))))))))
-       (#{vquasi _hoQGWMnyQPAh3k2jhWM4N}#
-         (lambda (#{p _hoQGWMnyQPAh3k2jhWM7G}#
-                  #{lev _hoQGWMnyQPAh3k2jhWM7H}#)
-           (let ((#{tmp _hoQGWMnyQPAh3k2jhWM7J}#
+                                 #{p -ANAU$bmvAmthP7L7xws@F}#)))))))))))
+       (#{vquasi -ANAU$bmvAmthP7L7xws$u}#
+         (lambda (#{p -ANAU$bmvAmthP7L7xwtBn}#
+                  #{lev -ANAU$bmvAmthP7L7xwtBo}#)
+           (let ((#{tmp -ANAU$bmvAmthP7L7xwtBq}#
                    ($sc-dispatch
-                     #{p _hoQGWMnyQPAh3k2jhWM7G}#
+                     #{p -ANAU$bmvAmthP7L7xwtBn}#
                      '(any . any))))
-             (if #{tmp _hoQGWMnyQPAh3k2jhWM7J}#
+             (if #{tmp -ANAU$bmvAmthP7L7xwtBq}#
                (@apply
-                 (lambda (#{p _hoQGWMnyQPAh3k2jhWM7N}#
-                          #{q _hoQGWMnyQPAh3k2jhWM7O}#)
-                   (let ((#{tmp _hoQGWMnyQPAh3k2jhWM7Q}#
+                 (lambda (#{p -ANAU$bmvAmthP7L7xwtBu}#
+                          #{q -ANAU$bmvAmthP7L7xwtBv}#)
+                   (let ((#{tmp -ANAU$bmvAmthP7L7xwtBx}#
                            ($sc-dispatch
-                             #{p _hoQGWMnyQPAh3k2jhWM7N}#
+                             #{p -ANAU$bmvAmthP7L7xwtBu}#
                              '(#(free-id
                                  #(syntax-object
                                    unquote
@@ -25861,12 +25852,12 @@
                                     #(ribcage
                                       #(p q)
                                       #((top) (top))
-                                      #("322" "323"))
+                                      #("1dx" "1dy"))
                                     #(ribcage () () ())
                                     #(ribcage
                                       #(p lev)
                                       #((top) (top))
-                                      #("320" "321"))
+                                      #("1dv" "1dw"))
                                     #(ribcage
                                       (emit quasivector
                                             quasilist*
@@ -25881,38 +25872,38 @@
                                        (top)
                                        (top)
                                        (top))
-                                      ("31o"
-                                       "31n"
-                                       "31m"
-                                       "31l"
-                                       "31k"
-                                       "31j"
-                                       "31i")))
+                                      ("1dj"
+                                       "1di"
+                                       "1dh"
+                                       "1dg"
+                                       "1df"
+                                       "1de"
+                                       "1dd")))
                                    (hygiene guile)))
                                .
                                each-any))))
-                     (if #{tmp _hoQGWMnyQPAh3k2jhWM7Q}#
+                     (if #{tmp -ANAU$bmvAmthP7L7xwtBx}#
                        (@apply
-                         (lambda (#{p _hoQGWMnyQPAh3k2jhWM7U}#)
-                           (if (= #{lev _hoQGWMnyQPAh3k2jhWM7H}# 0)
-                             (#{quasilist* _hoQGWMnyQPAh3k2jhWM4Q}#
-                               (map (lambda (#{tmp _hoQGWMnyQPAh3k2jhWM11 _hoQGWMnyQPAh3k2jhWM74}#)
+                         (lambda (#{p -ANAU$bmvAmthP7L7xwtB1}#)
+                           (if (= #{lev -ANAU$bmvAmthP7L7xwtBo}# 0)
+                             (#{quasilist* -ANAU$bmvAmthP7L7xws$x}#
+                               (map (lambda (#{tmp -ANAU$bmvAmthP7L7xws8W -ANAU$bmvAmthP7L7xwtCZ}#)
                                       (list '#(syntax-object
                                                "value"
                                                ((top)
                                                 #(ribcage
                                                   #(p)
                                                   #((top))
-                                                  #("324"))
+                                                  #("1dz"))
                                                 #(ribcage
                                                   #(p q)
                                                   #((top) (top))
-                                                  #("322" "323"))
+                                                  #("1dx" "1dy"))
                                                 #(ribcage () () ())
                                                 #(ribcage
                                                   #(p lev)
                                                   #((top) (top))
-                                                  #("320" "321"))
+                                                  #("1dv" "1dw"))
                                                 #(ribcage
                                                   (emit quasivector
                                                         quasilist*
@@ -25927,34 +25918,34 @@
                                                    (top)
                                                    (top)
                                                    (top))
-                                                  ("31o"
-                                                   "31n"
-                                                   "31m"
-                                                   "31l"
-                                                   "31k"
-                                                   "31j"
-                                                   "31i")))
+                                                  ("1dj"
+                                                   "1di"
+                                                   "1dh"
+                                                   "1dg"
+                                                   "1df"
+                                                   "1de"
+                                                   "1dd")))
                                                (hygiene guile))
-                                            #{tmp _hoQGWMnyQPAh3k2jhWM11 _hoQGWMnyQPAh3k2jhWM74}#))
-                                    #{p _hoQGWMnyQPAh3k2jhWM7U}#)
-                               (#{vquasi _hoQGWMnyQPAh3k2jhWM4N}#
-                                 #{q _hoQGWMnyQPAh3k2jhWM7O}#
-                                 #{lev _hoQGWMnyQPAh3k2jhWM7H}#))
-                             (#{quasicons _hoQGWMnyQPAh3k2jhWM4O}#
-                               (#{quasicons _hoQGWMnyQPAh3k2jhWM4O}#
+                                            #{tmp -ANAU$bmvAmthP7L7xws8W -ANAU$bmvAmthP7L7xwtCZ}#))
+                                    #{p -ANAU$bmvAmthP7L7xwtB1}#)
+                               (#{vquasi -ANAU$bmvAmthP7L7xws$u}#
+                                 #{q -ANAU$bmvAmthP7L7xwtBv}#
+                                 #{lev -ANAU$bmvAmthP7L7xwtBo}#))
+                             (#{quasicons -ANAU$bmvAmthP7L7xws$v}#
+                               (#{quasicons -ANAU$bmvAmthP7L7xws$v}#
                                  '(#(syntax-object
                                      "quote"
                                      ((top)
-                                      #(ribcage #(p) #((top)) #("324"))
+                                      #(ribcage #(p) #((top)) #("1dz"))
                                       #(ribcage
                                         #(p q)
                                         #((top) (top))
-                                        #("322" "323"))
+                                        #("1dx" "1dy"))
                                       #(ribcage () () ())
                                       #(ribcage
                                         #(p lev)
                                         #((top) (top))
-                                        #("320" "321"))
+                                        #("1dv" "1dw"))
                                       #(ribcage
                                         (emit quasivector
                                               quasilist*
@@ -25969,27 +25960,27 @@
                                          (top)
                                          (top)
                                          (top))
-                                        ("31o"
-                                         "31n"
-                                         "31m"
-                                         "31l"
-                                         "31k"
-                                         "31j"
-                                         "31i")))
+                                        ("1dj"
+                                         "1di"
+                                         "1dh"
+                                         "1dg"
+                                         "1df"
+                                         "1de"
+                                         "1dd")))
                                      (hygiene guile))
                                    #(syntax-object
                                      unquote
                                      ((top)
-                                      #(ribcage #(p) #((top)) #("324"))
+                                      #(ribcage #(p) #((top)) #("1dz"))
                                       #(ribcage
                                         #(p q)
                                         #((top) (top))
-                                        #("322" "323"))
+                                        #("1dx" "1dy"))
                                       #(ribcage () () ())
                                       #(ribcage
                                         #(p lev)
                                         #((top) (top))
-                                        #("320" "321"))
+                                        #("1dv" "1dw"))
                                       #(ribcage
                                         (emit quasivector
                                               quasilist*
@@ -26004,24 +25995,24 @@
                                          (top)
                                          (top)
                                          (top))
-                                        ("31o"
-                                         "31n"
-                                         "31m"
-                                         "31l"
-                                         "31k"
-                                         "31j"
-                                         "31i")))
+                                        ("1dj"
+                                         "1di"
+                                         "1dh"
+                                         "1dg"
+                                         "1df"
+                                         "1de"
+                                         "1dd")))
                                      (hygiene guile)))
-                                 (#{quasi _hoQGWMnyQPAh3k2jhWM4M}#
-                                   #{p _hoQGWMnyQPAh3k2jhWM7U}#
-                                   (#{1-}# #{lev _hoQGWMnyQPAh3k2jhWM7H}#)))
-                               (#{vquasi _hoQGWMnyQPAh3k2jhWM4N}#
-                                 #{q _hoQGWMnyQPAh3k2jhWM7O}#
-                                 #{lev _hoQGWMnyQPAh3k2jhWM7H}#))))
-                         #{tmp _hoQGWMnyQPAh3k2jhWM7Q}#)
-                       (let ((#{tmp _hoQGWMnyQPAh3k2jhWM7@}#
+                                 (#{quasi -ANAU$bmvAmthP7L7xws$t}#
+                                   #{p -ANAU$bmvAmthP7L7xwtB1}#
+                                   (#{1-}# #{lev -ANAU$bmvAmthP7L7xwtBo}#)))
+                               (#{vquasi -ANAU$bmvAmthP7L7xws$u}#
+                                 #{q -ANAU$bmvAmthP7L7xwtBv}#
+                                 #{lev -ANAU$bmvAmthP7L7xwtBo}#))))
+                         #{tmp -ANAU$bmvAmthP7L7xwtBx}#)
+                       (let ((#{tmp -ANAU$bmvAmthP7L7xwtCg}#
                                ($sc-dispatch
-                                 #{p _hoQGWMnyQPAh3k2jhWM7N}#
+                                 #{p -ANAU$bmvAmthP7L7xwtBu}#
                                  '(#(free-id
                                      #(syntax-object
                                        unquote-splicing
@@ -26029,12 +26020,12 @@
                                         #(ribcage
                                           #(p q)
                                           #((top) (top))
-                                          #("322" "323"))
+                                          #("1dx" "1dy"))
                                         #(ribcage () () ())
                                         #(ribcage
                                           #(p lev)
                                           #((top) (top))
-                                          #("320" "321"))
+                                          #("1dv" "1dw"))
                                         #(ribcage
                                           (emit quasivector
                                                 quasilist*
@@ -26049,38 +26040,38 @@
                                            (top)
                                            (top)
                                            (top))
-                                          ("31o"
-                                           "31n"
-                                           "31m"
-                                           "31l"
-                                           "31k"
-                                           "31j"
-                                           "31i")))
+                                          ("1dj"
+                                           "1di"
+                                           "1dh"
+                                           "1dg"
+                                           "1df"
+                                           "1de"
+                                           "1dd")))
                                        (hygiene guile)))
                                    .
                                    each-any))))
-                         (if #{tmp _hoQGWMnyQPAh3k2jhWM7@}#
+                         (if #{tmp -ANAU$bmvAmthP7L7xwtCg}#
                            (@apply
-                             (lambda (#{p _hoQGWMnyQPAh3k2jhWM8D}#)
-                               (if (= #{lev _hoQGWMnyQPAh3k2jhWM7H}# 0)
-                                 (#{quasiappend _hoQGWMnyQPAh3k2jhWM4P}#
-                                   (map (lambda (#{tmp _hoQGWMnyQPAh3k2jhWM15 _hoQGWMnyQPAh3k2jhWM8G}#)
+                             (lambda (#{p -ANAU$bmvAmthP7L7xwtCk}#)
+                               (if (= #{lev -ANAU$bmvAmthP7L7xwtBo}# 0)
+                                 (#{quasiappend -ANAU$bmvAmthP7L7xws$w}#
+                                   (map (lambda (#{tmp -ANAU$bmvAmthP7L7xws8a -ANAU$bmvAmthP7L7xwtCn}#)
                                           (list '#(syntax-object
                                                    "value"
                                                    ((top)
                                                     #(ribcage
                                                       #(p)
                                                       #((top))
-                                                      #("325"))
+                                                      #("1e0"))
                                                     #(ribcage
                                                       #(p q)
                                                       #((top) (top))
-                                                      #("322" "323"))
+                                                      #("1dx" "1dy"))
                                                     #(ribcage () () ())
                                                     #(ribcage
                                                       #(p lev)
                                                       #((top) (top))
-                                                      #("320" "321"))
+                                                      #("1dv" "1dw"))
                                                     #(ribcage
                                                       (emit quasivector
                                                             quasilist*
@@ -26095,34 +26086,34 @@
                                                        (top)
                                                        (top)
                                                        (top))
-                                                      ("31o"
-                                                       "31n"
-                                                       "31m"
-                                                       "31l"
-                                                       "31k"
-                                                       "31j"
-                                                       "31i")))
+                                                      ("1dj"
+                                                       "1di"
+                                                       "1dh"
+                                                       "1dg"
+                                                       "1df"
+                                                       "1de"
+                                                       "1dd")))
                                                    (hygiene guile))
-                                                #{tmp _hoQGWMnyQPAh3k2jhWM15 _hoQGWMnyQPAh3k2jhWM8G}#))
-                                        #{p _hoQGWMnyQPAh3k2jhWM8D}#)
-                                   (#{vquasi _hoQGWMnyQPAh3k2jhWM4N}#
-                                     #{q _hoQGWMnyQPAh3k2jhWM7O}#
-                                     #{lev _hoQGWMnyQPAh3k2jhWM7H}#))
-                                 (#{quasicons _hoQGWMnyQPAh3k2jhWM4O}#
-                                   (#{quasicons _hoQGWMnyQPAh3k2jhWM4O}#
+                                                #{tmp -ANAU$bmvAmthP7L7xws8a -ANAU$bmvAmthP7L7xwtCn}#))
+                                        #{p -ANAU$bmvAmthP7L7xwtCk}#)
+                                   (#{vquasi -ANAU$bmvAmthP7L7xws$u}#
+                                     #{q -ANAU$bmvAmthP7L7xwtBv}#
+                                     #{lev -ANAU$bmvAmthP7L7xwtBo}#))
+                                 (#{quasicons -ANAU$bmvAmthP7L7xws$v}#
+                                   (#{quasicons -ANAU$bmvAmthP7L7xws$v}#
                                      '(#(syntax-object
                                          "quote"
                                          ((top)
-                                          #(ribcage #(p) #((top)) #("325"))
+                                          #(ribcage #(p) #((top)) #("1e0"))
                                           #(ribcage
                                             #(p q)
                                             #((top) (top))
-                                            #("322" "323"))
+                                            #("1dx" "1dy"))
                                           #(ribcage () () ())
                                           #(ribcage
                                             #(p lev)
                                             #((top) (top))
-                                            #("320" "321"))
+                                            #("1dv" "1dw"))
                                           #(ribcage
                                             (emit quasivector
                                                   quasilist*
@@ -26137,27 +26128,27 @@
                                              (top)
                                              (top)
                                              (top))
-                                            ("31o"
-                                             "31n"
-                                             "31m"
-                                             "31l"
-                                             "31k"
-                                             "31j"
-                                             "31i")))
+                                            ("1dj"
+                                             "1di"
+                                             "1dh"
+                                             "1dg"
+                                             "1df"
+                                             "1de"
+                                             "1dd")))
                                          (hygiene guile))
                                        #(syntax-object
                                          unquote-splicing
                                          ((top)
-                                          #(ribcage #(p) #((top)) #("325"))
+                                          #(ribcage #(p) #((top)) #("1e0"))
                                           #(ribcage
                                             #(p q)
                                             #((top) (top))
-                                            #("322" "323"))
+                                            #("1dx" "1dy"))
                                           #(ribcage () () ())
                                           #(ribcage
                                             #(p lev)
                                             #((top) (top))
-                                            #("320" "321"))
+                                            #("1dv" "1dw"))
                                           #(ribcage
                                             (emit quasivector
                                                   quasilist*
@@ -26172,39 +26163,39 @@
                                              (top)
                                              (top)
                                              (top))
-                                            ("31o"
-                                             "31n"
-                                             "31m"
-                                             "31l"
-                                             "31k"
-                                             "31j"
-                                             "31i")))
+                                            ("1dj"
+                                             "1di"
+                                             "1dh"
+                                             "1dg"
+                                             "1df"
+                                             "1de"
+                                             "1dd")))
                                          (hygiene guile)))
-                                     (#{quasi _hoQGWMnyQPAh3k2jhWM4M}#
-                                       #{p _hoQGWMnyQPAh3k2jhWM8D}#
-                                       (#{1-}# #{lev _hoQGWMnyQPAh3k2jhWM7H}#)))
-                                   (#{vquasi _hoQGWMnyQPAh3k2jhWM4N}#
-                                     #{q _hoQGWMnyQPAh3k2jhWM7O}#
-                                     #{lev _hoQGWMnyQPAh3k2jhWM7H}#))))
-                             #{tmp _hoQGWMnyQPAh3k2jhWM7@}#)
-                           (#{quasicons _hoQGWMnyQPAh3k2jhWM4O}#
-                             (#{quasi _hoQGWMnyQPAh3k2jhWM4M}#
-                               #{p _hoQGWMnyQPAh3k2jhWM7N}#
-                               #{lev _hoQGWMnyQPAh3k2jhWM7H}#)
-                             (#{vquasi _hoQGWMnyQPAh3k2jhWM4N}#
-                               #{q _hoQGWMnyQPAh3k2jhWM7O}#
-                               #{lev _hoQGWMnyQPAh3k2jhWM7H}#)))))))
-                 #{tmp _hoQGWMnyQPAh3k2jhWM7J}#)
-               (let ((#{tmp _hoQGWMnyQPAh3k2jhWM8Y}#
-                       ($sc-dispatch #{p _hoQGWMnyQPAh3k2jhWM7G}# '())))
-                 (if #{tmp _hoQGWMnyQPAh3k2jhWM8Y}#
+                                     (#{quasi -ANAU$bmvAmthP7L7xws$t}#
+                                       #{p -ANAU$bmvAmthP7L7xwtCk}#
+                                       (#{1-}# #{lev -ANAU$bmvAmthP7L7xwtBo}#)))
+                                   (#{vquasi -ANAU$bmvAmthP7L7xws$u}#
+                                     #{q -ANAU$bmvAmthP7L7xwtBv}#
+                                     #{lev -ANAU$bmvAmthP7L7xwtBo}#))))
+                             #{tmp -ANAU$bmvAmthP7L7xwtCg}#)
+                           (#{quasicons -ANAU$bmvAmthP7L7xws$v}#
+                             (#{quasi -ANAU$bmvAmthP7L7xws$t}#
+                               #{p -ANAU$bmvAmthP7L7xwtBu}#
+                               #{lev -ANAU$bmvAmthP7L7xwtBo}#)
+                             (#{vquasi -ANAU$bmvAmthP7L7xws$u}#
+                               #{q -ANAU$bmvAmthP7L7xwtBv}#
+                               #{lev -ANAU$bmvAmthP7L7xwtBo}#)))))))
+                 #{tmp -ANAU$bmvAmthP7L7xwtBq}#)
+               (let ((#{tmp -ANAU$bmvAmthP7L7xwtC5}#
+                       ($sc-dispatch #{p -ANAU$bmvAmthP7L7xwtBn}# '())))
+                 (if #{tmp -ANAU$bmvAmthP7L7xwtC5}#
                    (@apply
                      (lambda ()
                        '(#(syntax-object
                            "quote"
                            ((top)
                             #(ribcage () () ())
-                            #(ribcage #(p lev) #((top) (top)) #("320" "321"))
+                            #(ribcage #(p lev) #((top) (top)) #("1dv" "1dw"))
                             #(ribcage
                               (emit quasivector
                                     quasilist*
@@ -26213,64 +26204,64 @@
                                     vquasi
                                     quasi)
                               ((top) (top) (top) (top) (top) (top) (top))
-                              ("31o" "31n" "31m" "31l" "31k" "31j" "31i")))
+                              ("1dj" "1di" "1dh" "1dg" "1df" "1de" "1dd")))
                            (hygiene guile))
                          ()))
-                     #{tmp _hoQGWMnyQPAh3k2jhWM8Y}#)
+                     #{tmp -ANAU$bmvAmthP7L7xwtC5}#)
                    (syntax-violation
                      #f
                      "source expression failed to match any pattern"
-                     #{p _hoQGWMnyQPAh3k2jhWM7G}#)))))))
-       (#{quasicons _hoQGWMnyQPAh3k2jhWM4O}#
-         (lambda (#{x _hoQGWMnyQPAh3k2jhWM8l}#
-                  #{y _hoQGWMnyQPAh3k2jhWM8m}#)
-           (let ((#{tmp _hoQGWMnyQPAh3k2jhWM8n}#
-                   (list #{x _hoQGWMnyQPAh3k2jhWM8l}#
-                         #{y _hoQGWMnyQPAh3k2jhWM8m}#)))
-             (let ((#{tmp _hoQGWMnyQPAh3k2jhWM8o}#
+                     #{p -ANAU$bmvAmthP7L7xwtBn}#)))))))
+       (#{quasicons -ANAU$bmvAmthP7L7xws$v}#
+         (lambda (#{x -ANAU$bmvAmthP7L7xwtDG}#
+                  #{y -ANAU$bmvAmthP7L7xwtDH}#)
+           (let ((#{tmp -ANAU$bmvAmthP7L7xwtDI}#
+                   (list #{x -ANAU$bmvAmthP7L7xwtDG}#
+                         #{y -ANAU$bmvAmthP7L7xwtDH}#)))
+             (let ((#{tmp -ANAU$bmvAmthP7L7xwtDJ}#
                      ($sc-dispatch
-                       #{tmp _hoQGWMnyQPAh3k2jhWM8n}#
+                       #{tmp -ANAU$bmvAmthP7L7xwtDI}#
                        '(any any))))
-               (if #{tmp _hoQGWMnyQPAh3k2jhWM8o}#
+               (if #{tmp -ANAU$bmvAmthP7L7xwtDJ}#
                  (@apply
-                   (lambda (#{x _hoQGWMnyQPAh3k2jhWM8q}#
-                            #{y _hoQGWMnyQPAh3k2jhWM8r}#)
-                     (let ((#{tmp _hoQGWMnyQPAh3k2jhWM8t}#
+                   (lambda (#{x -ANAU$bmvAmthP7L7xwtDL}#
+                            #{y -ANAU$bmvAmthP7L7xwtDM}#)
+                     (let ((#{tmp -ANAU$bmvAmthP7L7xwtDO}#
                              ($sc-dispatch
-                               #{y _hoQGWMnyQPAh3k2jhWM8r}#
+                               #{y -ANAU$bmvAmthP7L7xwtDM}#
                                '(#(atom "quote") any))))
-                       (if #{tmp _hoQGWMnyQPAh3k2jhWM8t}#
+                       (if #{tmp -ANAU$bmvAmthP7L7xwtDO}#
                          (@apply
-                           (lambda (#{dy _hoQGWMnyQPAh3k2jhWM8x}#)
-                             (let ((#{tmp _hoQGWMnyQPAh3k2jhWM8z}#
+                           (lambda (#{dy -ANAU$bmvAmthP7L7xwtDS}#)
+                             (let ((#{tmp -ANAU$bmvAmthP7L7xwtDU}#
                                      ($sc-dispatch
-                                       #{x _hoQGWMnyQPAh3k2jhWM8q}#
+                                       #{x -ANAU$bmvAmthP7L7xwtDL}#
                                        '(#(atom "quote") any))))
-                               (if #{tmp _hoQGWMnyQPAh3k2jhWM8z}#
+                               (if #{tmp -ANAU$bmvAmthP7L7xwtDU}#
                                  (@apply
-                                   (lambda (#{dx _hoQGWMnyQPAh3k2jhWM83}#)
+                                   (lambda (#{dx -ANAU$bmvAmthP7L7xwtDY}#)
                                      (list '#(syntax-object
                                               "quote"
                                               ((top)
                                                #(ribcage
                                                  #(dx)
                                                  #((top))
-                                                 #("32c"))
+                                                 #("1e7"))
                                                #(ribcage
                                                  #(dy)
                                                  #((top))
-                                                 #("32b"))
+                                                 #("1e6"))
                                                #(ribcage () () ())
                                                #(ribcage
                                                  #(x y)
                                                  #((top) (top))
-                                                 #("329" "32a"))
+                                                 #("1e4" "1e5"))
                                                #(ribcage () () ())
                                                #(ribcage () () ())
                                                #(ribcage
                                                  #(x y)
                                                  #((top) (top))
-                                                 #("327" "328"))
+                                                 #("1e2" "1e3"))
                                                #(ribcage
                                                  (emit quasivector
                                                        quasilist*
@@ -26285,34 +26276,34 @@
                                                   (top)
                                                   (top)
                                                   (top))
-                                                 ("31o"
-                                                  "31n"
-                                                  "31m"
-                                                  "31l"
-                                                  "31k"
-                                                  "31j"
-                                                  "31i")))
+                                                 ("1dj"
+                                                  "1di"
+                                                  "1dh"
+                                                  "1dg"
+                                                  "1df"
+                                                  "1de"
+                                                  "1dd")))
                                               (hygiene guile))
-                                           (cons #{dx _hoQGWMnyQPAh3k2jhWM83}#
-                                                 #{dy _hoQGWMnyQPAh3k2jhWM8x}#)))
-                                   #{tmp _hoQGWMnyQPAh3k2jhWM8z}#)
-                                 (if (null? #{dy _hoQGWMnyQPAh3k2jhWM8x}#)
+                                           (cons #{dx -ANAU$bmvAmthP7L7xwtDY}#
+                                                 #{dy -ANAU$bmvAmthP7L7xwtDS}#)))
+                                   #{tmp -ANAU$bmvAmthP7L7xwtDU}#)
+                                 (if (null? #{dy -ANAU$bmvAmthP7L7xwtDS}#)
                                    (list '#(syntax-object
                                             "list"
                                             ((top)
-                                             #(ribcage #(_) #((top)) #("32d"))
-                                             #(ribcage #(dy) #((top)) #("32b"))
+                                             #(ribcage #(_) #((top)) #("1e8"))
+                                             #(ribcage #(dy) #((top)) #("1e6"))
                                              #(ribcage () () ())
                                              #(ribcage
                                                #(x y)
                                                #((top) (top))
-                                               #("329" "32a"))
+                                               #("1e4" "1e5"))
                                              #(ribcage () () ())
                                              #(ribcage () () ())
                                              #(ribcage
                                                #(x y)
                                                #((top) (top))
-                                               #("327" "328"))
+                                               #("1e2" "1e3"))
                                              #(ribcage
                                                (emit quasivector
                                                      quasilist*
@@ -26327,31 +26318,31 @@
                                                 (top)
                                                 (top)
                                                 (top))
-                                               ("31o"
-                                                "31n"
-                                                "31m"
-                                                "31l"
-                                                "31k"
-                                                "31j"
-                                                "31i")))
+                                               ("1dj"
+                                                "1di"
+                                                "1dh"
+                                                "1dg"
+                                                "1df"
+                                                "1de"
+                                                "1dd")))
                                             (hygiene guile))
-                                         #{x _hoQGWMnyQPAh3k2jhWM8q}#)
+                                         #{x -ANAU$bmvAmthP7L7xwtDL}#)
                                    (list '#(syntax-object
                                             "list*"
                                             ((top)
-                                             #(ribcage #(_) #((top)) #("32d"))
-                                             #(ribcage #(dy) #((top)) #("32b"))
+                                             #(ribcage #(_) #((top)) #("1e8"))
+                                             #(ribcage #(dy) #((top)) #("1e6"))
                                              #(ribcage () () ())
                                              #(ribcage
                                                #(x y)
                                                #((top) (top))
-                                               #("329" "32a"))
+                                               #("1e4" "1e5"))
                                              #(ribcage () () ())
                                              #(ribcage () () ())
                                              #(ribcage
                                                #(x y)
                                                #((top) (top))
-                                               #("327" "328"))
+                                               #("1e2" "1e3"))
                                              #(ribcage
                                                (emit quasivector
                                                      quasilist*
@@ -26366,42 +26357,42 @@
                                                 (top)
                                                 (top)
                                                 (top))
-                                               ("31o"
-                                                "31n"
-                                                "31m"
-                                                "31l"
-                                                "31k"
-                                                "31j"
-                                                "31i")))
+                                               ("1dj"
+                                                "1di"
+                                                "1dh"
+                                                "1dg"
+                                                "1df"
+                                                "1de"
+                                                "1dd")))
                                             (hygiene guile))
-                                         #{x _hoQGWMnyQPAh3k2jhWM8q}#
-                                         #{y _hoQGWMnyQPAh3k2jhWM8r}#)))))
-                           #{tmp _hoQGWMnyQPAh3k2jhWM8t}#)
-                         (let ((#{tmp _hoQGWMnyQPAh3k2jhWM88}#
+                                         #{x -ANAU$bmvAmthP7L7xwtDL}#
+                                         #{y -ANAU$bmvAmthP7L7xwtDM}#)))))
+                           #{tmp -ANAU$bmvAmthP7L7xwtDO}#)
+                         (let ((#{tmp -ANAU$bmvAmthP7L7xwtDd}#
                                  ($sc-dispatch
-                                   #{y _hoQGWMnyQPAh3k2jhWM8r}#
+                                   #{y -ANAU$bmvAmthP7L7xwtDM}#
                                    '(#(atom "list") . any))))
-                           (if #{tmp _hoQGWMnyQPAh3k2jhWM88}#
+                           (if #{tmp -ANAU$bmvAmthP7L7xwtDd}#
                              (@apply
-                               (lambda (#{stuff _hoQGWMnyQPAh3k2jhWM9A}#)
+                               (lambda (#{stuff -ANAU$bmvAmthP7L7xwtDh}#)
                                  (cons '#(syntax-object
                                           "list"
                                           ((top)
                                            #(ribcage
                                              #(stuff)
                                              #((top))
-                                             #("32e"))
+                                             #("1e9"))
                                            #(ribcage () () ())
                                            #(ribcage
                                              #(x y)
                                              #((top) (top))
-                                             #("329" "32a"))
+                                             #("1e4" "1e5"))
                                            #(ribcage () () ())
                                            #(ribcage () () ())
                                            #(ribcage
                                              #(x y)
                                              #((top) (top))
-                                             #("327" "328"))
+                                             #("1e2" "1e3"))
                                            #(ribcage
                                              (emit quasivector
                                                    quasilist*
@@ -26416,42 +26407,42 @@
                                               (top)
                                               (top)
                                               (top))
-                                             ("31o"
-                                              "31n"
-                                              "31m"
-                                              "31l"
-                                              "31k"
-                                              "31j"
-                                              "31i")))
+                                             ("1dj"
+                                              "1di"
+                                              "1dh"
+                                              "1dg"
+                                              "1df"
+                                              "1de"
+                                              "1dd")))
                                           (hygiene guile))
-                                       (cons #{x _hoQGWMnyQPAh3k2jhWM8q}#
-                                             #{stuff _hoQGWMnyQPAh3k2jhWM9A}#)))
-                               #{tmp _hoQGWMnyQPAh3k2jhWM88}#)
-                             (let ((#{tmp _hoQGWMnyQPAh3k2jhWM9B}#
+                                       (cons #{x -ANAU$bmvAmthP7L7xwtDL}#
+                                             #{stuff -ANAU$bmvAmthP7L7xwtDh}#)))
+                               #{tmp -ANAU$bmvAmthP7L7xwtDd}#)
+                             (let ((#{tmp -ANAU$bmvAmthP7L7xwtDi}#
                                      ($sc-dispatch
-                                       #{y _hoQGWMnyQPAh3k2jhWM8r}#
+                                       #{y -ANAU$bmvAmthP7L7xwtDM}#
                                        '(#(atom "list*") . any))))
-                               (if #{tmp _hoQGWMnyQPAh3k2jhWM9B}#
+                               (if #{tmp -ANAU$bmvAmthP7L7xwtDi}#
                                  (@apply
-                                   (lambda (#{stuff _hoQGWMnyQPAh3k2jhWM9F}#)
+                                   (lambda (#{stuff -ANAU$bmvAmthP7L7xwtDm}#)
                                      (cons '#(syntax-object
                                               "list*"
                                               ((top)
                                                #(ribcage
                                                  #(stuff)
                                                  #((top))
-                                                 #("32f"))
+                                                 #("1ea"))
                                                #(ribcage () () ())
                                                #(ribcage
                                                  #(x y)
                                                  #((top) (top))
-                                                 #("329" "32a"))
+                                                 #("1e4" "1e5"))
                                                #(ribcage () () ())
                                                #(ribcage () () ())
                                                #(ribcage
                                                  #(x y)
                                                  #((top) (top))
-                                                 #("327" "328"))
+                                                 #("1e2" "1e3"))
                                                #(ribcage
                                                  (emit quasivector
                                                        quasilist*
@@ -26466,32 +26457,32 @@
                                                   (top)
                                                   (top)
                                                   (top))
-                                                 ("31o"
-                                                  "31n"
-                                                  "31m"
-                                                  "31l"
-                                                  "31k"
-                                                  "31j"
-                                                  "31i")))
+                                                 ("1dj"
+                                                  "1di"
+                                                  "1dh"
+                                                  "1dg"
+                                                  "1df"
+                                                  "1de"
+                                                  "1dd")))
                                               (hygiene guile))
-                                           (cons #{x _hoQGWMnyQPAh3k2jhWM8q}#
-                                                 #{stuff _hoQGWMnyQPAh3k2jhWM9F}#)))
-                                   #{tmp _hoQGWMnyQPAh3k2jhWM9B}#)
+                                           (cons #{x -ANAU$bmvAmthP7L7xwtDL}#
+                                                 #{stuff -ANAU$bmvAmthP7L7xwtDm}#)))
+                                   #{tmp -ANAU$bmvAmthP7L7xwtDi}#)
                                  (list '#(syntax-object
                                           "list*"
                                           ((top)
-                                           #(ribcage #(_) #((top)) #("32g"))
+                                           #(ribcage #(_) #((top)) #("1eb"))
                                            #(ribcage () () ())
                                            #(ribcage
                                              #(x y)
                                              #((top) (top))
-                                             #("329" "32a"))
+                                             #("1e4" "1e5"))
                                            #(ribcage () () ())
                                            #(ribcage () () ())
                                            #(ribcage
                                              #(x y)
                                              #((top) (top))
-                                             #("327" "328"))
+                                             #("1e2" "1e3"))
                                            #(ribcage
                                              (emit quasivector
                                                    quasilist*
@@ -26506,37 +26497,37 @@
                                               (top)
                                               (top)
                                               (top))
-                                             ("31o"
-                                              "31n"
-                                              "31m"
-                                              "31l"
-                                              "31k"
-                                              "31j"
-                                              "31i")))
+                                             ("1dj"
+                                              "1di"
+                                              "1dh"
+                                              "1dg"
+                                              "1df"
+                                              "1de"
+                                              "1dd")))
                                           (hygiene guile))
-                                       #{x _hoQGWMnyQPAh3k2jhWM8q}#
-                                       #{y _hoQGWMnyQPAh3k2jhWM8r}#))))))))
-                   #{tmp _hoQGWMnyQPAh3k2jhWM8o}#)
+                                       #{x -ANAU$bmvAmthP7L7xwtDL}#
+                                       #{y -ANAU$bmvAmthP7L7xwtDM}#))))))))
+                   #{tmp -ANAU$bmvAmthP7L7xwtDJ}#)
                  (syntax-violation
                    #f
                    "source expression failed to match any pattern"
-                   #{tmp _hoQGWMnyQPAh3k2jhWM8n}#))))))
-       (#{quasiappend _hoQGWMnyQPAh3k2jhWM4P}#
-         (lambda (#{x _hoQGWMnyQPAh3k2jhWM9Q}#
-                  #{y _hoQGWMnyQPAh3k2jhWM9R}#)
-           (let ((#{tmp _hoQGWMnyQPAh3k2jhWM9T}#
+                   #{tmp -ANAU$bmvAmthP7L7xwtDI}#))))))
+       (#{quasiappend -ANAU$bmvAmthP7L7xws$w}#
+         (lambda (#{x -ANAU$bmvAmthP7L7xwtDx}#
+                  #{y -ANAU$bmvAmthP7L7xwtDy}#)
+           (let ((#{tmp -ANAU$bmvAmthP7L7xwtD0}#
                    ($sc-dispatch
-                     #{y _hoQGWMnyQPAh3k2jhWM9R}#
+                     #{y -ANAU$bmvAmthP7L7xwtDy}#
                      '(#(atom "quote") ()))))
-             (if #{tmp _hoQGWMnyQPAh3k2jhWM9T}#
+             (if #{tmp -ANAU$bmvAmthP7L7xwtD0}#
                (@apply
                  (lambda ()
-                   (if (null? #{x _hoQGWMnyQPAh3k2jhWM9Q}#)
+                   (if (null? #{x -ANAU$bmvAmthP7L7xwtDx}#)
                      '(#(syntax-object
                          "quote"
                          ((top)
                           #(ribcage () () ())
-                          #(ribcage #(x y) #((top) (top)) #("32h" "32i"))
+                          #(ribcage #(x y) #((top) (top)) #("1ec" "1ed"))
                           #(ribcage
                             (emit quasivector
                                   quasilist*
@@ -26545,28 +26536,28 @@
                                   vquasi
                                   quasi)
                             ((top) (top) (top) (top) (top) (top) (top))
-                            ("31o" "31n" "31m" "31l" "31k" "31j" "31i")))
+                            ("1dj" "1di" "1dh" "1dg" "1df" "1de" "1dd")))
                          (hygiene guile))
                        ())
-                     (if (null? (cdr #{x _hoQGWMnyQPAh3k2jhWM9Q}#))
-                       (car #{x _hoQGWMnyQPAh3k2jhWM9Q}#)
-                       (let ((#{tmp _hoQGWMnyQPAh3k2jhWM9Y}#
+                     (if (null? (cdr #{x -ANAU$bmvAmthP7L7xwtDx}#))
+                       (car #{x -ANAU$bmvAmthP7L7xwtDx}#)
+                       (let ((#{tmp -ANAU$bmvAmthP7L7xwtD5}#
                                ($sc-dispatch
-                                 #{x _hoQGWMnyQPAh3k2jhWM9Q}#
+                                 #{x -ANAU$bmvAmthP7L7xwtDx}#
                                  'each-any)))
-                         (if #{tmp _hoQGWMnyQPAh3k2jhWM9Y}#
+                         (if #{tmp -ANAU$bmvAmthP7L7xwtD5}#
                            (@apply
-                             (lambda (#{p _hoQGWMnyQPAh3k2jhWM9c}#)
+                             (lambda (#{p -ANAU$bmvAmthP7L7xwtD9}#)
                                (cons '#(syntax-object
                                         "append"
                                         ((top)
                                          #(ribcage () () ())
-                                         #(ribcage #(p) #((top)) #("32j"))
+                                         #(ribcage #(p) #((top)) #("1ee"))
                                          #(ribcage () () ())
                                          #(ribcage
                                            #(x y)
                                            #((top) (top))
-                                           #("32h" "32i"))
+                                           #("1ec" "1ed"))
                                          #(ribcage
                                            (emit quasivector
                                                  quasilist*
@@ -26581,34 +26572,34 @@
                                             (top)
                                             (top)
                                             (top))
-                                           ("31o"
-                                            "31n"
-                                            "31m"
-                                            "31l"
-                                            "31k"
-                                            "31j"
-                                            "31i")))
+                                           ("1dj"
+                                            "1di"
+                                            "1dh"
+                                            "1dg"
+                                            "1df"
+                                            "1de"
+                                            "1dd")))
                                         (hygiene guile))
-                                     #{p _hoQGWMnyQPAh3k2jhWM9c}#))
-                             #{tmp _hoQGWMnyQPAh3k2jhWM9Y}#)
+                                     #{p -ANAU$bmvAmthP7L7xwtD9}#))
+                             #{tmp -ANAU$bmvAmthP7L7xwtD5}#)
                            (syntax-violation
                              #f
                              "source expression failed to match any pattern"
-                             #{x _hoQGWMnyQPAh3k2jhWM9Q}#))))))
-                 #{tmp _hoQGWMnyQPAh3k2jhWM9T}#)
-               (if (null? #{x _hoQGWMnyQPAh3k2jhWM9Q}#)
-                 #{y _hoQGWMnyQPAh3k2jhWM9R}#
-                 (let ((#{tmp _hoQGWMnyQPAh3k2jhWM9k}#
-                         (list #{x _hoQGWMnyQPAh3k2jhWM9Q}#
-                               #{y _hoQGWMnyQPAh3k2jhWM9R}#)))
-                   (let ((#{tmp _hoQGWMnyQPAh3k2jhWM9l}#
+                             #{x -ANAU$bmvAmthP7L7xwtDx}#))))))
+                 #{tmp -ANAU$bmvAmthP7L7xwtD0}#)
+               (if (null? #{x -ANAU$bmvAmthP7L7xwtDx}#)
+                 #{y -ANAU$bmvAmthP7L7xwtDy}#
+                 (let ((#{tmp -ANAU$bmvAmthP7L7xwtEF}#
+                         (list #{x -ANAU$bmvAmthP7L7xwtDx}#
+                               #{y -ANAU$bmvAmthP7L7xwtDy}#)))
+                   (let ((#{tmp -ANAU$bmvAmthP7L7xwtEG}#
                            ($sc-dispatch
-                             #{tmp _hoQGWMnyQPAh3k2jhWM9k}#
+                             #{tmp -ANAU$bmvAmthP7L7xwtEF}#
                              '(each-any any))))
-                     (if #{tmp _hoQGWMnyQPAh3k2jhWM9l}#
+                     (if #{tmp -ANAU$bmvAmthP7L7xwtEG}#
                        (@apply
-                         (lambda (#{p _hoQGWMnyQPAh3k2jhWM9n}#
-                                  #{y _hoQGWMnyQPAh3k2jhWM9o}#)
+                         (lambda (#{p -ANAU$bmvAmthP7L7xwtEI}#
+                                  #{y -ANAU$bmvAmthP7L7xwtEJ}#)
                            (cons '#(syntax-object
                                     "append"
                                     ((top)
@@ -26616,13 +26607,13 @@
                                      #(ribcage
                                        #(p y)
                                        #((top) (top))
-                                       #("32l" "32m"))
-                                     #(ribcage #(_) #((top)) #("32k"))
+                                       #("1eg" "1eh"))
+                                     #(ribcage #(_) #((top)) #("1ef"))
                                      #(ribcage () () ())
                                      #(ribcage
                                        #(x y)
                                        #((top) (top))
-                                       #("32h" "32i"))
+                                       #("1ec" "1ed"))
                                      #(ribcage
                                        (emit quasivector
                                              quasilist*
@@ -26637,51 +26628,51 @@
                                         (top)
                                         (top)
                                         (top))
-                                       ("31o"
-                                        "31n"
-                                        "31m"
-                                        "31l"
-                                        "31k"
-                                        "31j"
-                                        "31i")))
+                                       ("1dj"
+                                        "1di"
+                                        "1dh"
+                                        "1dg"
+                                        "1df"
+                                        "1de"
+                                        "1dd")))
                                     (hygiene guile))
                                  (append
-                                   #{p _hoQGWMnyQPAh3k2jhWM9n}#
-                                   (list #{y _hoQGWMnyQPAh3k2jhWM9o}#))))
-                         #{tmp _hoQGWMnyQPAh3k2jhWM9l}#)
+                                   #{p -ANAU$bmvAmthP7L7xwtEI}#
+                                   (list #{y -ANAU$bmvAmthP7L7xwtEJ}#))))
+                         #{tmp -ANAU$bmvAmthP7L7xwtEG}#)
                        (syntax-violation
                          #f
                          "source expression failed to match any pattern"
-                         #{tmp _hoQGWMnyQPAh3k2jhWM9k}#)))))))))
-       (#{quasilist* _hoQGWMnyQPAh3k2jhWM4Q}#
-         (lambda (#{x _hoQGWMnyQPAh3k2jhWM9s}#
-                  #{y _hoQGWMnyQPAh3k2jhWM9t}#)
+                         #{tmp -ANAU$bmvAmthP7L7xwtEF}#)))))))))
+       (#{quasilist* -ANAU$bmvAmthP7L7xws$x}#
+         (lambda (#{x -ANAU$bmvAmthP7L7xwtEN}#
+                  #{y -ANAU$bmvAmthP7L7xwtEO}#)
            (letrec*
-             ((#{f _hoQGWMnyQPAh3k2jhWM9u}#
-                (lambda (#{x _hoQGWMnyQPAh3k2jhWM@H}#)
-                  (if (null? #{x _hoQGWMnyQPAh3k2jhWM@H}#)
-                    #{y _hoQGWMnyQPAh3k2jhWM9t}#
-                    (#{quasicons _hoQGWMnyQPAh3k2jhWM4O}#
-                      (car #{x _hoQGWMnyQPAh3k2jhWM@H}#)
-                      (#{f _hoQGWMnyQPAh3k2jhWM9u}#
-                        (cdr #{x _hoQGWMnyQPAh3k2jhWM@H}#)))))))
-             (#{f _hoQGWMnyQPAh3k2jhWM9u}#
-               #{x _hoQGWMnyQPAh3k2jhWM9s}#))))
-       (#{emit _hoQGWMnyQPAh3k2jhWM4S}#
-         (lambda (#{x _hoQGWMnyQPAh3k2jhWM@K}#)
-           (let ((#{tmp _hoQGWMnyQPAh3k2jhWM@M}#
+             ((#{f -ANAU$bmvAmthP7L7xwtEP}#
+                (lambda (#{x -ANAU$bmvAmthP7L7xwtFo}#)
+                  (if (null? #{x -ANAU$bmvAmthP7L7xwtFo}#)
+                    #{y -ANAU$bmvAmthP7L7xwtEO}#
+                    (#{quasicons -ANAU$bmvAmthP7L7xws$v}#
+                      (car #{x -ANAU$bmvAmthP7L7xwtFo}#)
+                      (#{f -ANAU$bmvAmthP7L7xwtEP}#
+                        (cdr #{x -ANAU$bmvAmthP7L7xwtFo}#)))))))
+             (#{f -ANAU$bmvAmthP7L7xwtEP}#
+               #{x -ANAU$bmvAmthP7L7xwtEN}#))))
+       (#{emit -ANAU$bmvAmthP7L7xws$z}#
+         (lambda (#{x -ANAU$bmvAmthP7L7xwtFr}#)
+           (let ((#{tmp -ANAU$bmvAmthP7L7xwtFt}#
                    ($sc-dispatch
-                     #{x _hoQGWMnyQPAh3k2jhWM@K}#
+                     #{x -ANAU$bmvAmthP7L7xwtFr}#
                      '(#(atom "quote") any))))
-             (if #{tmp _hoQGWMnyQPAh3k2jhWM@M}#
+             (if #{tmp -ANAU$bmvAmthP7L7xwtFt}#
                (@apply
-                 (lambda (#{x _hoQGWMnyQPAh3k2jhWM@Q}#)
+                 (lambda (#{x -ANAU$bmvAmthP7L7xwtFx}#)
                    (list '#(syntax-object
                             quote
                             ((top)
-                             #(ribcage #(x) #((top)) #("337"))
+                             #(ribcage #(x) #((top)) #("1f2"))
                              #(ribcage () () ())
-                             #(ribcage #(x) #((top)) #("336"))
+                             #(ribcage #(x) #((top)) #("1f1"))
                              #(ribcage
                                (emit quasivector
                                      quasilist*
@@ -26690,38 +26681,38 @@
                                      vquasi
                                      quasi)
                                ((top) (top) (top) (top) (top) (top) (top))
-                               ("31o" "31n" "31m" "31l" "31k" "31j" "31i")))
+                               ("1dj" "1di" "1dh" "1dg" "1df" "1de" "1dd")))
                             (hygiene guile))
-                         #{x _hoQGWMnyQPAh3k2jhWM@Q}#))
-                 #{tmp _hoQGWMnyQPAh3k2jhWM@M}#)
-               (let ((#{tmp _hoQGWMnyQPAh3k2jhWM@R}#
+                         #{x -ANAU$bmvAmthP7L7xwtFx}#))
+                 #{tmp -ANAU$bmvAmthP7L7xwtFt}#)
+               (let ((#{tmp -ANAU$bmvAmthP7L7xwtFy}#
                        ($sc-dispatch
-                         #{x _hoQGWMnyQPAh3k2jhWM@K}#
+                         #{x -ANAU$bmvAmthP7L7xwtFr}#
                          '(#(atom "list") . each-any))))
-                 (if #{tmp _hoQGWMnyQPAh3k2jhWM@R}#
+                 (if #{tmp -ANAU$bmvAmthP7L7xwtFy}#
                    (@apply
-                     (lambda (#{x _hoQGWMnyQPAh3k2jhWM@V}#)
-                       (let ((#{tmp _hoQGWMnyQPAh3k2jhWM@W}#
-                               (map #{emit _hoQGWMnyQPAh3k2jhWM4S}#
-                                    #{x _hoQGWMnyQPAh3k2jhWM@V}#)))
-                         (let ((#{tmp _hoQGWMnyQPAh3k2jhWM@X}#
+                     (lambda (#{x -ANAU$bmvAmthP7L7xwtF2}#)
+                       (let ((#{tmp -ANAU$bmvAmthP7L7xwtF3}#
+                               (map #{emit -ANAU$bmvAmthP7L7xws$z}#
+                                    #{x -ANAU$bmvAmthP7L7xwtF2}#)))
+                         (let ((#{tmp -ANAU$bmvAmthP7L7xwtF4}#
                                  ($sc-dispatch
-                                   #{tmp _hoQGWMnyQPAh3k2jhWM@W}#
+                                   #{tmp -ANAU$bmvAmthP7L7xwtF3}#
                                    'each-any)))
-                           (if #{tmp _hoQGWMnyQPAh3k2jhWM@X}#
+                           (if #{tmp -ANAU$bmvAmthP7L7xwtF4}#
                              (@apply
-                               (lambda (#{ g_hoQGWMnyQPAh3k2jhWM3V _hoQGWMnyQPAh3k2jhWM@Z}#)
+                               (lambda (#{ g-ANAU$bmvAmthP7L7xws92 -ANAU$bmvAmthP7L7xwtF6}#)
                                  (cons '#(syntax-object
                                           list
                                           ((top)
                                            #(ribcage () () ())
                                            #(ribcage
-                                             #(#{ g_hoQGWMnyQPAh3k2jhWM3V}#)
-                                             #((m_hoQGWMnyQPAh3k2jhWM3W top))
-                                             #("339"))
-                                           #(ribcage #(x) #((top)) #("338"))
+                                             #(#{ g-ANAU$bmvAmthP7L7xws92}#)
+                                             #((m-ANAU$bmvAmthP7L7xws93 top))
+                                             #("1f4"))
+                                           #(ribcage #(x) #((top)) #("1f3"))
                                            #(ribcage () () ())
-                                           #(ribcage #(x) #((top)) #("336"))
+                                           #(ribcage #(x) #((top)) #("1f1"))
                                            #(ribcage
                                              (emit quasivector
                                                    quasilist*
@@ -26736,74 +26727,74 @@
                                               (top)
                                               (top)
                                               (top))
-                                             ("31o"
-                                              "31n"
-                                              "31m"
-                                              "31l"
-                                              "31k"
-                                              "31j"
-                                              "31i")))
+                                             ("1dj"
+                                              "1di"
+                                              "1dh"
+                                              "1dg"
+                                              "1df"
+                                              "1de"
+                                              "1dd")))
                                           (hygiene guile))
-                                       #{ g_hoQGWMnyQPAh3k2jhWM3V _hoQGWMnyQPAh3k2jhWM@Z}#))
-                               #{tmp _hoQGWMnyQPAh3k2jhWM@X}#)
+                                       #{ g-ANAU$bmvAmthP7L7xws92 -ANAU$bmvAmthP7L7xwtF6}#))
+                               #{tmp -ANAU$bmvAmthP7L7xwtF4}#)
                              (syntax-violation
                                #f
                                "source expression failed to match any pattern"
-                               #{tmp _hoQGWMnyQPAh3k2jhWM@W}#)))))
-                     #{tmp _hoQGWMnyQPAh3k2jhWM@R}#)
-                   (let ((#{tmp _hoQGWMnyQPAh3k2jhWM@a}#
+                               #{tmp -ANAU$bmvAmthP7L7xwtF3}#)))))
+                     #{tmp -ANAU$bmvAmthP7L7xwtFy}#)
+                   (let ((#{tmp -ANAU$bmvAmthP7L7xwtF7}#
                            ($sc-dispatch
-                             #{x _hoQGWMnyQPAh3k2jhWM@K}#
+                             #{x -ANAU$bmvAmthP7L7xwtFr}#
                              '(#(atom "list*") . #(each+ any (any) ())))))
-                     (if #{tmp _hoQGWMnyQPAh3k2jhWM@a}#
+                     (if #{tmp -ANAU$bmvAmthP7L7xwtF7}#
                        (@apply
-                         (lambda (#{x _hoQGWMnyQPAh3k2jhWM@e}#
-                                  #{y _hoQGWMnyQPAh3k2jhWM@f}#)
+                         (lambda (#{x -ANAU$bmvAmthP7L7xwtF@}#
+                                  #{y -ANAU$bmvAmthP7L7xwtGA}#)
                            (letrec*
-                             ((#{f _hoQGWMnyQPAh3k2jhWM@g}#
-                                (lambda (#{x* _hoQGWMnyQPAh3k2jhWM@j}#)
-                                  (if (null? #{x* _hoQGWMnyQPAh3k2jhWM@j}#)
-                                    (#{emit _hoQGWMnyQPAh3k2jhWM4S}#
-                                      #{y _hoQGWMnyQPAh3k2jhWM@f}#)
-                                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWM@k}#
-                                            (list (#{emit _hoQGWMnyQPAh3k2jhWM4S}#
-                                                    (car #{x* _hoQGWMnyQPAh3k2jhWM@j}#))
-                                                  (#{f _hoQGWMnyQPAh3k2jhWM@g}#
-                                                    (cdr #{x* _hoQGWMnyQPAh3k2jhWM@j}#)))))
-                                      (let ((#{tmp _hoQGWMnyQPAh3k2jhWM@l}#
+                             ((#{f -ANAU$bmvAmthP7L7xwtGB}#
+                                (lambda (#{x* -ANAU$bmvAmthP7L7xwtGE}#)
+                                  (if (null? #{x* -ANAU$bmvAmthP7L7xwtGE}#)
+                                    (#{emit -ANAU$bmvAmthP7L7xws$z}#
+                                      #{y -ANAU$bmvAmthP7L7xwtGA}#)
+                                    (let ((#{tmp -ANAU$bmvAmthP7L7xwtGF}#
+                                            (list (#{emit -ANAU$bmvAmthP7L7xws$z}#
+                                                    (car #{x* -ANAU$bmvAmthP7L7xwtGE}#))
+                                                  (#{f -ANAU$bmvAmthP7L7xwtGB}#
+                                                    (cdr #{x* -ANAU$bmvAmthP7L7xwtGE}#)))))
+                                      (let ((#{tmp -ANAU$bmvAmthP7L7xwtGG}#
                                               ($sc-dispatch
-                                                #{tmp _hoQGWMnyQPAh3k2jhWM@k}#
+                                                #{tmp -ANAU$bmvAmthP7L7xwtGF}#
                                                 '(any any))))
-                                        (if #{tmp _hoQGWMnyQPAh3k2jhWM@l}#
+                                        (if #{tmp -ANAU$bmvAmthP7L7xwtGG}#
                                           (@apply
-                                            (lambda (#{ g_hoQGWMnyQPAh3k2jhWM3k _hoQGWMnyQPAh3k2jhWM@n}#
-                                                     #{ g_hoQGWMnyQPAh3k2jhWM3j _hoQGWMnyQPAh3k2jhWM@o}#)
+                                            (lambda (#{ g-ANAU$bmvAmthP7L7xws$F -ANAU$bmvAmthP7L7xwtGI}#
+                                                     #{ g-ANAU$bmvAmthP7L7xws$E -ANAU$bmvAmthP7L7xwtGJ}#)
                                               (list '#(syntax-object
                                                        cons
                                                        ((top)
                                                         #(ribcage () () ())
                                                         #(ribcage
-                                                          #(#{ g_hoQGWMnyQPAh3k2jhWM3k}#
-                                                            #{ g_hoQGWMnyQPAh3k2jhWM3j}#)
-                                                          #((m_hoQGWMnyQPAh3k2jhWM3l
+                                                          #(#{ g-ANAU$bmvAmthP7L7xws$F}#
+                                                            #{ g-ANAU$bmvAmthP7L7xws$E}#)
+                                                          #((m-ANAU$bmvAmthP7L7xws$G
                                                               top)
-                                                            (m_hoQGWMnyQPAh3k2jhWM3l
+                                                            (m-ANAU$bmvAmthP7L7xws$G
                                                               top))
-                                                          #("33e" "33f"))
+                                                          #("1f9" "1fa"))
                                                         #(ribcage () () ())
                                                         #(ribcage
                                                           #(f x*)
                                                           #((top) (top))
-                                                          #("33c" "33d"))
+                                                          #("1f7" "1f8"))
                                                         #(ribcage
                                                           #(x y)
                                                           #((top) (top))
-                                                          #("33a" "33b"))
+                                                          #("1f5" "1f6"))
                                                         #(ribcage () () ())
                                                         #(ribcage
                                                           #(x)
                                                           #((top))
-                                                          #("336"))
+                                                          #("1f1"))
                                                         #(ribcage
                                                           (emit quasivector
                                                                 quasilist*
@@ -26818,59 +26809,59 @@
                                                            (top)
                                                            (top)
                                                            (top))
-                                                          ("31o"
-                                                           "31n"
-                                                           "31m"
-                                                           "31l"
-                                                           "31k"
-                                                           "31j"
-                                                           "31i")))
+                                                          ("1dj"
+                                                           "1di"
+                                                           "1dh"
+                                                           "1dg"
+                                                           "1df"
+                                                           "1de"
+                                                           "1dd")))
                                                        (hygiene guile))
-                                                    #{ g_hoQGWMnyQPAh3k2jhWM3k _hoQGWMnyQPAh3k2jhWM@n}#
-                                                    #{ g_hoQGWMnyQPAh3k2jhWM3j _hoQGWMnyQPAh3k2jhWM@o}#))
-                                            #{tmp _hoQGWMnyQPAh3k2jhWM@l}#)
+                                                    #{ g-ANAU$bmvAmthP7L7xws$F -ANAU$bmvAmthP7L7xwtGI}#
+                                                    #{ g-ANAU$bmvAmthP7L7xws$E -ANAU$bmvAmthP7L7xwtGJ}#))
+                                            #{tmp -ANAU$bmvAmthP7L7xwtGG}#)
                                           (syntax-violation
                                             #f
                                             "source expression failed to match any pattern"
-                                            #{tmp _hoQGWMnyQPAh3k2jhWM@k}#))))))))
-                             (#{f _hoQGWMnyQPAh3k2jhWM@g}#
-                               #{x _hoQGWMnyQPAh3k2jhWM@e}#)))
-                         #{tmp _hoQGWMnyQPAh3k2jhWM@a}#)
-                       (let ((#{tmp _hoQGWMnyQPAh3k2jhWM@p}#
+                                            #{tmp -ANAU$bmvAmthP7L7xwtGF}#))))))))
+                             (#{f -ANAU$bmvAmthP7L7xwtGB}#
+                               #{x -ANAU$bmvAmthP7L7xwtF@}#)))
+                         #{tmp -ANAU$bmvAmthP7L7xwtF7}#)
+                       (let ((#{tmp -ANAU$bmvAmthP7L7xwtGK}#
                                ($sc-dispatch
-                                 #{x _hoQGWMnyQPAh3k2jhWM@K}#
+                                 #{x -ANAU$bmvAmthP7L7xwtFr}#
                                  '(#(atom "append") . each-any))))
-                         (if #{tmp _hoQGWMnyQPAh3k2jhWM@p}#
+                         (if #{tmp -ANAU$bmvAmthP7L7xwtGK}#
                            (@apply
-                             (lambda (#{x _hoQGWMnyQPAh3k2jhWM@t}#)
-                               (let ((#{tmp _hoQGWMnyQPAh3k2jhWM@u}#
-                                       (map #{emit _hoQGWMnyQPAh3k2jhWM4S}#
-                                            #{x _hoQGWMnyQPAh3k2jhWM@t}#)))
-                                 (let ((#{tmp _hoQGWMnyQPAh3k2jhWM@v}#
+                             (lambda (#{x -ANAU$bmvAmthP7L7xwtGO}#)
+                               (let ((#{tmp -ANAU$bmvAmthP7L7xwtGP}#
+                                       (map #{emit -ANAU$bmvAmthP7L7xws$z}#
+                                            #{x -ANAU$bmvAmthP7L7xwtGO}#)))
+                                 (let ((#{tmp -ANAU$bmvAmthP7L7xwtGQ}#
                                          ($sc-dispatch
-                                           #{tmp _hoQGWMnyQPAh3k2jhWM@u}#
+                                           #{tmp -ANAU$bmvAmthP7L7xwtGP}#
                                            'each-any)))
-                                   (if #{tmp _hoQGWMnyQPAh3k2jhWM@v}#
+                                   (if #{tmp -ANAU$bmvAmthP7L7xwtGQ}#
                                      (@apply
-                                       (lambda (#{ g_hoQGWMnyQPAh3k2jhWM3t _hoQGWMnyQPAh3k2jhWM@x}#)
+                                       (lambda (#{ g-ANAU$bmvAmthP7L7xws$O -ANAU$bmvAmthP7L7xwtGS}#)
                                          (cons '#(syntax-object
                                                   append
                                                   ((top)
                                                    #(ribcage () () ())
                                                    #(ribcage
-                                                     #(#{ g_hoQGWMnyQPAh3k2jhWM3t}#)
-                                                     #((m_hoQGWMnyQPAh3k2jhWM3u
+                                                     #(#{ g-ANAU$bmvAmthP7L7xws$O}#)
+                                                     #((m-ANAU$bmvAmthP7L7xws$P
                                                          top))
-                                                     #("33h"))
+                                                     #("1fc"))
                                                    #(ribcage
                                                      #(x)
                                                      #((top))
-                                                     #("33g"))
+                                                     #("1fb"))
                                                    #(ribcage () () ())
                                                    #(ribcage
                                                      #(x)
                                                      #((top))
-                                                     #("336"))
+                                                     #("1f1"))
                                                    #(ribcage
                                                      (emit quasivector
                                                            quasilist*
@@ -26885,56 +26876,56 @@
                                                       (top)
                                                       (top)
                                                       (top))
-                                                     ("31o"
-                                                      "31n"
-                                                      "31m"
-                                                      "31l"
-                                                      "31k"
-                                                      "31j"
-                                                      "31i")))
+                                                     ("1dj"
+                                                      "1di"
+                                                      "1dh"
+                                                      "1dg"
+                                                      "1df"
+                                                      "1de"
+                                                      "1dd")))
                                                   (hygiene guile))
-                                               #{ g_hoQGWMnyQPAh3k2jhWM3t _hoQGWMnyQPAh3k2jhWM@x}#))
-                                       #{tmp _hoQGWMnyQPAh3k2jhWM@v}#)
+                                               #{ g-ANAU$bmvAmthP7L7xws$O -ANAU$bmvAmthP7L7xwtGS}#))
+                                       #{tmp -ANAU$bmvAmthP7L7xwtGQ}#)
                                      (syntax-violation
                                        #f
                                        "source expression failed to match any pattern"
-                                       #{tmp _hoQGWMnyQPAh3k2jhWM@u}#)))))
-                             #{tmp _hoQGWMnyQPAh3k2jhWM@p}#)
-                           (let ((#{tmp _hoQGWMnyQPAh3k2jhWM@y}#
+                                       #{tmp -ANAU$bmvAmthP7L7xwtGP}#)))))
+                             #{tmp -ANAU$bmvAmthP7L7xwtGK}#)
+                           (let ((#{tmp -ANAU$bmvAmthP7L7xwtGT}#
                                    ($sc-dispatch
-                                     #{x _hoQGWMnyQPAh3k2jhWM@K}#
+                                     #{x -ANAU$bmvAmthP7L7xwtFr}#
                                      '(#(atom "vector") . each-any))))
-                             (if #{tmp _hoQGWMnyQPAh3k2jhWM@y}#
+                             (if #{tmp -ANAU$bmvAmthP7L7xwtGT}#
                                (@apply
-                                 (lambda (#{x _hoQGWMnyQPAh3k2jhWM@2}#)
-                                   (let ((#{tmp _hoQGWMnyQPAh3k2jhWM@3}#
-                                           (map #{emit _hoQGWMnyQPAh3k2jhWM4S}#
-                                                #{x _hoQGWMnyQPAh3k2jhWM@2}#)))
-                                     (let ((#{tmp _hoQGWMnyQPAh3k2jhWM@4}#
+                                 (lambda (#{x -ANAU$bmvAmthP7L7xwtGX}#)
+                                   (let ((#{tmp -ANAU$bmvAmthP7L7xwtGY}#
+                                           (map #{emit -ANAU$bmvAmthP7L7xws$z}#
+                                                #{x -ANAU$bmvAmthP7L7xwtGX}#)))
+                                     (let ((#{tmp -ANAU$bmvAmthP7L7xwtGZ}#
                                              ($sc-dispatch
-                                               #{tmp _hoQGWMnyQPAh3k2jhWM@3}#
+                                               #{tmp -ANAU$bmvAmthP7L7xwtGY}#
                                                'each-any)))
-                                       (if #{tmp _hoQGWMnyQPAh3k2jhWM@4}#
+                                       (if #{tmp -ANAU$bmvAmthP7L7xwtGZ}#
                                          (@apply
-                                           (lambda (#{ g_hoQGWMnyQPAh3k2jhWM33 _hoQGWMnyQPAh3k2jhWM@6}#)
+                                           (lambda (#{ g-ANAU$bmvAmthP7L7xws$Y -ANAU$bmvAmthP7L7xwtGb}#)
                                              (cons '#(syntax-object
                                                       vector
                                                       ((top)
                                                        #(ribcage () () ())
                                                        #(ribcage
-                                                         #(#{ g_hoQGWMnyQPAh3k2jhWM33}#)
-                                                         #((m_hoQGWMnyQPAh3k2jhWM34
+                                                         #(#{ g-ANAU$bmvAmthP7L7xws$Y}#)
+                                                         #((m-ANAU$bmvAmthP7L7xws$Z
                                                              top))
-                                                         #("33j"))
+                                                         #("1fe"))
                                                        #(ribcage
                                                          #(x)
                                                          #((top))
-                                                         #("33i"))
+                                                         #("1fd"))
                                                        #(ribcage () () ())
                                                        #(ribcage
                                                          #(x)
                                                          #((top))
-                                                         #("336"))
+                                                         #("1f1"))
                                                        #(ribcage
                                                          (emit quasivector
                                                                quasilist*
@@ -26949,49 +26940,49 @@
                                                           (top)
                                                           (top)
                                                           (top))
-                                                         ("31o"
-                                                          "31n"
-                                                          "31m"
-                                                          "31l"
-                                                          "31k"
-                                                          "31j"
-                                                          "31i")))
+                                                         ("1dj"
+                                                          "1di"
+                                                          "1dh"
+                                                          "1dg"
+                                                          "1df"
+                                                          "1de"
+                                                          "1dd")))
                                                       (hygiene guile))
-                                                   #{ g_hoQGWMnyQPAh3k2jhWM33 _hoQGWMnyQPAh3k2jhWM@6}#))
-                                           #{tmp _hoQGWMnyQPAh3k2jhWM@4}#)
+                                                   #{ g-ANAU$bmvAmthP7L7xws$Y -ANAU$bmvAmthP7L7xwtGb}#))
+                                           #{tmp -ANAU$bmvAmthP7L7xwtGZ}#)
                                          (syntax-violation
                                            #f
                                            "source expression failed to match any pattern"
-                                           #{tmp _hoQGWMnyQPAh3k2jhWM@3}#)))))
-                                 #{tmp _hoQGWMnyQPAh3k2jhWM@y}#)
-                               (let ((#{tmp _hoQGWMnyQPAh3k2jhWM@7}#
+                                           #{tmp -ANAU$bmvAmthP7L7xwtGY}#)))))
+                                 #{tmp -ANAU$bmvAmthP7L7xwtGT}#)
+                               (let ((#{tmp -ANAU$bmvAmthP7L7xwtGc}#
                                        ($sc-dispatch
-                                         #{x _hoQGWMnyQPAh3k2jhWM@K}#
+                                         #{x -ANAU$bmvAmthP7L7xwtFr}#
                                          '(#(atom "list->vector") any))))
-                                 (if #{tmp _hoQGWMnyQPAh3k2jhWM@7}#
+                                 (if #{tmp -ANAU$bmvAmthP7L7xwtGc}#
                                    (@apply
-                                     (lambda (#{x _hoQGWMnyQPAh3k2jhWM@@}#)
-                                       (let ((#{tmp _hoQGWMnyQPAh3k2jhWNAA}#
-                                               (#{emit _hoQGWMnyQPAh3k2jhWM4S}#
-                                                 #{x _hoQGWMnyQPAh3k2jhWM@@}#)))
+                                     (lambda (#{x -ANAU$bmvAmthP7L7xwtGg}#)
+                                       (let ((#{tmp -ANAU$bmvAmthP7L7xwtGh}#
+                                               (#{emit -ANAU$bmvAmthP7L7xws$z}#
+                                                 #{x -ANAU$bmvAmthP7L7xwtGg}#)))
                                          (list '#(syntax-object
                                                   list->vector
                                                   ((top)
                                                    #(ribcage () () ())
                                                    #(ribcage
-                                                     #(#{ g_hoQGWMnyQPAh3k2jhWM4B}#)
-                                                     #((m_hoQGWMnyQPAh3k2jhWM4C
+                                                     #(#{ g-ANAU$bmvAmthP7L7xws$i}#)
+                                                     #((m-ANAU$bmvAmthP7L7xws$j
                                                          top))
-                                                     #("33l"))
+                                                     #("1fg"))
                                                    #(ribcage
                                                      #(x)
                                                      #((top))
-                                                     #("33k"))
+                                                     #("1ff"))
                                                    #(ribcage () () ())
                                                    #(ribcage
                                                      #(x)
                                                      #((top))
-                                                     #("336"))
+                                                     #("1f1"))
                                                    #(ribcage
                                                      (emit quasivector
                                                            quasilist*
@@ -27006,218 +26997,218 @@
                                                       (top)
                                                       (top)
                                                       (top))
-                                                     ("31o"
-                                                      "31n"
-                                                      "31m"
-                                                      "31l"
-                                                      "31k"
-                                                      "31j"
-                                                      "31i")))
+                                                     ("1dj"
+                                                      "1di"
+                                                      "1dh"
+                                                      "1dg"
+                                                      "1df"
+                                                      "1de"
+                                                      "1dd")))
                                                   (hygiene guile))
-                                               #{tmp _hoQGWMnyQPAh3k2jhWNAA}#)))
-                                     #{tmp _hoQGWMnyQPAh3k2jhWM@7}#)
-                                   (let ((#{tmp _hoQGWMnyQPAh3k2jhWNAD}#
+                                               #{tmp -ANAU$bmvAmthP7L7xwtGh}#)))
+                                     #{tmp -ANAU$bmvAmthP7L7xwtGc}#)
+                                   (let ((#{tmp -ANAU$bmvAmthP7L7xwtGk}#
                                            ($sc-dispatch
-                                             #{x _hoQGWMnyQPAh3k2jhWM@K}#
+                                             #{x -ANAU$bmvAmthP7L7xwtFr}#
                                              '(#(atom "value") any))))
-                                     (if #{tmp _hoQGWMnyQPAh3k2jhWNAD}#
+                                     (if #{tmp -ANAU$bmvAmthP7L7xwtGk}#
                                        (@apply
-                                         (lambda (#{x _hoQGWMnyQPAh3k2jhWNAH}#)
-                                           #{x _hoQGWMnyQPAh3k2jhWNAH}#)
-                                         #{tmp _hoQGWMnyQPAh3k2jhWNAD}#)
+                                         (lambda (#{x -ANAU$bmvAmthP7L7xwtGo}#)
+                                           #{x -ANAU$bmvAmthP7L7xwtGo}#)
+                                         #{tmp -ANAU$bmvAmthP7L7xwtGk}#)
                                        (syntax-violation
                                          #f
                                          "source expression failed to match any pattern"
-                                         #{x _hoQGWMnyQPAh3k2jhWM@K}#))))))))))))))))))
-      (lambda (#{x _hoQGWMnyQPAh3k2jhWM4T}#)
-        (let ((#{tmp _hoQGWMnyQPAh3k2jhWM4V}#
+                                         #{x -ANAU$bmvAmthP7L7xwtFr}#))))))))))))))))))
+      (lambda (#{x -ANAU$bmvAmthP7L7xws$0}#)
+        (let ((#{tmp -ANAU$bmvAmthP7L7xws$2}#
                 ($sc-dispatch
-                  #{x _hoQGWMnyQPAh3k2jhWM4T}#
+                  #{x -ANAU$bmvAmthP7L7xws$0}#
                   '(_ any))))
-          (if #{tmp _hoQGWMnyQPAh3k2jhWM4V}#
+          (if #{tmp -ANAU$bmvAmthP7L7xws$2}#
             (@apply
-              (lambda (#{e _hoQGWMnyQPAh3k2jhWM4Z}#)
-                (#{emit _hoQGWMnyQPAh3k2jhWM4S}#
-                  (#{quasi _hoQGWMnyQPAh3k2jhWM4M}#
-                    #{e _hoQGWMnyQPAh3k2jhWM4Z}#
+              (lambda (#{e -ANAU$bmvAmthP7L7xws$6}#)
+                (#{emit -ANAU$bmvAmthP7L7xws$z}#
+                  (#{quasi -ANAU$bmvAmthP7L7xws$t}#
+                    #{e -ANAU$bmvAmthP7L7xws$6}#
                     0)))
-              #{tmp _hoQGWMnyQPAh3k2jhWM4V}#)
+              #{tmp -ANAU$bmvAmthP7L7xws$2}#)
             (syntax-violation
               #f
               "source expression failed to match any pattern"
-              #{x _hoQGWMnyQPAh3k2jhWM4T}#)))))))
+              #{x -ANAU$bmvAmthP7L7xws$0}#)))))))
 
 (define include
   (make-syntax-transformer
     'include
     'macro
-    (lambda (#{x _hoQGWMnyQPAh3k2jhWNAy}#)
+    (lambda (#{x -ANAU$bmvAmthP7L7xwtHT}#)
       (letrec*
-        ((#{read-file _hoQGWMnyQPAh3k2jhWNAz}#
-           (lambda (#{fn _hoQGWMnyQPAh3k2jhWNCg}#
-                    #{k _hoQGWMnyQPAh3k2jhWNCh}#)
-             (let ((#{p _hoQGWMnyQPAh3k2jhWNCi}#
-                     (open-input-file #{fn _hoQGWMnyQPAh3k2jhWNCg}#)))
+        ((#{read-file -ANAU$bmvAmthP7L7xwtHU}#
+           (lambda (#{fn -ANAU$bmvAmthP7L7xwtJB}#
+                    #{k -ANAU$bmvAmthP7L7xwtJC}#)
+             (let ((#{p -ANAU$bmvAmthP7L7xwtJD}#
+                     (open-input-file #{fn -ANAU$bmvAmthP7L7xwtJB}#)))
                (letrec*
-                 ((#{f _hoQGWMnyQPAh3k2jhWNCj}#
-                    (lambda (#{x _hoQGWMnyQPAh3k2jhWNDZ}#
-                             #{result _hoQGWMnyQPAh3k2jhWNDa}#)
-                      (if (eof-object? #{x _hoQGWMnyQPAh3k2jhWNDZ}#)
+                 ((#{f -ANAU$bmvAmthP7L7xwtJE}#
+                    (lambda (#{x -ANAU$bmvAmthP7L7xwtJ6}#
+                             #{result -ANAU$bmvAmthP7L7xwtJ7}#)
+                      (if (eof-object? #{x -ANAU$bmvAmthP7L7xwtJ6}#)
                         (begin
-                          (close-input-port #{p _hoQGWMnyQPAh3k2jhWNCi}#)
-                          (reverse #{result _hoQGWMnyQPAh3k2jhWNDa}#))
-                        (#{f _hoQGWMnyQPAh3k2jhWNCj}#
-                          (read #{p _hoQGWMnyQPAh3k2jhWNCi}#)
+                          (close-input-port #{p -ANAU$bmvAmthP7L7xwtJD}#)
+                          (reverse #{result -ANAU$bmvAmthP7L7xwtJ7}#))
+                        (#{f -ANAU$bmvAmthP7L7xwtJE}#
+                          (read #{p -ANAU$bmvAmthP7L7xwtJD}#)
                           (cons (datum->syntax
-                                  #{k _hoQGWMnyQPAh3k2jhWNCh}#
-                                  #{x _hoQGWMnyQPAh3k2jhWNDZ}#)
-                                #{result _hoQGWMnyQPAh3k2jhWNDa}#))))))
-                 (#{f _hoQGWMnyQPAh3k2jhWNCj}#
-                   (read #{p _hoQGWMnyQPAh3k2jhWNCi}#)
+                                  #{k -ANAU$bmvAmthP7L7xwtJC}#
+                                  #{x -ANAU$bmvAmthP7L7xwtJ6}#)
+                                #{result -ANAU$bmvAmthP7L7xwtJ7}#))))))
+                 (#{f -ANAU$bmvAmthP7L7xwtJE}#
+                   (read #{p -ANAU$bmvAmthP7L7xwtJD}#)
                    '()))))))
-        (let ((#{tmp _hoQGWMnyQPAh3k2jhWNA1}#
+        (let ((#{tmp -ANAU$bmvAmthP7L7xwtHW}#
                 ($sc-dispatch
-                  #{x _hoQGWMnyQPAh3k2jhWNAy}#
+                  #{x -ANAU$bmvAmthP7L7xwtHT}#
                   '(any any))))
-          (if #{tmp _hoQGWMnyQPAh3k2jhWNA1}#
+          (if #{tmp -ANAU$bmvAmthP7L7xwtHW}#
             (@apply
-              (lambda (#{k _hoQGWMnyQPAh3k2jhWNA5}#
-                       #{filename _hoQGWMnyQPAh3k2jhWNA6}#)
-                (let ((#{fn _hoQGWMnyQPAh3k2jhWNA7}#
+              (lambda (#{k -ANAU$bmvAmthP7L7xwtHa}#
+                       #{filename -ANAU$bmvAmthP7L7xwtHb}#)
+                (let ((#{fn -ANAU$bmvAmthP7L7xwtHc}#
                         (syntax->datum
-                          #{filename _hoQGWMnyQPAh3k2jhWNA6}#)))
-                  (let ((#{tmp _hoQGWMnyQPAh3k2jhWNA8}#
-                          (#{read-file _hoQGWMnyQPAh3k2jhWNAz}#
-                            #{fn _hoQGWMnyQPAh3k2jhWNA7}#
-                            #{filename _hoQGWMnyQPAh3k2jhWNA6}#)))
-                    (let ((#{tmp _hoQGWMnyQPAh3k2jhWNA9}#
+                          #{filename -ANAU$bmvAmthP7L7xwtHb}#)))
+                  (let ((#{tmp -ANAU$bmvAmthP7L7xwtHd}#
+                          (#{read-file -ANAU$bmvAmthP7L7xwtHU}#
+                            #{fn -ANAU$bmvAmthP7L7xwtHc}#
+                            #{filename -ANAU$bmvAmthP7L7xwtHb}#)))
+                    (let ((#{tmp -ANAU$bmvAmthP7L7xwtHe}#
                             ($sc-dispatch
-                              #{tmp _hoQGWMnyQPAh3k2jhWNA8}#
+                              #{tmp -ANAU$bmvAmthP7L7xwtHd}#
                               'each-any)))
-                      (if #{tmp _hoQGWMnyQPAh3k2jhWNA9}#
+                      (if #{tmp -ANAU$bmvAmthP7L7xwtHe}#
                         (@apply
-                          (lambda (#{exp _hoQGWMnyQPAh3k2jhWNBP}#)
+                          (lambda (#{exp -ANAU$bmvAmthP7L7xwtHw}#)
                             (cons '#(syntax-object
                                      begin
                                      ((top)
                                       #(ribcage () () ())
-                                      #(ribcage #(exp) #((top)) #("340"))
+                                      #(ribcage #(exp) #((top)) #("1fv"))
                                       #(ribcage () () ())
                                       #(ribcage () () ())
-                                      #(ribcage #(fn) #((top)) #("33z"))
+                                      #(ribcage #(fn) #((top)) #("1fu"))
                                       #(ribcage
                                         #(k filename)
                                         #((top) (top))
-                                        #("33x" "33y"))
-                                      #(ribcage (read-file) ((top)) ("33q"))
-                                      #(ribcage #(x) #((top)) #("33p")))
+                                        #("1fs" "1ft"))
+                                      #(ribcage (read-file) ((top)) ("1fl"))
+                                      #(ribcage #(x) #((top)) #("1fk")))
                                      (hygiene guile))
-                                  #{exp _hoQGWMnyQPAh3k2jhWNBP}#))
-                          #{tmp _hoQGWMnyQPAh3k2jhWNA9}#)
+                                  #{exp -ANAU$bmvAmthP7L7xwtHw}#))
+                          #{tmp -ANAU$bmvAmthP7L7xwtHe}#)
                         (syntax-violation
                           #f
                           "source expression failed to match any pattern"
-                          #{tmp _hoQGWMnyQPAh3k2jhWNA8}#))))))
-              #{tmp _hoQGWMnyQPAh3k2jhWNA1}#)
+                          #{tmp -ANAU$bmvAmthP7L7xwtHd}#))))))
+              #{tmp -ANAU$bmvAmthP7L7xwtHW}#)
             (syntax-violation
               #f
               "source expression failed to match any pattern"
-              #{x _hoQGWMnyQPAh3k2jhWNAy}#)))))))
+              #{x -ANAU$bmvAmthP7L7xwtHT}#)))))))
 
 (define include-from-path
   (make-syntax-transformer
     'include-from-path
     'macro
-    (lambda (#{x _hoQGWMnyQPAh3k2jhWNDn}#)
-      (let ((#{tmp _hoQGWMnyQPAh3k2jhWNDp}#
+    (lambda (#{x -ANAU$bmvAmthP7L7xwtKI}#)
+      (let ((#{tmp -ANAU$bmvAmthP7L7xwtKK}#
               ($sc-dispatch
-                #{x _hoQGWMnyQPAh3k2jhWNDn}#
+                #{x -ANAU$bmvAmthP7L7xwtKI}#
                 '(any any))))
-        (if #{tmp _hoQGWMnyQPAh3k2jhWNDp}#
+        (if #{tmp -ANAU$bmvAmthP7L7xwtKK}#
           (@apply
-            (lambda (#{k _hoQGWMnyQPAh3k2jhWNDt}#
-                     #{filename _hoQGWMnyQPAh3k2jhWNDu}#)
-              (let ((#{fn _hoQGWMnyQPAh3k2jhWNDv}#
+            (lambda (#{k -ANAU$bmvAmthP7L7xwtKO}#
+                     #{filename -ANAU$bmvAmthP7L7xwtKP}#)
+              (let ((#{fn -ANAU$bmvAmthP7L7xwtKQ}#
                       (syntax->datum
-                        #{filename _hoQGWMnyQPAh3k2jhWNDu}#)))
-                (let ((#{tmp _hoQGWMnyQPAh3k2jhWNDw}#
+                        #{filename -ANAU$bmvAmthP7L7xwtKP}#)))
+                (let ((#{tmp -ANAU$bmvAmthP7L7xwtKR}#
                         (datum->syntax
-                          #{filename _hoQGWMnyQPAh3k2jhWNDu}#
-                          (let ((#{t _hoQGWMnyQPAh3k2jhWNDz}#
+                          #{filename -ANAU$bmvAmthP7L7xwtKP}#
+                          (let ((#{t -ANAU$bmvAmthP7L7xwtKU}#
                                   (%search-load-path
-                                    #{fn _hoQGWMnyQPAh3k2jhWNDv}#)))
-                            (if #{t _hoQGWMnyQPAh3k2jhWNDz}#
-                              #{t _hoQGWMnyQPAh3k2jhWNDz}#
+                                    #{fn -ANAU$bmvAmthP7L7xwtKQ}#)))
+                            (if #{t -ANAU$bmvAmthP7L7xwtKU}#
+                              #{t -ANAU$bmvAmthP7L7xwtKU}#
                               (syntax-violation
                                 'include-from-path
                                 "file not found in path"
-                                #{x _hoQGWMnyQPAh3k2jhWNDn}#
-                                #{filename _hoQGWMnyQPAh3k2jhWNDu}#))))))
+                                #{x -ANAU$bmvAmthP7L7xwtKI}#
+                                #{filename -ANAU$bmvAmthP7L7xwtKP}#))))))
                   (list '#(syntax-object
                            include
                            ((top)
                             #(ribcage () () ())
-                            #(ribcage #(fn) #((top)) #("345"))
+                            #(ribcage #(fn) #((top)) #("1g0"))
                             #(ribcage () () ())
                             #(ribcage () () ())
-                            #(ribcage #(fn) #((top)) #("344"))
+                            #(ribcage #(fn) #((top)) #("1fz"))
                             #(ribcage
                               #(k filename)
                               #((top) (top))
-                              #("342" "343"))
+                              #("1fx" "1fy"))
                             #(ribcage () () ())
-                            #(ribcage #(x) #((top)) #("341")))
+                            #(ribcage #(x) #((top)) #("1fw")))
                            (hygiene guile))
-                        #{tmp _hoQGWMnyQPAh3k2jhWNDw}#))))
-            #{tmp _hoQGWMnyQPAh3k2jhWNDp}#)
+                        #{tmp -ANAU$bmvAmthP7L7xwtKR}#))))
+            #{tmp -ANAU$bmvAmthP7L7xwtKK}#)
           (syntax-violation
             #f
             "source expression failed to match any pattern"
-            #{x _hoQGWMnyQPAh3k2jhWNDn}#))))))
+            #{x -ANAU$bmvAmthP7L7xwtKI}#))))))
 
 (define unquote
   (make-syntax-transformer
     'unquote
     'macro
-    (lambda (#{x _hoQGWMnyQPAh3k2jhWND7}#)
+    (lambda (#{x -ANAU$bmvAmthP7L7xwtKc}#)
       (syntax-violation
         'unquote
         "expression not valid outside of quasiquote"
-        #{x _hoQGWMnyQPAh3k2jhWND7}#))))
+        #{x -ANAU$bmvAmthP7L7xwtKc}#))))
 
 (define unquote-splicing
   (make-syntax-transformer
     'unquote-splicing
     'macro
-    (lambda (#{x _hoQGWMnyQPAh3k2jhWND9}#)
+    (lambda (#{x -ANAU$bmvAmthP7L7xwtKe}#)
       (syntax-violation
         'unquote-splicing
         "expression not valid outside of quasiquote"
-        #{x _hoQGWMnyQPAh3k2jhWND9}#))))
+        #{x -ANAU$bmvAmthP7L7xwtKe}#))))
 
 (define case
   (make-syntax-transformer
     'case
     'macro
-    (lambda (#{x _hoQGWMnyQPAh3k2jhWNEi}#)
-      (let ((#{tmp _hoQGWMnyQPAh3k2jhWNEk}#
+    (lambda (#{x -ANAU$bmvAmthP7L7xwtLD}#)
+      (let ((#{tmp -ANAU$bmvAmthP7L7xwtLF}#
               ($sc-dispatch
-                #{x _hoQGWMnyQPAh3k2jhWNEi}#
+                #{x -ANAU$bmvAmthP7L7xwtLD}#
                 '(_ any any . each-any))))
-        (if #{tmp _hoQGWMnyQPAh3k2jhWNEk}#
+        (if #{tmp -ANAU$bmvAmthP7L7xwtLF}#
           (@apply
-            (lambda (#{e _hoQGWMnyQPAh3k2jhWNEo}#
-                     #{m1 _hoQGWMnyQPAh3k2jhWNEp}#
-                     #{m2 _hoQGWMnyQPAh3k2jhWNEq}#)
-              (let ((#{tmp _hoQGWMnyQPAh3k2jhWNEr}#
+            (lambda (#{e -ANAU$bmvAmthP7L7xwtLJ}#
+                     #{m1 -ANAU$bmvAmthP7L7xwtLK}#
+                     #{m2 -ANAU$bmvAmthP7L7xwtLL}#)
+              (let ((#{tmp -ANAU$bmvAmthP7L7xwtLM}#
                       (letrec*
-                        ((#{f _hoQGWMnyQPAh3k2jhWNFV}#
-                           (lambda (#{clause _hoQGWMnyQPAh3k2jhWNFY}#
-                                    #{clauses _hoQGWMnyQPAh3k2jhWNFZ}#)
-                             (if (null? #{clauses _hoQGWMnyQPAh3k2jhWNFZ}#)
-                               (let ((#{tmp _hoQGWMnyQPAh3k2jhWNFb}#
+                        ((#{f -ANAU$bmvAmthP7L7xwtL2}#
+                           (lambda (#{clause -ANAU$bmvAmthP7L7xwtL5}#
+                                    #{clauses -ANAU$bmvAmthP7L7xwtL6}#)
+                             (if (null? #{clauses -ANAU$bmvAmthP7L7xwtL6}#)
+                               (let ((#{tmp -ANAU$bmvAmthP7L7xwtL8}#
                                        ($sc-dispatch
-                                         #{clause _hoQGWMnyQPAh3k2jhWNFY}#
+                                         #{clause -ANAU$bmvAmthP7L7xwtL5}#
                                          '(#(free-id
                                              #(syntax-object
                                                else
@@ -27226,79 +27217,79 @@
                                                 #(ribcage
                                                   #(f clause clauses)
                                                   #((top) (top) (top))
-                                                  #("34e" "34f" "34g"))
+                                                  #("1g9" "1ga" "1gb"))
                                                 #(ribcage
                                                   #(e m1 m2)
                                                   #((top) (top) (top))
-                                                  #("34a" "34b" "34c"))
+                                                  #("1g5" "1g6" "1g7"))
                                                 #(ribcage () () ())
                                                 #(ribcage
                                                   #(x)
                                                   #((top))
-                                                  #("349")))
+                                                  #("1g4")))
                                                (hygiene guile)))
                                            any
                                            .
                                            each-any))))
-                                 (if #{tmp _hoQGWMnyQPAh3k2jhWNFb}#
+                                 (if #{tmp -ANAU$bmvAmthP7L7xwtL8}#
                                    (@apply
-                                     (lambda (#{e1 _hoQGWMnyQPAh3k2jhWNFf}#
-                                              #{e2 _hoQGWMnyQPAh3k2jhWNFg}#)
+                                     (lambda (#{e1 -ANAU$bmvAmthP7L7xwtMA}#
+                                              #{e2 -ANAU$bmvAmthP7L7xwtMB}#)
                                        (cons '#(syntax-object
                                                 begin
                                                 ((top)
                                                  #(ribcage
                                                    #(e1 e2)
                                                    #((top) (top))
-                                                   #("34h" "34i"))
+                                                   #("1gc" "1gd"))
                                                  #(ribcage () () ())
                                                  #(ribcage
                                                    #(f clause clauses)
                                                    #((top) (top) (top))
-                                                   #("34e" "34f" "34g"))
+                                                   #("1g9" "1ga" "1gb"))
                                                  #(ribcage
                                                    #(e m1 m2)
                                                    #((top) (top) (top))
-                                                   #("34a" "34b" "34c"))
+                                                   #("1g5" "1g6" "1g7"))
                                                  #(ribcage () () ())
                                                  #(ribcage
                                                    #(x)
                                                    #((top))
-                                                   #("349")))
+                                                   #("1g4")))
                                                 (hygiene guile))
-                                             (cons #{e1 _hoQGWMnyQPAh3k2jhWNFf}#
-                                                   #{e2 _hoQGWMnyQPAh3k2jhWNFg}#)))
-                                     #{tmp _hoQGWMnyQPAh3k2jhWNFb}#)
-                                   (let ((#{tmp _hoQGWMnyQPAh3k2jhWNFh}#
+                                             (cons #{e1 -ANAU$bmvAmthP7L7xwtMA}#
+                                                   #{e2 -ANAU$bmvAmthP7L7xwtMB}#)))
+                                     #{tmp -ANAU$bmvAmthP7L7xwtL8}#)
+                                   (let ((#{tmp -ANAU$bmvAmthP7L7xwtMC}#
                                            ($sc-dispatch
-                                             #{clause _hoQGWMnyQPAh3k2jhWNFY}#
+                                             #{clause -ANAU$bmvAmthP7L7xwtL5}#
                                              '(each-any any . each-any))))
-                                     (if #{tmp _hoQGWMnyQPAh3k2jhWNFh}#
+                                     (if #{tmp -ANAU$bmvAmthP7L7xwtMC}#
                                        (@apply
-                                         (lambda (#{k _hoQGWMnyQPAh3k2jhWNFl}#
-                                                  #{e1 _hoQGWMnyQPAh3k2jhWNFm}#
-                                                  #{e2 _hoQGWMnyQPAh3k2jhWNFn}#)
+                                         (lambda (#{k -ANAU$bmvAmthP7L7xwtMG}#
+                                                  #{e1 -ANAU$bmvAmthP7L7xwtMH}#
+                                                  #{e2 -ANAU$bmvAmthP7L7xwtMI}#)
                                            (list '#(syntax-object
                                                     if
                                                     ((top)
                                                      #(ribcage
                                                        #(k e1 e2)
                                                        #((top) (top) (top))
-                                                       #("34j" "34k" "34l"))
+                                                       #("1ge" "1gf" "1gg"))
                                                      #(ribcage () () ())
                                                      #(ribcage
                                                        #(f clause clauses)
                                                        #((top) (top) (top))
-                                                       #("34e" "34f" "34g"))
+                                                       #("1g9" "1ga" "1gb"))
                                                      #(ribcage
                                                        #(e m1 m2)
                                                        #((top) (top) (top))
-                                                       #("34a" "34b" "34c"))
+                                                       #("1g5" "1g6" "1g7"))
                                                      #(ribcage () () ())
                                                      #(ribcage
                                                        #(x)
                                                        #((top))
-                                                       #("349")))
+                                                       #("1g4")))
                                                     (hygiene guile))
                                                  (list '#(syntax-object
                                                           memv
@@ -27308,9 +27299,9 @@
                                                              #((top)
                                                                (top)
                                                                (top))
-                                                             #("34j"
-                                                               "34k"
-                                                               "34l"))
+                                                             #("1ge"
+                                                               "1gf"
+                                                               "1gg"))
                                                            #(ribcage () () ())
                                                            #(ribcage
                                                              #(f
@@ -27319,22 +27310,22 @@
                                                              #((top)
                                                                (top)
                                                                (top))
-                                                             #("34e"
-                                                               "34f"
-                                                               "34g"))
+                                                             #("1g9"
+                                                               "1ga"
+                                                               "1gb"))
                                                            #(ribcage
                                                              #(e m1 m2)
                                                              #((top)
                                                                (top)
                                                                (top))
-                                                             #("34a"
-                                                               "34b"
-                                                               "34c"))
+                                                             #("1g5"
+                                                               "1g6"
+                                                               "1g7"))
                                                            #(ribcage () () ())
                                                            #(ribcage
                                                              #(x)
                                                              #((top))
-                                                             #("349")))
+                                                             #("1g4")))
                                                           (hygiene guile))
                                                        '#(syntax-object
                                                           t
@@ -27344,9 +27335,9 @@
                                                              #((top)
                                                                (top)
                                                                (top))
-                                                             #("34j"
-                                                               "34k"
-                                                               "34l"))
+                                                             #("1ge"
+                                                               "1gf"
+                                                               "1gg"))
                                                            #(ribcage () () ())
                                                            #(ribcage
                                                              #(f
@@ -27355,22 +27346,22 @@
                                                              #((top)
                                                                (top)
                                                                (top))
-                                                             #("34e"
-                                                               "34f"
-                                                               "34g"))
+                                                             #("1g9"
+                                                               "1ga"
+                                                               "1gb"))
                                                            #(ribcage
                                                              #(e m1 m2)
                                                              #((top)
                                                                (top)
                                                                (top))
-                                                             #("34a"
-                                                               "34b"
-                                                               "34c"))
+                                                             #("1g5"
+                                                               "1g6"
+                                                               "1g7"))
                                                            #(ribcage () () ())
                                                            #(ribcage
                                                              #(x)
                                                              #((top))
-                                                             #("349")))
+                                                             #("1g4")))
                                                           (hygiene guile))
                                                        (list '#(syntax-object
                                                                 quote
@@ -27380,9 +27371,9 @@
                                                                    #((top)
                                                                      (top)
                                                                      (top))
-                                                                   #("34j"
-                                                                     "34k"
-                                                                     "34l"))
+                                                                   #("1ge"
+                                                                     "1gf"
+                                                                     "1gg"))
                                                                  #(ribcage
                                                                    ()
                                                                    ()
@@ -27394,17 +27385,17 @@
                                                                    #((top)
                                                                      (top)
                                                                      (top))
-                                                                   #("34e"
-                                                                     "34f"
-                                                                     "34g"))
+                                                                   #("1g9"
+                                                                     "1ga"
+                                                                     "1gb"))
                                                                  #(ribcage
                                                                    #(e m1 m2)
                                                                    #((top)
                                                                      (top)
                                                                      (top))
-                                                                   #("34a"
-                                                                     "34b"
-                                                                     "34c"))
+                                                                   #("1g5"
+                                                                     "1g6"
+                                                                     "1g7"))
                                                                  #(ribcage
                                                                    ()
                                                                    ()
@@ -27412,10 +27403,10 @@
                                                                  #(ribcage
                                                                    #(x)
                                                                    #((top))
-                                                                   #("349")))
+                                                                   #("1g4")))
                                                                 (hygiene
                                                                   guile))
-                                                             #{k _hoQGWMnyQPAh3k2jhWNFl}#))
+                                                             #{k -ANAU$bmvAmthP7L7xwtMG}#))
                                                  (cons '#(syntax-object
                                                           begin
                                                           ((top)
@@ -27424,9 +27415,9 @@
                                                              #((top)
                                                                (top)
                                                                (top))
-                                                             #("34j"
-                                                               "34k"
-                                                               "34l"))
+                                                             #("1ge"
+                                                               "1gf"
+                                                               "1gg"))
                                                            #(ribcage () () ())
                                                            #(ribcage
                                                              #(f
@@ -27435,70 +27426,70 @@
                                                              #((top)
                                                                (top)
                                                                (top))
-                                                             #("34e"
-                                                               "34f"
-                                                               "34g"))
+                                                             #("1g9"
+                                                               "1ga"
+                                                               "1gb"))
                                                            #(ribcage
                                                              #(e m1 m2)
                                                              #((top)
                                                                (top)
                                                                (top))
-                                                             #("34a"
-                                                               "34b"
-                                                               "34c"))
+                                                             #("1g5"
+                                                               "1g6"
+                                                               "1g7"))
                                                            #(ribcage () () ())
                                                            #(ribcage
                                                              #(x)
                                                              #((top))
-                                                             #("349")))
+                                                             #("1g4")))
                                                           (hygiene guile))
-                                                       (cons #{e1 _hoQGWMnyQPAh3k2jhWNFm}#
-                                                             #{e2 _hoQGWMnyQPAh3k2jhWNFn}#))))
-                                         #{tmp _hoQGWMnyQPAh3k2jhWNFh}#)
+                                                       (cons #{e1 -ANAU$bmvAmthP7L7xwtMH}#
+                                                             #{e2 -ANAU$bmvAmthP7L7xwtMI}#))))
+                                         #{tmp -ANAU$bmvAmthP7L7xwtMC}#)
                                        (syntax-violation
                                          'case
                                          "bad clause"
-                                         #{x _hoQGWMnyQPAh3k2jhWNEi}#
-                                         #{clause _hoQGWMnyQPAh3k2jhWNFY}#)))))
-                               (let ((#{tmp _hoQGWMnyQPAh3k2jhWNFv}#
-                                       (#{f _hoQGWMnyQPAh3k2jhWNFV}#
-                                         (car #{clauses _hoQGWMnyQPAh3k2jhWNFZ}#)
-                                         (cdr #{clauses _hoQGWMnyQPAh3k2jhWNFZ}#))))
-                                 (let ((#{tmp _hoQGWMnyQPAh3k2jhWNFy}#
+                                         #{x -ANAU$bmvAmthP7L7xwtLD}#
+                                         #{clause -ANAU$bmvAmthP7L7xwtL5}#)))))
+                               (let ((#{tmp -ANAU$bmvAmthP7L7xwtMQ}#
+                                       (#{f -ANAU$bmvAmthP7L7xwtL2}#
+                                         (car #{clauses -ANAU$bmvAmthP7L7xwtL6}#)
+                                         (cdr #{clauses -ANAU$bmvAmthP7L7xwtL6}#))))
+                                 (let ((#{tmp -ANAU$bmvAmthP7L7xwtMT}#
                                          ($sc-dispatch
-                                           #{clause _hoQGWMnyQPAh3k2jhWNFY}#
+                                           #{clause -ANAU$bmvAmthP7L7xwtL5}#
                                            '(each-any any . each-any))))
-                                   (if #{tmp _hoQGWMnyQPAh3k2jhWNFy}#
+                                   (if #{tmp -ANAU$bmvAmthP7L7xwtMT}#
                                      (@apply
-                                       (lambda (#{k _hoQGWMnyQPAh3k2jhWNF2}#
-                                                #{e1 _hoQGWMnyQPAh3k2jhWNF3}#
-                                                #{e2 _hoQGWMnyQPAh3k2jhWNF4}#)
+                                       (lambda (#{k -ANAU$bmvAmthP7L7xwtMX}#
+                                                #{e1 -ANAU$bmvAmthP7L7xwtMY}#
+                                                #{e2 -ANAU$bmvAmthP7L7xwtMZ}#)
                                          (list '#(syntax-object
                                                   if
                                                   ((top)
                                                    #(ribcage
                                                      #(k e1 e2)
                                                      #((top) (top) (top))
-                                                     #("34o" "34p" "34q"))
+                                                     #("1gj" "1gk" "1gl"))
                                                    #(ribcage () () ())
                                                    #(ribcage
                                                      #(rest)
                                                      #((top))
-                                                     #("34n"))
+                                                     #("1gi"))
                                                    #(ribcage () () ())
                                                    #(ribcage
                                                      #(f clause clauses)
                                                      #((top) (top) (top))
-                                                     #("34e" "34f" "34g"))
+                                                     #("1g9" "1ga" "1gb"))
                                                    #(ribcage
                                                      #(e m1 m2)
                                                      #((top) (top) (top))
-                                                     #("34a" "34b" "34c"))
+                                                     #("1g5" "1g6" "1g7"))
                                                    #(ribcage () () ())
                                                    #(ribcage
                                                      #(x)
                                                      #((top))
-                                                     #("349")))
+                                                     #("1g4")))
                                                   (hygiene guile))
                                                (list '#(syntax-object
                                                         memv
@@ -27506,32 +27497,32 @@
                                                          #(ribcage
                                                            #(k e1 e2)
                                                            #((top) (top) (top))
-                                                           #("34o"
-                                                             "34p"
-                                                             "34q"))
+                                                           #("1gj"
+                                                             "1gk"
+                                                             "1gl"))
                                                          #(ribcage () () ())
                                                          #(ribcage
                                                            #(rest)
                                                            #((top))
-                                                           #("34n"))
+                                                           #("1gi"))
                                                          #(ribcage () () ())
                                                          #(ribcage
                                                            #(f clause clauses)
                                                            #((top) (top) (top))
-                                                           #("34e"
-                                                             "34f"
-                                                             "34g"))
+                                                           #("1g9"
+                                                             "1ga"
+                                                             "1gb"))
                                                          #(ribcage
                                                            #(e m1 m2)
                                                            #((top) (top) (top))
-                                                           #("34a"
-                                                             "34b"
-                                                             "34c"))
+                                                           #("1g5"
+                                                             "1g6"
+                                                             "1g7"))
                                                          #(ribcage () () ())
                                                          #(ribcage
                                                            #(x)
                                                            #((top))
-                                                           #("349")))
+                                                           #("1g4")))
                                                         (hygiene guile))
                                                      '#(syntax-object
                                                         t
@@ -27539,32 +27530,32 @@
                                                          #(ribcage
                                                            #(k e1 e2)
                                                            #((top) (top) (top))
-                                                           #("34o"
-                                                             "34p"
-                                                             "34q"))
+                                                           #("1gj"
+                                                             "1gk"
+                                                             "1gl"))
                                                          #(ribcage () () ())
                                                          #(ribcage
                                                            #(rest)
                                                            #((top))
-                                                           #("34n"))
+                                                           #("1gi"))
                                                          #(ribcage () () ())
                                                          #(ribcage
                                                            #(f clause clauses)
                                                            #((top) (top) (top))
-                                                           #("34e"
-                                                             "34f"
-                                                             "34g"))
+                                                           #("1g9"
+                                                             "1ga"
+                                                             "1gb"))
                                                          #(ribcage
                                                            #(e m1 m2)
                                                            #((top) (top) (top))
-                                                           #("34a"
-                                                             "34b"
-                                                             "34c"))
+                                                           #("1g5"
+                                                             "1g6"
+                                                             "1g7"))
                                                          #(ribcage () () ())
                                                          #(ribcage
                                                            #(x)
                                                            #((top))
-                                                           #("349")))
+                                                           #("1g4")))
                                                         (hygiene guile))
                                                      (list '#(syntax-object
                                                               quote
@@ -27574,9 +27565,9 @@
                                                                  #((top)
                                                                    (top)
                                                                    (top))
-                                                                 #("34o"
-                                                                   "34p"
-                                                                   "34q"))
+                                                                 #("1gj"
+                                                                   "1gk"
+                                                                   "1gl"))
                                                                #(ribcage
                                                                  ()
                                                                  ()
@@ -27584,7 +27575,7 @@
                                                                #(ribcage
                                                                  #(rest)
                                                                  #((top))
-                                                                 #("34n"))
+                                                                 #("1gi"))
                                                                #(ribcage
                                                                  ()
                                                                  ()
@@ -27596,17 +27587,17 @@
                                                                  #((top)
                                                                    (top)
                                                                    (top))
-                                                                 #("34e"
-                                                                   "34f"
-                                                                   "34g"))
+                                                                 #("1g9"
+                                                                   "1ga"
+                                                                   "1gb"))
                                                                #(ribcage
                                                                  #(e m1 m2)
                                                                  #((top)
                                                                    (top)
                                                                    (top))
-                                                                 #("34a"
-                                                                   "34b"
-                                                                   "34c"))
+                                                                 #("1g5"
+                                                                   "1g6"
+                                                                   "1g7"))
                                                                #(ribcage
                                                                  ()
                                                                  ()
@@ -27614,238 +27605,238 @@
                                                                #(ribcage
                                                                  #(x)
                                                                  #((top))
-                                                                 #("349")))
+                                                                 #("1g4")))
                                                               (hygiene guile))
-                                                           #{k _hoQGWMnyQPAh3k2jhWNF2}#))
+                                                           #{k -ANAU$bmvAmthP7L7xwtMX}#))
                                                (cons '#(syntax-object
                                                         begin
                                                         ((top)
                                                          #(ribcage
                                                            #(k e1 e2)
                                                            #((top) (top) (top))
-                                                           #("34o"
-                                                             "34p"
-                                                             "34q"))
+                                                           #("1gj"
+                                                             "1gk"
+                                                             "1gl"))
                                                          #(ribcage () () ())
                                                          #(ribcage
                                                            #(rest)
                                                            #((top))
-                                                           #("34n"))
+                                                           #("1gi"))
                                                          #(ribcage () () ())
                                                          #(ribcage
                                                            #(f clause clauses)
                                                            #((top) (top) (top))
-                                                           #("34e"
-                                                             "34f"
-                                                             "34g"))
+                                                           #("1g9"
+                                                             "1ga"
+                                                             "1gb"))
                                                          #(ribcage
                                                            #(e m1 m2)
                                                            #((top) (top) (top))
-                                                           #("34a"
-                                                             "34b"
-                                                             "34c"))
+                                                           #("1g5"
+                                                             "1g6"
+                                                             "1g7"))
                                                          #(ribcage () () ())
                                                          #(ribcage
                                                            #(x)
                                                            #((top))
-                                                           #("349")))
+                                                           #("1g4")))
                                                         (hygiene guile))
-                                                     (cons #{e1 _hoQGWMnyQPAh3k2jhWNF3}#
-                                                           #{e2 _hoQGWMnyQPAh3k2jhWNF4}#))
-                                               #{tmp _hoQGWMnyQPAh3k2jhWNFv}#))
-                                       #{tmp _hoQGWMnyQPAh3k2jhWNFy}#)
+                                                     (cons #{e1 -ANAU$bmvAmthP7L7xwtMY}#
+                                                           #{e2 -ANAU$bmvAmthP7L7xwtMZ}#))
+                                               #{tmp -ANAU$bmvAmthP7L7xwtMQ}#))
+                                       #{tmp -ANAU$bmvAmthP7L7xwtMT}#)
                                      (syntax-violation
                                        'case
                                        "bad clause"
-                                       #{x _hoQGWMnyQPAh3k2jhWNEi}#
-                                       #{clause _hoQGWMnyQPAh3k2jhWNFY}#))))))))
-                        (#{f _hoQGWMnyQPAh3k2jhWNFV}#
-                          #{m1 _hoQGWMnyQPAh3k2jhWNEp}#
-                          #{m2 _hoQGWMnyQPAh3k2jhWNEq}#))))
-                (let ((#{body _hoQGWMnyQPAh3k2jhWNEs}#
-                        #{tmp _hoQGWMnyQPAh3k2jhWNEr}#))
+                                       #{x -ANAU$bmvAmthP7L7xwtLD}#
+                                       #{clause -ANAU$bmvAmthP7L7xwtL5}#))))))))
+                        (#{f -ANAU$bmvAmthP7L7xwtL2}#
+                          #{m1 -ANAU$bmvAmthP7L7xwtLK}#
+                          #{m2 -ANAU$bmvAmthP7L7xwtLL}#))))
+                (let ((#{body -ANAU$bmvAmthP7L7xwtLN}#
+                        #{tmp -ANAU$bmvAmthP7L7xwtLM}#))
                   (list '#(syntax-object
                            let
                            ((top)
                             #(ribcage () () ())
-                            #(ribcage #(body) #((top)) #("34d"))
+                            #(ribcage #(body) #((top)) #("1g8"))
                             #(ribcage
                               #(e m1 m2)
                               #((top) (top) (top))
-                              #("34a" "34b" "34c"))
+                              #("1g5" "1g6" "1g7"))
                             #(ribcage () () ())
-                            #(ribcage #(x) #((top)) #("349")))
+                            #(ribcage #(x) #((top)) #("1g4")))
                            (hygiene guile))
                         (list (list '#(syntax-object
                                        t
                                        ((top)
                                         #(ribcage () () ())
-                                        #(ribcage #(body) #((top)) #("34d"))
+                                        #(ribcage #(body) #((top)) #("1g8"))
                                         #(ribcage
                                           #(e m1 m2)
                                           #((top) (top) (top))
-                                          #("34a" "34b" "34c"))
+                                          #("1g5" "1g6" "1g7"))
                                         #(ribcage () () ())
-                                        #(ribcage #(x) #((top)) #("349")))
+                                        #(ribcage #(x) #((top)) #("1g4")))
                                        (hygiene guile))
-                                    #{e _hoQGWMnyQPAh3k2jhWNEo}#))
-                        #{body _hoQGWMnyQPAh3k2jhWNEs}#))))
-            #{tmp _hoQGWMnyQPAh3k2jhWNEk}#)
+                                    #{e -ANAU$bmvAmthP7L7xwtLJ}#))
+                        #{body -ANAU$bmvAmthP7L7xwtLN}#))))
+            #{tmp -ANAU$bmvAmthP7L7xwtLF}#)
           (syntax-violation
             #f
             "source expression failed to match any pattern"
-            #{x _hoQGWMnyQPAh3k2jhWNEi}#))))))
+            #{x -ANAU$bmvAmthP7L7xwtLD}#))))))
 
 (define make-variable-transformer
-  (lambda (#{proc _hoQGWMnyQPAh3k2jhWNGH}#)
-    (if (procedure? #{proc _hoQGWMnyQPAh3k2jhWNGH}#)
+  (lambda (#{proc -ANAU$bmvAmthP7L7xwtMo}#)
+    (if (procedure? #{proc -ANAU$bmvAmthP7L7xwtMo}#)
       (letrec*
-        ((#{trans _hoQGWMnyQPAh3k2jhWNGI}#
-           (lambda (#{x _hoQGWMnyQPAh3k2jhWNGO}#)
-             (#{proc _hoQGWMnyQPAh3k2jhWNGH}#
-               #{x _hoQGWMnyQPAh3k2jhWNGO}#))))
+        ((#{trans -ANAU$bmvAmthP7L7xwtMp}#
+           (lambda (#{x -ANAU$bmvAmthP7L7xwtMv}#)
+             (#{proc -ANAU$bmvAmthP7L7xwtMo}#
+               #{x -ANAU$bmvAmthP7L7xwtMv}#))))
         (begin
           (set-procedure-property!
-            #{trans _hoQGWMnyQPAh3k2jhWNGI}#
+            #{trans -ANAU$bmvAmthP7L7xwtMp}#
             'variable-transformer
             #t)
-          #{trans _hoQGWMnyQPAh3k2jhWNGI}#))
+          #{trans -ANAU$bmvAmthP7L7xwtMp}#))
       (error "variable transformer not a procedure"
-             #{proc _hoQGWMnyQPAh3k2jhWNGH}#))))
+             #{proc -ANAU$bmvAmthP7L7xwtMo}#))))
 
 (define identifier-syntax
   (make-syntax-transformer
     'identifier-syntax
     'macro
-    (lambda (#{x _hoQGWMnyQPAh3k2jhWNGi}#)
-      (let ((#{tmp _hoQGWMnyQPAh3k2jhWNGk}#
+    (lambda (#{x -ANAU$bmvAmthP7L7xwtND}#)
+      (let ((#{tmp -ANAU$bmvAmthP7L7xwtNF}#
               ($sc-dispatch
-                #{x _hoQGWMnyQPAh3k2jhWNGi}#
+                #{x -ANAU$bmvAmthP7L7xwtND}#
                 '(_ any))))
-        (if #{tmp _hoQGWMnyQPAh3k2jhWNGk}#
+        (if #{tmp -ANAU$bmvAmthP7L7xwtNF}#
           (@apply
-            (lambda (#{e _hoQGWMnyQPAh3k2jhWNGo}#)
+            (lambda (#{e -ANAU$bmvAmthP7L7xwtNJ}#)
               (list '#(syntax-object
                        lambda
                        ((top)
-                        #(ribcage #(e) #((top)) #("34w"))
+                        #(ribcage #(e) #((top)) #("1gr"))
                         #(ribcage () () ())
-                        #(ribcage #(x) #((top)) #("34v")))
+                        #(ribcage #(x) #((top)) #("1gq")))
                        (hygiene guile))
                     '(#(syntax-object
                         x
                         ((top)
-                         #(ribcage #(e) #((top)) #("34w"))
+                         #(ribcage #(e) #((top)) #("1gr"))
                          #(ribcage () () ())
-                         #(ribcage #(x) #((top)) #("34v")))
+                         #(ribcage #(x) #((top)) #("1gq")))
                         (hygiene guile)))
                     '#((#(syntax-object
                           macro-type
                           ((top)
-                           #(ribcage #(e) #((top)) #("34w"))
+                           #(ribcage #(e) #((top)) #("1gr"))
                            #(ribcage () () ())
-                           #(ribcage #(x) #((top)) #("34v")))
+                           #(ribcage #(x) #((top)) #("1gq")))
                           (hygiene guile))
                         .
                         #(syntax-object
                           identifier-syntax
                           ((top)
-                           #(ribcage #(e) #((top)) #("34w"))
+                           #(ribcage #(e) #((top)) #("1gr"))
                            #(ribcage () () ())
-                           #(ribcage #(x) #((top)) #("34v")))
+                           #(ribcage #(x) #((top)) #("1gq")))
                           (hygiene guile))))
                     (list '#(syntax-object
                              syntax-case
                              ((top)
-                              #(ribcage #(e) #((top)) #("34w"))
+                              #(ribcage #(e) #((top)) #("1gr"))
                               #(ribcage () () ())
-                              #(ribcage #(x) #((top)) #("34v")))
+                              #(ribcage #(x) #((top)) #("1gq")))
                              (hygiene guile))
                           '#(syntax-object
                              x
                              ((top)
-                              #(ribcage #(e) #((top)) #("34w"))
+                              #(ribcage #(e) #((top)) #("1gr"))
                               #(ribcage () () ())
-                              #(ribcage #(x) #((top)) #("34v")))
+                              #(ribcage #(x) #((top)) #("1gq")))
                              (hygiene guile))
                           '()
                           (list '#(syntax-object
                                    id
                                    ((top)
-                                    #(ribcage #(e) #((top)) #("34w"))
+                                    #(ribcage #(e) #((top)) #("1gr"))
                                     #(ribcage () () ())
-                                    #(ribcage #(x) #((top)) #("34v")))
+                                    #(ribcage #(x) #((top)) #("1gq")))
                                    (hygiene guile))
                                 '(#(syntax-object
                                     identifier?
                                     ((top)
-                                     #(ribcage #(e) #((top)) #("34w"))
+                                     #(ribcage #(e) #((top)) #("1gr"))
                                      #(ribcage () () ())
-                                     #(ribcage #(x) #((top)) #("34v")))
+                                     #(ribcage #(x) #((top)) #("1gq")))
                                     (hygiene guile))
                                   (#(syntax-object
                                      syntax
                                      ((top)
-                                      #(ribcage #(e) #((top)) #("34w"))
+                                      #(ribcage #(e) #((top)) #("1gr"))
                                       #(ribcage () () ())
-                                      #(ribcage #(x) #((top)) #("34v")))
+                                      #(ribcage #(x) #((top)) #("1gq")))
                                      (hygiene guile))
                                    #(syntax-object
                                      id
                                      ((top)
-                                      #(ribcage #(e) #((top)) #("34w"))
+                                      #(ribcage #(e) #((top)) #("1gr"))
                                       #(ribcage () () ())
-                                      #(ribcage #(x) #((top)) #("34v")))
+                                      #(ribcage #(x) #((top)) #("1gq")))
                                      (hygiene guile))))
                                 (list '#(syntax-object
                                          syntax
                                          ((top)
-                                          #(ribcage #(e) #((top)) #("34w"))
+                                          #(ribcage #(e) #((top)) #("1gr"))
                                           #(ribcage () () ())
-                                          #(ribcage #(x) #((top)) #("34v")))
+                                          #(ribcage #(x) #((top)) #("1gq")))
                                          (hygiene guile))
-                                      #{e _hoQGWMnyQPAh3k2jhWNGo}#))
+                                      #{e -ANAU$bmvAmthP7L7xwtNJ}#))
                           (list '(#(syntax-object
                                     _
                                     ((top)
-                                     #(ribcage #(e) #((top)) #("34w"))
+                                     #(ribcage #(e) #((top)) #("1gr"))
                                      #(ribcage () () ())
-                                     #(ribcage #(x) #((top)) #("34v")))
+                                     #(ribcage #(x) #((top)) #("1gq")))
                                     (hygiene guile))
                                   #(syntax-object
                                     x
                                     ((top)
-                                     #(ribcage #(e) #((top)) #("34w"))
+                                     #(ribcage #(e) #((top)) #("1gr"))
                                      #(ribcage () () ())
-                                     #(ribcage #(x) #((top)) #("34v")))
+                                     #(ribcage #(x) #((top)) #("1gq")))
                                     (hygiene guile))
                                   #(syntax-object
                                     ...
                                     ((top)
-                                     #(ribcage #(e) #((top)) #("34w"))
+                                     #(ribcage #(e) #((top)) #("1gr"))
                                      #(ribcage () () ())
-                                     #(ribcage #(x) #((top)) #("34v")))
+                                     #(ribcage #(x) #((top)) #("1gq")))
                                     (hygiene guile)))
                                 (list '#(syntax-object
                                          syntax
                                          ((top)
-                                          #(ribcage #(e) #((top)) #("34w"))
+                                          #(ribcage #(e) #((top)) #("1gr"))
                                           #(ribcage () () ())
-                                          #(ribcage #(x) #((top)) #("34v")))
+                                          #(ribcage #(x) #((top)) #("1gq")))
                                          (hygiene guile))
-                                      (cons #{e _hoQGWMnyQPAh3k2jhWNGo}#
+                                      (cons #{e -ANAU$bmvAmthP7L7xwtNJ}#
                                             '(#(syntax-object
                                                 x
                                                 ((top)
                                                  #(ribcage
                                                    #(e)
                                                    #((top))
-                                                   #("34w"))
+                                                   #("1gr"))
                                                  #(ribcage () () ())
                                                  #(ribcage
                                                    #(x)
                                                    #((top))
-                                                   #("34v")))
+                                                   #("1gq")))
                                                 (hygiene guile))
                                               #(syntax-object
                                                 ...
@@ -27853,55 +27844,55 @@
                                                  #(ribcage
                                                    #(e)
                                                    #((top))
-                                                   #("34w"))
+                                                   #("1gr"))
                                                  #(ribcage () () ())
                                                  #(ribcage
                                                    #(x)
                                                    #((top))
-                                                   #("34v")))
+                                                   #("1gq")))
                                                 (hygiene guile)))))))))
-            #{tmp _hoQGWMnyQPAh3k2jhWNGk}#)
-          (let ((#{tmp _hoQGWMnyQPAh3k2jhWNGp}#
+            #{tmp -ANAU$bmvAmthP7L7xwtNF}#)
+          (let ((#{tmp -ANAU$bmvAmthP7L7xwtNK}#
                   ($sc-dispatch
-                    #{x _hoQGWMnyQPAh3k2jhWNGi}#
+                    #{x -ANAU$bmvAmthP7L7xwtND}#
                     '(_ (any any)
                         ((#(free-id
                             #(syntax-object
                               set!
                               ((top)
                                #(ribcage () () ())
-                               #(ribcage #(x) #((top)) #("34v")))
+                               #(ribcage #(x) #((top)) #("1gq")))
                               (hygiene guile)))
                           any
                           any)
                          any)))))
-            (if (if #{tmp _hoQGWMnyQPAh3k2jhWNGp}#
+            (if (if #{tmp -ANAU$bmvAmthP7L7xwtNK}#
                   (@apply
-                    (lambda (#{id _hoQGWMnyQPAh3k2jhWNGt}#
-                             #{exp1 _hoQGWMnyQPAh3k2jhWNGu}#
-                             #{var _hoQGWMnyQPAh3k2jhWNGv}#
-                             #{val _hoQGWMnyQPAh3k2jhWNGw}#
-                             #{exp2 _hoQGWMnyQPAh3k2jhWNGx}#)
-                      (if (identifier? #{id _hoQGWMnyQPAh3k2jhWNGt}#)
-                        (identifier? #{var _hoQGWMnyQPAh3k2jhWNGv}#)
+                    (lambda (#{id -ANAU$bmvAmthP7L7xwtNO}#
+                             #{exp1 -ANAU$bmvAmthP7L7xwtNP}#
+                             #{var -ANAU$bmvAmthP7L7xwtNQ}#
+                             #{val -ANAU$bmvAmthP7L7xwtNR}#
+                             #{exp2 -ANAU$bmvAmthP7L7xwtNS}#)
+                      (if (identifier? #{id -ANAU$bmvAmthP7L7xwtNO}#)
+                        (identifier? #{var -ANAU$bmvAmthP7L7xwtNQ}#)
                         #f))
-                    #{tmp _hoQGWMnyQPAh3k2jhWNGp}#)
+                    #{tmp -ANAU$bmvAmthP7L7xwtNK}#)
                   #f)
               (@apply
-                (lambda (#{id _hoQGWMnyQPAh3k2jhWNGy}#
-                         #{exp1 _hoQGWMnyQPAh3k2jhWNGz}#
-                         #{var _hoQGWMnyQPAh3k2jhWNG0}#
-                         #{val _hoQGWMnyQPAh3k2jhWNG1}#
-                         #{exp2 _hoQGWMnyQPAh3k2jhWNG2}#)
+                (lambda (#{id -ANAU$bmvAmthP7L7xwtNT}#
+                         #{exp1 -ANAU$bmvAmthP7L7xwtNU}#
+                         #{var -ANAU$bmvAmthP7L7xwtNV}#
+                         #{val -ANAU$bmvAmthP7L7xwtNW}#
+                         #{exp2 -ANAU$bmvAmthP7L7xwtNX}#)
                   (list '#(syntax-object
                            make-variable-transformer
                            ((top)
                             #(ribcage
                               #(id exp1 var val exp2)
                               #((top) (top) (top) (top) (top))
-                              #("352" "353" "354" "355" "356"))
+                              #("1gx" "1gy" "1gz" "1h0" "1h1"))
                             #(ribcage () () ())
-                            #(ribcage #(x) #((top)) #("34v")))
+                            #(ribcage #(x) #((top)) #("1gq")))
                            (hygiene guile))
                         (list '#(syntax-object
                                  lambda
@@ -27909,9 +27900,9 @@
                                   #(ribcage
                                     #(id exp1 var val exp2)
                                     #((top) (top) (top) (top) (top))
-                                    #("352" "353" "354" "355" "356"))
+                                    #("1gx" "1gy" "1gz" "1h0" "1h1"))
                                   #(ribcage () () ())
-                                  #(ribcage #(x) #((top)) #("34v")))
+                                  #(ribcage #(x) #((top)) #("1gq")))
                                  (hygiene guile))
                               '(#(syntax-object
                                   x
@@ -27919,9 +27910,9 @@
                                    #(ribcage
                                      #(id exp1 var val exp2)
                                      #((top) (top) (top) (top) (top))
-                                     #("352" "353" "354" "355" "356"))
+                                     #("1gx" "1gy" "1gz" "1h0" "1h1"))
                                    #(ribcage () () ())
-                                   #(ribcage #(x) #((top)) #("34v")))
+                                   #(ribcage #(x) #((top)) #("1gq")))
                                   (hygiene guile)))
                               '#((#(syntax-object
                                     macro-type
@@ -27929,9 +27920,9 @@
                                      #(ribcage
                                        #(id exp1 var val exp2)
                                        #((top) (top) (top) (top) (top))
-                                       #("352" "353" "354" "355" "356"))
+                                       #("1gx" "1gy" "1gz" "1h0" "1h1"))
                                      #(ribcage () () ())
-                                     #(ribcage #(x) #((top)) #("34v")))
+                                     #(ribcage #(x) #((top)) #("1gq")))
                                     (hygiene guile))
                                   .
                                   #(syntax-object
@@ -27940,9 +27931,9 @@
                                      #(ribcage
                                        #(id exp1 var val exp2)
                                        #((top) (top) (top) (top) (top))
-                                       #("352" "353" "354" "355" "356"))
+                                       #("1gx" "1gy" "1gz" "1h0" "1h1"))
                                      #(ribcage () () ())
-                                     #(ribcage #(x) #((top)) #("34v")))
+                                     #(ribcage #(x) #((top)) #("1gq")))
                                     (hygiene guile))))
                               (list '#(syntax-object
                                        syntax-case
@@ -27950,9 +27941,9 @@
                                         #(ribcage
                                           #(id exp1 var val exp2)
                                           #((top) (top) (top) (top) (top))
-                                          #("352" "353" "354" "355" "356"))
+                                          #("1gx" "1gy" "1gz" "1h0" "1h1"))
                                         #(ribcage () () ())
-                                        #(ribcage #(x) #((top)) #("34v")))
+                                        #(ribcage #(x) #((top)) #("1gq")))
                                        (hygiene guile))
                                     '#(syntax-object
                                        x
@@ -27960,9 +27951,9 @@
                                         #(ribcage
                                           #(id exp1 var val exp2)
                                           #((top) (top) (top) (top) (top))
-                                          #("352" "353" "354" "355" "356"))
+                                          #("1gx" "1gy" "1gz" "1h0" "1h1"))
                                         #(ribcage () () ())
-                                        #(ribcage #(x) #((top)) #("34v")))
+                                        #(ribcage #(x) #((top)) #("1gq")))
                                        (hygiene guile))
                                     '(#(syntax-object
                                         set!
@@ -27970,9 +27961,9 @@
                                          #(ribcage
                                            #(id exp1 var val exp2)
                                            #((top) (top) (top) (top) (top))
-                                           #("352" "353" "354" "355" "356"))
+                                           #("1gx" "1gy" "1gz" "1h0" "1h1"))
                                          #(ribcage () () ())
-                                         #(ribcage #(x) #((top)) #("34v")))
+                                         #(ribcage #(x) #((top)) #("1gq")))
                                         (hygiene guile)))
                                     (list (list '#(syntax-object
                                                    set!
@@ -27984,19 +27975,19 @@
                                                         (top)
                                                         (top)
                                                         (top))
-                                                      #("352"
-                                                        "353"
-                                                        "354"
-                                                        "355"
-                                                        "356"))
+                                                      #("1gx"
+                                                        "1gy"
+                                                        "1gz"
+                                                        "1h0"
+                                                        "1h1"))
                                                     #(ribcage () () ())
                                                     #(ribcage
                                                       #(x)
                                                       #((top))
-                                                      #("34v")))
+                                                      #("1gq")))
                                                    (hygiene guile))
-                                                #{var _hoQGWMnyQPAh3k2jhWNG0}#
-                                                #{val _hoQGWMnyQPAh3k2jhWNG1}#)
+                                                #{var -ANAU$bmvAmthP7L7xwtNV}#
+                                                #{val -ANAU$bmvAmthP7L7xwtNW}#)
                                           (list '#(syntax-object
                                                    syntax
                                                    ((top)
@@ -28007,19 +27998,19 @@
                                                         (top)
                                                         (top)
                                                         (top))
-                                                      #("352"
-                                                        "353"
-                                                        "354"
-                                                        "355"
-                                                        "356"))
+                                                      #("1gx"
+                                                        "1gy"
+                                                        "1gz"
+                                                        "1h0"
+                                                        "1h1"))
                                                     #(ribcage () () ())
                                                     #(ribcage
                                                       #(x)
                                                       #((top))
-                                                      #("34v")))
+                                                      #("1gq")))
                                                    (hygiene guile))
-                                                #{exp2 _hoQGWMnyQPAh3k2jhWNG2}#))
-                                    (list (cons #{id _hoQGWMnyQPAh3k2jhWNGy}#
+                                                #{exp2 -ANAU$bmvAmthP7L7xwtNX}#))
+                                    (list (cons #{id -ANAU$bmvAmthP7L7xwtNT}#
                                                 '(#(syntax-object
                                                     x
                                                     ((top)
@@ -28030,16 +28021,16 @@
                                                          (top)
                                                          (top)
                                                          (top))
-                                                       #("352"
-                                                         "353"
-                                                         "354"
-                                                         "355"
-                                                         "356"))
+                                                       #("1gx"
+                                                         "1gy"
+                                                         "1gz"
+                                                         "1h0"
+                                                         "1h1"))
                                                      #(ribcage () () ())
                                                      #(ribcage
                                                        #(x)
                                                        #((top))
-                                                       #("34v")))
+                                                       #("1gq")))
                                                     (hygiene guile))
                                                   #(syntax-object
                                                     ...
@@ -28051,16 +28042,16 @@
                                                          (top)
                                                          (top)
                                                          (top))
-                                                       #("352"
-                                                         "353"
-                                                         "354"
-                                                         "355"
-                                                         "356"))
+                                                       #("1gx"
+                                                         "1gy"
+                                                         "1gz"
+                                                         "1h0"
+                                                         "1h1"))
                                                      #(ribcage () () ())
                                                      #(ribcage
                                                        #(x)
                                                        #((top))
-                                                       #("34v")))
+                                                       #("1gq")))
                                                     (hygiene guile))))
                                           (list '#(syntax-object
                                                    syntax
@@ -28072,18 +28063,18 @@
                                                         (top)
                                                         (top)
                                                         (top))
-                                                      #("352"
-                                                        "353"
-                                                        "354"
-                                                        "355"
-                                                        "356"))
+                                                      #("1gx"
+                                                        "1gy"
+                                                        "1gz"
+                                                        "1h0"
+                                                        "1h1"))
                                                     #(ribcage () () ())
                                                     #(ribcage
                                                       #(x)
                                                       #((top))
-                                                      #("34v")))
+                                                      #("1gq")))
                                                    (hygiene guile))
-                                                (cons #{exp1 _hoQGWMnyQPAh3k2jhWNGz}#
+                                                (cons #{exp1 -ANAU$bmvAmthP7L7xwtNU}#
                                                       '(#(syntax-object
                                                           x
                                                           ((top)
@@ -28098,16 +28089,16 @@
                                                                (top)
                                                                (top)
                                                                (top))
-                                                             #("352"
-                                                               "353"
-                                                               "354"
-                                                               "355"
-                                                               "356"))
+                                                             #("1gx"
+                                                               "1gy"
+                                                               "1gz"
+                                                               "1h0"
+                                                               "1h1"))
                                                            #(ribcage () () ())
                                                            #(ribcage
                                                              #(x)
                                                              #((top))
-                                                             #("34v")))
+                                                             #("1gq")))
                                                           (hygiene guile))
                                                         #(syntax-object
                                                           ...
@@ -28123,18 +28114,18 @@
                                                                (top)
                                                                (top)
                                                                (top))
-                                                             #("352"
-                                                               "353"
-                                                               "354"
-                                                               "355"
-                                                               "356"))
+                                                             #("1gx"
+                                                               "1gy"
+                                                               "1gz"
+                                                               "1h0"
+                                                               "1h1"))
                                                            #(ribcage () () ())
                                                            #(ribcage
                                                              #(x)
                                                              #((top))
-                                                             #("34v")))
+                                                             #("1gq")))
                                                           (hygiene guile))))))
-                                    (list #{id _hoQGWMnyQPAh3k2jhWNGy}#
+                                    (list #{id -ANAU$bmvAmthP7L7xwtNT}#
                                           (list '#(syntax-object
                                                    identifier?
                                                    ((top)
@@ -28145,16 +28136,16 @@
                                                         (top)
                                                         (top)
                                                         (top))
-                                                      #("352"
-                                                        "353"
-                                                        "354"
-                                                        "355"
-                                                        "356"))
+                                                      #("1gx"
+                                                        "1gy"
+                                                        "1gz"
+                                                        "1h0"
+                                                        "1h1"))
                                                     #(ribcage () () ())
                                                     #(ribcage
                                                       #(x)
                                                       #((top))
-                                                      #("34v")))
+                                                      #("1gq")))
                                                    (hygiene guile))
                                                 (list '#(syntax-object
                                                          syntax
@@ -28170,18 +28161,18 @@
                                                               (top)
                                                               (top)
                                                               (top))
-                                                            #("352"
-                                                              "353"
-                                                              "354"
-                                                              "355"
-                                                              "356"))
+                                                            #("1gx"
+                                                              "1gy"
+                                                              "1gz"
+                                                              "1h0"
+                                                              "1h1"))
                                                           #(ribcage () () ())
                                                           #(ribcage
                                                             #(x)
                                                             #((top))
-                                                            #("34v")))
+                                                            #("1gq")))
                                                          (hygiene guile))
-                                                      #{id _hoQGWMnyQPAh3k2jhWNGy}#))
+                                                      #{id -ANAU$bmvAmthP7L7xwtNT}#))
                                           (list '#(syntax-object
                                                    syntax
                                                    ((top)
@@ -28192,72 +28183,72 @@
                                                         (top)
                                                         (top)
                                                         (top))
-                                                      #("352"
-                                                        "353"
-                                                        "354"
-                                                        "355"
-                                                        "356"))
+                                                      #("1gx"
+                                                        "1gy"
+                                                        "1gz"
+                                                        "1h0"
+                                                        "1h1"))
                                                     #(ribcage () () ())
                                                     #(ribcage
                                                       #(x)
                                                       #((top))
-                                                      #("34v")))
+                                                      #("1gq")))
                                                    (hygiene guile))
-                                                #{exp1 _hoQGWMnyQPAh3k2jhWNGz}#))))))
-                #{tmp _hoQGWMnyQPAh3k2jhWNGp}#)
+                                                #{exp1 -ANAU$bmvAmthP7L7xwtNU}#))))))
+                #{tmp -ANAU$bmvAmthP7L7xwtNK}#)
               (syntax-violation
                 #f
                 "source expression failed to match any pattern"
-                #{x _hoQGWMnyQPAh3k2jhWNGi}#))))))))
+                #{x -ANAU$bmvAmthP7L7xwtND}#))))))))
 
 (define define*
   (make-syntax-transformer
     'define*
     'macro
-    (lambda (#{x _hoQGWMnyQPAh3k2jhWNHN}#)
-      (let ((#{tmp _hoQGWMnyQPAh3k2jhWNHP}#
+    (lambda (#{x -ANAU$bmvAmthP7L7xwtNu}#)
+      (let ((#{tmp -ANAU$bmvAmthP7L7xwtNw}#
               ($sc-dispatch
-                #{x _hoQGWMnyQPAh3k2jhWNHN}#
+                #{x -ANAU$bmvAmthP7L7xwtNu}#
                 '(_ (any . any) any . each-any))))
-        (if #{tmp _hoQGWMnyQPAh3k2jhWNHP}#
+        (if #{tmp -ANAU$bmvAmthP7L7xwtNw}#
           (@apply
-            (lambda (#{id _hoQGWMnyQPAh3k2jhWNHT}#
-                     #{args _hoQGWMnyQPAh3k2jhWNHU}#
-                     #{b0 _hoQGWMnyQPAh3k2jhWNHV}#
-                     #{b1 _hoQGWMnyQPAh3k2jhWNHW}#)
+            (lambda (#{id -ANAU$bmvAmthP7L7xwtN0}#
+                     #{args -ANAU$bmvAmthP7L7xwtN1}#
+                     #{b0 -ANAU$bmvAmthP7L7xwtN2}#
+                     #{b1 -ANAU$bmvAmthP7L7xwtN3}#)
               (list '#(syntax-object
                        define
                        ((top)
                         #(ribcage
                           #(id args b0 b1)
                           #((top) (top) (top) (top))
-                          #("358" "359" "35a" "35b"))
+                          #("1h3" "1h4" "1h5" "1h6"))
                         #(ribcage () () ())
-                        #(ribcage #(x) #((top)) #("357")))
+                        #(ribcage #(x) #((top)) #("1h2")))
                        (hygiene guile))
-                    #{id _hoQGWMnyQPAh3k2jhWNHT}#
+                    #{id -ANAU$bmvAmthP7L7xwtN0}#
                     (cons '#(syntax-object
                              lambda*
                              ((top)
                               #(ribcage
                                 #(id args b0 b1)
                                 #((top) (top) (top) (top))
-                                #("358" "359" "35a" "35b"))
+                                #("1h3" "1h4" "1h5" "1h6"))
                               #(ribcage () () ())
-                              #(ribcage #(x) #((top)) #("357")))
+                              #(ribcage #(x) #((top)) #("1h2")))
                              (hygiene guile))
-                          (cons #{args _hoQGWMnyQPAh3k2jhWNHU}#
-                                (cons #{b0 _hoQGWMnyQPAh3k2jhWNHV}#
-                                      #{b1 _hoQGWMnyQPAh3k2jhWNHW}#)))))
-            #{tmp _hoQGWMnyQPAh3k2jhWNHP}#)
-          (let ((#{tmp _hoQGWMnyQPAh3k2jhWNHX}#
+                          (cons #{args -ANAU$bmvAmthP7L7xwtN1}#
+                                (cons #{b0 -ANAU$bmvAmthP7L7xwtN2}#
+                                      #{b1 -ANAU$bmvAmthP7L7xwtN3}#)))))
+            #{tmp -ANAU$bmvAmthP7L7xwtNw}#)
+          (let ((#{tmp -ANAU$bmvAmthP7L7xwtN4}#
                   ($sc-dispatch
-                    #{x _hoQGWMnyQPAh3k2jhWNHN}#
+                    #{x -ANAU$bmvAmthP7L7xwtNu}#
                     '(_ any any))))
-            (if (if #{tmp _hoQGWMnyQPAh3k2jhWNHX}#
+            (if (if #{tmp -ANAU$bmvAmthP7L7xwtN4}#
                   (@apply
-                    (lambda (#{id _hoQGWMnyQPAh3k2jhWNHb}#
-                             #{val _hoQGWMnyQPAh3k2jhWNHc}#)
+                    (lambda (#{id -ANAU$bmvAmthP7L7xwtN8}#
+                             #{val -ANAU$bmvAmthP7L7xwtN9}#)
                       (identifier?
                         '#(syntax-object
                            x
@@ -28265,30 +28256,30 @@
                             #(ribcage
                               #(id val)
                               #((top) (top))
-                              #("35c" "35d"))
+                              #("1h7" "1h8"))
                             #(ribcage () () ())
-                            #(ribcage #(x) #((top)) #("357")))
+                            #(ribcage #(x) #((top)) #("1h2")))
                            (hygiene guile))))
-                    #{tmp _hoQGWMnyQPAh3k2jhWNHX}#)
+                    #{tmp -ANAU$bmvAmthP7L7xwtN4}#)
                   #f)
               (@apply
-                (lambda (#{id _hoQGWMnyQPAh3k2jhWNHd}#
-                         #{val _hoQGWMnyQPAh3k2jhWNHe}#)
+                (lambda (#{id -ANAU$bmvAmthP7L7xwtN$}#
+                         #{val -ANAU$bmvAmthP7L7xwtN@}#)
                   (list '#(syntax-object
                            define
                            ((top)
                             #(ribcage
                               #(id val)
                               #((top) (top))
-                              #("35e" "35f"))
+                              #("1h9" "1ha"))
                             #(ribcage () () ())
-                            #(ribcage #(x) #((top)) #("357")))
+                            #(ribcage #(x) #((top)) #("1h2")))
                            (hygiene guile))
-                        #{id _hoQGWMnyQPAh3k2jhWNHd}#
-                        #{val _hoQGWMnyQPAh3k2jhWNHe}#))
-                #{tmp _hoQGWMnyQPAh3k2jhWNHX}#)
+                        #{id -ANAU$bmvAmthP7L7xwtN$}#
+                        #{val -ANAU$bmvAmthP7L7xwtN@}#))
+                #{tmp -ANAU$bmvAmthP7L7xwtN4}#)
               (syntax-violation
                 #f
                 "source expression failed to match any pattern"
-                #{x _hoQGWMnyQPAh3k2jhWNHN}#))))))))
+                #{x -ANAU$bmvAmthP7L7xwtNu}#))))))))
 

diff --git a/module/ice-9/psyntax.scm b/module/ice-9/psyntax.scm
index 00cb549..8220829 100644 (file)
--- a/module/ice-9/psyntax.scm
+++ b/module/ice-9/psyntax.scm
@@ -2525,44 +2525,6 @@
     (set! syntax-source
           (lambda (x) (source-annotation x)))
 
-    (set! syntax-module
-          (lambda (id)
-            (arg-check nonsymbol-id? id 'syntax-module)
-            (cdr (syntax-object-module id))))
-
-    (set! syntax-local-binding
-          (lambda (id)
-            (arg-check nonsymbol-id? id 'syntax-local-binding)
-            (with-transformer-environment
-             (lambda (e r w s rib mod)
-               (define (strip-anti-mark w)
-                 (let ((ms (wrap-marks w)) (s (wrap-subst w)))
-                   (if (and (pair? ms) (eq? (car ms) the-anti-mark))
-                       ;; output is from original text
-                       (make-wrap (cdr ms) (if rib (cons rib (cdr s)) (cdr s)))
-                       ;; output introduced by macro
-                       (make-wrap ms (if rib (cons rib s) s)))))
-               (call-with-values (lambda ()
-                                   (resolve-identifier
-                                    (syntax-object-expression id)
-                                    (strip-anti-mark (syntax-object-wrap id))
-                                    r
-                                    (syntax-object-module id)))
-                 (lambda (type value mod)
-                   (case type
-                     ((lexical) (values 'lexical value))
-                     ((macro) (values 'macro value))
-                     ((syntax) (values 'pattern-variable value))
-                     ((displaced-lexical) (values 'displaced-lexical #f))
-                     ((global) (values 'global (cons value (cdr mod))))
-                     (else (values 'other #f)))))))))
-
-    (set! syntax-locally-bound-identifiers
-          (lambda (x)
-            (arg-check nonsymbol-id? x 'syntax-locally-bound-identifiers)
-            (locally-bound-identifiers (syntax-object-wrap x)
-                                       (syntax-object-module x))))
-    
     (set! generate-temporaries
           (lambda (ls)
             (arg-check list? ls 'generate-temporaries)
@@ -2591,6 +2553,50 @@
                    (strip form empty-wrap)
                    (and subform (strip subform empty-wrap)))))
 
+    (let ()
+      (define (syntax-module id)
+        (arg-check nonsymbol-id? id 'syntax-module)
+        (cdr (syntax-object-module id)))
+
+      (define (syntax-local-binding id)
+        (arg-check nonsymbol-id? id 'syntax-local-binding)
+        (with-transformer-environment
+         (lambda (e r w s rib mod)
+           (define (strip-anti-mark w)
+             (let ((ms (wrap-marks w)) (s (wrap-subst w)))
+               (if (and (pair? ms) (eq? (car ms) the-anti-mark))
+                   ;; output is from original text
+                   (make-wrap (cdr ms) (if rib (cons rib (cdr s)) (cdr s)))
+                   ;; output introduced by macro
+                   (make-wrap ms (if rib (cons rib s) s)))))
+           (call-with-values (lambda ()
+                               (resolve-identifier
+                                (syntax-object-expression id)
+                                (strip-anti-mark (syntax-object-wrap id))
+                                r
+                                (syntax-object-module id)))
+             (lambda (type value mod)
+               (case type
+                 ((lexical) (values 'lexical value))
+                 ((macro) (values 'macro value))
+                 ((syntax) (values 'pattern-variable value))
+                 ((displaced-lexical) (values 'displaced-lexical #f))
+                 ((global) (values 'global (cons value (cdr mod))))
+                 (else (values 'other #f))))))))
+
+      (define (syntax-locally-bound-identifiers id)
+        (arg-check nonsymbol-id? id 'syntax-locally-bound-identifiers)
+        (locally-bound-identifiers (syntax-object-wrap id)
+                                   (syntax-object-module id)))
+
+      ;; Using define! instead of set! to avoid warnings at
+      ;; compile-time, after the variables are stolen away into (system
+      ;; syntax).  See the end of boot-9.scm.
+      ;;
+      (define! 'syntax-module syntax-module)
+      (define! 'syntax-local-binding syntax-local-binding)
+      (define! 'syntax-locally-bound-identifiers syntax-locally-bound-identifiers))
+    
     ;; $sc-dispatch expects an expression and a pattern.  If the expression
     ;; matches the pattern a list of the matching expressions for each
     ;; "any" is returned.  Otherwise, #f is returned.  (This use of #f will