177396
#hash(((form ((lib "racket/private/class-internal.rkt") define/override-final)) . ((123968 . 3))) ((def ((quote #%kernel) module->exports)) . ((305755 . 5))) ((def ((quote #%kernel) current-drive)) . ((335633 . 2))) ((def ((quote #%kernel) current-output-port)) . ((239499 . 4))) ((def ((quote #%kernel) variable-reference->namespace)) . ((295240 . 3))) ((def ((quote #%kernel) make-placeholder)) . ((85138 . 3))) ((form ((lib "racket/contract/private/misc.rkt") flat-rec-contract)) . ((146798 . 2))) ((def ((quote #%kernel) complete-path?)) . ((330118 . 3))) ((def ((lib "racket/tcp.rkt") tcp-connect/enable-break)) . ((344962 . 13))) ((def ((quote #%kernel) port-count-lines-enabled)) . ((241157 . 4))) ((def ((lib "racket/pretty.rkt") tentative-pretty-print-port-transfer)) . ((287203 . 5))) ((form ((lib "racket/private/class-internal.rkt") inspect)) . ((122378 . 2))) ((def ((lib "racket/file.rkt") display-to-file)) . ((337732 . 11))) ((def ((quote #%kernel) exn:fail:syntax?)) . ((172501 . 5))) ((def ((lib "racket/stream.rkt") stream-fold)) . ((101719 . 5))) ((def ((lib "racket/place.rkt") place-break)) . ((192246 . 4))) ((def ((lib "racket/require-transform.rkt") import-source-mod-path-stx)) . ((231125 . 7))) ((def ((lib "racket/tcp.rkt") tcp-close)) . ((345819 . 3))) ((def ((lib "racket/bytes.rkt") bytes-join)) . ((54874 . 4))) ((def ((quote #%kernel) null)) . ((75888 . 2))) ((def ((lib "racket/list.rkt") append*)) . ((83591 . 7))) ((def ((quote #%kernel) make-immutable-hasheqv)) . ((91923 . 4))) ((def ((lib "racket/list.rkt") fourth)) . ((81939 . 3))) ((def ((quote #%kernel) will-try-execute)) . ((367041 . 3))) ((def ((quote #%kernel) symbol-interned?)) . ((57614 . 3))) ((def ((lib "racket/struct-info.rkt") checked-struct-info?)) . ((118841 . 3))) ((form ((quote #%kernel) #%variable-reference)) . ((7889 . 4))) ((def ((quote #%kernel) struct:exn:fail:contract:divide-by-zero)) . ((171779 . 5))) ((def ((lib "racket/private/base.rkt") exn:fail:contract:divide-by-zero)) . ((171779 . 5))) ((def ((quote #%kernel) procedure-struct-type?)) . ((111780 . 3))) ((form ((lib "racket/private/base.rkt") submod)) . ((3196 . 4))) ((def ((lib "racket/future.rkt") make-fsemaphore)) . ((190466 . 3))) ((def ((quote #%kernel) current-load-relative-directory)) . ((298206 . 5))) ((def ((quote #%kernel) bytes-fill!)) . ((49250 . 4))) ((def ((quote #%kernel) struct-accessor-procedure?)) . ((118266 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fxxor)) . ((368023 . 4))) ((form ((lib "racket/unit.rkt") only)) . ((137068 . 2))) ((def ((lib "racket/private/base.rkt") hash-keys)) . ((94255 . 3))) ((form ((lib "racket/include.rkt") include-at/relative-to)) . ((236646 . 2))) ((def ((quote #%kernel) impersonator-of?)) . ((306183 . 4))) ((form ((lib "racket/private/base.rkt") for-template)) . ((4733 . 2))) ((def ((quote #%kernel) thread-resume-evt)) . ((184217 . 3))) ((def ((lib "racket/place/distributed.rkt") *channel-get)) . ((207826 . 4))) ((def ((lib "racket/port.rkt") relocate-input-port)) . ((258550 . 11))) ((def ((lib "racket/place/distributed.rkt") connect-to-named-place)) . ((199205 . 5))) ((def ((quote #%kernel) seconds->date)) . ((359405 . 4))) ((meth (((lib "racket/place/distributed.rkt") place-socket-bridge%) get-sc-id)) . ((200208 . 3))) ((def ((quote #%kernel) syntax-local-submodules)) . ((228130 . 2))) ((form ((lib "racket/private/qqstx.rkt") quasisyntax)) . ((216064 . 2))) ((def ((quote #%kernel) string-normalize-nfc)) . ((35820 . 3))) ((def ((lib "racket/flonum.rkt") flabs)) . ((26280 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-box*-cas!)) . ((372089 . 5))) ((def ((lib "racket/place/distributed.rkt") mr-connect-to)) . ((209102 . 5))) ((def ((lib "racket/contract/private/blame.rkt") blame-value)) . ((156820 . 3))) ((form ((quote #%kernel) module*)) . ((108 . 3))) ((def ((quote #%kernel) vector-ref)) . ((86511 . 4))) ((def ((lib "racket/private/base.rkt") make-base-empty-namespace)) . ((291277 . 2))) ((form ((lib "racket/private/base.rkt") for/last)) . ((12573 . 2))) ((form ((lib "racket/match.rkt") struct*)) . ((166000 . 2))) ((def ((lib "racket/stream.rkt") stream-ormap)) . ((101524 . 4))) ((def ((lib "racket/dict.rkt") dict-for-each)) . ((104906 . 4))) ((form ((lib "racket/unit.rkt") define-values/invoke-unit/infer)) . ((139391 . 8))) ((form ((lib "racket/require-syntax.rkt") define-require-syntax)) . ((10771 . 3))) ((form ((quote #%kernel) #%stratified-body)) . ((14947 . 2))) ((def ((quote #%kernel) date-minute)) . ((359520 . 23))) ((def ((quote #%kernel) struct:exn:fail)) . ((171385 . 4))) ((def ((quote #%kernel) eqv?)) . ((15214 . 4))) ((def ((quote #%kernel) namespace-require)) . ((293154 . 3))) ((def ((lib "racket/syntax.rkt") wrong-syntax)) . ((237709 . 5))) ((def ((quote #%kernel) make-prefab-struct)) . ((118490 . 4))) ((def ((lib "racket/private/base.rkt") prop:sequence)) . ((98891 . 2))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fl<=)) . ((369493 . 4))) ((def ((quote #%kernel) current-inexact-milliseconds)) . ((359353 . 2))) ((form ((lib "racket/private/class-internal.rkt") augment)) . ((122822 . 2))) ((def ((quote #%kernel) <)) . ((19088 . 4))) ((def ((lib "racket/future.rkt") future)) . ((190078 . 3))) ((def ((quote #%kernel) char-ci<=?)) . ((56015 . 4))) ((def ((lib "racket/math.rkt") pi)) . ((25016 . 2))) ((def ((quote #%kernel) make-weak-box)) . ((366230 . 3))) ((def ((quote #%kernel) namespace-base-phase)) . ((291843 . 3))) ((def ((lib "racket/place.rkt") dynamic-place)) . ((191085 . 4))) ((def ((quote #%kernel) prop:arity-string)) . ((111956 . 2))) ((form ((lib "racket/contract/private/misc.rkt") promise/c)) . ((146944 . 2))) ((def ((quote #%kernel) close-output-port)) . ((239194 . 3))) ((def ((lib "racket/sandbox.rkt") gui?)) . ((327666 . 2))) ((def ((lib "racket/trace.rkt") current-prefix-in)) . ((377790 . 4))) ((def ((lib "racket/struct-info.rkt") make-struct-info)) . ((118907 . 3))) ((def ((quote #%kernel) struct:exn:fail:contract:non-fixnum-result)) . ((171959 . 5))) ((def ((lib "racket/private/base.rkt") collection-file-path)) . ((375082 . 10))) ((def ((lib "racket/fixnum.rkt") fxabs)) . ((30009 . 3))) ((def ((quote #%kernel) zero?)) . ((16790 . 3))) ((def ((quote #%kernel) set-mcdr!)) . ((86009 . 4))) ((def ((lib "racket/private/base.rkt") real->decimal-string)) . ((22887 . 4))) ((form ((lib "racket/private/base.rkt") all-defined-out)) . ((4164 . 2))) ((def ((quote #%kernel) make-hasheq-placeholder)) . ((85525 . 3))) ((def ((lib "racket/port.rkt") reencode-output-port)) . ((257650 . 16))) ((def ((quote #%kernel) numerator)) . ((18803 . 3))) ((def ((lib "racket/private/misc.rkt") normal-case-path)) . ((330995 . 3))) ((def ((lib "racket/trait.rkt") trait-sum)) . ((128216 . 3))) ((def ((lib "racket/bool.rkt") boolean=?)) . ((15758 . 4))) ((def ((lib "racket/private/base.rkt") regexp-replace-quote)) . ((75182 . 5))) ((def ((quote #%kernel) read-char-or-special)) . ((271295 . 3))) ((form ((lib "racket/private/class-internal.rkt") field)) . ((122477 . 2))) ((def ((lib "racket/private/base.rkt") in-input-port-chars)) . ((96822 . 3))) ((def ((lib "racket/contract/private/guts.rkt") has-contract?)) . ((162947 . 3))) ((def ((quote #%kernel) impersonate-struct)) . ((306714 . 15))) ((def ((quote #%kernel) char<=?)) . ((55542 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-vector-set!)) . ((372350 . 5))) ((def ((quote #%kernel) thread-cell?)) . ((188475 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-vector-ref)) . ((372267 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-make-flrectangular)) . ((370678 . 5))) ((def ((quote #%kernel) make-semaphore)) . ((186720 . 3))) ((def ((lib "racket/future.rkt") would-be-future)) . ((190337 . 3))) ((def ((quote #%kernel) byte-pregexp?)) . ((58285 . 3))) ((form ((lib "racket/private/stxcase-scheme.rkt") syntax/loc)) . ((216152 . 2))) ((def ((quote #%kernel) chaperone-box)) . ((311791 . 12))) ((def ((lib "racket/list.rkt") eighth)) . ((82142 . 3))) ((def ((lib "racket/math.rkt") exact-ceiling)) . ((25651 . 3))) ((def ((quote #%kernel) arity-at-least?)) . ((111595 . 4))) ((form ((lib "racket/private/base.rkt") prefix-out)) . ((4329 . 2))) ((def ((lib "racket/private/class-internal.rkt") field-names)) . ((134476 . 3))) ((def ((lib "racket/bytes.rkt") bytes-append*)) . ((54771 . 4))) ((def ((quote #%kernel) resolved-module-path-name)) . ((300728 . 8))) ((def ((quote #%kernel) box)) . ((90031 . 3))) ((def ((lib "racket/file.rkt") file->value)) . ((336663 . 4))) ((def ((lib "racket/private/base.rkt") in-producer)) . ((97627 . 5))) ((def ((lib "racket/private/base.rkt") make-exn:fail:out-of-memory)) . ((173856 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-struct*-ref)) . ((374622 . 4))) ((def ((lib "racket/private/misc.rkt") path-string?)) . ((328130 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-vector*-set!)) . ((372675 . 5))) ((def ((quote #%kernel) list->bytes)) . ((49499 . 3))) ((form ((lib "racket/enter.rkt") enter!)) . ((376303 . 9))) ((form ((lib "racket/contract/private/misc.rkt") flat-murec-contract)) . ((146854 . 2))) ((def ((quote #%kernel) current-memory-use)) . ((367151 . 3))) ((def ((quote #%kernel) current-inspector)) . ((317985 . 4))) ((def ((quote #%kernel) shared-bytes)) . ((49677 . 3))) ((def ((lib "racket/sequence.rkt") sequence-append)) . ((99606 . 3))) ((def ((lib "racket/vector.rkt") vector-take)) . ((88298 . 4))) ((def ((lib "racket/contract/private/misc.rkt") non-empty-listof)) . ((144742 . 3))) ((def ((quote #%kernel) date-month)) . ((359520 . 23))) ((def ((quote #%kernel) flush-output)) . ((239941 . 3))) ((def ((lib "racket/match.rkt") prop:match-expander)) . ((165562 . 2))) ((def ((quote #%kernel) regexp-match/end)) . ((68689 . 20))) ((constructor ((lib "racket/place/distributed.rkt") remote-connection%)) . ((203595 . 15))) ((def ((quote #%kernel) namespace-module-registry)) . ((294500 . 3))) ((def ((lib "racket/provide-transform.rkt") prop:provide-pre-transformer)) . ((233137 . 2))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fxquotient)) . ((367550 . 4))) ((def ((quote #%kernel) read-bytes-avail!)) . ((266741 . 7))) ((def ((quote #%kernel) make-derived-parameter)) . ((189366 . 7))) ((form ((lib "racket/private/class-internal.rkt") public)) . ((122587 . 2))) ((def ((quote #%kernel) integer-sqrt)) . ((19429 . 3))) ((def ((lib "racket/contract/private/prop.rkt") build-chaperone-contract-property)) . ((159286 . 23))) ((def ((lib "racket/string.rkt") string-replace)) . ((37762 . 6))) ((def ((lib "racket/private/base.rkt") with-output-to-file)) . ((244194 . 11))) ((def ((lib "racket/private/base.rkt") exn)) . ((171191 . 6))) ((def ((quote #%kernel) add1)) . ((18094 . 3))) ((def ((lib "racket/file.rkt") delete-directory/files)) . ((339338 . 3))) ((def ((lib "racket/place/distributed.rkt") respawn-and-fire%)) . ((205580 . 4))) ((def ((quote #%kernel) cdaadr)) . ((80910 . 3))) ((def ((lib "racket/format.rkt") ~e)) . ((42092 . 23))) ((form ((lib "racket/private/class-internal.rkt") private*)) . ((123521 . 2))) ((def ((lib "racket/math.rkt") sqr)) . ((25185 . 3))) ((def ((quote #%kernel) string-locale=?)) . ((35975 . 4))) ((def ((lib "racket/bool.rkt") false)) . ((15656 . 2))) ((form ((lib "racket/private/class-internal.rkt") init-rest)) . ((122552 . 3))) ((def ((lib "racket/string.rkt") string-trim)) . ((38271 . 11))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-comm-id)) . ((210916 . 5))) ((def ((quote #%kernel) rational?)) . ((16195 . 3))) ((def ((lib "racket/fixnum.rkt") fx->fl)) . ((30992 . 3))) ((form ((lib "racket/private/more-scheme.rkt") log-info)) . ((358890 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fxmax)) . ((368805 . 4))) ((def ((lib "racket/udp.rkt") udp-receive!/enable-break)) . ((350665 . 12))) ((def ((lib "racket/dict.rkt") dict-key-contract)) . ((105978 . 3))) ((form ((lib "racket/private/base.rkt") file)) . ((3051 . 2))) ((form ((lib "racket/place/define-remote-server.rkt") define-named-remote-server)) . ((210298 . 2))) ((def ((quote #%kernel) make-hash-placeholder)) . ((85429 . 3))) ((def ((quote #%kernel) primitive?)) . ((112463 . 3))) ((def ((lib "racket/fixnum.rkt") fxremainder)) . ((29854 . 4))) ((form ((lib "racket/private/class-internal.rkt") with-method)) . ((126413 . 3))) ((def ((lib "racket/private/list.rkt") remove)) . ((77336 . 5))) ((def ((lib "racket/provide-transform.rkt") make-provide-transformer)) . ((232436 . 10))) ((def ((lib "racket/port.rkt") read-string!-evt)) . ((263042 . 4))) ((def ((quote #%kernel) prop:rename-transformer)) . ((223092 . 2))) ((def ((lib "racket/provide-transform.rkt") expand-export)) . ((232178 . 4))) ((def ((lib "racket/list.rkt") append-map)) . ((84406 . 4))) ((form ((lib "racket/private/more-scheme.rkt") log-fatal)) . ((358670 . 3))) ((form ((lib "racket/private/class-internal.rkt") interface)) . ((119441 . 5))) ((def ((lib "racket/contract/parametric.rkt") new-∀/c)) . ((151030 . 3))) ((def ((lib "racket/pretty.rkt") pretty-print-depth)) . ((283867 . 4))) ((def ((quote #%kernel) port-progress-evt)) . ((272435 . 4))) ((form ((lib "racket/private/class-internal.rkt") define/public)) . ((123556 . 3))) ((form ((lib "racket/contract/private/misc.rkt") any)) . ((146933 . 2))) ((form ((lib "racket/trait.rkt") trait)) . ((127304 . 18))) ((def ((lib "racket/require-transform.rkt") import-local-id)) . ((230218 . 19))) ((def ((quote #%kernel) caaadr)) . ((80110 . 3))) ((def ((quote #%kernel) channel-put-evt)) . ((186509 . 4))) ((def ((quote #%kernel) continuation?)) . ((178050 . 3))) ((def ((quote #%kernel) continuation-marks)) . ((180180 . 5))) ((def ((quote #%kernel) current-module-declare-name)) . ((301726 . 5))) ((def ((lib "racket/private/base.rkt") regexp-match*)) . ((59761 . 20))) ((def ((quote #%kernel) syntax-transforming-module-expression?)) . ((228478 . 2))) ((def ((lib "racket/stream.rkt") gen:stream)) . ((102124 . 2))) ((def ((lib "racket/generator.rkt") yield)) . ((102291 . 3))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-build-default-config)) . ((212367 . 13))) ((def ((lib "racket/private/base.rkt") make-exn:fail:filesystem)) . ((173266 . 4))) ((form ((lib "racket/private/base.rkt") define-for-syntax)) . ((10637 . 3))) ((def ((lib "racket/private/class-internal.rkt") object?)) . ((133081 . 3))) ((form ((lib "racket/unit.rkt") define-unit-binding)) . ((139141 . 6))) ((def ((lib "racket/dict.rkt") dict-update!)) . ((103897 . 10))) ((def ((quote #%kernel) remainder)) . ((17838 . 4))) ((def ((lib "racket/contract/private/misc.rkt") real-in)) . ((143117 . 4))) ((def ((quote #%kernel) print-boolean-long-form)) . ((281113 . 4))) ((def ((quote #%kernel) exact-positive-integer?)) . ((16436 . 3))) ((def ((lib "racket/port.rkt") port->lines)) . ((251446 . 5))) ((def ((quote #%kernel) raise-arguments-error)) . ((167549 . 10))) ((form ((lib "racket/unit.rkt") link)) . ((137283 . 2))) ((def ((lib "racket/sandbox.rkt") sandbox-input)) . ((320961 . 12))) ((def ((quote #%kernel) char-general-category)) . ((57042 . 3))) ((form ((lib "racket/private/letstx-scheme.rkt") letrec-syntax)) . ((9218 . 2))) ((def ((quote #%kernel) error-print-source-location)) . ((171063 . 4))) ((def ((quote #%kernel) peek-bytes-avail!/enable-break)) . ((270591 . 14))) ((def ((quote #%kernel) srcloc-span)) . ((174901 . 9))) ((def ((lib "racket/tcp.rkt") tcp-accept)) . ((345531 . 3))) ((form ((lib "racket/private/base.rkt") prefix-in)) . ((2577 . 2))) ((def ((quote #%kernel) time-apply)) . ((360891 . 7))) ((def ((quote #%kernel) gcd)) . ((18348 . 3))) ((def ((quote #%kernel) peek-char-or-special)) . ((271907 . 5))) ((def ((quote #%kernel) char-title-case?)) . ((56509 . 3))) ((def ((quote #%kernel) identifier-prune-to-source-module)) . ((219001 . 3))) ((def ((quote #%kernel) struct:exn:break)) . ((174260 . 5))) ((def ((lib "racket/private/base.rkt") stop-before)) . ((98235 . 4))) ((def ((lib "racket/private/base.rkt") regexp-match-positions*)) . ((62559 . 17))) ((def ((quote #%kernel) bytes->string/latin-1)) . ((50632 . 9))) ((def ((quote #%kernel) current-print)) . ((299199 . 4))) ((def ((lib "racket/contract/private/misc.rkt") procedure-arity-includes/c)) . ((146200 . 3))) ((form ((lib "racket/private/more-scheme.rkt") set!-values)) . ((11186 . 2))) ((def ((lib "racket/dict.rkt") dict-set*!)) . ((103074 . 5))) ((def ((lib "racket/system.rkt") system)) . ((355366 . 3))) ((def ((lib "racket/fixnum.rkt") fx*)) . ((29705 . 4))) ((def ((lib "racket/list.rkt") second)) . ((81838 . 3))) ((def ((quote #%kernel) call-with-semaphore)) . ((187261 . 9))) ((def ((quote #%kernel) integer->char)) . ((55091 . 5))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-broadcast)) . ((211612 . 8))) ((def ((quote #%kernel) impersonate-continuation-mark-key)) . ((309680 . 13))) ((def ((lib "racket/file.rkt") make-lock-file-name)) . ((343499 . 6))) ((def ((lib "racket/format.rkt") ~.s)) . ((46750 . 23))) ((def ((lib "racket/contract/private/misc.rkt") printable/c)) . ((143458 . 2))) ((def ((lib "racket/vector.rkt") vector-split-at)) . ((88734 . 4))) ((form ((lib "racket/control.rkt") prompt)) . ((179178 . 2))) ((def ((lib "racket/private/base.rkt") make-exn:fail:syntax:unbound)) . ((172666 . 4))) ((def ((quote #%kernel) thread/suspend-to-kill)) . ((183322 . 3))) ((def ((lib "racket/port.rkt") make-input-port/read-to-peek)) . ((253112 . 50))) ((def ((quote #%kernel) cadr)) . ((79162 . 3))) ((def ((quote #%kernel) imag-part)) . ((20336 . 3))) ((def ((lib "racket/port.rkt") with-input-from-string)) . ((252794 . 4))) ((def ((lib "racket/syntax.rkt") syntax-local-value/record)) . ((238100 . 4))) ((form ((lib "racket/private/base.rkt") struct)) . ((113271 . 31))) ((form ((lib "racket/place.rkt") place*)) . ((191880 . 9))) ((def ((lib "racket/place/distributed.rkt") distributed-launch-path)) . ((206750 . 2))) ((form ((lib "racket/private/base.rkt") for)) . ((11224 . 16))) ((def ((quote #%kernel) struct:exn:fail:read)) . ((172817 . 5))) ((def ((lib "racket/contract/private/prop.rkt") make-contract)) . ((153319 . 17))) ((form ((lib "racket/splicing.rkt") splicing-let-syntaxes)) . ((234834 . 2))) ((form ((lib "racket/private/base.rkt") λ)) . ((8179 . 11))) ((def ((lib "racket/sandbox.rkt") get-uncovered-expressions)) . ((327127 . 7))) ((def ((lib "racket/private/class-internal.rkt") member-name-key-hash-code)) . ((125050 . 3))) ((def ((quote #%kernel) cddar)) . ((79846 . 3))) ((def ((lib "racket/private/base.rkt") date)) . ((359520 . 23))) ((def ((lib "racket/private/list.rkt") remove*)) . ((77591 . 5))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-list-ref)) . ((371504 . 4))) ((def ((quote #%kernel) read-byte-or-special)) . ((271421 . 3))) ((def ((lib "racket/port.rkt") port->list)) . ((251115 . 4))) ((form ((lib "racket/unit.rkt") define-unit/contract)) . ((141020 . 10))) ((def ((lib "racket/pretty.rkt") pretty-print-size-hook)) . ((285963 . 9))) ((def ((lib "racket/private/misc.rkt") load/cd)) . ((297183 . 3))) ((def ((lib "racket/sandbox.rkt") evaluator-alive?)) . ((325811 . 3))) ((def ((quote #%kernel) current-error-port)) . ((239612 . 4))) ((def ((quote #%kernel) variable-reference->module-source)) . ((295607 . 4))) ((def ((quote #%kernel) make-reader-graph)) . ((85020 . 3))) ((def ((quote #%kernel) path->complete-path)) . ((330222 . 5))) ((def ((lib "racket/private/base.rkt") double-flonum?)) . ((16670 . 3))) ((form ((lib "racket/unit.rkt") define-unit)) . ((137978 . 7))) ((def ((lib "racket/private/base.rkt") exn:fail:read)) . ((172817 . 5))) ((def ((quote #%kernel) struct:exn:fail:unsupported)) . ((173998 . 4))) ((def ((quote #%kernel) open-input-bytes)) . ((244983 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-unbox*)) . ((371887 . 3))) ((def ((lib "racket/path.rkt") normalize-path)) . ((332636 . 5))) ((def ((quote #%kernel) syntax-property-symbol-keys)) . ((235175 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-unbox)) . ((371753 . 3))) ((def ((quote #%kernel) gensym)) . ((58034 . 3))) ((def ((quote #%kernel) hasheqv)) . ((90995 . 4))) ((def ((lib "racket/private/base.rkt") exn:break)) . ((174260 . 5))) ((form ((lib "racket/class.rkt") object-contract)) . ((130154 . 51))) ((def ((lib "racket/list.rkt") tenth)) . ((82243 . 3))) ((def ((lib "racket/sandbox.rkt") put-input)) . ((326675 . 6))) ((def ((lib "racket/contract/private/misc.rkt") none/c)) . ((142425 . 2))) ((def ((quote #%kernel) make-struct-field-mutator)) . ((116281 . 8))) ((def ((lib "racket/vector.rkt") vector-set*!)) . ((87870 . 5))) ((form ((lib "racket/private/base.rkt") for*/fold)) . ((13592 . 3))) ((def ((quote #%kernel) exn:fail:contract:non-fixnum-result?)) . ((171959 . 5))) ((def ((quote #%kernel) string->path-element)) . ((328596 . 3))) ((def ((quote #%kernel) struct-info)) . ((318092 . 3))) ((def ((quote #%kernel) current-thread)) . ((183282 . 2))) ((def ((quote #%kernel) port-count-lines!)) . ((240540 . 3))) ((def ((lib "racket/private/base.rkt") in-bytes)) . ((96372 . 6))) ((def ((lib "racket/stream.rkt") stream-length)) . ((101007 . 3))) ((def ((quote #%kernel) bytes-utf-8-index)) . ((52623 . 11))) ((def ((lib "racket/private/misc.rkt") read-eval-print-loop)) . ((298734 . 2))) ((def ((quote #%kernel) path->directory-path)) . ((330442 . 3))) ((def ((lib "racket/private/base.rkt") call-with-input-file)) . ((242319 . 7))) ((def ((lib "racket/control.rkt") call/comp)) . ((178734 . 5))) ((def ((quote #%kernel) thread-suspend-evt)) . ((184282 . 3))) ((def ((lib "racket/vector.rkt") vector-append)) . ((88229 . 3))) ((def ((lib "racket/private/more-scheme.rkt") hash-ref!)) . ((92967 . 5))) ((form ((lib "racket/private/class-internal.rkt") init)) . ((122411 . 2))) ((def ((lib "racket/contract/private/misc.rkt") parameter/c)) . ((146138 . 3))) ((form ((lib "racket/contract/private/opt.rkt") define-opt/c)) . ((163288 . 2))) ((def ((quote #%kernel) read-accept-box)) . ((277665 . 4))) ((def ((quote #%kernel) string->immutable-string)) . ((32839 . 3))) ((def ((quote #%kernel) list)) . ((75960 . 3))) ((def ((lib "racket/flonum.rkt") flimag-part)) . ((27953 . 3))) ((def ((quote #%kernel) hash-iterate-key)) . ((94913 . 4))) ((form ((quote #%kernel) module)) . ((64 . 2))) ((form ((lib "racket/unit.rkt") compound-unit/infer)) . ((138135 . 18))) ((def ((quote #%kernel) real->double-flonum)) . ((17363 . 3))) ((def ((lib "racket/syntax.rkt") format-id)) . ((236834 . 13))) ((def ((quote #%kernel) path->string)) . ((328456 . 3))) ((def ((lib "racket/place/distributed.rkt") port-no?)) . ((209479 . 3))) ((def ((lib "racket/contract/private/blame.rkt") raise-blame-error)) . ((157201 . 9))) ((def ((lib "racket/contract/private/misc.rkt") flat-contract-predicate)) . ((162726 . 3))) ((def ((lib "racket/private/base.rkt") exn:fail:contract)) . ((171494 . 4))) ((def ((lib "racket/syntax.rkt") generate-temporary)) . ((238313 . 3))) ((form ((quote #%kernel) unquote)) . ((14810 . 2))) ((form ((lib "racket/private/class-internal.rkt") pubment)) . ((122623 . 2))) ((def ((quote #%kernel) exn:fail:contract?)) . ((171494 . 4))) ((def ((quote #%kernel) equal?)) . ((15139 . 4))) ((def ((lib "racket/class.rkt") make-mixin-contract)) . ((132326 . 3))) ((def ((lib "racket/private/list.rkt") sort)) . ((77873 . 9))) ((def ((lib "racket/format.rkt") ~a)) . ((38667 . 23))) ((def ((quote #%kernel) prefab-key->struct-type)) . ((118587 . 4))) ((def ((lib "racket/port.rkt") open-output-nowhere)) . ((256395 . 4))) ((def ((quote #%kernel) custodian?)) . ((316136 . 3))) ((def ((lib "racket/list.rkt") seventh)) . ((82090 . 3))) ((def ((quote #%kernel) expand-user-path)) . ((330748 . 3))) ((def ((quote #%kernel) >)) . ((19233 . 4))) ((def ((lib "racket/date.rkt") current-date)) . ((361118 . 2))) ((def ((quote #%kernel) char-numeric?)) . ((56577 . 3))) ((def ((lib "racket/provide-transform.rkt") export-orig-stx)) . ((233334 . 8))) ((def ((quote #%kernel) weak-box-value)) . ((366290 . 4))) ((def ((lib "racket/port.rkt") peek-bytes!-evt)) . ((263455 . 29))) ((def ((quote #%kernel) syntax-local-make-definition-context)) . ((225421 . 4))) ((def ((lib "racket/private/base.rkt") namespace-anchor->empty-namespace)) . ((291479 . 3))) ((def ((lib "racket/udp.rkt") udp-send-ready-evt)) . ((351378 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flabs)) . ((369197 . 3))) ((def ((lib "racket/private/class-internal.rkt") implementation?)) . ((133815 . 4))) ((def ((quote #%kernel) identifier-binding)) . ((220408 . 14))) ((def ((lib "racket/dict.rkt") dict-keys)) . ((105683 . 3))) ((def ((quote #%kernel) make-input-port)) . ((246179 . 49))) ((form ((lib "racket/provide.rkt") filtered-out)) . ((7735 . 2))) ((def ((quote #%kernel) string->unreadable-symbol)) . ((57958 . 3))) ((form ((lib "racket/private/base.rkt") for/or)) . ((12245 . 2))) ((def ((lib "racket/private/base.rkt") keyword-apply)) . ((109950 . 13))) ((def ((lib "racket/port.rkt") convert-stream)) . ((264789 . 9))) ((def ((quote #%kernel) positive?)) . ((16843 . 3))) ((def ((lib "racket/contract/private/misc.rkt") impersonator-contract?)) . ((162598 . 3))) ((def ((lib "racket/math.rkt") order-of-magnitude)) . ((25790 . 3))) ((def ((quote #%kernel) string<=?)) . ((34605 . 4))) ((def ((lib "racket/stream.rkt") stream-rest)) . ((100699 . 3))) ((def ((quote #%kernel) hash-placeholder?)) . ((85366 . 3))) ((form ((lib "racket/unit.rkt") define-compound-unit)) . ((138859 . 5))) ((def ((lib "racket/trait.rkt") trait->mixin)) . ((128139 . 3))) ((def ((quote #%kernel) round)) . ((18466 . 3))) ((form ((lib "racket/private/class-internal.rkt") this%)) . ((122365 . 2))) ((def ((quote #%kernel) struct-type-property-accessor-procedure?)) . ((117244 . 3))) ((def ((lib "racket/private/base.rkt") make-exn:fail:contract:continuation)) . ((172145 . 5))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-string-ref)) . ((372887 . 5))) ((def ((lib "racket/private/stx.rkt") identifier?)) . ((216618 . 3))) ((def ((lib "racket/private/base.rkt") exn:fail:read:eof)) . ((172982 . 4))) ((def ((quote #%kernel) find-system-path)) . ((333279 . 3))) ((def ((lib "racket/format.rkt") ~s)) . ((40949 . 23))) ((def ((quote #%kernel) chaperone-struct)) . ((310603 . 16))) ((def ((lib "racket/contract/private/misc.rkt") syntax/c)) . ((145031 . 3))) ((def ((lib "racket/require-transform.rkt") make-require-transformer)) . ((229856 . 5))) ((def ((quote #%kernel) make-thread-cell)) . ((188533 . 4))) ((def ((lib "racket/set.rkt") set)) . ((107121 . 3))) ((def ((lib "racket/private/class-internal.rkt") object->vector)) . ((133373 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-f64vector-ref)) . ((373736 . 4))) ((def ((lib "racket/sandbox.rkt") sandbox-error-output)) . ((321818 . 14))) ((def ((lib "racket/set.rkt") set?)) . ((108475 . 3))) ((def ((quote #%kernel) semaphore-post)) . ((186817 . 3))) ((def ((lib "racket/place/distributed.rkt") spawn-remote-racket-node)) . ((195784 . 16))) ((form ((lib "racket/private/base.rkt") #%top-interaction)) . ((14878 . 2))) ((def ((lib "racket/dict.rkt") dict-count)) . ((105015 . 3))) ((def ((quote #%kernel) module-path?)) . ((301067 . 3))) ((def ((quote #%kernel) local-transformer-expand)) . ((223789 . 9))) ((form ((lib "racket/private/base.rkt") for*)) . ((12732 . 2))) ((def ((quote #%kernel) arity-at-least-value)) . ((111595 . 4))) ((meth (((lib "racket/place/distributed.rkt") remote-node%) get-log-prefix)) . ((202561 . 2))) ((def ((quote #%kernel) string-ci>=?)) . ((35285 . 4))) ((def ((lib "racket/file.rkt") put-preferences)) . ((341550 . 9))) ((def ((lib "racket/place.rkt") place?)) . ((190973 . 3))) ((def ((quote #%kernel) read-accept-graph)) . ((277969 . 4))) ((def ((quote #%kernel) continuation-prompt-tag?)) . ((178109 . 3))) ((def ((lib "racket/stxparam-exptime.rkt") syntax-parameter-value)) . ((234516 . 3))) ((def ((lib "racket/pretty.rkt") pretty-print-.-symbol-without-bars)) . ((284172 . 4))) ((meth (((lib "racket/place/distributed.rkt") named-place-typed-channel%) get)) . ((209825 . 3))) ((def ((lib "racket/private/base.rkt") make-exn:fail:read)) . ((172817 . 5))) ((def ((lib "racket/private/base.rkt") chaperone-procedure)) . ((310252 . 11))) ((def ((quote #%kernel) bytes-append)) . ((49360 . 3))) ((def ((lib "racket/fixnum.rkt") fxvector-ref)) . ((31418 . 4))) ((def ((quote #%kernel) regexp-match-peek-positions-immediate/end)) . ((71480 . 22))) ((def ((quote #%kernel) current-code-inspector)) . ((318732 . 4))) ((def ((lib "racket/place/distributed.rkt") remote-node%)) . ((202012 . 4))) ((def ((lib "racket/syntax.rkt") syntax-local-eval)) . ((238600 . 4))) ((form ((lib "racket/private/letstx-scheme.rkt") cond)) . ((9719 . 7))) ((def ((lib "racket/contract/private/blame.rkt") blame-contract)) . ((156762 . 3))) ((form ((lib "racket/private/class-internal.rkt") override)) . ((122702 . 2))) ((def ((lib "racket/contract/private/vector.rkt") vectorof)) . ((143632 . 7))) ((form ((lib "racket/match.rkt") match*)) . ((164735 . 5))) ((def ((quote #%kernel) prop:exn:srclocs)) . ((174688 . 2))) ((def ((lib "racket/private/class-internal.rkt") writable<%>)) . ((133048 . 2))) ((def ((lib "racket/private/base.rkt") in-value)) . ((97757 . 3))) ((def ((lib "racket/vector.rkt") vector-argmax)) . ((89573 . 4))) ((def ((quote #%kernel) peek-bytes)) . ((268124 . 5))) ((def ((quote #%kernel) expt)) . ((19571 . 4))) ((def ((lib "racket/contract/private/blame.rkt") current-blame-format)) . ((157676 . 4))) ((def ((quote #%kernel) continuation-prompt-available?)) . ((177838 . 5))) ((form ((lib "racket/control.rkt") reset)) . ((179340 . 2))) ((def ((quote #%kernel) asin)) . ((19893 . 3))) ((def ((lib "racket/contract/private/prop.rkt") flat-contract-property?)) . ((161840 . 3))) ((form ((lib "racket/private/base.rkt") define-namespace-anchor)) . ((291379 . 2))) ((def ((quote #%kernel) +)) . ((17427 . 3))) ((def ((lib "racket/vector.rkt") vector-map!)) . ((88131 . 4))) ((form ((lib "racket/private/class-internal.rkt") inherit/super)) . ((123029 . 2))) ((def ((lib "racket/set.rkt") set-remove)) . ((107717 . 4))) ((def ((quote #%kernel) cdaaar)) . ((80810 . 3))) ((def ((lib "racket/flonum.rkt") shared-flvector)) . ((29369 . 3))) ((def ((lib "racket/stream.rkt") stream-map)) . ((101342 . 4))) ((def ((lib "racket/contract/private/blame.rkt") struct:exn:fail:contract:blame)) . ((157519 . 4))) ((def ((quote #%kernel) string-ci=?)) . ((34892 . 4))) ((def ((lib "racket/contract/private/guts.rkt") build-compound-type-name)) . ((155446 . 3))) ((form ((lib "racket/private/stxcase-scheme.rkt") syntax-id-rules)) . ((216347 . 3))) ((form ((lib "racket/unit.rkt") compound-unit)) . ((137622 . 12))) ((def ((quote #%kernel) integer?)) . ((16250 . 3))) ((form ((lib "racket/control.rkt") control0-at)) . ((179724 . 2))) ((def ((lib "racket/udp.rkt") udp-send-to/enable-break)) . ((348823 . 14))) ((def ((lib "racket/system.rkt") system/exit-code)) . ((355720 . 3))) ((def ((lib "racket/private/base.rkt") in-hash-values)) . ((97403 . 3))) ((def ((quote #%kernel) current-gc-milliseconds)) . ((360835 . 2))) ((def ((lib "racket/private/serialize.rkt") make-deserialize-info)) . ((290323 . 4))) ((def ((lib "racket/require-transform.rkt") import-orig-stx)) . ((230218 . 19))) ((form ((lib "racket/private/class-internal.rkt") mixin)) . ((127221 . 3))) ((def ((lib "racket/class.rkt") mixin-contract)) . ((132291 . 2))) ((form ((lib "racket/unit.rkt") struct/ctc)) . ((140462 . 10))) ((form ((lib "racket/splicing.rkt") splicing-let)) . ((234677 . 2))) ((form ((lib "racket/private/class-internal.rkt") define/pubment)) . ((123634 . 3))) ((def ((quote #%kernel) exn:fail:filesystem?)) . ((173266 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flacos)) . ((370299 . 3))) ((def ((lib "racket/dict.rkt") make-weak-custom-hash)) . ((106782 . 8))) ((def ((quote #%kernel) regexp)) . ((58344 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flcos)) . ((370121 . 3))) ((def ((quote #%kernel) port-commit-peeked)) . ((272665 . 6))) ((def ((lib "racket/dict.rkt") dict-can-remove-keys?)) . ((102807 . 3))) ((form ((lib "racket/place/distributed.rkt") after-seconds)) . ((199156 . 2))) ((def ((quote #%kernel) semaphore-peek-evt?)) . ((187196 . 3))) ((def ((quote #%kernel) call-with-continuation-prompt)) . ((176006 . 10))) ((def ((lib "racket/fixnum.rkt") fxmin)) . ((30846 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fl->fx)) . ((371070 . 3))) ((def ((lib "racket/require-transform.rkt") make-import)) . ((230218 . 19))) ((def ((quote #%kernel) current-continuation-marks)) . ((180404 . 5))) ((def ((quote #%kernel) current-module-declare-source)) . ((301900 . 5))) ((form ((lib "racket/control.rkt") shift0-at)) . ((179778 . 2))) ((def ((lib "racket/private/base.rkt") in-hash)) . ((97278 . 3))) ((def ((quote #%kernel) load-extension)) . ((297424 . 3))) ((def ((lib "racket/private/misc.rkt") guard-evt)) . ((185526 . 3))) ((def ((quote #%kernel) struct:exn:fail:filesystem:version)) . ((173563 . 4))) ((def ((lib "racket/place/distributed.rkt") node%)) . ((201764 . 4))) ((def ((lib "racket/provide-transform.rkt") export)) . ((233334 . 8))) ((form ((lib "racket/private/stxcase-scheme.rkt") syntax-rules)) . ((216269 . 3))) ((def ((quote #%kernel) modulo)) . ((18017 . 4))) ((def ((quote #%kernel) prop:evt)) . ((185997 . 2))) ((def ((quote #%kernel) print-as-expression)) . ((281339 . 4))) ((def ((lib "racket/dict.rkt") dict-set!)) . ((102944 . 5))) ((def ((quote #%kernel) print-struct)) . ((280745 . 4))) ((def ((lib "racket/stream.rkt") prop:stream)) . ((102151 . 2))) ((def ((quote #%kernel) vector-set-performance-stats!)) . ((363684 . 5))) ((def ((quote #%kernel) error-print-width)) . ((170461 . 4))) ((def ((quote #%kernel) port-provides-progress-evts?)) . ((272584 . 3))) ((form ((lib "racket/private/base.rkt") #%plain-lambda)) . ((8727 . 2))) ((def ((quote #%kernel) date?)) . ((359520 . 23))) ((def ((quote #%kernel) vector->immutable-vector)) . ((86889 . 3))) ((def ((quote #%kernel) floor)) . ((18549 . 3))) ((form ((lib "racket/control.rkt") reset-at)) . ((179398 . 2))) ((def ((quote #%kernel) syntax-tainted?)) . ((235455 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fxabs)) . ((367804 . 3))) ((def ((lib "racket/private/base.rkt") exn:fail:out-of-memory)) . ((173856 . 4))) ((def ((lib "racket/contract/private/misc.rkt") not/c)) . ((142638 . 3))) ((def ((quote #%kernel) string->bytes/locale)) . ((51240 . 6))) ((def ((lib "racket/sandbox.rkt") sandbox-propagate-exceptions)) . ((322566 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-s16vector-set!)) . ((374061 . 5))) ((def ((lib "racket/place/distributed.rkt") supervise-thread-at)) . ((198324 . 10))) ((form ((lib "racket/private/stxcase-scheme.rkt") quote-syntax/prune)) . ((216237 . 2))) ((def ((quote #%kernel) current-namespace)) . ((291659 . 4))) ((def ((quote #%kernel) newline)) . ((273441 . 3))) ((def ((quote #%kernel) char-upcase)) . ((57314 . 3))) ((def ((lib "racket/list.rkt") cons?)) . ((81632 . 3))) ((def ((quote #%kernel) syntax-local-bind-syntaxes)) . ((225586 . 7))) ((def ((quote #%kernel) thread)) . ((183167 . 3))) ((def ((quote #%kernel) caar)) . ((79098 . 3))) ((def ((lib "racket/match.rkt") prop:legacy-match-expander)) . ((165614 . 2))) ((def ((quote #%kernel) angle)) . ((20473 . 3))) ((def ((lib "racket/set.rkt") set-symmetric-difference)) . ((107970 . 3))) ((def ((lib "racket/private/base.rkt") make-srcloc)) . ((174901 . 9))) ((form ((lib "racket/contract/base.rkt") ->)) . ((146969 . 9))) ((def ((lib "racket/private/class-internal.rkt") make-generic)) . ((127095 . 4))) ((def ((quote #%kernel) string-locale-ci>?)) . ((36491 . 4))) ((def ((quote #%kernel) string>?)) . ((34701 . 4))) ((def ((quote #%kernel) datum-intern-literal)) . ((218495 . 3))) ((form ((lib "racket/private/base.rkt") for*/product)) . ((13396 . 2))) ((def ((quote #%kernel) struct->vector)) . ((117909 . 4))) ((def ((lib "racket/private/base.rkt") in-sequences)) . ((97877 . 3))) ((def ((lib "racket/port.rkt") with-output-to-bytes)) . ((252490 . 3))) ((def ((quote #%kernel) exn:fail:syntax:unbound?)) . ((172666 . 4))) ((def ((quote #%kernel) log-max-level)) . ((358555 . 4))) ((def ((quote #%kernel) chaperone-evt)) . ((313637 . 7))) ((def ((lib "racket/dict.rkt") dict-iterate-next)) . ((105162 . 4))) ((def ((lib "racket/port.rkt") reencode-input-port)) . ((256966 . 16))) ((def ((lib "racket/udp.rkt") udp-receive!)) . ((349773 . 11))) ((form ((lib "racket/private/class-internal.rkt") get-field)) . ((126485 . 2))) ((def ((quote #%kernel) single-flonum?)) . ((16730 . 3))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-launch)) . ((213029 . 5))) ((def ((lib "racket/fixnum.rkt") fxnot)) . ((30280 . 3))) ((def ((lib "racket/system.rkt") process)) . ((356095 . 8))) ((def ((quote #%kernel) hash-equal?)) . ((90514 . 3))) ((def ((quote #%kernel) current-library-collection-paths)) . ((375761 . 5))) ((def ((quote #%kernel) byte?)) . ((48206 . 3))) ((def ((quote #%kernel) thread-send)) . ((184348 . 6))) ((def ((quote #%kernel) exn:fail:unsupported?)) . ((173998 . 4))) ((def ((lib "racket/path.rkt") path-element?)) . ((332795 . 3))) ((def ((lib "racket/path.rkt") file-name-from-path)) . ((332010 . 3))) ((def ((quote #%kernel) open-input-string)) . ((245094 . 4))) ((def ((lib "racket/promise.rkt") promise-running?)) . ((175491 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fxnot)) . ((368103 . 3))) ((def ((lib "racket/syntax.rkt") current-recorded-disappeared-uses)) . ((237837 . 5))) ((def ((lib "racket/engine.rkt") engine?)) . ((213468 . 3))) ((form ((lib "racket/unit.rkt") export)) . ((137245 . 2))) ((def ((lib "racket/udp.rkt") udp-receive-ready-evt)) . ((351455 . 3))) ((def ((quote #%kernel) hasheq)) . ((90878 . 4))) ((def ((lib "racket/pretty.rkt") pretty-print-current-style-table)) . ((284643 . 4))) ((def ((lib "racket/port.rkt") dup-input-port)) . ((258327 . 4))) ((form ((lib "racket/help.rkt") help)) . ((376199 . 6))) ((def ((lib "racket/private/class-internal.rkt") instanceof/c)) . ((130065 . 3))) ((form ((quote #%kernel) quote)) . ((7782 . 2))) ((def ((quote #%kernel) vector->pseudo-random-generator!)) . ((22367 . 5))) ((def ((lib "racket/system.rkt") process*/ports)) . ((356884 . 23))) ((def ((lib "racket/place/distributed.rkt") spawn-node-with-place-at)) . ((192875 . 26))) ((form ((lib "racket/include.rkt") include)) . ((236529 . 6))) ((form ((quote #%kernel) #%expression)) . ((7830 . 2))) ((def ((quote #%kernel) syntax-local-module-exports)) . ((227793 . 7))) ((def ((lib "racket/port.rkt") port->bytes-lines)) . ((251673 . 6))) ((def ((lib "racket/flonum.rkt") flacos)) . ((27270 . 3))) ((def ((quote #%kernel) thread-suspend)) . ((183528 . 3))) ((def ((lib "racket/contract/private/misc.rkt") contract-name)) . ((162818 . 3))) ((def ((lib "racket/private/list.rkt") assoc)) . ((78660 . 5))) ((form ((lib "racket/unit.rkt") provide-signature-elements)) . ((140818 . 2))) ((def ((lib "racket/contract/private/prop.rkt") make-chaperone-contract)) . ((154004 . 18))) ((def ((quote #%kernel) integer-bytes->integer)) . ((23026 . 11))) ((def ((lib "racket/sequence.rkt") sequence-add-between)) . ((100407 . 4))) ((def ((lib "racket/private/stxcase-scheme.rkt") syntax-pattern-variable?)) . ((216495 . 3))) ((form ((lib "racket/trait.rkt") trait-rename)) . ((128407 . 2))) ((def ((lib "racket/contract/private/prop.rkt") prop:flat-contract)) . ((157945 . 2))) ((def ((lib "racket/flonum.rkt") flvector-ref)) . ((28369 . 4))) ((def ((quote #%kernel) chaperone-of?)) . ((306268 . 4))) ((def ((lib "racket/set.rkt") set-intersect)) . ((107847 . 3))) ((def ((lib "racket/private/base.rkt") hash-set*!)) . ((92309 . 5))) ((form ((lib "racket/private/class-internal.rkt") define/overment)) . ((123886 . 3))) ((form ((lib "racket/unit.rkt") define-unit-from-context)) . ((139668 . 2))) ((def ((quote #%kernel) namespace-variable-value)) . ((292115 . 9))) ((def ((quote #%kernel) syntax-local-transforming-module-provides?)) . ((229142 . 2))) ((def ((quote #%kernel) read-accept-compiled)) . ((277759 . 4))) ((def ((quote #%kernel) string-normalize-nfd)) . ((35665 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fl<)) . ((369335 . 4))) ((def ((lib "racket/list.rkt") add-between)) . ((83095 . 13))) ((def ((lib "racket/private/more-scheme.rkt") current-break-parameterization)) . ((182592 . 2))) ((def ((quote #%kernel) impersonate-hash)) . ((308358 . 18))) ((def ((quote #%kernel) list-tail)) . ((76398 . 4))) ((def ((quote #%kernel) eqv-hash-code)) . ((95274 . 3))) ((form ((lib "racket/private/class-internal.rkt") augride)) . ((122859 . 2))) ((def ((quote #%kernel) odd?)) . ((17007 . 3))) ((def ((lib "racket/struct-info.rkt") prop:struct-auto-info)) . ((119193 . 2))) ((def ((lib "racket/control.rkt") splitter)) . ((179912 . 5))) ((def ((lib "racket/format.rkt") ~r)) . ((43235 . 25))) ((def ((lib "racket/promise.rkt") promise?)) . ((175262 . 3))) ((def ((quote #%kernel) eval)) . ((296218 . 4))) ((form ((lib "racket/private/base.rkt") except-out)) . ((4276 . 2))) ((form ((quote #%kernel) begin)) . ((10969 . 3))) ((def ((lib "racket/fixnum.rkt") fxrshift)) . ((30408 . 4))) ((def ((quote #%kernel) struct:exn:fail:contract)) . ((171494 . 4))) ((form ((lib "racket/unit.rkt") unit/new-import-export)) . ((139723 . 6))) ((def ((lib "racket/engine.rkt") engine-result)) . ((213625 . 3))) ((def ((quote #%kernel) prefab-key?)) . ((118726 . 3))) ((def ((lib "racket/sandbox.rkt") sandbox-override-collection-paths)) . ((323130 . 4))) ((def ((quote #%kernel) make-custodian)) . ((316192 . 3))) ((def ((quote #%kernel) current-milliseconds)) . ((360678 . 2))) ((def ((quote #%kernel) simplify-path)) . ((330820 . 4))) ((def ((quote #%kernel) =)) . ((19012 . 4))) ((def ((quote #%kernel) char-ci>=?)) . ((56208 . 4))) ((def ((lib "racket/list.rkt") take-right)) . ((82781 . 4))) ((def ((lib "racket/private/list.rkt") assf)) . ((79005 . 4))) ((def ((lib "racket/private/class-internal.rkt") make-object)) . ((125140 . 4))) ((def ((quote #%kernel) weak-box?)) . ((366403 . 3))) ((def ((lib "racket/place.rkt") place-enabled?)) . ((190932 . 2))) ((def ((quote #%kernel) internal-definition-context-seal)) . ((225869 . 3))) ((form ((lib "racket/match.rkt") match-letrec)) . ((165265 . 2))) ((def ((lib "racket/require-transform.rkt") import-orig-mode)) . ((230218 . 19))) ((def ((lib "racket/place/distributed.rkt") build-distributed-launch-path)) . ((206863 . 3))) ((def ((quote #%kernel) identifier-transformer-binding)) . ((220960 . 12))) ((form ((lib "racket/private/base.rkt") for*/first)) . ((13463 . 2))) ((def ((lib "racket/private/base.rkt") exn:fail:syntax)) . ((172501 . 5))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-vector*-length)) . ((372457 . 3))) ((def ((quote #%kernel) string->uninterned-symbol)) . ((57882 . 3))) ((form ((lib "racket/splicing.rkt") splicing-let-values)) . ((234720 . 2))) ((def ((lib "racket/contract/private/blame.rkt") blame-positive)) . ((156646 . 3))) ((def ((lib "racket/flonum.rkt") flvector-set!)) . ((28478 . 5))) ((def ((lib "racket/place/distributed.rkt") mr-supervise-named-dynamic-place-at)) . ((208694 . 11))) ((form ((lib "racket/private/class-internal.rkt") super-make-object)) . ((125367 . 2))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flimag-part)) . ((370909 . 3))) ((def ((quote #%kernel) string>=?)) . ((34796 . 4))) ((def ((lib "racket/contract/private/guts.rkt") coerce-contract)) . ((155520 . 4))) ((def ((quote #%kernel) string-ci<=?)) . ((35088 . 4))) ((constructor ((lib "racket/place/distributed.rkt") socket-connection%)) . ((200702 . 19))) ((def ((quote #%kernel) truncate)) . ((18717 . 3))) ((def ((lib "racket/vector.rkt") vector-filter-not)) . ((89257 . 4))) ((def ((quote #%kernel) exn?)) . ((171191 . 6))) ((def ((quote #%kernel) pseudo-random-generator?)) . ((21864 . 3))) ((def ((quote #%kernel) file-position*)) . ((240444 . 3))) ((def ((quote #%kernel) read-language)) . ((277144 . 4))) ((def ((lib "racket/private/class-internal.rkt") object-info)) . ((134554 . 3))) ((def ((quote #%kernel) make-hasheqv)) . ((91219 . 3))) ((form ((lib "racket/serialize.rkt") serializable-struct)) . ((289416 . 3))) ((form ((lib "racket/private/base.rkt") local-require)) . ((3332 . 2))) ((def ((quote #%kernel) char=?)) . ((55356 . 4))) ((def ((quote #%kernel) parameter-procedure=?)) . ((189671 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-struct-ref)) . ((374436 . 4))) ((form ((lib "racket/function.rkt") thunk*)) . ((112800 . 2))) ((def ((quote #%kernel) bytes-open-converter)) . ((53074 . 4))) ((def ((lib "racket/udp.rkt") udp-open-socket)) . ((346463 . 5))) ((def ((lib "racket/place/distributed.rkt") send-new-place-channel-to-named-dest)) . ((208031 . 8))) ((form ((lib "racket/runtime-path.rkt") define-runtime-paths)) . ((336133 . 2))) ((form ((lib "racket/unit.rkt") define-values-for-export)) . ((136976 . 2))) ((form ((quote #%kernel) #%datum)) . ((7804 . 2))) ((def ((quote #%kernel) module-predefined?)) . ((305962 . 3))) ((def ((quote #%kernel) local-transformer-expand/capture-lifts)) . ((224756 . 11))) ((def ((quote #%kernel) current-prompt-read)) . ((298776 . 4))) ((def ((quote #%kernel) struct:date)) . ((359520 . 23))) ((def ((lib "racket/private/base.rkt") impersonate-procedure)) . ((306350 . 11))) ((def ((quote #%kernel) string->list)) . ((34132 . 3))) ((def ((lib "racket/private/base.rkt") make-base-namespace)) . ((291331 . 2))) ((def ((quote #%kernel) char-utf-8-length)) . ((55277 . 3))) ((def ((lib "racket/private/base.rkt") procedure-keywords)) . ((110793 . 4))) ((def ((quote #%kernel) box?)) . ((89981 . 3))) ((def ((lib "racket/set.rkt") set-empty?)) . ((107276 . 3))) ((def ((quote #%kernel) resolved-module-path?)) . ((300317 . 3))) ((def ((quote #%kernel) prop:checked-procedure)) . ((112006 . 2))) ((def ((lib "racket/contract/private/misc.rkt") cons/c)) . ((144841 . 4))) ((def ((quote #%kernel) bytes->list)) . ((49428 . 3))) ((form ((lib "racket/private/qqstx.rkt") unsyntax-splicing)) . ((216119 . 2))) ((def ((lib "racket/path.rkt") some-system-path->string)) . ((333056 . 3))) ((form ((lib "racket/private/class-internal.rkt") private)) . ((122939 . 2))) ((form ((lib "racket/private/define.rkt") define-values-for-syntax)) . ((10720 . 2))) ((def ((lib "racket/private/class-internal.rkt") equal<%>)) . ((132672 . 2))) ((def ((lib "racket/private/stxcase-scheme.rkt") syntax-protect)) . ((235686 . 3))) ((def ((quote #%kernel) file-position)) . ((240244 . 6))) ((def ((quote #%kernel) syntax-local-lift-require)) . ((227299 . 5))) ((def ((lib "racket/place/distributed.rkt") distributed-place-wait)) . ((203402 . 3))) ((form ((lib "racket/control.rkt") reset0-at)) . ((179676 . 2))) ((def ((lib "racket/private/base.rkt") in-indexed)) . ((97812 . 3))) ((def ((quote #%kernel) exn:srclocs?)) . ((174737 . 3))) ((form ((lib "racket/control.rkt") prompt0)) . ((179504 . 2))) ((def ((lib "racket/vector.rkt") vector-count)) . ((89355 . 4))) ((def ((quote #%kernel) peek-bytes!)) . ((268841 . 12))) ((def ((quote #%kernel) real-part)) . ((20282 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fx>=)) . ((368645 . 4))) ((def ((lib "racket/math.rkt") exact-round)) . ((25517 . 3))) ((def ((quote #%kernel) make-logger)) . ((357884 . 4))) ((def ((lib "racket/place/distributed.rkt") *channel-put)) . ((207653 . 5))) ((def ((quote #%kernel) acos)) . ((19944 . 3))) ((def ((lib "racket/sandbox.rkt") make-module-evaluator)) . ((318849 . 29))) ((def ((lib "racket/private/base.rkt") collection-path)) . ((375461 . 8))) ((def ((quote #%kernel) inexact->exact)) . ((17170 . 3))) ((def ((quote #%kernel) port-closed?)) . ((239265 . 3))) ((form ((lib "racket/require.rkt") path-up)) . ((7501 . 2))) ((def ((quote #%kernel) peek-string)) . ((267902 . 5))) ((def ((quote #%kernel) cdadar)) . ((81010 . 3))) ((def ((lib "racket/private/base.rkt") exn:fail:user)) . ((174136 . 4))) ((def ((quote #%kernel) module-compiled-submodules)) . ((303324 . 13))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flexp)) . ((370478 . 3))) ((form ((lib "racket/private/more-scheme.rkt") with-handlers)) . ((170052 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flceiling)) . ((369935 . 3))) ((def ((lib "racket/file.rkt") group-write-bit)) . ((343853 . 2))) ((def ((lib "racket/private/list.rkt") build-list)) . ((76090 . 4))) ((def ((lib "racket/contract/private/blame.rkt") exn:fail:contract:blame-object)) . ((157519 . 4))) ((form ((lib "racket/unit.rkt") open)) . ((136952 . 2))) ((meth (((lib "racket/place/distributed.rkt") remote-node%) get-first-place-channel)) . ((202487 . 2))) ((def ((lib "racket/contract/private/misc.rkt") >=/c)) . ((142981 . 3))) ((def ((quote #%kernel) max)) . ((18244 . 3))) ((form ((lib "racket/private/base.rkt") for*/vector)) . ((12931 . 2))) ((form ((lib "racket/private/class-internal.rkt") define/override)) . ((123804 . 3))) ((def ((quote #%kernel) variable-reference->module-declaration-inspector)) . ((295980 . 4))) ((def ((lib "racket/private/base.rkt") regexp-replaces)) . ((74696 . 8))) ((def ((quote #%kernel) make-shared-bytes)) . ((49568 . 4))) ((form ((lib "racket/place/distributed.rkt") every-seconds)) . ((199107 . 2))) ((def ((lib "racket/match.rkt") exn:misc:match?)) . ((165405 . 3))) ((def ((quote #%kernel) prop:input-port)) . ((246082 . 2))) ((form ((lib "racket/private/letstx-scheme.rkt") letrec-syntaxes)) . ((9344 . 2))) ((def ((quote #%kernel) make-will-executor)) . ((366716 . 2))) ((def ((quote #%kernel) struct:exn:fail:filesystem)) . ((173266 . 4))) ((def ((lib "racket/list.rkt") range)) . ((84866 . 7))) ((def ((lib "racket/flonum.rkt") flvector-length)) . ((28282 . 3))) ((def ((quote #%kernel) byte-pregexp)) . ((58534 . 3))) ((def ((lib "racket/private/base.rkt") regexp-match-exact?)) . ((64184 . 4))) ((form ((lib "racket/serialize.rkt") serializable-struct/versions)) . ((289680 . 7))) ((def ((lib "racket/private/class-internal.rkt") object%)) . ((119752 . 2))) ((def ((quote #%kernel) progress-evt?)) . ((273055 . 6))) ((form ((lib "racket/match.rkt") match-let*)) . ((165082 . 2))) ((form ((lib "racket/private/letstx-scheme.rkt") and)) . ((10006 . 2))) ((form ((lib "racket/private/base.rkt") define-sequence-syntax)) . ((13928 . 8))) ((form ((lib "racket/private/letstx-scheme.rkt") =>)) . ((9996 . 2))) ((form ((lib "racket/match.rkt") match/derived)) . ((165828 . 2))) ((def ((quote #%kernel) call-with-continuation-barrier)) . ((177755 . 3))) ((form ((lib "racket/splicing.rkt") splicing-letrec-syntaxes+values)) . ((234895 . 2))) ((def ((lib "racket/set.rkt") list->seteq)) . ((109260 . 3))) ((def ((quote #%kernel) chaperone-continuation-mark-key)) . ((314332 . 13))) ((def ((lib "racket/place/distributed.rkt") connection%)) . ((205104 . 4))) ((def ((lib "racket/math.rkt") infinite?)) . ((25941 . 3))) ((def ((quote #%kernel) eof)) . ((239858 . 2))) ((def ((lib "racket/flonum.rkt") fl<=)) . ((26548 . 4))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-partition)) . ((212178 . 5))) ((def ((quote #%kernel) exn:fail:network?)) . ((173726 . 4))) ((def ((quote #%kernel) custodian-memory-accounting-available?)) . ((316582 . 2))) ((def ((lib "racket/udp.rkt") udp-receive!-evt)) . ((352395 . 9))) ((def ((quote #%kernel) compiled-module-expression?)) . ((302808 . 3))) ((def ((quote #%kernel) string-length)) . ((32935 . 3))) ((def ((quote #%kernel) syntax?)) . ((216565 . 3))) ((def ((quote #%kernel) readtable?)) . ((287513 . 3))) ((def ((lib "racket/tcp.rkt") tcp-accept-ready?)) . ((345734 . 3))) ((def ((lib "racket/fixnum.rkt") fxvector?)) . ((31098 . 3))) ((def ((lib "racket/place/distributed.rkt") spawned-process%)) . ((199633 . 4))) ((form ((lib "racket/private/class-internal.rkt") generic)) . ((126927 . 2))) ((def ((quote #%kernel) bytes<?)) . ((49834 . 4))) ((def ((quote #%kernel) write-string)) . ((273530 . 7))) ((def ((lib "racket/contract/private/blame.rkt") blame-add-context)) . ((156288 . 9))) ((def ((lib "racket/private/base.rkt") exn:fail:filesystem:exists)) . ((173402 . 4))) ((def ((quote #%kernel) list->vector)) . ((86828 . 3))) ((def ((quote #%kernel) regexp-match-peek-positions)) . ((64955 . 19))) ((def ((lib "racket/private/misc.rkt") channel-try-get)) . ((186370 . 3))) ((def ((quote #%kernel) integer-length)) . ((21264 . 3))) ((def ((lib "racket/list.rkt") empty)) . ((81610 . 2))) ((def ((lib "racket/dict.rkt") dict-iterate-value)) . ((105337 . 4))) ((def ((quote #%kernel) sync/timeout)) . ((184835 . 4))) ((def ((lib "racket/private/class-internal.rkt") dynamic-get-field)) . ((126518 . 4))) ((def ((lib "racket/struct-info.rkt") struct-info?)) . ((118783 . 3))) ((def ((lib "racket/fixnum.rkt") fx>)) . ((30628 . 4))) ((def ((quote #%kernel) string->bytes/utf-8)) . ((50994 . 6))) ((form ((lib "racket/provide-syntax.rkt") define-provide-syntax)) . ((10870 . 3))) ((def ((quote #%kernel) cadar)) . ((79518 . 3))) ((constructor ((lib "racket/place/distributed.rkt") after-seconds%)) . ((206027 . 7))) ((def ((lib "racket/tcp.rkt") tcp-port?)) . ((346408 . 3))) ((def ((lib "racket/require-transform.rkt") prop:require-transformer)) . ((230095 . 2))) ((def ((quote #%kernel) system-type)) . ((362920 . 3))) ((def ((lib "racket/place/distributed.rkt") tc-get)) . ((209909 . 4))) ((def ((quote #%kernel) security-guard?)) . ((315278 . 3))) ((def ((lib "racket/place/distributed.rkt") supervise-process-at)) . ((198013 . 8))) ((def ((quote #%kernel) impersonate-prompt-tag)) . ((309207 . 13))) ((def ((quote #%kernel) char-lower-case?)) . ((56373 . 3))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-init)) . ((211456 . 5))) ((form ((lib "racket/unit.rkt") invoke-unit)) . ((137417 . 3))) ((form ((lib "racket/control.rkt") control)) . ((179206 . 2))) ((def ((quote #%kernel) rename-transformer-target)) . ((222984 . 3))) ((def ((lib "racket/sequence.rkt") sequence-andmap)) . ((99764 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-mcar)) . ((371236 . 3))) ((def ((lib "racket/private/more-scheme.rkt") hash-has-key?)) . ((93075 . 4))) ((def ((quote #%kernel) make-empty-namespace)) . ((291228 . 2))) ((def ((lib "racket/contract/private/misc.rkt") symbols)) . ((143561 . 3))) ((def ((quote #%kernel) cdar)) . ((79226 . 3))) ((def ((quote #%kernel) exact->inexact)) . ((17230 . 3))) ((def ((lib "racket/port.rkt") filter-read-input-port)) . ((260776 . 27))) ((def ((lib "racket/private/base.rkt") in-range)) . ((95517 . 7))) ((form ((lib "racket/trace.rkt") trace)) . ((376480 . 2))) ((def ((quote #%kernel) port-write-handler)) . ((282145 . 6))) ((def ((lib "racket/private/list.rkt") build-string)) . ((34274 . 4))) ((def ((quote #%kernel) string<?)) . ((34510 . 4))) ((def ((quote #%kernel) readtable-mapping)) . ((288063 . 9))) ((def ((lib "racket/sandbox.rkt") sandbox-eval-handlers)) . ((325107 . 7))) ((def ((quote #%kernel) struct-type-info)) . ((318175 . 11))) ((def ((quote #%kernel) vector?)) . ((86081 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fx>)) . ((368486 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fx=)) . ((368328 . 4))) ((def ((lib "racket/stream.rkt") stream-empty?)) . ((100550 . 3))) ((def ((quote #%kernel) exn:fail:read-srclocs)) . ((172817 . 5))) ((def ((lib "racket/sandbox.rkt") sandbox-namespace-specs)) . ((322700 . 6))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-set-mcar!)) . ((371346 . 4))) ((form ((lib "racket/fixnum.rkt") for/fxvector)) . ((32089 . 2))) ((form ((lib "racket/private/class-internal.rkt") set-field!)) . ((126623 . 2))) ((form ((lib "racket/contract/parametric.rkt") parametric->/c)) . ((150993 . 2))) ((def ((lib "racket/private/base.rkt") make-exn:fail:contract:variable)) . ((172321 . 5))) ((def ((lib "racket/fixnum.rkt") fxvector)) . ((31153 . 3))) ((def ((lib "racket/place/distributed.rkt") log-message)) . ((199346 . 4))) ((def ((lib "racket/place/distributed.rkt") displayln/f)) . ((210172 . 3))) ((def ((lib "racket/private/base.rkt") stop-after)) . ((98341 . 4))) ((def ((lib "racket/function.rkt") const)) . ((112720 . 3))) ((def ((quote #%kernel) flonum?)) . ((16617 . 3))) ((def ((lib "racket/string.rkt") string-join)) . ((36859 . 11))) ((form ((lib "racket/private/class-internal.rkt") augment-final)) . ((122896 . 2))) ((def ((lib "racket/contract/private/misc.rkt") </c)) . ((142815 . 3))) ((def ((quote #%kernel) hash-eqv?)) . ((90577 . 3))) ((def ((quote #%kernel) use-user-specific-search-paths)) . ((375961 . 4))) ((def ((quote #%kernel) fprintf)) . ((279983 . 5))) ((def ((quote #%kernel) thread-receive)) . ((184542 . 2))) ((def ((quote #%kernel) exn:fail:user?)) . ((174136 . 4))) ((def ((lib "racket/file.rkt") other-write-bit)) . ((343950 . 2))) ((def ((quote #%kernel) open-output-bytes)) . ((245205 . 3))) ((def ((lib "racket/private/class-internal.rkt") exn:fail:object)) . ((134912 . 3))) ((def ((lib "racket/place/distributed.rkt") restarter%)) . ((206279 . 4))) ((def ((quote #%kernel) pair?)) . ((75628 . 3))) ((def ((lib "racket/fixnum.rkt") fx<=)) . ((30700 . 4))) ((def ((quote #%kernel) char-ready?)) . ((272963 . 3))) ((form ((lib "racket/private/class-internal.rkt") class)) . ((122302 . 2))) ((def ((quote #%kernel) syntax-arm)) . ((235522 . 5))) ((def ((lib "racket/list.rkt") split-at-right)) . ((82983 . 4))) ((form ((quote #%kernel) define-values)) . ((10480 . 2))) ((def ((quote #%kernel) pseudo-random-generator-vector?)) . ((22575 . 3))) ((form ((quote #%kernel) let-values)) . ((8971 . 2))) ((def ((quote #%kernel) raise-result-error)) . ((167163 . 13))) ((def ((lib "racket/private/base.rkt") in-directory)) . ((97536 . 3))) ((def ((quote #%kernel) struct:exn:fail:contract:variable)) . ((172321 . 5))) ((form ((lib "racket/fixnum.rkt") for*/fxvector)) . ((32155 . 9))) ((def ((quote #%kernel) make-syntax-introducer)) . ((228616 . 2))) ((def ((quote #%kernel) bytes->path-element)) . ((328665 . 4))) ((def ((quote #%kernel) kill-thread)) . ((183725 . 3))) ((def ((lib "racket/flonum.rkt") flmin)) . ((26694 . 4))) ((form ((lib "racket/match.rkt") match-lambda)) . ((164922 . 2))) ((def ((quote #%kernel) integer->integer-bytes)) . ((23490 . 14))) ((def ((lib "racket/private/base.rkt") open-output-file)) . ((241420 . 10))) ((def ((lib "racket/private/list.rkt") memf)) . ((78485 . 4))) ((form ((lib "racket/private/class-internal.rkt") define/augride)) . ((124142 . 3))) ((def ((lib "racket/private/base.rkt") exn:fail:contract:continuation)) . ((172145 . 5))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flatan)) . ((370359 . 3))) ((form ((lib "racket/match.rkt") match-let*-values)) . ((165199 . 2))) ((form ((lib "racket/match.rkt") match*/derived)) . ((165890 . 2))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flfloor)) . ((369874 . 3))) ((form ((lib "racket/private/base.rkt") module+)) . ((182 . 2))) ((def ((lib "racket/dict.rkt") prop:dict/contract)) . ((105927 . 2))) ((def ((quote #%kernel) hash-set)) . ((92450 . 5))) ((def ((lib "racket/contract/private/misc.rkt") =/c)) . ((142760 . 3))) ((def ((lib "racket/private/base.rkt") procedure->method)) . ((109874 . 3))) ((def ((lib "racket/contract/private/vector.rkt") vector/c)) . ((143960 . 8))) ((form ((lib "racket/private/class-internal.rkt") overment)) . ((122740 . 2))) ((def ((quote #%kernel) syntax-local-module-required-identifiers)) . ((229296 . 7))) ((def ((quote #%kernel) read-accept-bar-quote)) . ((277863 . 4))) ((def ((quote #%kernel) string-normalize-nfkc)) . ((35897 . 3))) ((def ((lib "racket/private/base.rkt") syntax-recertify)) . ((219099 . 9))) ((def ((lib "racket/async-channel.rkt") async-channel?)) . ((187961 . 3))) ((def ((lib "racket/contract/private/guts.rkt") coerce-flat-contract)) . ((155947 . 4))) ((form ((lib "racket/trait.rkt") trait-alias)) . ((128362 . 2))) ((def ((lib "racket/vector.rkt") vector-memv)) . ((89777 . 4))) ((def ((quote #%kernel) eq-hash-code)) . ((95217 . 3))) ((form ((lib "racket/private/base.rkt") for/list)) . ((11677 . 2))) ((def ((lib "racket/sandbox.rkt") call-with-limits)) . ((327690 . 5))) ((def ((quote #%kernel) inexact?)) . ((17114 . 3))) ((def ((lib "racket/fixnum.rkt") shared-fxvector)) . ((32418 . 3))) ((def ((quote #%kernel) path->bytes)) . ((328519 . 3))) ((def ((quote #%kernel) eval-syntax)) . ((296355 . 4))) ((form ((lib "racket/control.rkt") prompt-at)) . ((179239 . 2))) ((def ((lib "racket/engine.rkt") engine)) . ((213377 . 3))) ((def ((quote #%kernel) custodian-managed-list)) . ((316474 . 4))) ((def ((lib "racket/private/serialize.rkt") prop:serializable)) . ((290461 . 2))) ((form ((lib "racket/unit.rkt") unit/s)) . ((140101 . 6))) ((def ((quote #%kernel) namespace-attach-module)) . ((293600 . 7))) ((def ((lib "racket/sandbox.rkt") exn:fail:sandbox-terminated?)) . ((320470 . 5))) ((form ((lib "racket/private/base.rkt") struct-out)) . ((4374 . 2))) ((def ((lib "racket/sandbox.rkt") sandbox-make-code-inspector)) . ((325555 . 4))) ((def ((lib "racket/future.rkt") fsemaphore-post)) . ((190614 . 3))) ((def ((quote #%kernel) current-process-milliseconds)) . ((360731 . 3))) ((def ((quote #%kernel) syntax-transforming?)) . ((228431 . 2))) ((def ((lib "racket/set.rkt") seteq)) . ((107224 . 3))) ((form ((lib "racket/contract/base.rkt") contract-out)) . ((151485 . 14))) ((form ((lib "racket/private/class-internal.rkt") override*)) . ((123296 . 2))) ((def ((lib "racket/dict.rkt") dict-remove!)) . ((104551 . 4))) ((def ((lib "racket/math.rkt") tanh)) . ((25466 . 3))) ((def ((lib "racket/private/base.rkt") hash-set*)) . ((92591 . 5))) ((def ((quote #%kernel) make-ephemeron)) . ((366458 . 4))) ((def ((lib "racket/fixnum.rkt") fx=)) . ((30484 . 4))) ((def ((lib "racket/dict.rkt") make-immutable-custom-hash)) . ((106428 . 8))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-struct*-set!)) . ((374721 . 5))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-string-length)) . ((372816 . 3))) ((def ((quote #%kernel) srcloc?)) . ((174901 . 9))) ((def ((quote #%kernel) identifier-template-binding)) . ((221415 . 12))) ((form ((lib "racket/private/class-internal.rkt") inherit-field)) . ((122509 . 2))) ((def ((quote #%kernel) make-output-port)) . ((248367 . 59))) ((form ((lib "racket/serialize.rkt") define-serializable-struct/versions)) . ((290047 . 4))) ((def ((lib "racket/contract/private/misc.rkt") contract-projection)) . ((163006 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-f64vector-set!)) . ((373831 . 5))) ((form ((lib "racket/private/base.rkt") #%module-begin)) . ((214 . 2))) ((def ((quote #%kernel) syntax-shift-phase-level)) . ((218558 . 4))) ((def ((lib "racket/private/base.rkt") namespace-anchor?)) . ((291416 . 3))) ((def ((lib "racket/contract/private/blame.rkt") blame-negative)) . ((156704 . 3))) ((def ((quote #%kernel) port-next-location)) . ((240606 . 6))) ((def ((quote #%kernel) set-mcar!)) . ((85937 . 4))) ((def ((quote #%kernel) char-blank?)) . ((56910 . 3))) ((def ((quote #%kernel) free-label-identifier=?)) . ((220197 . 4))) ((def ((lib "racket/private/class-internal.rkt") method-in-interface?)) . ((134022 . 4))) ((def ((lib "racket/private/list.rkt") memv)) . ((78321 . 4))) ((def ((quote #%kernel) raise-user-error)) . ((166519 . 10))) ((def ((lib "racket/provide-transform.rkt") provide-transformer?)) . ((233198 . 3))) ((def ((quote #%kernel) impersonator-property-accessor-procedure?)) . ((315123 . 3))) ((def ((quote #%kernel) current-evt-pseudo-random-generator)) . ((186038 . 5))) ((def ((quote #%kernel) port-try-file-lock?)) . ((244679 . 4))) ((def ((lib "racket/place.rkt") place-channel-put/get)) . ((192622 . 4))) ((def ((quote #%kernel) file-size)) . ((335184 . 3))) ((form ((lib "racket/private/class-internal.rkt") this)) . ((122353 . 2))) ((def ((lib "racket/contract/private/blame.rkt") blame-source)) . ((156875 . 3))) ((def ((quote #%kernel) char>?)) . ((55636 . 4))) ((def ((lib "racket/private/misc.rkt") reroot-path)) . ((331677 . 4))) ((def ((quote #%kernel) parameterization?)) . ((190015 . 3))) ((def ((lib "racket/place.rkt") place-channel)) . ((192362 . 2))) ((def ((lib "racket/private/base.rkt") make-exn:break:hang-up)) . ((174418 . 4))) ((def ((lib "racket/private/map.rkt") for-each)) . ((76936 . 4))) ((def ((quote #%kernel) void?)) . ((113171 . 3))) ((form ((lib "racket/control.rkt") control0)) . ((179561 . 2))) ((def ((lib "racket/private/base.rkt") sequence?)) . ((95462 . 3))) ((def ((lib "racket/pretty.rkt") pretty-print-handler)) . ((283624 . 3))) ((def ((quote #%kernel) pregexp?)) . ((58173 . 3))) ((form ((quote #%kernel) begin-for-syntax)) . ((11049 . 2))) ((def ((quote #%kernel) subprocess)) . ((353033 . 31))) ((form ((lib "racket/private/more-scheme.rkt") case)) . ((10053 . 5))) ((def ((quote #%kernel) print-unreadable)) . ((280563 . 4))) ((form ((lib "racket/private/base.rkt") for*/list)) . ((12791 . 2))) ((def ((lib "racket/private/base.rkt") syntax-local-certifier)) . ((228279 . 5))) ((def ((quote #%kernel) substring)) . ((33272 . 5))) ((constructor ((lib "racket/place/distributed.rkt") place-socket-bridge%)) . ((200286 . 9))) ((form ((lib "racket/bool.rkt") nor)) . ((15915 . 2))) ((def ((quote #%kernel) boolean?)) . ((15036 . 3))) ((def ((lib "racket/list.rkt") split-at)) . ((82675 . 4))) ((def ((quote #%kernel) struct?)) . ((118012 . 3))) ((def ((quote #%kernel) box-immutable)) . ((90076 . 3))) ((form ((lib "racket/private/class-internal.rkt") inherit)) . ((122992 . 2))) ((def ((quote #%kernel) prop:liberal-define-context)) . ((229627 . 2))) ((def ((lib "racket/private/class-internal.rkt") externalizable<%>)) . ((132971 . 2))) ((def ((lib "racket/sandbox.rkt") exn:fail:resource-resource)) . ((327922 . 5))) ((form ((lib "racket/private/class-internal.rkt") inner)) . ((124596 . 3))) ((def ((lib "racket/list.rkt") argmin)) . ((84652 . 4))) ((def ((lib "racket/contract/private/guts.rkt") coerce-contract/f)) . ((156160 . 3))) ((def ((quote #%kernel) cadddr)) . ((80710 . 3))) ((def ((lib "racket/port.rkt") call-with-output-bytes)) . ((252320 . 3))) ((def ((lib "racket/flonum.rkt") flceiling)) . ((26948 . 3))) ((def ((lib "racket/system.rkt") bytes-no-nuls?)) . ((357771 . 3))) ((def ((quote #%kernel) peek-char)) . ((271547 . 4))) ((form ((lib "racket/private/base.rkt") for-label)) . ((4774 . 2))) ((def ((quote #%kernel) syntax-local-lift-provide)) . ((227473 . 3))) ((def ((quote #%kernel) date-time-zone-offset)) . ((359520 . 23))) ((def ((lib "racket/keyword-transform.rkt") syntax-procedure-alias-property)) . ((233714 . 8))) ((def ((lib "racket/date.rkt") julian/scalinger->string)) . ((362662 . 3))) ((def ((quote #%kernel) special-comment?)) . ((288410 . 3))) ((form ((lib "racket/private/class-internal.rkt") send*)) . ((126180 . 5))) ((form ((lib "racket/match.rkt") match-lambda*)) . ((164957 . 2))) ((def ((lib "racket/sequence.rkt") sequence->list)) . ((99261 . 3))) ((def ((lib "racket/file.rkt") group-read-bit)) . ((343822 . 2))) ((def ((quote #%kernel) make-rectangular)) . ((20104 . 4))) ((def ((lib "racket/tcp.rkt") tcp-listener?)) . ((345893 . 3))) ((def ((lib "racket/pretty.rkt") pretty-display)) . ((283368 . 4))) ((def ((quote #%kernel) read-bytes-avail!/enable-break)) . ((267455 . 10))) ((def ((quote #%kernel) tan)) . ((19843 . 3))) ((def ((lib "racket/async-channel.rkt") async-channel-put-evt)) . ((188380 . 4))) ((def ((quote #%kernel) sub1)) . ((18145 . 3))) ((def ((quote #%kernel) file-stream-port?)) . ((239723 . 3))) ((def ((lib "racket/sandbox.rkt") sandbox-make-namespace)) . ((322967 . 2))) ((def ((quote #%kernel) peek-string!)) . ((268344 . 12))) ((def ((quote #%kernel) cddaar)) . ((81210 . 3))) ((def ((quote #%kernel) always-evt)) . ((185776 . 2))) ((def ((quote #%kernel) module-compiled-language-info)) . ((304360 . 4))) ((form ((lib "racket/private/class-internal.rkt") abstract)) . ((122965 . 2))) ((def ((lib "racket/private/base.rkt") prop:procedure)) . ((111733 . 2))) ((form ((lib "racket/private/letstx-scheme.rkt") let-syntaxes)) . ((9278 . 2))) ((def ((quote #%kernel) absolute-path?)) . ((329910 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fltan)) . ((370180 . 3))) ((form ((lib "racket/private/class-internal.rkt") define/private)) . ((124314 . 3))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-comm)) . ((210916 . 5))) ((def ((lib "racket/generator.rkt") sequence->repeated-generator)) . ((102618 . 3))) ((def ((lib "racket/sequence.rkt") sequence-map)) . ((99677 . 4))) ((def ((quote #%kernel) string->number)) . ((22764 . 4))) ((def ((lib "racket/place/distributed.rkt") *channel?)) . ((207976 . 3))) ((def ((lib "racket/list.rkt") fifth)) . ((81990 . 3))) ((def ((lib "racket/private/list.rkt") remq)) . ((77451 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fx->fl)) . ((371010 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-bytes-length)) . ((373174 . 3))) ((def ((quote #%kernel) compile-syntax)) . ((299579 . 3))) ((def ((quote #%kernel) make-bytes)) . ((47956 . 4))) ((form ((lib "racket/private/base.rkt") for*/or)) . ((13271 . 2))) ((def ((lib "racket/private/class-internal.rkt") interface?)) . ((133186 . 3))) ((def ((quote #%kernel) prop:output-port)) . ((246130 . 2))) ((def ((quote #%kernel) will-executor?)) . ((366767 . 3))) ((def ((quote #%kernel) string-locale-downcase)) . ((36673 . 3))) ((def ((quote #%kernel) pregexp)) . ((58401 . 3))) ((def ((lib "racket/flonum.rkt") flsin)) . ((27061 . 3))) ((def ((lib "racket/sandbox.rkt") set-eval-limits)) . ((326173 . 5))) ((constructor ((lib "racket/place/distributed.rkt") respawn-and-fire%)) . ((205673 . 7))) ((def ((lib "racket/future.rkt") fsemaphore-try-wait?)) . ((190758 . 3))) ((def ((quote #%kernel) current-write-relative-directory)) . ((281637 . 11))) ((def ((quote #%kernel) values)) . ((166049 . 3))) ((def ((lib "racket/sandbox.rkt") sandbox-eval-limits)) . ((324733 . 9))) ((def ((quote #%kernel) call-with-composable-continuation)) . ((177249 . 6))) ((def ((lib "racket/private/base.rkt") procedure-arity)) . ((110370 . 3))) ((form ((lib "racket/contract/base.rkt") unconstrained-domain->)) . ((150806 . 2))) ((def ((lib "racket/contract/private/blame.rkt") blame-replace-negative)) . ((157111 . 4))) ((def ((lib "racket/dict.rkt") in-dict-pairs)) . ((105617 . 3))) ((def ((lib "racket/port.rkt") display-lines)) . ((251956 . 7))) ((def ((quote #%kernel) current-subprocess-custodian-mode)) . ((354749 . 5))) ((def ((quote #%kernel) use-collection-link-paths)) . ((376085 . 4))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-cnt)) . ((211141 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fl-)) . ((368963 . 4))) ((def ((lib "racket/private/base.rkt") regexp-quote)) . ((58604 . 7))) ((def ((lib "racket/string.rkt") string-split)) . ((37935 . 9))) ((def ((lib "racket/private/base.rkt") in-input-port-bytes)) . ((96748 . 3))) ((def ((quote #%kernel) module-compiled-name)) . ((302881 . 9))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-u16vector-ref)) . ((374196 . 4))) ((def ((quote #%kernel) list*)) . ((76012 . 4))) ((def ((lib "racket/private/base.rkt") exn:fail:contract:variable)) . ((172321 . 5))) ((def ((quote #%kernel) make-readtable)) . ((287569 . 13))) ((form ((lib "racket/shared.rkt") shared)) . ((9627 . 2))) ((form ((lib "racket/flonum.rkt") for*/flvector)) . ((29106 . 9))) ((def ((lib "racket/private/base.rkt") gen:equal+hash)) . ((15553 . 2))) ((def ((quote #%kernel) read-accept-dot)) . ((278177 . 4))) ((def ((quote #%kernel) subbytes)) . ((48588 . 5))) ((def ((lib "racket/flonum.rkt") in-flvector)) . ((28800 . 6))) ((def ((lib "racket/contract.rkt") raise-contract-error)) . ((163913 . 13))) ((def ((lib "racket/date.rkt") find-seconds)) . ((362040 . 15))) ((form ((lib "racket/set.rkt") for/seteqv)) . ((109002 . 2))) ((def ((lib "racket/set.rkt") set-member?)) . ((107407 . 4))) ((def ((lib "racket/private/base.rkt") in-values-sequence)) . ((98088 . 3))) ((def ((quote #%kernel) syntax-line)) . ((216735 . 3))) ((def ((quote #%kernel) vector-fill!)) . ((86985 . 4))) ((def ((quote #%kernel) regexp-match-peek-immediate)) . ((65944 . 15))) ((def ((quote #%kernel) peek-byte-or-special)) . ((272106 . 8))) ((def ((quote #%kernel) sync/enable-break)) . ((184980 . 3))) ((def ((lib "racket/flonum.rkt") fl<)) . ((26404 . 4))) ((def ((quote #%kernel) set!-transformer?)) . ((222316 . 3))) ((def ((lib "racket/sandbox.rkt") sandbox-propagate-breaks)) . ((322440 . 4))) ((def ((quote #%kernel) semaphore-wait)) . ((186885 . 3))) ((def ((quote #%kernel) string->bytes/latin-1)) . ((51487 . 9))) ((def ((quote #%kernel) cdaar)) . ((79682 . 3))) ((def ((lib "racket/private/base.rkt") in-cycle)) . ((97949 . 3))) ((def ((quote #%kernel) system-library-subpath)) . ((363106 . 3))) ((def ((lib "racket/place.rkt") place-channel?)) . ((191025 . 3))) ((def ((quote #%kernel) chaperone-prompt-tag)) . ((313874 . 13))) ((def ((lib "racket/flonum.rkt") flfloor)) . ((26894 . 3))) ((def ((quote #%kernel) char->integer)) . ((55020 . 3))) ((def ((lib "racket/list.rkt") drop)) . ((82580 . 4))) ((def ((quote #%kernel) file-or-directory-modify-seconds)) . ((334290 . 8))) ((def ((quote #%kernel) continuation-mark-set-first)) . ((181503 . 10))) ((def ((quote #%kernel) syntax-local-lift-expression)) . ((226937 . 3))) ((def ((lib "racket/place/distributed.rkt") place-socket-bridge%)) . ((200112 . 4))) ((form ((lib "racket/control.rkt") control-at)) . ((179287 . 2))) ((def ((quote #%kernel) exn:fail:filesystem:exists?)) . ((173402 . 4))) ((def ((lib "racket/private/stxcase-scheme.rkt") check-duplicate-identifier)) . ((220301 . 3))) ((def ((lib "racket/private/misc.rkt") displayln)) . ((279865 . 4))) ((form ((lib "racket/private/class-internal.rkt") augment*)) . ((123410 . 2))) ((form ((lib "racket/contract/private/opt.rkt") opt/c)) . ((163258 . 2))) ((def ((quote #%kernel) cddr)) . ((79290 . 3))) ((def ((quote #%kernel) magnitude)) . ((20390 . 3))) ((def ((lib "racket/pretty.rkt") pretty-print)) . ((283086 . 5))) ((def ((quote #%kernel) port-print-handler)) . ((282583 . 7))) ((def ((quote #%kernel) string-ci>?)) . ((35187 . 4))) ((def ((quote #%kernel) string-locale-ci=?)) . ((36281 . 4))) ((def ((lib "racket/pretty.rkt") pretty-print-print-hook)) . ((286249 . 5))) ((form ((lib "racket/private/class-internal.rkt") field-bound?)) . ((126788 . 2))) ((def ((quote #%kernel) struct-type-make-constructor)) . ((318470 . 4))) ((def ((quote #%kernel) make-vector)) . ((86134 . 4))) ((def ((lib "racket/private/base.rkt") with-input-from-file)) . ((243922 . 7))) ((def ((quote #%kernel) caddr)) . ((79600 . 3))) ((form ((lib "racket/require.rkt") multi-in)) . ((7535 . 8))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fxior)) . ((367943 . 4))) ((def ((lib "racket/file.rkt") other-read-bit)) . ((343919 . 2))) ((def ((lib "racket/dict.rkt") dict-has-key?)) . ((103508 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fxand)) . ((367863 . 4))) ((form ((lib "racket/match.rkt") match-let)) . ((165031 . 2))) ((def ((lib "racket/set.rkt") set-first)) . ((107484 . 3))) ((def ((lib "racket/sandbox.rkt") sandbox-security-guard)) . ((323295 . 5))) ((def ((lib "racket/place/distributed.rkt") create-place-node)) . ((196628 . 15))) ((def ((quote #%kernel) inexact-real?)) . ((16505 . 3))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-recv)) . ((211351 . 4))) ((def ((lib "racket/struct-info.rkt") struct-auto-info-lists)) . ((119310 . 4))) ((def ((quote #%kernel) hash?)) . ((90463 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-set-box*!)) . ((371975 . 4))) ((form ((lib "racket/unit.rkt") define-unit/s)) . ((140221 . 6))) ((def ((quote #%kernel) thread-try-receive)) . ((184580 . 2))) ((def ((lib "racket/private/base.rkt") exn:break:hang-up)) . ((174418 . 4))) ((def ((lib "racket/flonum.rkt") make-flrectangular)) . ((27736 . 5))) ((def ((lib "racket/udp.rkt") udp-close)) . ((351109 . 3))) ((form ((lib "racket/private/more-scheme.rkt") log-debug)) . ((358960 . 3))) ((def ((lib "racket/port.rkt") relocate-output-port)) . ((258972 . 11))) ((def ((quote #%kernel) mpair?)) . ((85722 . 3))) ((def ((lib "racket/match.rkt") match-equality-test)) . ((165673 . 4))) ((def ((lib "racket/port.rkt") port->string)) . ((251264 . 3))) ((def ((lib "racket/set.rkt") list->seteqv)) . ((109317 . 3))) ((def ((quote #%kernel) syntax-disarm)) . ((235751 . 4))) ((def ((quote #%kernel) vector->pseudo-random-generator)) . ((22243 . 4))) ((form ((quote #%kernel) letrec-values)) . ((9096 . 2))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fl>)) . ((369414 . 4))) ((def ((quote #%kernel) raise-type-error)) . ((168493 . 10))) ((def ((lib "racket/path.rkt") find-relative-path)) . ((332262 . 8))) ((def ((quote #%kernel) exn:fail:contract:variable-id)) . ((172321 . 5))) ((def ((lib "racket/udp.rkt") udp-connected?)) . ((351301 . 3))) ((def ((lib "racket/set.rkt") set/c)) . ((108691 . 4))) ((def ((quote #%kernel) file-exists?)) . ((333835 . 3))) ((def ((lib "racket/contract/private/misc.rkt") <=/c)) . ((142925 . 3))) ((def ((quote #%kernel) break-thread)) . ((183785 . 4))) ((def ((lib "racket/flonum.rkt") fl*)) . ((26138 . 4))) ((def ((lib "racket/private/serialize.rkt") deserialize-module-guard)) . ((289236 . 5))) ((def ((quote #%kernel) procedure-arity-includes?)) . ((110512 . 5))) ((form ((lib "racket/private/class-internal.rkt") class/derived)) . ((124394 . 5))) ((def ((quote #%kernel) bytes-copy!)) . ((48826 . 11))) ((def ((lib "racket/contract/private/misc.rkt") listof)) . ((144653 . 3))) ((def ((lib "racket/class.rkt") implementation?/c)) . ((132510 . 3))) ((def ((quote #%kernel) split-path)) . ((331114 . 5))) ((form ((lib "racket/set.rkt") for*/seteqv)) . ((109153 . 2))) ((def ((lib "racket/private/base.rkt") call-with-input-file*)) . ((243117 . 7))) ((def ((lib "racket/place/distributed.rkt") mr-spawn-remote-node)) . ((208315 . 9))) ((def ((lib "racket/port.rkt") peek-bytes-avail!-evt)) . ((263455 . 29))) ((def ((lib "racket/provide-transform.rkt") syntax-local-provide-certifier)) . ((233590 . 4))) ((def ((quote #%kernel) open-output-string)) . ((245292 . 3))) ((def ((quote #%kernel) hash-remove)) . ((94014 . 4))) ((form ((lib "racket/trace.rkt") untrace)) . ((376504 . 2))) ((def ((lib "racket/file.rkt") get-preference)) . ((340579 . 18))) ((def ((lib "racket/math.rkt") radians->degrees)) . ((25126 . 3))) ((def ((quote #%kernel) namespace-set-variable-value!)) . ((292490 . 9))) ((def ((lib "racket/sandbox.rkt") sandbox-make-logger)) . ((325694 . 4))) ((def ((quote #%kernel) read-decimal-as-inexact)) . ((278067 . 4))) ((def ((quote #%kernel) string-downcase)) . ((35448 . 3))) ((form ((lib "racket/place.rkt") place)) . ((191849 . 2))) ((def ((quote #%kernel) list-ref)) . ((76299 . 4))) ((def ((quote #%kernel) vector->list)) . ((86767 . 3))) ((def ((lib "racket/sandbox.rkt") call-with-custodian-shutdown)) . ((326526 . 5))) ((form ((lib "racket/private/letstx-scheme.rkt") quasiquote)) . ((14783 . 2))) ((form ((lib "racket/unit.rkt") except)) . ((137101 . 2))) ((def ((quote #%kernel) call-with-current-continuation)) . ((176799 . 6))) ((def ((quote #%kernel) path-convention-type)) . ((328985 . 3))) ((def ((lib "racket/port.rkt") input-port-append)) . ((252990 . 4))) ((def ((quote #%kernel) namespace-require/copy)) . ((293258 . 3))) ((def ((lib "racket/pretty.rkt") pretty-printing)) . ((286799 . 4))) ((def ((lib "racket/tcp.rkt") tcp-addresses)) . ((346107 . 7))) ((def ((lib "racket/private/base.rkt") in-parallel)) . ((98017 . 3))) ((def ((lib "racket/place/distributed.rkt") message-router)) . ((192786 . 3))) ((form ((lib "racket/private/class-internal.rkt") augride*)) . ((123445 . 2))) ((def ((quote #%kernel) namespace-attach-module-declaration)) . ((293893 . 7))) ((form ((lib "racket/runtime-path.rkt") define-runtime-path-list)) . ((336180 . 2))) ((def ((lib "racket/pretty.rkt") pretty-print-pre-print-hook)) . ((286441 . 5))) ((def ((quote #%kernel) custodian-shutdown-all)) . ((316291 . 3))) ((def ((quote #%kernel) placeholder-set!)) . ((85204 . 4))) ((def ((quote #%kernel) variable-reference-constant?)) . ((295035 . 3))) ((def ((lib "racket/generator.rkt") generator-state)) . ((102483 . 3))) ((form ((lib "racket/private/class-internal.rkt") send)) . ((125553 . 3))) ((def ((quote #%kernel) chaperone-struct-type)) . ((313025 . 15))) ((form ((lib "racket/private/class-internal.rkt") inherit/inner)) . ((123072 . 2))) ((def ((lib "racket/private/list.rkt") remv*)) . ((77794 . 4))) ((def ((quote #%kernel) syntax-local-context)) . ((227622 . 3))) ((def ((lib "racket/flonum.rkt") ->fl)) . ((27607 . 3))) ((def ((lib "racket/syntax.rkt") format-symbol)) . ((237345 . 4))) ((def ((lib "racket/sequence.rkt") sequence-fold)) . ((100072 . 5))) ((def ((quote #%kernel) struct:srcloc)) . ((174901 . 9))) ((def ((quote #%kernel) identifier-label-binding)) . ((221867 . 12))) ((def ((lib "racket/place.rkt") place-message-allowed?)) . ((192718 . 3))) ((def ((lib "racket/fasl.rkt") s-exp->fasl)) . ((290972 . 4))) ((def ((quote #%kernel) struct:exn:fail:contract:continuation)) . ((172145 . 5))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-struct-set!)) . ((374517 . 5))) ((def ((quote #%kernel) string->path)) . ((328255 . 3))) ((def ((lib "racket/require-transform.rkt") import-mode)) . ((230218 . 19))) ((def ((lib "racket/syntax.rkt") current-syntax-context)) . ((237566 . 4))) ((def ((lib "racket/control.rkt") spawn)) . ((179830 . 3))) ((def ((lib "racket/future.rkt") current-future)) . ((190232 . 2))) ((def ((quote #%kernel) set-port-next-location!)) . ((240787 . 9))) ((def ((quote #%kernel) mcdr)) . ((85889 . 3))) ((def ((quote #%kernel) char-graphic?)) . ((56777 . 3))) ((def ((lib "racket/contract/private/blame.rkt") blame-original?)) . ((156988 . 3))) ((form ((quote #%kernel) with-continuation-mark)) . ((14718 . 2))) ((def ((quote #%kernel) compile-context-preservation-enabled)) . ((299977 . 4))) ((form ((lib "racket/private/more-scheme.rkt") with-handlers*)) . ((170124 . 3))) ((form ((lib "racket/sandbox.rkt") with-limits)) . ((327871 . 2))) ((def ((quote #%kernel) make-inspector)) . ((317759 . 3))) ((def ((quote #%kernel) error-value->string-handler)) . ((170773 . 9))) ((form ((lib "racket/private/letstx-scheme.rkt") let/ec)) . ((177724 . 2))) ((def ((quote #%kernel) read-accept-lang)) . ((278585 . 4))) ((form ((lib "racket/local.rkt") local)) . ((9581 . 2))) ((def ((quote #%kernel) struct:exn)) . ((171191 . 6))) ((def ((quote #%kernel) make-hasheq)) . ((91325 . 3))) ((def ((lib "racket/pretty.rkt") pretty-print-newline)) . ((285337 . 4))) ((def ((quote #%kernel) char<?)) . ((55449 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fx*)) . ((367472 . 4))) ((def ((lib "racket/fixnum.rkt") fx-)) . ((29634 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fx-)) . ((367394 . 4))) ((def ((lib "racket/contract/private/misc.rkt") false/c)) . ((143425 . 2))) ((def ((lib "racket/fixnum.rkt") fxand)) . ((30061 . 4))) ((def ((quote #%kernel) void)) . ((113219 . 3))) ((def ((lib "racket/stream.rkt") empty-stream)) . ((100919 . 2))) ((def ((quote #%kernel) variable-reference->phase)) . ((295754 . 3))) ((def ((quote #%kernel) bitwise-not)) . ((20754 . 3))) ((form ((lib "racket/private/misc.rkt") define-syntax-rule)) . ((216420 . 2))) ((def ((quote #%kernel) byte-regexp?)) . ((58227 . 3))) ((form ((quote #%kernel) letrec-syntaxes+values)) . ((9413 . 4))) ((def ((quote #%kernel) mcons)) . ((85774 . 4))) ((form ((lib "racket/private/more-scheme.rkt") parameterize)) . ((189180 . 5))) ((def ((quote #%kernel) print-box)) . ((280833 . 4))) ((def ((lib "racket/list.rkt") flatten)) . ((83759 . 3))) ((def ((quote #%kernel) string-append)) . ((34063 . 3))) ((def ((lib "racket/private/class-internal.rkt") dynamic-send)) . ((125907 . 9))) ((def ((lib "racket/private/class-internal.rkt") printable<%>)) . ((133014 . 2))) ((form ((lib "racket/private/letstx-scheme.rkt") let-syntax)) . ((9161 . 2))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-cdr)) . ((371183 . 3))) ((def ((lib "racket/private/misc.rkt") rationalize)) . ((18923 . 4))) ((def ((lib "racket/function.rkt") identity)) . ((112669 . 3))) ((def ((lib "racket/file.rkt") user-write-bit)) . ((343758 . 2))) ((def ((quote #%kernel) module-path-index-split)) . ((302277 . 5))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fxmin)) . ((368725 . 4))) ((def ((quote #%kernel) liberal-define-context?)) . ((229687 . 3))) ((meth (((lib "racket/place/distributed.rkt") remote-node%) get-first-place)) . ((202405 . 3))) ((def ((quote #%kernel) system-big-endian?)) . ((24971 . 2))) ((def ((lib "racket/date.rkt") date->julian/scalinger)) . ((362582 . 3))) ((def ((lib "racket/dict.rkt") make-custom-hash)) . ((106173 . 6))) ((def ((lib "racket/private/base.rkt") exn:fail:filesystem)) . ((173266 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flmin)) . ((369653 . 4))) ((def ((quote #%kernel) cddadr)) . ((81310 . 3))) ((def ((lib "racket/private/class-internal.rkt") class->interface)) . ((133486 . 3))) ((def ((lib "racket/place/define-remote-server.rkt") log-to-parent)) . ((210502 . 4))) ((def ((lib "racket/class.rkt") subclass?/c)) . ((132600 . 3))) ((meth (((lib "racket/place/distributed.rkt") place%) wait-for-die)) . ((205056 . 2))) ((def ((lib "racket/private/base.rkt") exn:fail:filesystem:version)) . ((173563 . 4))) ((form ((lib "racket/private/base.rkt") combine-in)) . ((2679 . 2))) ((def ((quote #%kernel) date-year-day)) . ((359520 . 23))) ((def ((quote #%kernel) hash-set!)) . ((92179 . 5))) ((def ((quote #%kernel) special-comment-value)) . ((288472 . 3))) ((def ((quote #%kernel) variable-reference?)) . ((294970 . 3))) ((def ((lib "racket/trace.rkt") current-trace-notify)) . ((376530 . 4))) ((form ((quote #%kernel) #%provide)) . ((6375 . 23))) ((def ((quote #%kernel) make-polar)) . ((20184 . 4))) ((def ((lib "racket/place/distributed.rkt") socket-connection%)) . ((200608 . 4))) ((def ((quote #%kernel) bytes-utf-8-length)) . ((52062 . 7))) ((def ((lib "racket/private/base.rkt") in-hash-keys)) . ((97338 . 3))) ((def ((quote #%kernel) link-exists?)) . ((333906 . 3))) ((form ((lib "racket/private/base.rkt") struct-copy)) . ((117777 . 5))) ((def ((quote #%kernel) cos)) . ((19793 . 3))) ((def ((lib "racket/function.rkt") negate)) . ((112828 . 3))) ((def ((lib "racket/unit-exptime.rkt") signature-members)) . ((141627 . 8))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-allreduce)) . ((212065 . 5))) ((def ((quote #%kernel) terminal-port?)) . ((239792 . 3))) ((def ((lib "racket/contract/private/hash.rkt") hash/c)) . ((146299 . 9))) ((def ((quote #%kernel) subprocess-pid)) . ((354596 . 3))) ((form ((lib "racket/private/stxcase-scheme.rkt") ...)) . ((216475 . 2))) ((def ((quote #%kernel) never-evt)) . ((185802 . 2))) ((def ((lib "racket/private/base.rkt") make-exn:fail:user)) . ((174136 . 4))) ((form ((lib "racket/private/base.rkt") define-struct/derived)) . ((114499 . 3))) ((def ((lib "racket/sandbox.rkt") sandbox-make-inspector)) . ((325426 . 4))) ((def ((lib "racket/port.rkt") call-with-input-string)) . ((252564 . 4))) ((def ((quote #%kernel) number->string)) . ((22652 . 4))) ((def ((quote #%kernel) syntax-original?)) . ((217107 . 3))) ((def ((lib "racket/private/more-scheme.rkt") hash-update)) . ((93580 . 9))) ((form ((lib "racket/unit.rkt") define-values/invoke-unit)) . ((137506 . 4))) ((form ((lib "racket/generator.rkt") generator)) . ((102251 . 2))) ((def ((lib "racket/contract/private/guts.rkt") contract-stronger?)) . ((162193 . 4))) ((def ((quote #%kernel) bytes?)) . ((47904 . 3))) ((def ((lib "racket/sequence.rkt") sequence-ref)) . ((99405 . 4))) ((def ((lib "racket/private/base.rkt") open-input-output-file)) . ((241881 . 10))) ((form ((lib "racket/private/class-internal.rkt") ->m)) . ((129465 . 2))) ((form ((lib "racket/private/base.rkt") only-in)) . ((2481 . 2))) ((def ((quote #%kernel) string-locale-upcase)) . ((36596 . 3))) ((def ((quote #%kernel) regexp-match)) . ((58953 . 17))) ((def ((quote #%kernel) string?)) . ((32610 . 3))) ((form ((lib "racket/private/base.rkt") for/hash)) . ((11989 . 2))) ((def ((lib "racket/pretty.rkt") make-tentative-pretty-print-output-port)) . ((286893 . 8))) ((def ((quote #%kernel) read)) . ((276171 . 3))) ((def ((lib "racket/port.rkt") peek-string-evt)) . ((263455 . 29))) ((def ((lib "racket/dict.rkt") dict-values)) . ((105741 . 3))) ((def ((quote #%kernel) call-with-values)) . ((166101 . 4))) ((def ((lib "racket/bool.rkt") false?)) . ((15838 . 3))) ((def ((quote #%kernel) date*?)) . ((360475 . 5))) ((def ((lib "racket/private/base.rkt") make-keyword-procedure)) . ((110938 . 5))) ((def ((quote #%kernel) dynamic-require)) . ((304540 . 7))) ((def ((quote #%kernel) subprocess-group-enabled)) . ((354927 . 4))) ((def ((lib "racket/contract/private/blame.rkt") blame-swapped?)) . ((157050 . 3))) ((def ((lib "racket/sequence.rkt") sequence-tail)) . ((99502 . 4))) ((def ((lib "racket/stream.rkt") stream-for-each)) . ((101624 . 4))) ((def ((quote #%kernel) dynamic-wind)) . ((178179 . 7))) ((form ((lib "racket/private/base.rkt") except-in)) . ((2535 . 2))) ((def ((lib "racket/port.rkt") dup-output-port)) . ((258436 . 4))) ((def ((lib "racket/contract/private/misc.rkt") prompt-tag/c)) . ((146628 . 3))) ((def ((lib "racket/private/base.rkt") make-exn:fail:filesystem:version)) . ((173563 . 4))) ((form ((lib "racket/control.rkt") shift-at)) . ((179445 . 2))) ((def ((quote #%kernel) list?)) . ((75909 . 3))) ((def ((quote #%kernel) prop:custom-print-quotable)) . ((288809 . 2))) ((form ((lib "racket/contract/private/base.rkt") recursive-contract)) . ((163173 . 3))) ((form ((lib "racket/provide.rkt") matching-identifiers-out)) . ((7679 . 2))) ((def ((quote #%kernel) log)) . ((19693 . 3))) ((form ((lib "racket/unit.rkt") prefix)) . ((137177 . 2))) ((def ((quote #%kernel) make-weak-hasheq)) . ((91674 . 3))) ((def ((quote #%kernel) bytes>?)) . ((49930 . 4))) ((def ((lib "racket/private/base.rkt") raise-arity-error)) . ((169013 . 9))) ((form ((lib "racket/contract/private/provide.rkt") provide/contract)) . ((152023 . 2))) ((def ((quote #%kernel) prop:custom-write)) . ((288580 . 2))) ((def ((quote #%kernel) syntax-e)) . ((217349 . 3))) ((def ((quote #%kernel) vector-copy!)) . ((87095 . 11))) ((def ((quote #%kernel) regexp-match-peek)) . ((64354 . 15))) ((def ((lib "racket/sandbox.rkt") get-output)) . ((326892 . 6))) ((def ((lib "racket/file.rkt") call-with-file-lock/timeout)) . ((342724 . 15))) ((def ((quote #%kernel) byte-ready?)) . ((272871 . 3))) ((def ((lib "racket/unit.rkt") unit?)) . ((140767 . 3))) ((def ((quote #%kernel) set!-transformer-procedure)) . ((222482 . 4))) ((def ((quote #%kernel) semaphore-try-wait?)) . ((186953 . 3))) ((def ((quote #%kernel) port-writes-atomic?)) . ((276018 . 3))) ((def ((quote #%kernel) caadr)) . ((79436 . 3))) ((def ((lib "racket/private/class-internal.rkt") generic?)) . ((133242 . 3))) ((form ((lib "racket/syntax.rkt") with-disappeared-uses)) . ((238031 . 4))) ((def ((quote #%kernel) regexp-max-lookbehind)) . ((58832 . 3))) ((def ((lib "racket/stream.rkt") stream-add-between)) . ((102040 . 4))) ((def ((quote #%kernel) logger?)) . ((357831 . 3))) ((def ((lib "racket/place/distributed.rkt") place%)) . ((204384 . 4))) ((def ((lib "racket/flonum.rkt") fl/)) . ((26209 . 4))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-comm-channels)) . ((210916 . 5))) ((form ((lib "racket/private/class-internal.rkt") public-final*)) . ((123256 . 2))) ((def ((quote #%kernel) call-with-immediate-continuation-mark)) . ((181925 . 7))) ((def ((lib "racket/private/base.rkt") make-exn:fail:read:eof)) . ((172982 . 4))) ((def ((quote #%kernel) /)) . ((17646 . 6))) ((def ((quote #%kernel) make-security-guard)) . ((315339 . 16))) ((def ((quote #%kernel) exn:fail:filesystem:version?)) . ((173563 . 4))) ((def ((lib "racket/udp.rkt") udp-connect!)) . ((346960 . 9))) ((def ((lib "racket/private/serialize.rkt") serialize)) . ((289045 . 3))) ((def ((lib "racket/stream.rkt") stream-count)) . ((101838 . 4))) ((form ((lib "racket/private/class-internal.rkt") class-field-mutator)) . ((126876 . 2))) ((def ((quote #%kernel) char>=?)) . ((55729 . 4))) ((def ((lib "racket/struct-info.rkt") prop:struct-info)) . ((119144 . 2))) ((def ((quote #%kernel) current-eval)) . ((296101 . 4))) ((def ((quote #%kernel) make-hasheqv-placeholder)) . ((85623 . 3))) ((def ((quote #%kernel) string-locale<?)) . ((36077 . 4))) ((def ((lib "racket/sandbox.rkt") set-eval-handler)) . ((326374 . 4))) ((def ((quote #%kernel) struct-type-make-predicate)) . ((318593 . 3))) ((def ((quote #%kernel) exn:fail:read?)) . ((172817 . 5))) ((def ((lib "racket/math.rkt") conjugate)) . ((25308 . 3))) ((form ((lib "racket/private/class-internal.rkt") init-field)) . ((122441 . 2))) ((def ((lib "racket/bool.rkt") true)) . ((15632 . 2))) ((def ((quote #%kernel) struct:exn:fail:syntax:unbound)) . ((172666 . 4))) ((form ((lib "racket/private/base.rkt") protect-out)) . ((4438 . 2))) ((def ((lib "racket/dict.rkt") dict-iter-contract)) . ((106108 . 3))) ((form ((lib "racket/private/base.rkt") only-meta-in)) . ((2771 . 2))) ((def ((lib "racket/list.rkt") shuffle)) . ((84598 . 3))) ((def ((quote #%kernel) real->single-flonum)) . ((17292 . 3))) ((form ((lib "racket/contract/private/base.rkt") current-contract-region)) . ((153015 . 2))) ((def ((lib "racket/place/distributed.rkt") named-place-typed-channel%)) . ((209630 . 3))) ((def ((lib "racket/contract/private/guts.rkt") value-contract)) . ((162878 . 3))) ((def ((lib "racket/private/base.rkt") procedure-reduce-keyword-arity)) . ((111182 . 10))) ((def ((quote #%kernel) printf)) . ((280095 . 4))) ((def ((quote #%kernel) channel-put-evt?)) . ((186602 . 3))) ((def ((lib "racket/private/base.rkt") call-with-output-file*)) . ((243408 . 11))) ((def ((quote #%kernel) write-bytes-avail)) . ((274090 . 9))) ((def ((lib "racket/date.rkt") date-display-format)) . ((361254 . 18))) ((def ((lib "racket/private/base.rkt") make-exn:fail:contract)) . ((171494 . 4))) ((def ((quote #%kernel) string-utf-8-length)) . ((51848 . 5))) ((form ((lib "racket/private/base.rkt") for/and)) . ((12183 . 2))) ((def ((quote #%kernel) read-case-sensitive)) . ((277329 . 4))) ((def ((lib "racket/private/class-internal.rkt") interface-extension?)) . ((133916 . 4))) ((def ((quote #%kernel) write-char)) . ((273202 . 4))) ((def ((lib "racket/flonum.rkt") flsqrt)) . ((27480 . 3))) ((form ((lib "racket/private/base.rkt") require)) . ((290 . 51))) ((def ((lib "racket/file.rkt") find-files)) . ((339416 . 4))) ((def ((lib "racket/list.rkt") filter-map)) . ((84111 . 4))) ((form ((lib "racket/private/class-internal.rkt") define/public-final)) . ((123714 . 3))) ((def ((lib "racket/port.rkt") peek-string!-evt)) . ((263455 . 29))) ((form ((lib "racket/private/letstx-scheme.rkt") else)) . ((9984 . 2))) ((def ((quote #%kernel) raise-syntax-error)) . ((169388 . 11))) ((form ((lib "racket/private/class-internal.rkt") define-serializable-class)) . ((132887 . 3))) ((form ((lib "racket/runtime-path.rkt") define-runtime-module-path-index)) . ((336224 . 2))) ((def ((lib "racket/private/list.rkt") assq)) . ((78913 . 4))) ((form ((lib "racket/private/base.rkt") for/vector)) . ((11740 . 8))) ((def ((lib "racket/dict.rkt") dict-update)) . ((104283 . 8))) ((def ((quote #%kernel) directory-exists?)) . ((335670 . 3))) ((form ((lib "racket/private/base.rkt") for*/lists)) . ((12855 . 2))) ((def ((quote #%kernel) struct:exn:fail:network)) . ((173726 . 4))) ((def ((quote #%kernel) date-year)) . ((359520 . 23))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fl/)) . ((369119 . 4))) ((form ((lib "racket/generator.rkt") in-generator)) . ((102382 . 5))) ((def ((lib "racket/place/distributed.rkt") printf/f)) . ((210081 . 4))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-id)) . ((211059 . 3))) ((def ((lib "racket/port.rkt") read-bytes!-evt)) . ((262628 . 5))) ((def ((quote #%kernel) get-output-bytes)) . ((245380 . 9))) ((def ((quote #%kernel) hash-remove!)) . ((93900 . 4))) ((form ((lib "racket/private/base.rkt") define)) . ((10187 . 14))) ((def ((lib "racket/future.rkt") future?)) . ((190284 . 3))) ((form ((lib "racket/set.rkt") for*/set)) . ((109053 . 2))) ((def ((quote #%kernel) string-upcase)) . ((35384 . 3))) ((form ((lib "racket/generic.rkt") define-generics)) . ((117330 . 13))) ((def ((quote #%kernel) chaperone-hash)) . ((312225 . 18))) ((def ((lib "racket/place/distributed.rkt") after-seconds%)) . ((205937 . 4))) ((def ((quote #%kernel) equal-secondary-hash-code)) . ((95392 . 3))) ((form ((lib "racket/private/base.rkt") #%plain-app)) . ((8078 . 3))) ((def ((quote #%kernel) exact?)) . ((17060 . 3))) ((def ((quote #%kernel) call/ec)) . ((177616 . 3))) ((def ((quote #%kernel) system-path-convention-type)) . ((329088 . 2))) ((form ((lib "racket/private/class-internal.rkt") overment*)) . ((123332 . 2))) ((def ((lib "racket/contract/private/box.rkt") box/c)) . ((144337 . 7))) ((def ((lib "racket/private/base.rkt") apply)) . ((109483 . 6))) ((def ((lib "racket/provide-transform.rkt") export-local-id)) . ((233334 . 8))) ((def ((lib "racket/function.rkt") curry)) . ((112893 . 6))) ((def ((lib "racket/contract/private/misc.rkt") chaperone-contract?)) . ((162533 . 3))) ((def ((quote #%kernel) make-custodian-box)) . ((317179 . 4))) ((form ((lib "racket/private/class-internal.rkt") instantiate)) . ((125289 . 2))) ((def ((lib "racket/provide-transform.rkt") export?)) . ((233334 . 8))) ((form ((lib "racket/private/letstx-scheme.rkt") let*)) . ((8871 . 2))) ((form ((lib "racket/unit.rkt") unit-from-context)) . ((139624 . 2))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flvector-ref)) . ((373540 . 4))) ((def ((lib "racket/contract/private/misc.rkt") make-none/c)) . ((163099 . 3))) ((def ((quote #%kernel) placeholder?)) . ((85080 . 3))) ((def ((lib "racket/place/distributed.rkt") restart-every)) . ((198786 . 8))) ((def ((quote #%kernel) bytes-convert)) . ((53289 . 21))) ((def ((lib "racket/set.rkt") set-subtract)) . ((107909 . 3))) ((def ((lib "racket/generator.rkt") sequence->generator)) . ((102548 . 3))) ((def ((lib "racket/list.rkt") third)) . ((81889 . 3))) ((def ((lib "racket/pretty.rkt") tentative-pretty-print-port-cancel)) . ((287405 . 3))) ((def ((quote #%kernel) namespace-module-identifier)) . ((291962 . 4))) ((form ((lib "racket/unit.rkt") rename)) . ((137136 . 2))) ((def ((lib "racket/file.rkt") file->string)) . ((336377 . 4))) ((def ((quote #%kernel) date*-time-zone-name)) . ((360475 . 5))) ((def ((quote #%kernel) current-logger)) . ((358099 . 4))) ((def ((quote #%kernel) symbol->string)) . ((57752 . 3))) ((def ((lib "racket/private/map.rkt") ormap)) . ((76850 . 4))) ((form ((quote #%kernel) #%top)) . ((7868 . 2))) ((form ((lib "racket/private/more-scheme.rkt") log-warning)) . ((358814 . 3))) ((form ((lib "racket/private/base.rkt") rename-out)) . ((4229 . 2))) ((def ((lib "racket/set.rkt") proper-subset?)) . ((108193 . 4))) ((def ((quote #%kernel) make-pipe)) . ((245779 . 6))) ((def ((lib "racket/port.rkt") with-input-from-bytes)) . ((252892 . 4))) ((def ((quote #%kernel) char-whitespace?)) . ((56842 . 3))) ((def ((lib "racket/pretty.rkt") pretty-print-columns)) . ((283687 . 5))) ((form ((quote #%kernel) unquote-splicing)) . ((14825 . 2))) ((def ((quote #%kernel) eval-jit-enabled)) . ((300113 . 4))) ((def ((lib "racket/provide-transform.rkt") export-protect?)) . ((233334 . 8))) ((def ((quote #%kernel) make-sibling-inspector)) . ((317868 . 3))) ((def ((quote #%kernel) error-escape-handler)) . ((170197 . 4))) ((def ((lib "racket/private/base.rkt") sequence->stream)) . ((98937 . 3))) ((def ((quote #%kernel) port-file-unlock)) . ((244809 . 3))) ((def ((quote #%kernel) read-on-demand-source)) . ((278955 . 4))) ((def ((lib "racket/contract/private/misc.rkt") or/c)) . ((142457 . 3))) ((def ((quote #%kernel) exn:fail?)) . ((171385 . 4))) ((form ((lib "racket/promise.rkt") delay/strict)) . ((175600 . 2))) ((form ((lib "racket/place/define-remote-server.rkt") define-rpc)) . ((210405 . 2))) ((def ((lib "racket/provide-transform.rkt") prop:provide-transformer)) . ((233080 . 2))) ((def ((lib "racket/path.rkt") simple-form-path)) . ((332984 . 3))) ((def ((lib "racket/set.rkt") list->set)) . ((109205 . 3))) ((def ((quote #%kernel) keyword->string)) . ((75368 . 3))) ((def ((lib "racket/udp.rkt") udp-send-to-evt)) . ((351535 . 14))) ((def ((lib "racket/vector.rkt") vector-take-right)) . ((88404 . 4))) ((def ((lib "racket/file.rkt") user-read-bit)) . ((343728 . 2))) ((def ((lib "racket/private/list.rkt") assv)) . ((78821 . 4))) ((def ((quote #%kernel) arithmetic-shift)) . ((21159 . 4))) ((def ((lib "racket/require-transform.rkt") import-source-mode)) . ((231125 . 7))) ((def ((quote #%kernel) bitwise-ior)) . ((20523 . 3))) ((def ((quote #%kernel) cdr)) . ((75842 . 3))) ((def ((quote #%kernel) expand-once)) . ((236213 . 3))) ((def ((quote #%kernel) print-vector-length)) . ((280915 . 4))) ((def ((lib "racket/sandbox.rkt") get-error-output)) . ((326892 . 6))) ((def ((quote #%kernel) syntax-source)) . ((216675 . 3))) ((def ((lib "racket/place/distributed.rkt") supervise-place-at)) . ((197366 . 14))) ((def ((lib "racket/udp.rkt") udp-bound?)) . ((351228 . 3))) ((def ((lib "racket/place/distributed.rkt") DEFAULT-ROUTER-PORT)) . ((209591 . 2))) ((def ((quote #%kernel) make-known-char-range-list)) . ((57114 . 5))) ((def ((lib "racket/dict.rkt") dict-map)) . ((104790 . 4))) ((def ((quote #%kernel) struct-type?)) . ((118060 . 3))) ((def ((lib "racket/format.rkt") ~.a)) . ((44446 . 23))) ((def ((lib "racket/control.rkt") abort)) . ((178924 . 3))) ((def ((quote #%kernel) module-path-index-submodule)) . ((302438 . 4))) ((def ((lib "racket/string.rkt") string-normalize-spaces)) . ((37305 . 11))) ((def ((lib "racket/port.rkt") read-bytes-line-evt)) . ((263306 . 4))) ((def ((lib "racket/sandbox.rkt") sandbox-gui-available)) . ((323018 . 4))) ((def ((lib "racket/private/class-internal.rkt") class-info)) . ((134641 . 10))) ((def ((lib "racket/private/base.rkt") srcloc)) . ((174901 . 9))) ((constructor ((lib "racket/place/distributed.rkt") named-place-typed-channel%)) . ((209699 . 4))) ((def ((lib "racket/tcp.rkt") tcp-listen)) . ((344016 . 10))) ((def ((quote #%kernel) cddddr)) . ((81510 . 3))) ((def ((lib "racket/place/distributed.rkt") event-container<%>)) . ((199481 . 2))) ((def ((quote #%kernel) exn:fail:contract:arity?)) . ((171626 . 4))) ((def ((quote #%kernel) break-enabled)) . ((182448 . 4))) ((form ((lib "racket/private/base.rkt") for/lists)) . ((12434 . 2))) ((def ((quote #%kernel) write-special)) . ((275280 . 4))) ((def ((lib "racket/fixnum.rkt") fl->fx)) . ((31045 . 3))) ((form ((lib "racket/promise.rkt") delay/thread)) . ((175666 . 5))) ((def ((quote #%kernel) date-dst?)) . ((359520 . 23))) ((def ((quote #%kernel) hash-weak?)) . ((90698 . 3))) ((def ((lib "racket/udp.rkt") udp-addresses)) . ((352760 . 7))) ((def ((quote #%kernel) variable-reference->resolved-module-path)) . ((295341 . 4))) ((def ((lib "racket/place.rkt") place-kill)) . ((192192 . 3))) ((def ((lib "racket/private/base.rkt") make-exn:break)) . ((174260 . 5))) ((form ((lib "racket/syntax.rkt") with-syntax*)) . ((238745 . 5))) ((form ((lib "racket/private/base.rkt") for*/and)) . ((13208 . 2))) ((def ((lib "racket/place/private/async-bi-channel.rkt") make-async-bi-channel)) . ((210623 . 2))) ((def ((lib "racket/private/class-internal.rkt") member-name-key=?)) . ((124930 . 4))) ((def ((lib "racket/future.rkt") fsemaphore-count)) . ((190838 . 3))) ((def ((lib "racket/fixnum.rkt") fxmodulo)) . ((29933 . 4))) ((form ((lib "racket/private/class-internal.rkt") new)) . ((125239 . 2))) ((form ((lib "racket/splicing.rkt") splicing-letrec)) . ((234697 . 2))) ((def ((quote #%kernel) peek-bytes-avail!)) . ((269333 . 14))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-bytes-ref)) . ((373245 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fxrshift)) . ((368245 . 4))) ((def ((lib "racket/file.rkt") file->list)) . ((336802 . 5))) ((form ((lib "racket/match.rkt") match)) . ((164625 . 5))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-barrier)) . ((211999 . 3))) ((def ((lib "racket/tcp.rkt") tcp-abandon-port)) . ((346030 . 3))) ((def ((lib "racket/async-channel.rkt") async-channel-try-get)) . ((188211 . 3))) ((def ((quote #%kernel) module-declared?)) . ((305101 . 5))) ((def ((quote #%kernel) write-special-evt)) . ((275901 . 4))) ((def ((quote #%kernel) current-reader-guard)) . ((278681 . 4))) ((def ((lib "racket/vector.rkt") vector-drop)) . ((88516 . 4))) ((def ((quote #%kernel) string-fill!)) . ((33945 . 4))) ((def ((quote #%kernel) use-compiled-file-paths)) . ((298420 . 4))) ((def ((lib "racket/format.rkt") ~.v)) . ((45596 . 23))) ((def ((lib "racket/flonum.rkt") flmax)) . ((26767 . 4))) ((def ((lib "racket/contract/private/misc.rkt") string-len/c)) . ((143336 . 3))) ((def ((lib "racket/dict.rkt") dict->list)) . ((105801 . 3))) ((def ((quote #%kernel) struct:exn:fail:read:eof)) . ((172982 . 4))) ((def ((lib "racket/list.rkt") ninth)) . ((82193 . 3))) ((def ((lib "racket/contract/private/prop.rkt") chaperone-contract-property?)) . ((161766 . 3))) ((def ((lib "racket/private/base.rkt") make-date)) . ((359520 . 23))) ((def ((quote #%kernel) compiled-expression?)) . ((299657 . 3))) ((def ((quote #%kernel) bytes)) . ((48058 . 3))) ((def ((lib "racket/require-transform.rkt") convert-relative-module-path)) . ((231606 . 10))) ((form ((lib "racket/private/stxcase-scheme.rkt") syntax-case)) . ((213756 . 27))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fxmodulo)) . ((367721 . 4))) ((def ((quote #%kernel) will-register)) . ((366827 . 5))) ((def ((lib "racket/contract/private/prop.rkt") prop:chaperone-contract)) . ((157889 . 2))) ((def ((lib "racket/math.rkt") exact-truncate)) . ((25720 . 3))) ((def ((quote #%kernel) thread-cell-ref)) . ((188645 . 3))) ((def ((quote #%kernel) string-foldcase)) . ((35593 . 3))) ((def ((quote #%kernel) pipe-content-length)) . ((245983 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-s16vector-ref)) . ((373946 . 4))) ((def ((quote #%kernel) read-syntax)) . ((276251 . 4))) ((def ((lib "racket/sandbox.rkt") sandbox-init-hook)) . ((320733 . 4))) ((form ((lib "racket/serialize.rkt") define-serializable-struct)) . ((289537 . 3))) ((form ((lib "racket/contract/private/ds.rkt") define-contract-struct)) . ((151333 . 2))) ((def ((quote #%kernel) global-port-print-handler)) . ((282820 . 6))) ((def ((quote #%kernel) struct-mutator-procedure?)) . ((118338 . 3))) ((def ((lib "racket/set.rkt") set-add)) . ((107648 . 4))) ((def ((quote #%kernel) date*-nanosecond)) . ((360475 . 5))) ((def ((lib "racket/private/misc.rkt") port?)) . ((239076 . 3))) ((form ((lib "racket/private/class-internal.rkt") absent)) . ((129433 . 2))) ((def ((lib "racket/private/base.rkt") in-port)) . ((96608 . 4))) ((def ((quote #%kernel) shell-execute)) . ((355039 . 11))) ((form ((lib "racket/place/define-remote-server.rkt") define-state)) . ((210372 . 2))) ((def ((lib "racket/private/class-internal.rkt") dynamic-set-field!)) . ((126663 . 5))) ((def ((quote #%kernel) custodian-limit-memory)) . ((316905 . 7))) ((def ((lib "racket/udp.rkt") udp-send/enable-break)) . ((349416 . 9))) ((form ((lib "racket/set.rkt") for/seteq)) . ((108952 . 2))) ((def ((quote #%kernel) module-compiled-imports)) . ((303894 . 5))) ((form ((lib "racket/bool.rkt") implies)) . ((15939 . 2))) ((def ((quote #%kernel) string-ref)) . ((33018 . 4))) ((def ((lib "racket/contract/private/guts.rkt") impersonator-prop:contracted)) . ((158044 . 2))) ((def ((lib "racket/fixnum.rkt") fxquotient)) . ((29776 . 4))) ((def ((lib "racket/private/base.rkt") in-string)) . ((96136 . 6))) ((form ((lib "racket/private/base.rkt") for*/sum)) . ((13333 . 2))) ((def ((lib "racket/place.rkt") dynamic-place*)) . ((191223 . 14))) ((form ((lib "racket/private/class-internal.rkt") super)) . ((124528 . 3))) ((def ((quote #%kernel) read-accept-infix-dot)) . ((278271 . 4))) ((def ((quote #%kernel) make-immutable-hash)) . ((91795 . 4))) ((def ((quote #%kernel) bytes=?)) . ((49738 . 4))) ((def ((lib "racket/require-transform.rkt") import?)) . ((230218 . 19))) ((def ((quote #%kernel) write-bytes)) . ((273810 . 7))) ((def ((lib "racket/contract/private/misc.rkt") one-of/c)) . ((143495 . 3))) ((def ((lib "racket/list.rkt") filter-not)) . ((84499 . 4))) ((def ((quote #%kernel) syntax->datum)) . ((217477 . 3))) ((def ((quote #%kernel) hash-iterate-next)) . ((94769 . 5))) ((def ((lib "racket/contract/private/guts.rkt") coerce-contracts)) . ((155605 . 4))) ((def ((lib "racket/contract/private/guts.rkt") coerce-chaperone-contract)) . ((155713 . 4))) ((constructor ((lib "racket/place/distributed.rkt") remote-node%)) . ((202100 . 7))) ((def ((lib "racket/stream.rkt") stream->list)) . ((100950 . 3))) ((form ((lib "racket/private/base.rkt") for/fold/derived)) . ((13689 . 4))) ((def ((lib "racket/provide-transform.rkt") export-out-sym)) . ((233334 . 8))) ((def ((quote #%kernel) rename-transformer?)) . ((222659 . 3))) ((constructor ((lib "racket/place/distributed.rkt") connection%)) . ((205191 . 10))) ((def ((quote #%kernel) semaphore-wait/enable-break)) . ((187029 . 3))) ((def ((lib "racket/math.rkt") sinh)) . ((25364 . 3))) ((def ((quote #%kernel) caaar)) . ((79354 . 3))) ((form ((lib "racket/private/class-internal.rkt") augment-final*)) . ((123480 . 2))) ((def ((lib "racket/set.rkt") subset?)) . ((108117 . 4))) ((def ((lib "racket/private/base.rkt") regexp-try-match)) . ((60778 . 17))) ((def ((quote #%kernel) current-command-line-arguments)) . ((363325 . 5))) ((def ((lib "racket/private/list.rkt") foldr)) . ((77140 . 5))) ((def ((lib "racket/syntax.rkt") record-disappeared-uses)) . ((238227 . 3))) ((def ((quote #%kernel) logger-name)) . ((358019 . 3))) ((form ((lib "racket/private/class-internal.rkt") case->m)) . ((129565 . 2))) ((def ((lib "racket/flonum.rkt") flreal-part)) . ((27859 . 3))) ((def ((quote #%kernel) file-or-directory-permissions)) . ((334655 . 11))) ((def ((lib "racket/fixnum.rkt") in-fxvector)) . ((31849 . 6))) ((def ((quote #%kernel) struct:arity-at-least)) . ((111595 . 4))) ((def ((quote #%kernel) syntax-local-lift-values-expression)) . ((227020 . 5))) ((def ((quote #%kernel) *)) . ((17593 . 3))) ((def ((lib "racket/sandbox.rkt") sandbox-output)) . ((321360 . 14))) ((def ((quote #%kernel) current-security-guard)) . ((316007 . 4))) ((def ((lib "racket/place/distributed.rkt") spawn-nodes/join)) . ((207574 . 3))) ((def ((lib "racket/dict.rkt") dict-value-contract)) . ((106042 . 3))) ((def ((quote #%kernel) struct:exn:fail:filesystem:exists)) . ((173402 . 4))) ((def ((quote #%kernel) exn:break:hang-up?)) . ((174418 . 4))) ((def ((lib "racket/private/list.rkt") compose1)) . ((109700 . 3))) ((def ((quote #%kernel) char-ci=?)) . ((55823 . 4))) ((def ((lib "racket/file.rkt") write-to-file)) . ((338195 . 11))) ((form ((lib "racket/private/class-internal.rkt") override-final)) . ((122778 . 2))) ((def ((quote #%kernel) current-compile)) . ((299310 . 5))) ((def ((quote #%kernel) string-locale-ci<?)) . ((36386 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-set-box!)) . ((371809 . 4))) ((def ((quote #%kernel) path?)) . ((328079 . 3))) ((meth (((lib "racket/place/distributed.rkt") remote-connection%) set-on-channel!)) . ((204268 . 3))) ((def ((quote #%kernel) exn:fail:read:eof?)) . ((172982 . 4))) ((def ((lib "racket/private/base.rkt") in-mlist)) . ((95838 . 3))) ((form ((lib "racket/stream.rkt") stream-cons)) . ((100790 . 2))) ((def ((quote #%kernel) file-stream-buffer-mode)) . ((240035 . 6))) ((form ((lib "racket/contract/base.rkt") ->d)) . ((149397 . 34))) ((form ((lib "racket/unit.rkt") unit)) . ((135353 . 22))) ((def ((lib "racket/private/misc.rkt") find-library-collection-paths)) . ((374844 . 5))) ((def ((lib "racket/vector.rkt") vector-copy)) . ((88978 . 5))) ((form ((lib "racket/private/base.rkt") relative-in)) . ((2718 . 2))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fl>=)) . ((369573 . 4))) ((def ((lib "racket/stream.rkt") stream-tail)) . ((101179 . 4))) ((def ((lib "racket/file.rkt") group-execute-bit)) . ((343885 . 2))) ((form ((lib "racket/contract/region.rkt") define/contract)) . ((152524 . 3))) ((def ((lib "racket/private/base.rkt") make-exn:fail:unsupported)) . ((173998 . 4))) ((def ((quote #%kernel) current-readtable)) . ((278814 . 4))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-send)) . ((211221 . 5))) ((form ((lib "racket/private/base.rkt") lib)) . ((3016 . 2))) ((def ((lib "racket/path.rkt") explode-path)) . ((331864 . 4))) ((def ((quote #%kernel) hash-eq?)) . ((90638 . 3))) ((def ((lib "racket/place.rkt") place-wait)) . ((192072 . 3))) ((def ((lib "racket/place/distributed.rkt") start-message-router/thread)) . ((209242 . 6))) ((def ((quote #%kernel) eprintf)) . ((280176 . 4))) ((def ((lib "racket/contract/private/blame.rkt") exn:fail:contract:blame?)) . ((157519 . 4))) ((def ((quote #%kernel) set-box!)) . ((90203 . 4))) ((def ((lib "racket/promise.rkt") force)) . ((175369 . 3))) ((def ((quote #%kernel) write-bytes-avail*)) . ((274476 . 10))) ((def ((quote #%kernel) thread-receive-evt)) . ((184622 . 2))) ((form ((lib "racket/splicing.rkt") splicing-syntax-parameterize)) . ((234956 . 2))) ((def ((lib "racket/dict.rkt") dict-mutable?)) . ((102748 . 3))) ((def ((lib "racket/path.rkt") filename-extension)) . ((332144 . 3))) ((def ((quote #%kernel) getenv)) . ((362760 . 3))) ((def ((lib "racket/set.rkt") set-eq?)) . ((108637 . 3))) ((def ((lib "racket/vector.rkt") vector-drop-right)) . ((88622 . 4))) ((def ((quote #%kernel) read-square-bracket-as-paren)) . ((277431 . 4))) ((def ((lib "racket/dict.rkt") prop:dict)) . ((105885 . 2))) ((form ((lib "racket/promise.rkt") delay/idle)) . ((175775 . 8))) ((def ((quote #%kernel) syntax-rearm)) . ((235867 . 5))) ((def ((lib "racket/sandbox.rkt") call-in-sandbox-context)) . ((327397 . 7))) ((def ((lib "racket/sandbox.rkt") sandbox-network-guard)) . ((324029 . 13))) ((meth (((lib "racket/place/distributed.rkt") remote-node%) send-exit)) . ((203164 . 2))) ((form ((lib "racket/private/base.rkt") for*/hasheqv)) . ((13141 . 2))) ((def ((quote #%kernel) random-seed)) . ((21706 . 3))) ((form ((quote #%kernel) let*-values)) . ((9033 . 2))) ((def ((quote #%kernel) raise-argument-error)) . ((166767 . 13))) ((form ((lib "racket/contract/private/guts.rkt") define/subexpression-pos-prop)) . ((162045 . 6))) ((def ((quote #%kernel) exn:fail:contract:variable?)) . ((172321 . 5))) ((def ((quote #%kernel) syntax-local-make-delta-introducer)) . ((229027 . 4))) ((def ((lib "racket/format.rkt") ~v)) . ((39806 . 23))) ((def ((lib "racket/sandbox.rkt") kill-evaluator)) . ((325904 . 3))) ((def ((quote #%kernel) port-file-identity)) . ((244886 . 3))) ((def ((quote #%kernel) exn:fail:out-of-memory?)) . ((173856 . 4))) ((def ((lib "racket/udp.rkt") udp-receive!*)) . ((350233 . 12))) ((def ((lib "racket/pretty.rkt") pretty-print-exact-as-decimal)) . ((284034 . 4))) ((def ((lib "racket/dict.rkt") dict-set*)) . ((103356 . 5))) ((def ((lib "racket/require-transform.rkt") struct:import-source)) . ((231125 . 7))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-comm-cnt)) . ((210916 . 5))) ((def ((lib "racket/private/serialize.rkt") serializable?)) . ((288986 . 3))) ((def ((quote #%kernel) prop:equal+hash)) . ((15584 . 2))) ((def ((quote #%kernel) get-output-string)) . ((245706 . 3))) ((def ((quote #%kernel) hash-ref)) . ((92743 . 7))) ((def ((quote #%kernel) abort-current-continuation)) . ((176417 . 5))) ((def ((lib "racket/private/misc.rkt") channel-get)) . ((186313 . 3))) ((def ((quote #%kernel) namespace-undefine-variable!)) . ((292836 . 5))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flreal-part)) . ((370808 . 3))) ((def ((lib "racket/private/misc.rkt") path-list-string->path-list)) . ((333346 . 6))) ((def ((lib "racket/syntax.rkt") internal-definition-context-apply)) . ((238405 . 5))) ((form ((lib "racket/private/class-internal.rkt") pubment*)) . ((123221 . 2))) ((def ((quote #%kernel) string-normalize-nfkd)) . ((35742 . 3))) ((form ((lib "racket/control.rkt") shift0)) . ((179595 . 2))) ((def ((lib "racket/fixnum.rkt") fxvector-length)) . ((31331 . 3))) ((def ((lib "racket/private/base.rkt") make-exn:fail)) . ((171385 . 4))) ((def ((quote #%kernel) sin)) . ((19743 . 3))) ((def ((lib "racket/private/list.rkt") build-vector)) . ((87729 . 4))) ((def ((lib "racket/place/private/async-bi-channel.rkt") async-bi-channel?)) . ((210680 . 3))) ((def ((quote #%kernel) dump-memory-stats)) . ((367253 . 3))) ((def ((quote #%kernel) call/cc)) . ((177061 . 5))) ((def ((quote #%kernel) vector->values)) . ((87527 . 5))) ((def ((quote #%kernel) namespace-require/constant)) . ((293367 . 3))) ((def ((lib "racket/set.rkt") set-map)) . ((108276 . 4))) ((def ((quote #%kernel) custodian-box?)) . ((317279 . 3))) ((def ((quote #%kernel) dynamic-require-for-syntax)) . ((304819 . 7))) ((def ((lib "racket/list.rkt") remove-duplicates)) . ((83809 . 7))) ((def ((lib "racket/vector.rkt") vector-split-at-right)) . ((88853 . 4))) ((def ((lib "racket/require-transform.rkt") struct:import)) . ((230218 . 19))) ((def ((quote #%kernel) current-custodian)) . ((316367 . 4))) ((def ((lib "racket/vector.rkt") vector-argmin)) . ((89473 . 4))) ((def ((quote #%kernel) variable-reference->module-base-phase)) . ((295867 . 3))) ((def ((quote #%kernel) bytes-converter?)) . ((54665 . 3))) ((def ((lib "racket/port.rkt") read-string-evt)) . ((262937 . 4))) ((def ((quote #%kernel) make-impersonator-property)) . ((314840 . 5))) ((def ((lib "racket/udp.rkt") udp-bind!)) . ((346666 . 8))) ((def ((lib "racket/list.rkt") empty?)) . ((81683 . 3))) ((def ((lib "racket/set.rkt") set-union)) . ((107789 . 3))) ((def ((quote #%kernel) syntax-local-phase-level)) . ((227724 . 2))) ((def ((lib "racket/vector.rkt") vector-map)) . ((88034 . 4))) ((def ((lib "racket/control.rkt") call/prompt)) . ((178386 . 7))) ((def ((quote #%kernel) log-receiver?)) . ((359032 . 3))) ((def ((lib "racket/flonum.rkt") make-flvector)) . ((28164 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fxremainder)) . ((367635 . 4))) ((def ((lib "racket/system.rkt") system*)) . ((355464 . 8))) ((def ((lib "racket/private/base.rkt") exn:fail:contract:non-fixnum-result)) . ((171959 . 5))) ((def ((quote #%kernel) exn:fail:contract:continuation?)) . ((172145 . 5))) ((def ((lib "racket/stream.rkt") stream-append)) . ((101277 . 3))) ((form ((lib "racket/private/base.rkt") for*/fold/derived)) . ((13808 . 4))) ((def ((lib "racket/udp.rkt") udp-send)) . ((347825 . 6))) ((def ((lib "racket/port.rkt") copy-port)) . ((265070 . 4))) ((def ((lib "racket/sandbox.rkt") sandbox-path-permissions)) . ((323487 . 9))) ((def ((quote #%kernel) bound-identifier=?)) . ((219363 . 6))) ((def ((lib "racket/stream.rkt") stream-ref)) . ((101086 . 4))) ((def ((quote #%kernel) load)) . ((297058 . 3))) ((def ((quote #%kernel) char-symbolic?)) . ((56642 . 3))) ((def ((lib "racket/private/base.rkt") hash-values)) . ((94323 . 3))) ((def ((lib "racket/contract/private/misc.rkt") natural-number/c)) . ((143294 . 2))) ((form ((quote #%kernel) define-syntaxes)) . ((10595 . 2))) ((def ((lib "racket/require-transform.rkt") import-req-mode)) . ((230218 . 19))) ((def ((lib "racket/struct-info.rkt") struct:struct-info)) . ((119102 . 2))) ((def ((lib "racket/contract/base.rkt") the-unsupplied-arg)) . ((150887 . 2))) ((form ((lib "racket/private/base.rkt") for/fold)) . ((12636 . 3))) ((form ((lib "racket/splicing.rkt") splicing-local)) . ((234934 . 2))) ((def ((lib "racket/struct-info.rkt") extract-struct-info)) . ((119010 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-car)) . ((371130 . 3))) ((def ((quote #%kernel) char-titlecase)) . ((57436 . 3))) ((def ((lib "racket/private/more-scheme.rkt") call-with-parameterization)) . ((189827 . 5))) ((def ((lib "racket/fixnum.rkt") fxvector-set!)) . ((31527 . 5))) ((def ((quote #%kernel) string->keyword)) . ((75443 . 3))) ((def ((quote #%kernel) srcloc-position)) . ((174901 . 9))) ((def ((lib "racket/private/more-scheme.rkt") hash-update!)) . ((93163 . 11))) ((def ((quote #%kernel) bytes-close-converter)) . ((53199 . 3))) ((def ((lib "racket/private/misc.rkt") find-executable-path)) . ((333559 . 7))) ((form ((lib "racket/private/letstx-scheme.rkt") unless)) . ((11123 . 2))) ((def ((lib "racket/file.rkt") other-execute-bit)) . ((343982 . 2))) ((def ((lib "racket/sandbox.rkt") exn:fail:sandbox-terminated-reason)) . ((320470 . 5))) ((def ((quote #%kernel) bitwise-bit-set?)) . ((20826 . 4))) ((def ((quote #%kernel) bitwise-xor)) . ((20677 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flexpt)) . ((370597 . 4))) ((def ((quote #%kernel) cons)) . ((75730 . 4))) ((def ((quote #%kernel) expand-syntax-once)) . ((236295 . 3))) ((def ((quote #%kernel) print-hash-table)) . ((281017 . 4))) ((def ((quote #%kernel) syntax-column)) . ((216825 . 3))) ((def ((lib "racket/list.rkt") sixth)) . ((82040 . 3))) ((def ((lib "racket/private/class-internal.rkt") interface->method-names)) . ((134134 . 3))) ((def ((quote #%kernel) cadadr)) . ((80510 . 3))) ((def ((lib "racket/contract/private/misc.rkt") any/c)) . ((142394 . 2))) ((def ((quote #%kernel) poll-guard-evt)) . ((185685 . 3))) ((def ((quote #%kernel) thread-dead?)) . ((184035 . 3))) ((def ((lib "racket/private/base.rkt") make-do-sequence)) . ((98446 . 8))) ((def ((quote #%kernel) module-path-index-join)) . ((302560 . 5))) ((def ((quote #%kernel) make-continuation-mark-key)) . ((180913 . 4))) ((def ((lib "racket/stream.rkt") stream-andmap)) . ((101423 . 4))) ((def ((lib "racket/bool.rkt") symbol=?)) . ((15681 . 4))) ((def ((lib "racket/promise.rkt") promise-forced?)) . ((175415 . 3))) ((def ((quote #%kernel) internal-definition-context?)) . ((225347 . 3))) ((form ((lib "racket/contract/base.rkt") case->)) . ((150620 . 9))) ((def ((lib "racket/file.rkt") make-temporary-file)) . ((340251 . 7))) ((form ((lib "racket/private/base.rkt") :do-in)) . ((14191 . 9))) ((def ((quote #%kernel) cdaddr)) . ((81110 . 3))) ((def ((quote #%kernel) struct:exn:fail:contract:arity)) . ((171626 . 4))) ((def ((lib "racket/sandbox.rkt") sandbox-memory-limit)) . ((324576 . 4))) ((def ((quote #%kernel) expand-to-top-form)) . ((236364 . 3))) ((def ((lib "racket/private/more-scheme.rkt") call-with-break-parameterization)) . ((182664 . 5))) ((def ((quote #%kernel) write-special-avail*)) . ((275397 . 4))) ((def ((lib "racket/private/class-internal.rkt") generate-member-key)) . ((124814 . 2))) ((def ((quote #%kernel) date-week-day)) . ((359520 . 23))) ((form ((lib "racket/private/class-internal.rkt") send/apply)) . ((125653 . 2))) ((form ((lib "racket/unit.rkt") define-unit/new-import-export)) . ((139904 . 6))) ((def ((quote #%kernel) struct:exn:fail:user)) . ((174136 . 4))) ((def ((quote #%kernel) variable-reference->module-path-index)) . ((295477 . 4))) ((def ((lib "racket/private/base.rkt") procedure-reduce-arity)) . ((110674 . 4))) ((form ((lib "racket/private/base.rkt") for-meta)) . ((4644 . 2))) ((def ((quote #%kernel) print-pair-curly-braces)) . ((280341 . 4))) ((def ((quote #%kernel) parameter?)) . ((189615 . 3))) ((def ((quote #%kernel) bytes->string/utf-8)) . ((50026 . 6))) ((def ((quote #%kernel) delete-file)) . ((333977 . 3))) ((def ((quote #%kernel) peek-bytes-avail!*)) . ((269959 . 14))) ((def ((quote #%kernel) wrap-evt)) . ((185265 . 4))) ((def ((lib "racket/math.rkt") exact-floor)) . ((25584 . 3))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-reduce)) . ((211843 . 6))) ((def ((lib "racket/system.rkt") system*/exit-code)) . ((355825 . 8))) ((def ((quote #%kernel) subprocess?)) . ((354692 . 3))) ((def ((quote #%kernel) module->language-info)) . ((305280 . 6))) ((def ((quote #%kernel) port-read-handler)) . ((279110 . 10))) ((def ((quote #%kernel) current-input-port)) . ((239392 . 4))) ((def ((quote #%kernel) string-copy)) . ((33451 . 3))) ((def ((lib "racket/fixnum.rkt") make-shared-fxvector)) . ((32487 . 4))) ((def ((quote #%kernel) current-compiled-file-roots)) . ((298558 . 4))) ((def ((lib "racket/port.rkt") read-line-evt)) . ((263163 . 4))) ((form ((lib "racket/syntax.rkt") define/with-syntax)) . ((237491 . 4))) ((def ((quote #%kernel) input-port?)) . ((238961 . 3))) ((def ((lib "racket/list.rkt") rest)) . ((81787 . 3))) ((def ((lib "racket/port.rkt") read-bytes-evt)) . ((262524 . 4))) ((def ((lib "racket/flonum.rkt") fltan)) . ((27165 . 3))) ((def ((quote #%kernel) min)) . ((18296 . 3))) ((def ((quote #%kernel) exn:fail:read:non-char?)) . ((173119 . 4))) ((def ((lib "racket/private/list.rkt") memq)) . ((78403 . 4))) ((def ((lib "racket/class.rkt") is-a?/c)) . ((132424 . 3))) ((def ((quote #%kernel) system-language+country)) . ((363057 . 2))) ((def ((lib "racket/flonum.rkt") flvector?)) . ((28047 . 3))) ((form ((lib "racket/private/class-internal.rkt") define-member-name)) . ((124735 . 2))) ((def ((quote #%kernel) symbol?)) . ((57561 . 3))) ((def ((quote #%kernel) make-struct-type-property)) . ((116652 . 13))) ((def ((quote #%kernel) thread-cell-set!)) . ((188714 . 4))) ((def ((lib "racket/dict.rkt") dict-iterate-first)) . ((105095 . 3))) ((def ((quote #%kernel) display)) . ((279583 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flvector-set!)) . ((373627 . 5))) ((def ((quote #%kernel) read/recursive)) . ((276424 . 6))) ((def ((lib "racket/fixnum.rkt") fxxor)) . ((30207 . 4))) ((form ((lib "racket/private/class-internal.rkt") super-instantiate)) . ((125392 . 2))) ((def ((lib "racket/pretty.rkt") pretty-print-show-inexactness)) . ((284304 . 4))) ((def ((quote #%kernel) floating-point-bytes->real)) . ((24060 . 9))) ((def ((quote #%kernel) struct-constructor-procedure?)) . ((118118 . 3))) ((def ((quote #%kernel) struct:date*)) . ((360475 . 5))) ((def ((lib "racket/sandbox.rkt") sandbox-reader)) . ((320840 . 4))) ((def ((lib "racket/sandbox.rkt") break-evaluator)) . ((325992 . 3))) ((def ((lib "racket/private/misc.rkt") path-replace-suffix)) . ((331343 . 4))) ((def ((lib "racket/async-channel.rkt") async-channel-put)) . ((188288 . 4))) ((def ((lib "racket/port.rkt") special-filter-input-port)) . ((262016 . 8))) ((def ((quote #%kernel) thread-resume)) . ((183591 . 4))) ((def ((lib "racket/file.rkt") pathlist-closure)) . ((339577 . 3))) ((form ((lib "racket/control.rkt") set)) . ((180098 . 2))) ((def ((quote #%kernel) object-name)) . ((318680 . 3))) ((def ((lib "racket/pretty.rkt") pretty-print-abbreviate-read-macros)) . ((284430 . 4))) ((form ((lib "racket/stxparam.rkt") define-syntax-parameter)) . ((234408 . 2))) ((def ((lib "racket/trace.rkt") current-trace-print-results)) . ((377372 . 10))) ((def ((quote #%kernel) make-string)) . ((32663 . 4))) ((def ((quote #%kernel) custom-print-quotable?)) . ((288868 . 2))) ((def ((lib "racket/contract/private/blame.rkt") blame-swap)) . ((156933 . 3))) ((def ((quote #%kernel) subprocess-wait)) . ((354256 . 3))) ((def ((quote #%kernel) equal-hash-code)) . ((95332 . 3))) ((form ((lib "racket/match.rkt") ==)) . ((165961 . 3))) ((def ((quote #%kernel) make-weak-hasheqv)) . ((91551 . 3))) ((def ((lib "racket/private/base.rkt") exn:fail)) . ((171385 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fx<)) . ((368407 . 4))) ((form ((lib "racket/private/base.rkt") for/sum)) . ((12306 . 2))) ((def ((lib "racket/file.rkt") copy-directory/files)) . ((339232 . 4))) ((def ((quote #%kernel) append)) . ((76498 . 6))) ((def ((lib "racket/udp.rkt") udp?)) . ((351178 . 3))) ((def ((quote #%kernel) custom-write?)) . ((288630 . 3))) ((def ((lib "racket/flonum.rkt") flasin)) . ((27217 . 3))) ((form ((lib "racket/require.rkt") matching-identifiers-in)) . ((7343 . 2))) ((def ((quote #%kernel) hash-map)) . ((94139 . 4))) ((def ((quote #%kernel) regexp-match-peek-positions/end)) . ((70358 . 22))) ((def ((lib "racket/place/distributed.rkt") node-get-first-place)) . ((203293 . 4))) ((meth (((lib "racket/place/distributed.rkt") event-container<%>) register)) . ((199525 . 3))) ((form ((lib "racket/place/define-remote-server.rkt") define-cast)) . ((210453 . 2))) ((form ((lib "racket/private/stxcase-scheme.rkt") _)) . ((216486 . 2))) ((form ((lib "racket/private/class-internal.rkt") override-final*)) . ((123368 . 2))) ((def ((quote #%kernel) sync/timeout/enable-break)) . ((185047 . 4))) ((def ((lib "racket/place/private/async-bi-channel.rkt") async-bi-channel-get)) . ((210743 . 3))) ((def ((lib "racket/fixnum.rkt") fxmax)) . ((30919 . 4))) ((def ((lib "racket/contract/private/misc.rkt") flat-named-contract)) . ((142083 . 7))) ((def ((quote #%kernel) semaphore-peek-evt)) . ((187110 . 3))) ((def ((lib "racket/flonum.rkt") flvector)) . ((28102 . 3))) ((def ((lib "racket/path.rkt") string->some-system-path)) . ((333147 . 4))) ((def ((lib "racket/private/base.rkt") make-exn:fail:contract:divide-by-zero)) . ((171779 . 5))) ((form ((lib "racket/private/class-internal.rkt") interface*)) . ((119566 . 7))) ((form ((lib "racket/match.rkt") match/values)) . ((164873 . 2))) ((form ((lib "racket/private/base.rkt") for*/hash)) . ((13011 . 2))) ((def ((lib "racket/contract/private/misc.rkt") between/c)) . ((143037 . 4))) ((def ((quote #%kernel) log-message)) . ((358225 . 6))) ((def ((lib "racket/fixnum.rkt") fxvector-copy)) . ((31658 . 5))) ((def ((quote #%kernel) file-or-directory-identity)) . ((335041 . 5))) ((def ((quote #%kernel) continuation-mark-set?)) . ((182276 . 3))) ((def ((quote #%kernel) syntax-local-lift-context)) . ((227161 . 2))) ((def ((quote #%kernel) -)) . ((17480 . 6))) ((form ((lib "racket/private/class-internal.rkt") public-final)) . ((122660 . 2))) ((def ((lib "racket/require-transform.rkt") import-source?)) . ((231125 . 7))) ((def ((lib "racket/fixnum.rkt") fxlshift)) . ((30332 . 4))) ((form ((lib "racket/private/base.rkt") struct-field-index)) . ((114299 . 2))) ((def ((quote #%kernel) current-module-name-resolver)) . ((301125 . 19))) ((def ((quote #%kernel) char-ci>?)) . ((56112 . 4))) ((def ((lib "racket/require-transform.rkt") syntax-local-require-certifier)) . ((232054 . 4))) ((def ((lib "racket/contract/private/guts.rkt") contract-first-order-passes?)) . ((162284 . 4))) ((def ((quote #%kernel) string-ci<?)) . ((34990 . 4))) ((def ((quote #%kernel) compile-enforce-module-constants)) . ((299723 . 4))) ((form ((lib "racket/set.rkt") for/set)) . ((108904 . 2))) ((def ((lib "racket/engine.rkt") engine-run)) . ((213516 . 4))) ((def ((quote #%kernel) error)) . ((166304 . 10))) ((def ((lib "racket/system.rkt") process*)) . ((356379 . 8))) ((def ((quote #%kernel) vector)) . ((86244 . 3))) ((def ((lib "racket/private/list.rkt") remv)) . ((77521 . 4))) ((form ((lib "racket/private/stxcase-scheme.rkt") syntax)) . ((215235 . 21))) ((form ((lib "racket/private/base.rkt") define-syntax)) . ((10520 . 3))) ((def ((lib "racket/dict.rkt") dict-can-functional-set?)) . ((102874 . 3))) ((def ((quote #%kernel) cdddr)) . ((79928 . 3))) ((def ((lib "racket/contract/private/guts.rkt") coerce-chaperone-contracts)) . ((155818 . 5))) ((form ((lib "racket/control.rkt") prompt0-at)) . ((179627 . 2))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flround)) . ((369813 . 3))) ((def ((lib "racket/private/class-internal.rkt") exn:fail:object?)) . ((134912 . 3))) ((def ((lib "racket/flonum.rkt") flatan)) . ((27323 . 3))) ((def ((lib "racket/private/class-internal.rkt") object-interface)) . ((133559 . 3))) ((def ((lib "racket/private/map.rkt") map)) . ((76677 . 4))) ((def ((quote #%kernel) current-load)) . ((296479 . 15))) ((form ((lib "racket/private/letstx-scheme.rkt") when)) . ((11086 . 2))) ((def ((quote #%kernel) ephemeron-value)) . ((366543 . 4))) ((def ((lib "racket/port.rkt") peeking-input-port)) . ((256531 . 9))) ((form ((lib "racket/private/class-internal.rkt") define/augment)) . ((124062 . 3))) ((def ((quote #%kernel) load-on-demand-enabled)) . ((300209 . 4))) ((def ((quote #%kernel) box-cas!)) . ((90306 . 5))) ((form ((lib "racket/private/class-internal.rkt") class*)) . ((119777 . 57))) ((def ((quote #%kernel) thread-rewind-receive)) . ((184663 . 3))) ((def ((lib "racket/private/misc.rkt") load/use-compiled)) . ((298135 . 3))) ((def ((lib "racket/contract/private/blame.rkt") exn:fail:contract:blame)) . ((157519 . 4))) ((def ((quote #%kernel) version)) . ((363218 . 2))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flsqrt)) . ((370537 . 3))) ((def ((lib "racket/contract/private/prop.rkt") make-flat-contract)) . ((154731 . 17))) ((def ((lib "racket/pretty.rkt") pretty-print-extend-style-table)) . ((284824 . 8))) ((def ((quote #%kernel) module->namespace)) . ((294587 . 3))) ((def ((lib "racket/engine.rkt") engine-kill)) . ((213690 . 3))) ((def ((quote #%kernel) syntax-taint)) . ((236009 . 3))) ((def ((lib "racket/system.rkt") string-no-nuls?)) . ((357710 . 3))) ((def ((lib "racket/port.rkt") make-pipe-with-specials)) . ((255919 . 7))) ((def ((quote #%kernel) pseudo-random-generator->vector)) . ((22107 . 4))) ((def ((quote #%kernel) make-pseudo-random-generator)) . ((21793 . 2))) ((form ((quote #%kernel) case-lambda)) . ((8597 . 6))) ((def ((lib "racket/list.rkt") last-pair)) . ((82342 . 3))) ((def ((lib "racket/math.rkt") nan?)) . ((25891 . 3))) ((form ((lib "racket/private/stxcase-scheme.rkt") syntax-case*)) . ((215087 . 3))) ((form ((lib "racket/flonum.rkt") for/flvector)) . ((29040 . 2))) ((def ((quote #%kernel) custodian-require-memory)) . ((316647 . 7))) ((def ((quote #%kernel) current-locale)) . ((238838 . 4))) ((def ((quote #%kernel) bytes-length)) . ((48257 . 3))) ((def ((quote #%kernel) syntax-local-module-defined-identifiers)) . ((229211 . 3))) ((def ((quote #%kernel) make-directory)) . ((335746 . 3))) ((def ((quote #%kernel) write)) . ((279469 . 4))) ((def ((lib "racket/udp.rkt") udp-send*)) . ((348584 . 6))) ((def ((quote #%kernel) procedure-arity?)) . ((110450 . 3))) ((def ((quote #%kernel) date-hour)) . ((359520 . 23))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-string-set!)) . ((373035 . 5))) ((def ((quote #%kernel) syntax-local-lift-module-end-declaration)) . ((227210 . 3))) ((def ((quote #%kernel) regexp-match-positions)) . ((61556 . 19))) ((def ((lib "racket/sequence.rkt") sequence-for-each)) . ((99973 . 4))) ((form ((lib "racket/block.rkt") block)) . ((14913 . 2))) ((form ((lib "racket/trait.rkt") trait-exclude)) . ((128278 . 2))) ((def ((lib "racket/port.rkt") with-output-to-string)) . ((252414 . 3))) ((def ((quote #%kernel) prop:impersonator-of)) . ((310199 . 2))) ((def ((quote #%kernel) atan)) . ((19995 . 6))) ((def ((quote #%kernel) exit)) . ((182855 . 3))) ((def ((quote #%kernel) read-bytes-avail!*)) . ((267053 . 10))) ((constructor ((lib "racket/place/distributed.rkt") spawned-process%)) . ((199796 . 7))) ((form ((lib "racket/private/base.rkt") lambda)) . ((8139 . 2))) ((form ((lib "racket/promise.rkt") lazy)) . ((175343 . 2))) ((def ((quote #%kernel) string-titlecase)) . ((35520 . 3))) ((def ((quote #%kernel) read-bytes)) . ((265969 . 4))) ((def ((quote #%kernel) exp)) . ((19643 . 3))) ((def ((lib "racket/private/base.rkt") make-arity-at-least)) . ((111595 . 4))) ((def ((quote #%kernel) call-with-escape-continuation)) . ((177517 . 3))) ((def ((quote #%kernel) char?)) . ((54969 . 3))) ((def ((lib "racket/private/base.rkt") regexp-split)) . ((72672 . 15))) ((def ((quote #%kernel) namespace-require/expansion-time)) . ((293480 . 4))) ((form ((lib "racket/private/base.rkt") for*/hasheq)) . ((13075 . 2))) ((form ((lib "racket/include.rkt") include/reader)) . ((236706 . 2))) ((def ((lib "racket/system.rkt") process/ports)) . ((356631 . 6))) ((def ((quote #%kernel) custodian-box-value)) . ((317339 . 3))) ((def ((lib "racket/contract/private/misc.rkt") >/c)) . ((142870 . 3))) ((def ((lib "racket/private/base.rkt") make-date*)) . ((360475 . 5))) ((def ((lib "racket/stream.rkt") in-stream)) . ((100861 . 3))) ((def ((lib "racket/dict.rkt") dict-iterate-key)) . ((105251 . 4))) ((def ((lib "racket/contract/private/prop.rkt") contract-property?)) . ((161702 . 3))) ((def ((lib "racket/provide-transform.rkt") struct:export)) . ((233334 . 8))) ((form ((lib "racket/surrogate.rkt") surrogate)) . ((135016 . 10))) ((def ((quote #%kernel) impersonator-property?)) . ((315055 . 3))) ((def ((lib "racket/require-transform.rkt") import-src-mod-path)) . ((230218 . 19))) ((def ((lib "racket/private/base.rkt") exn:break:terminate)) . ((174551 . 4))) ((def ((lib "racket/provide-transform.rkt") make-export)) . ((233334 . 8))) ((def ((lib "racket/place/distributed.rkt") write-flush)) . ((209996 . 4))) ((def ((lib "racket/private/list.rkt") reverse)) . ((76623 . 3))) ((def ((lib "racket/trace.rkt") trace-call)) . ((376667 . 5))) ((form ((lib "racket/match.rkt") match-define-values)) . ((165352 . 2))) ((def ((quote #%kernel) caadar)) . ((80210 . 3))) ((def ((quote #%kernel) string->symbol)) . ((57817 . 3))) ((def ((quote #%kernel) bytes->path)) . ((328316 . 4))) ((def ((quote #%kernel) make-syntax-delta-introducer)) . ((228683 . 9))) ((def ((quote #%kernel) syntax-local-value)) . ((226279 . 8))) ((def ((quote #%kernel) byte-regexp)) . ((58466 . 3))) ((def ((lib "racket/private/more-scheme.rkt") call-with-exception-handler)) . ((169799 . 4))) ((def ((lib "racket/private/base.rkt") call-with-output-file)) . ((242607 . 11))) ((form ((lib "racket/private/more-scheme.rkt") define-logger)) . ((358198 . 2))) ((form ((quote #%kernel) quote-syntax)) . ((14849 . 2))) ((def ((lib "racket/private/base.rkt") exn:fail:unsupported)) . ((173998 . 4))) ((def ((lib "racket/control.rkt") new-prompt)) . ((180066 . 2))) ((def ((lib "racket/private/base.rkt") open-input-file)) . ((241269 . 4))) ((def ((lib "racket/list.rkt") first)) . ((81735 . 3))) ((form ((lib "racket/private/base.rkt") for/first)) . ((12509 . 2))) ((def ((quote #%kernel) fixnum?)) . ((16564 . 3))) ((def ((quote #%kernel) print-graph)) . ((280659 . 4))) ((def ((quote #%kernel) current-directory)) . ((335522 . 4))) ((def ((lib "racket/set.rkt") seteqv)) . ((107171 . 3))) ((form ((lib "racket/generic.rkt") define/generic)) . ((117670 . 5))) ((def ((lib "racket/port.rkt") eof-evt)) . ((262467 . 3))) ((def ((lib "racket/set.rkt") set=?)) . ((108043 . 4))) ((def ((lib "racket/flonum.rkt") make-shared-flvector)) . ((29438 . 4))) ((def ((quote #%kernel) keyword?)) . ((75314 . 3))) ((def ((quote #%kernel) srcloc-column)) . ((174901 . 9))) ((def ((quote #%kernel) continuation-mark-set->context)) . ((182344 . 3))) ((form ((lib "racket/private/more-scheme.rkt") parameterize-break)) . ((182538 . 2))) ((form ((lib "racket/unit.rkt") unit/c)) . ((140869 . 5))) ((def ((quote #%kernel) current-thread-initial-stack-size)) . ((363519 . 4))) ((form ((lib "racket/private/stxcase-scheme.rkt") with-syntax)) . ((215171 . 3))) ((def ((quote #%kernel) char-punctuation?)) . ((56708 . 3))) ((def ((quote #%kernel) bitwise-bit-field)) . ((20937 . 6))) ((form ((lib "racket/private/class-internal.rkt") send+)) . ((126297 . 5))) ((def ((quote #%kernel) even?)) . ((16953 . 3))) ((def ((quote #%kernel) car)) . ((75796 . 3))) ((def ((lib "racket/vector.rkt") vector-filter)) . ((89163 . 4))) ((def ((quote #%kernel) current-get-interaction-input-port)) . ((298885 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flasin)) . ((370239 . 3))) ((def ((quote #%kernel) syntax-position)) . ((216920 . 3))) ((def ((lib "racket/flonum.rkt") fl>)) . ((26476 . 4))) ((def ((lib "racket/sandbox.rkt") call-with-trusted-sandbox-configuration)) . ((320641 . 3))) ((form ((lib "racket/private/base.rkt") rename-in)) . ((2621 . 2))) ((def ((quote #%kernel) not)) . ((15090 . 3))) ((def ((quote #%kernel) cdddar)) . ((81410 . 3))) ((def ((quote #%kernel) call-in-nested-thread)) . ((183400 . 4))) ((def ((quote #%kernel) handle-evt?)) . ((185937 . 3))) ((def ((quote #%kernel) thread-wait)) . ((184094 . 3))) ((form ((lib "racket/private/base.rkt") for*/last)) . ((13528 . 2))) ((def ((lib "racket/place/private/async-bi-channel.rkt") async-bi-channel-put)) . ((210818 . 4))) ((def ((quote #%kernel) continuation-mark-key?)) . ((182208 . 3))) ((def ((lib "racket/file.rkt") file->bytes-lines)) . ((337362 . 8))) ((form ((lib "racket/promise.rkt") delay/sync)) . ((175634 . 2))) ((def ((lib "racket/place.rkt") place-channel-get)) . ((192532 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flsin)) . ((370062 . 3))) ((def ((quote #%kernel) identifier-remove-from-definition-context)) . ((225985 . 7))) ((def ((lib "racket/private/base.rkt") namespace-anchor->namespace)) . ((291572 . 3))) ((def ((lib "racket/private/class-internal.rkt") member-name-key?)) . ((124868 . 3))) ((def ((quote #%kernel) local-expand)) . ((223148 . 13))) ((form ((lib "racket/private/class-internal.rkt") send/keyword-apply)) . ((125719 . 4))) ((def ((lib "racket/port.rkt") make-limited-input-port)) . ((255652 . 7))) ((form ((lib "racket/function.rkt") thunk)) . ((112771 . 2))) ((def ((lib "racket/flonum.rkt") flround)) . ((26840 . 3))) ((def ((quote #%kernel) expand-syntax-to-top-form)) . ((236453 . 3))) ((def ((quote #%kernel) port-writes-special?)) . ((276094 . 3))) ((def ((quote #%kernel) free-identifier=?)) . ((219571 . 10))) ((def ((lib "racket/fixnum.rkt") fx<)) . ((30556 . 4))) ((def ((quote #%kernel) exn:break?)) . ((174260 . 5))) ((def ((quote #%kernel) print-mpair-curly-braces)) . ((280451 . 4))) ((def ((quote #%kernel) current-thread-group)) . ((317582 . 4))) ((def ((lib "racket/set.rkt") set-for-each)) . ((108379 . 4))) ((def ((quote #%kernel) bytes-utf-8-ref)) . ((52329 . 7))) ((def ((quote #%kernel) rename-file-or-directory)) . ((334044 . 7))) ((def ((quote #%kernel) read-line)) . ((265382 . 5))) ((def ((quote #%kernel) handle-evt)) . ((185389 . 4))) ((def ((lib "racket/private/base.rkt") exn:fail:read:non-char)) . ((173119 . 4))) ((def ((lib "racket/private/list.rkt") remq*)) . ((77715 . 4))) ((def ((lib "racket/function.rkt") curryr)) . ((113031 . 6))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fl+)) . ((368885 . 4))) ((def ((lib "racket/async-channel.rkt") make-async-channel)) . ((188021 . 3))) ((def ((quote #%kernel) port-display-handler)) . ((282362 . 6))) ((form ((lib "racket/private/letstx-scheme.rkt") let)) . ((8772 . 3))) ((def ((quote #%kernel) list->string)) . ((34203 . 3))) ((def ((quote #%kernel) relative-path?)) . ((330014 . 3))) ((def ((lib "racket/math.rkt") cosh)) . ((25415 . 3))) ((form ((lib "racket/private/class-internal.rkt") object/c)) . ((129774 . 11))) ((def ((quote #%kernel) exn:fail:syntax-exprs)) . ((172501 . 5))) ((def ((lib "racket/flonum.rkt") fl>=)) . ((26621 . 4))) ((def ((quote #%kernel) syntax->list)) . ((217404 . 3))) ((form ((lib "racket/private/class-internal.rkt") define/augment-final)) . ((124222 . 3))) ((form ((lib "racket/control.rkt") %)) . ((178975 . 4))) ((form ((lib "racket/contract/private/struct-dc.rkt") struct/c)) . ((145100 . 2))) ((def ((lib "racket/udp.rkt") udp-send-to)) . ((347310 . 14))) ((def ((lib "racket/tcp.rkt") tcp-accept-evt)) . ((345952 . 3))) ((form ((lib "racket/private/class-internal.rkt") super-new)) . ((125464 . 2))) ((def ((quote #%kernel) make-struct-type)) . ((114602 . 31))) ((def ((quote #%kernel) current-preserved-thread-cell-values)) . ((188803 . 4))) ((form ((quote #%kernel) set!)) . ((11162 . 2))) ((form ((lib "racket/private/base.rkt") for-syntax)) . ((4694 . 2))) ((form ((lib "racket/control.rkt") reset0)) . ((179533 . 2))) ((def ((lib "racket/require-transform.rkt") expand-import)) . ((229756 . 3))) ((def ((quote #%kernel) procedure-extract-target)) . ((111861 . 3))) ((def ((quote #%kernel) read-syntax/recursive)) . ((276672 . 11))) ((def ((lib "racket/flonum.rkt") fltruncate)) . ((27004 . 3))) ((def ((lib "racket/sandbox.rkt") sandbox-coverage-enabled)) . ((322318 . 4))) ((def ((quote #%kernel) current-load/use-compiled)) . ((297569 . 13))) ((def ((quote #%kernel) real->floating-point-bytes)) . ((24463 . 12))) ((def ((quote #%kernel) struct-predicate-procedure?)) . ((118193 . 3))) ((form ((lib "racket/match.rkt") match-let-values)) . ((165134 . 2))) ((def ((quote #%kernel) build-path)) . ((329157 . 6))) ((def ((lib "racket/private/serialize.rkt") make-serialize-info)) . ((290499 . 12))) ((form ((lib "racket/require.rkt") subtract-in)) . ((7398 . 2))) ((def ((lib "racket/contract/base.rkt") unsupplied-arg?)) . ((150932 . 3))) ((def ((quote #%kernel) impersonator?)) . ((306068 . 3))) ((def ((quote #%kernel) thread-dead-evt)) . ((184154 . 3))) ((def ((lib "racket/private/base.rkt") exn:fail:syntax:unbound)) . ((172666 . 4))) ((def ((lib "racket/private/base.rkt") in-values*-sequence)) . ((98161 . 3))) ((def ((quote #%kernel) make-set!-transformer)) . ((222379 . 3))) ((def ((quote #%kernel) module-compiled-exports)) . ((304127 . 5))) ((def ((quote #%kernel) string)) . ((32777 . 3))) ((def ((quote #%kernel) custom-print-quotable-accessor)) . ((288923 . 2))) ((def ((quote #%kernel) subprocess-kill)) . ((354491 . 4))) ((def ((quote #%kernel) vector-set!)) . ((86614 . 5))) ((def ((quote #%kernel) read-accept-quasiquote)) . ((278377 . 4))) ((def ((quote #%kernel) make-immutable-hasheq)) . ((92052 . 4))) ((def ((lib "racket/sequence.rkt") empty-sequence)) . ((99226 . 2))) ((form ((lib "racket/cmdline.rkt") command-line)) . ((363871 . 42))) ((def ((quote #%kernel) immutable?)) . ((15497 . 3))) ((form ((lib "racket/unit.rkt") extends)) . ((137402 . 2))) ((def ((lib "racket/contract/private/misc.rkt") and/c)) . ((142531 . 3))) ((def ((quote #%kernel) datum->syntax)) . ((217537 . 18))) ((def ((quote #%kernel) hash-for-each)) . ((94479 . 4))) ((def ((quote #%kernel) eq?)) . ((15287 . 4))) ((def ((lib "racket/require-transform.rkt") import)) . ((230218 . 19))) ((def ((quote #%kernel) choice-evt)) . ((185205 . 3))) ((def ((lib "racket/stream.rkt") stream-first)) . ((100611 . 3))) ((def ((quote #%kernel) resolve-path)) . ((330565 . 3))) ((def ((quote #%kernel) locale-string-encoding)) . ((54727 . 2))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-vector-length)) . ((372200 . 3))) ((form ((lib "racket/private/class-internal.rkt") member-name-key)) . ((124777 . 2))) ((def ((lib "racket/private/base.rkt") make-exn:fail:syntax)) . ((172501 . 5))) ((def ((lib "racket/private/base.rkt") in-hash-pairs)) . ((97470 . 3))) ((def ((lib "racket/contract/private/prop.rkt") build-flat-contract-property)) . ((158106 . 22))) ((form ((lib "racket/private/base.rkt") provide)) . ((3374 . 20))) ((def ((lib "racket/string.rkt") string-append*)) . ((36752 . 4))) ((def ((quote #%kernel) procedure?)) . ((109428 . 3))) ((def ((lib "racket/unit-exptime.rkt") unit-static-signatures)) . ((141281 . 9))) ((def ((lib "racket/contract/private/prop.rkt") prop:contract)) . ((157843 . 2))) ((def ((lib "racket/list.rkt") argmax)) . ((84759 . 4))) ((def ((lib "racket/fixnum.rkt") make-fxvector)) . ((31215 . 4))) ((def ((quote #%kernel) abs)) . ((18196 . 3))) ((def ((quote #%kernel) close-input-port)) . ((239127 . 3))) ((def ((quote #%kernel) make-thread-group)) . ((317410 . 3))) ((form ((lib "racket/private/base.rkt") for/hasheq)) . ((12052 . 2))) ((form ((lib "racket/private/base.rkt") planet)) . ((3073 . 5))) ((def ((quote #%kernel) struct:exn:break:hang-up)) . ((174418 . 4))) ((def ((quote #%kernel) >=)) . ((19305 . 4))) ((def ((quote #%kernel) char-ci<?)) . ((55919 . 4))) ((def ((lib "racket/future.rkt") fsemaphore?)) . ((190557 . 3))) ((def ((quote #%kernel) mcar)) . ((85841 . 3))) ((meth (((lib "racket/place/distributed.rkt") remote-node%) remote-connect)) . ((203068 . 3))) ((def ((quote #%kernel) compile-allow-set!-undefined)) . ((299851 . 4))) ((def ((lib "racket/set.rkt") set-count)) . ((107333 . 3))) ((form ((lib "racket/splicing.rkt") splicing-letrec-values)) . ((234747 . 2))) ((def ((quote #%kernel) ceiling)) . ((18632 . 3))) ((def ((lib "racket/private/base.rkt") in-bytes-lines)) . ((97084 . 5))) ((form ((lib "racket/unit.rkt") tag)) . ((137316 . 3))) ((def ((quote #%kernel) exn-message)) . ((171191 . 6))) ((def ((lib "racket/dict.rkt") dict-set)) . ((103215 . 5))) ((def ((lib "racket/fixnum.rkt") fx>=)) . ((30773 . 4))) ((def ((lib "racket/place.rkt") place-channel-put)) . ((192424 . 4))) ((def ((lib "racket/private/class-internal.rkt") make-exn:fail:object)) . ((134912 . 3))) ((def ((quote #%kernel) read-char)) . ((265166 . 3))) ((def ((quote #%kernel) make-weak-hash)) . ((91429 . 3))) ((def ((lib "racket/pretty.rkt") pretty-print-style-table?)) . ((284572 . 3))) ((def ((quote #%kernel) exn:srclocs-accessor)) . ((174795 . 4))) ((constructor ((lib "racket/place/distributed.rkt") place%)) . ((204466 . 12))) ((def ((lib "racket/private/base.rkt") regexp-match-peek-positions*)) . ((67654 . 17))) ((def ((lib "racket/pretty.rkt") pretty-print-print-line)) . ((285458 . 15))) ((def ((lib "racket/port.rkt") read-bytes-avail!-evt)) . ((262810 . 4))) ((def ((lib "racket/place/distributed/rmpi.rkt") struct:rmpi-comm)) . ((210916 . 5))) ((def ((quote #%kernel) ephemeron?)) . ((366660 . 3))) ((def ((lib "racket/trace.rkt") current-trace-print-args)) . ((376796 . 14))) ((def ((lib "racket/contract.rkt") make-proj-contract)) . ((163331 . 15))) ((def ((lib "racket/list.rkt") make-list)) . ((82394 . 4))) ((def ((quote #%kernel) impersonate-box)) . ((307879 . 12))) ((form ((lib "racket/private/base.rkt") all-from-out)) . ((4189 . 2))) ((def ((quote #%kernel) system-idle-evt)) . ((185827 . 2))) ((def ((lib "racket/file.rkt") preferences-lock-file-mode)) . ((341885 . 2))) ((def ((lib "racket/place/distributed.rkt") spawn-node-at)) . ((206968 . 13))) ((def ((lib "racket/contract/private/blame.rkt") make-exn:fail:contract:blame)) . ((157519 . 4))) ((def ((lib "racket/contract/private/misc.rkt") contract?)) . ((162478 . 3))) ((def ((quote #%kernel) module-provide-protected?)) . ((294762 . 5))) ((def ((quote #%kernel) write-byte)) . ((273324 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-vector*-ref)) . ((372558 . 4))) ((form ((lib "racket/promise.rkt") delay)) . ((175316 . 2))) ((def ((lib "racket/dict.rkt") in-dict-values)) . ((105550 . 3))) ((def ((lib "racket/private/base.rkt") directory-list)) . ((335888 . 4))) ((def ((lib "racket/pretty.rkt") pretty-format)) . ((283485 . 4))) ((form ((lib "racket/contract/region.rkt") define-struct/contract)) . ((152674 . 6))) ((def ((quote #%kernel) bytes-copy)) . ((48765 . 3))) ((form ((lib "racket/match.rkt") define-match-expander)) . ((165466 . 3))) ((def ((lib "racket/contract/private/guts.rkt") contract-first-order)) . ((162395 . 3))) ((def ((quote #%kernel) regexp-match-peek-positions-immediate)) . ((66605 . 19))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fx+)) . ((367316 . 4))) ((def ((quote #%kernel) will-execute)) . ((366965 . 3))) ((def ((quote #%kernel) make-special-comment)) . ((288336 . 3))) ((def ((quote #%kernel) bytes-set!)) . ((48439 . 5))) ((def ((quote #%kernel) delete-directory)) . ((335816 . 3))) ((def ((lib "racket/private/misc.rkt") load-relative)) . ((297116 . 3))) ((def ((quote #%kernel) struct:exn:fail:out-of-memory)) . ((173856 . 4))) ((def ((quote #%kernel) date-day)) . ((359520 . 23))) ((def ((lib "racket/private/base.rkt") in-vector)) . ((95900 . 6))) ((def ((lib "racket/list.rkt") last)) . ((82293 . 3))) ((def ((quote #%kernel) regexp-match-positions/end)) . ((69617 . 16))) ((def ((lib "racket/private/base.rkt") make-exn)) . ((171191 . 6))) ((form ((lib "racket/bool.rkt") nand)) . ((15890 . 2))) ((def ((lib "racket/contract/private/guts.rkt") coerce-flat-contracts)) . ((156042 . 4))) ((def ((lib "racket/private/more-scheme.rkt") current-parameterization)) . ((189767 . 2))) ((def ((lib "racket/private/base.rkt") make-exn:fail:contract:arity)) . ((171626 . 4))) ((def ((quote #%kernel) make-parameter)) . ((189055 . 4))) ((def ((quote #%kernel) sqrt)) . ((19378 . 3))) ((form ((lib "racket/match.rkt") match-define)) . ((165319 . 2))) ((def ((quote #%kernel) default-continuation-prompt-tag)) . ((176725 . 2))) ((def ((lib "racket/require-transform.rkt") current-require-module-path)) . ((231425 . 4))) ((constructor ((lib "racket/place/distributed.rkt") restarter%)) . ((206372 . 9))) ((def ((lib "racket/require-transform.rkt") import-source)) . ((231125 . 7))) ((def ((lib "racket/udp.rkt") udp-send-evt)) . ((352074 . 9))) ((def ((lib "racket/contract/private/misc.rkt") continuation-mark-key/c)) . ((146710 . 3))) ((def ((lib "racket/sandbox.rkt") get-user-custodian)) . ((326081 . 3))) ((def ((quote #%kernel) read-string!)) . ((266123 . 7))) ((def ((quote #%kernel) denominator)) . ((18862 . 3))) ((form ((lib "racket/private/letstx-scheme.rkt") letrec)) . ((8920 . 2))) ((def ((quote #%kernel) module-path-index?)) . ((302112 . 3))) ((def ((quote #%kernel) string-set!)) . ((33117 . 5))) ((def ((quote #%kernel) impersonate-vector)) . ((307348 . 13))) ((def ((lib "racket/private/base.rkt") for-clause-syntax-protect)) . ((14481 . 3))) ((def ((lib "racket/contract/private/vector.rkt") vector-immutable/c)) . ((144263 . 3))) ((def ((quote #%kernel) namespace-unprotect-module)) . ((294222 . 7))) ((def ((lib "racket/pretty.rkt") pretty-write)) . ((283253 . 4))) ((def ((quote #%kernel) complex?)) . ((16090 . 3))) ((def ((lib "racket/provide-transform.rkt") pre-expand-export)) . ((232310 . 4))) ((def ((lib "racket/private/class-internal.rkt") class?)) . ((133134 . 3))) ((def ((lib "racket/generator.rkt") generator?)) . ((102195 . 3))) ((def ((quote #%kernel) placeholder-get)) . ((85299 . 3))) ((def ((quote #%kernel) primitive-closure?)) . ((112519 . 3))) ((def ((quote #%kernel) expand)) . ((236072 . 3))) ((def ((lib "racket/sequence.rkt") sequence-ormap)) . ((99869 . 4))) ((def ((lib "racket/provide-transform.rkt") provide-pre-transformer?)) . ((233264 . 3))) ((form ((lib "racket/private/class-internal.rkt") rename-super)) . ((123115 . 2))) ((def ((lib "racket/vector.rkt") vector-memq)) . ((89879 . 4))) ((form ((lib "racket/private/more-scheme.rkt") do)) . ((14557 . 7))) ((form ((lib "racket/control.rkt") cupto)) . ((180136 . 2))) ((form ((lib "racket/trait.rkt") trait-rename-field)) . ((128453 . 2))) ((def ((quote #%kernel) port-closed-evt)) . ((239329 . 3))) ((form ((lib "racket/splicing.rkt") splicing-letrec-syntaxes)) . ((234863 . 2))) ((def ((lib "racket/sandbox.rkt") exn:fail:resource?)) . ((327922 . 5))) ((def ((quote #%kernel) caaaar)) . ((80010 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fl=)) . ((369256 . 4))) ((def ((quote #%kernel) channel?)) . ((186220 . 3))) ((def ((lib "racket/port.rkt") merge-input)) . ((256207 . 5))) ((def ((quote #%kernel) path-element->string)) . ((328829 . 3))) ((def ((lib "racket/private/base.rkt") make-exn:fail:contract:non-fixnum-result)) . ((171959 . 5))) ((def ((quote #%kernel) syntax-track-origin)) . ((235251 . 7))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flmax)) . ((369733 . 4))) ((def ((quote #%kernel) syntax-local-value/immediate)) . ((226593 . 8))) ((def ((quote #%kernel) current-load-extension)) . ((297244 . 5))) ((form ((lib "racket/set.rkt") for*/seteq)) . ((109102 . 2))) ((def ((quote #%kernel) evt?)) . ((184731 . 3))) ((def ((lib "racket/private/list.rkt") filter)) . ((77253 . 4))) ((def ((quote #%kernel) path-for-some-system?)) . ((328188 . 3))) ((def ((lib "racket/contract.rkt") struct-type-property/c)) . ((151386 . 3))) ((def ((quote #%kernel) quotient/remainder)) . ((17918 . 4))) ((def ((quote #%kernel) exit-handler)) . ((182909 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fllog)) . ((370419 . 3))) ((def ((quote #%kernel) exact-nonnegative-integer?)) . ((16364 . 3))) ((def ((lib "racket/contract/private/misc.rkt") flat-contract?)) . ((162666 . 3))) ((def ((quote #%kernel) raise-range-error)) . ((167852 . 17))) ((def ((lib "racket/flonum.rkt") fllog)) . ((27376 . 3))) ((def ((lib "racket/file.rkt") make-directory*)) . ((340180 . 3))) ((def ((quote #%kernel) uncaught-exception-handler)) . ((169913 . 4))) ((def ((lib "racket/future.rkt") fsemaphore-wait)) . ((190686 . 3))) ((def ((quote #%kernel) char-downcase)) . ((57374 . 3))) ((def ((lib "racket/dict.rkt") dict?)) . ((102697 . 3))) ((def ((quote #%kernel) error-print-context-length)) . ((170618 . 4))) ((def ((lib "racket/private/list.rkt") member)) . ((78237 . 4))) ((form ((lib "racket/private/class-internal.rkt") class-field-accessor)) . ((126824 . 2))) ((def ((quote #%kernel) srcloc-line)) . ((174901 . 9))) ((def ((quote #%kernel) bytes-convert-end)) . ((54131 . 13))) ((form ((lib "racket/require.rkt") filtered-in)) . ((7455 . 2))) ((def ((quote #%kernel) peek-byte)) . ((271727 . 4))) ((def ((quote #%kernel) char-upper-case?)) . ((56441 . 3))) ((def ((quote #%kernel) syntax-source-module)) . ((217175 . 5))) ((def ((lib "racket/flonum.rkt") flvector-copy)) . ((28609 . 5))) ((def ((quote #%kernel) exn:break:terminate?)) . ((174551 . 4))) ((def ((quote #%kernel) subprocess-status)) . ((354332 . 4))) ((def ((lib "racket/private/base.rkt") arity-at-least)) . ((111595 . 4))) ((def ((quote #%kernel) current-read-interaction)) . ((299040 . 4))) ((def ((quote #%kernel) syntax-span)) . ((217014 . 3))) ((def ((lib "racket/contract/private/misc.rkt") integer-in)) . ((143195 . 4))) ((def ((lib "racket/require-transform.rkt") require-transformer?)) . ((230152 . 3))) ((def ((quote #%kernel) putenv)) . ((362831 . 4))) ((def ((quote #%kernel) caaddr)) . ((80310 . 3))) ((def ((quote #%kernel) namespace?)) . ((291172 . 3))) ((def ((lib "racket/udp.rkt") udp-send-to*)) . ((348059 . 14))) ((def ((quote #%kernel) thread?)) . ((183230 . 3))) ((def ((lib "racket/port.rkt") port->bytes)) . ((251356 . 3))) ((def ((lib "racket/private/base.rkt") exn:fail:network)) . ((173726 . 4))) ((def ((lib "racket/tcp.rkt") tcp-connect)) . ((344420 . 12))) ((def ((quote #%kernel) call-with-semaphore/enable-break)) . ((187585 . 9))) ((form ((lib "racket/private/qqstx.rkt") unsyntax)) . ((216095 . 2))) ((form ((lib "racket/runtime-path.rkt") runtime-paths)) . ((336341 . 2))) ((def ((quote #%kernel) syntax-local-get-shadower)) . ((228189 . 3))) ((form ((lib "racket/private/base.rkt") for/product)) . ((12368 . 2))) ((def ((quote #%kernel) syntax-local-expand-expression)) . ((223699 . 3))) ((meth (((lib "racket/place/distributed.rkt") remote-node%) launch-place)) . ((202619 . 9))) ((def ((quote #%kernel) exn:fail:contract:divide-by-zero?)) . ((171779 . 5))) ((def ((lib "racket/math.rkt") degrees->radians)) . ((25067 . 3))) ((def ((lib "racket/dict.rkt") dict-remove)) . ((104665 . 4))) ((def ((quote #%kernel) namespace-syntax-introduce)) . ((294671 . 3))) ((def ((lib "racket/vector.rkt") vector-member)) . ((89673 . 4))) ((def ((lib "racket/sequence.rkt") sequence-count)) . ((100195 . 4))) ((def ((quote #%kernel) free-transformer-identifier=?)) . ((219980 . 4))) ((form ((lib "racket/private/more-scheme.rkt") log-error)) . ((358742 . 3))) ((def ((quote #%kernel) hash-copy)) . ((95129 . 3))) ((def ((lib "racket/flonum.rkt") fl=)) . ((26332 . 4))) ((def ((quote #%kernel) exn:break-continuation)) . ((174260 . 5))) ((def ((quote #%kernel) print-reader-abbreviations)) . ((281223 . 4))) ((def ((lib "racket/flonum.rkt") flexp)) . ((27428 . 3))) ((form ((lib "racket/match.rkt") match-lambda**)) . ((164993 . 2))) ((def ((quote #%kernel) copy-file)) . ((335270 . 5))) ((def ((quote #%kernel) read-bytes-line)) . ((265595 . 5))) ((form ((lib "racket/private/base.rkt") #%plain-module-begin)) . ((249 . 2))) ((def ((lib "racket/flonum.rkt") flcos)) . ((27113 . 3))) ((form ((lib "racket/private/class-internal.rkt") class/c)) . ((128505 . 27))) ((def ((quote #%kernel) module->imports)) . ((305509 . 6))) ((form ((lib "racket/unit.rkt") contracted)) . ((137027 . 2))) ((def ((lib "racket/dict.rkt") dict-ref)) . ((103596 . 6))) ((def ((quote #%kernel) variable-reference->empty-namespace)) . ((295133 . 3))) ((def ((quote #%kernel) string-copy!)) . ((33513 . 11))) ((form ((lib "racket/private/more-scheme.rkt") parameterize*)) . ((189291 . 3))) ((form ((lib "racket/unit.rkt") define-compound-unit/infer)) . ((138989 . 5))) ((def ((lib "racket/private/class-internal.rkt") object=?)) . ((133296 . 4))) ((def ((quote #%kernel) output-port?)) . ((239018 . 3))) ((form ((lib "racket/private/class-internal.rkt") define-local-member-name)) . ((124692 . 2))) ((def ((lib "racket/path.rkt") path-only)) . ((332860 . 3))) ((def ((quote #%kernel) struct:exn:fail:syntax)) . ((172501 . 5))) ((def ((lib "racket/contract/private/box.rkt") box-immutable/c)) . ((144587 . 3))) ((def ((quote #%kernel) syntax-property)) . ((234992 . 8))) ((def ((lib "racket/port.rkt") transplant-output-port)) . ((260085 . 17))) ((def ((lib "racket/fasl.rkt") fasl->s-exp)) . ((291094 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-list-tail)) . ((371628 . 4))) ((def ((quote #%kernel) hash)) . ((90760 . 4))) ((def ((lib "racket/keyword-transform.rkt") syntax-procedure-converted-arguments-property)) . ((234054 . 8))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-mcdr)) . ((371291 . 3))) ((def ((lib "racket/contract/parametric.rkt") new-∃/c)) . ((151094 . 3))) ((def ((lib "racket/list.rkt") take)) . ((82485 . 4))) ((def ((lib "racket/sandbox.rkt") call-with-killing-threads)) . ((326526 . 5))) ((def ((quote #%kernel) symbol-unreadable?)) . ((57682 . 3))) ((def ((quote #%kernel) make-struct-field-accessor)) . ((115902 . 8))) ((def ((quote #%kernel) thread-cell-values?)) . ((188990 . 3))) ((form ((quote #%kernel) if)) . ((9674 . 2))) ((def ((lib "racket/port.rkt") call-with-output-string)) . ((252224 . 3))) ((def ((quote #%kernel) print)) . ((279699 . 5))) ((def ((lib "racket/bool.rkt") xor)) . ((15970 . 4))) ((def ((quote #%kernel) struct-type-property?)) . ((117177 . 3))) ((def ((quote #%kernel) eof-object?)) . ((239884 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fx<=)) . ((368565 . 4))) ((form ((lib "racket/private/base.rkt") combine-out)) . ((4398 . 2))) ((def ((quote #%kernel) bytes->immutable-bytes)) . ((48112 . 3))) ((def ((lib "racket/set.rkt") set-eqv?)) . ((108582 . 3))) ((def ((lib "racket/file.rkt") file->lines)) . ((337009 . 8))) ((def ((lib "racket/place/distributed.rkt") racket-path)) . ((206828 . 2))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-set-mcdr!)) . ((371425 . 4))) ((def ((quote #%kernel) build-path/convention-type)) . ((329462 . 9))) ((form ((lib "racket/unit.rkt") define-signature)) . ((136034 . 25))) ((def ((quote #%kernel) chaperone?)) . ((306127 . 3))) ((def ((lib "racket/private/misc.rkt") load-relative-extension)) . ((297492 . 3))) ((def ((lib "racket/flonum.rkt") flexpt)) . ((27533 . 4))) ((def ((lib "racket/private/stxcase-scheme.rkt") generate-temporaries)) . ((218681 . 3))) ((def ((lib "racket/private/base.rkt") sequence-generate)) . ((99006 . 3))) ((def ((lib "racket/async-channel.rkt") async-channel-get)) . ((188138 . 3))) ((def ((quote #%kernel) current-seconds)) . ((359305 . 2))) ((constructor ((lib "racket/place/distributed.rkt") node%)) . ((201845 . 3))) ((def ((lib "racket/contract/private/blame.rkt") blame?)) . ((156236 . 3))) ((def ((lib "racket/private/base.rkt") make-exn:fail:filesystem:exists)) . ((173402 . 4))) ((def ((quote #%kernel) null?)) . ((75679 . 3))) ((def ((lib "racket/cmdline.rkt") parse-command-line)) . ((365508 . 15))) ((def ((lib "racket/stxparam-exptime.rkt") make-parameter-rename-transformer)) . ((234591 . 3))) ((def ((quote #%kernel) hash-iterate-value)) . ((95020 . 4))) ((form ((quote #%kernel) #%require)) . ((4812 . 33))) ((def ((quote #%kernel) vector-length)) . ((86428 . 3))) ((def ((quote #%kernel) read-accept-reader)) . ((278485 . 4))) ((def ((lib "racket/provide-transform.rkt") make-provide-pre-transformer)) . ((232902 . 5))) ((form ((lib "racket/splicing.rkt") splicing-let-syntax)) . ((234777 . 2))) ((meth (((lib "racket/place/distributed.rkt") node%) sync-events)) . ((201966 . 2))) ((form ((lib "racket/private/qqstx.rkt") quasisyntax/loc)) . ((216192 . 2))) ((def ((quote #%kernel) length)) . ((76225 . 3))) ((form ((lib "racket/performance-hint.rkt") begin-encourage-inline)) . ((14993 . 2))) ((def ((quote #%kernel) custom-write-accessor)) . ((288689 . 4))) ((form ((quote #%kernel) begin0)) . ((11015 . 2))) ((def ((quote #%kernel) date-second)) . ((359520 . 23))) ((def ((quote #%kernel) hash-iterate-first)) . ((94668 . 4))) ((def ((quote #%kernel) equal?/recur)) . ((15359 . 5))) ((def ((lib "racket/file.rkt") user-execute-bit)) . ((343789 . 2))) ((def ((lib "racket/provide-transform.rkt") export-mode)) . ((233334 . 8))) ((def ((lib "racket/contract/base.rkt") predicate/c)) . ((150855 . 2))) ((def ((quote #%kernel) prefab-struct-key)) . ((118409 . 3))) ((def ((lib "racket/private/base.rkt") gen:custom-write)) . ((288547 . 2))) ((def ((lib "racket/date.rkt") date->string)) . ((361155 . 4))) ((def ((quote #%kernel) make-rename-transformer)) . ((222724 . 6))) ((def ((quote #%kernel) cleanse-path)) . ((330633 . 3))) ((def ((quote #%kernel) <=)) . ((19160 . 4))) ((def ((quote #%kernel) char-alphabetic?)) . ((56305 . 3))) ((form ((lib "racket/unit.rkt") import)) . ((137207 . 2))) ((def ((lib "racket/pretty.rkt") pretty-print-remap-stylable)) . ((285157 . 5))) ((def ((quote #%kernel) namespace-symbol->identifier)) . ((291760 . 3))) ((def ((quote #%kernel) make-log-receiver)) . ((359091 . 5))) ((form ((lib "racket/private/class-internal.rkt") send-generic)) . ((126973 . 3))) ((def ((quote #%kernel) make-file-or-directory-link)) . ((335411 . 4))) ((form ((lib "racket/private/base.rkt") #%app)) . ((8013 . 2))) ((def ((quote #%kernel) continuation-mark-set->list*)) . ((181062 . 10))) ((def ((lib "racket/private/serialize.rkt") serialized=?)) . ((289155 . 4))) ((def ((lib "racket/set.rkt") in-set)) . ((108850 . 3))) ((def ((lib "racket/control.rkt") abort/cc)) . ((178643 . 4))) ((def ((quote #%kernel) thread-group?)) . ((317523 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fltruncate)) . ((369998 . 3))) ((form ((lib "racket/private/class-internal.rkt") ->*m)) . ((129495 . 2))) ((form ((lib "racket/contract/region.rkt") with-contract)) . ((152064 . 12))) ((def ((lib "racket/sequence.rkt") sequence-length)) . ((99322 . 3))) ((def ((lib "racket/private/map.rkt") andmap)) . ((76763 . 4))) ((def ((quote #%kernel) negative?)) . ((16898 . 3))) ((def ((quote #%kernel) string-locale>?)) . ((36179 . 4))) ((def ((lib "racket/require-transform.rkt") make-import-source)) . ((231125 . 7))) ((def ((lib "racket/private/class-internal.rkt") struct:exn:fail:object)) . ((134912 . 3))) ((def ((quote #%kernel) number?)) . ((16037 . 3))) ((def ((lib "racket/math.rkt") pi.f)) . ((25037 . 2))) ((def ((lib "racket/private/class-internal.rkt") subclass?)) . ((133732 . 4))) ((def ((quote #%kernel) vector-immutable)) . ((86300 . 4))) ((def ((quote #%kernel) exn-continuation-marks)) . ((171191 . 6))) ((def ((quote #%kernel) current-pseudo-random-generator)) . ((21934 . 4))) ((meth (((lib "racket/place/distributed.rkt") spawned-process%) get-pid)) . ((199725 . 2))) ((def ((lib "racket/place/distributed.rkt") node-send-exit)) . ((203215 . 3))) ((def ((quote #%kernel) read-byte)) . ((265274 . 3))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fl*)) . ((369041 . 4))) ((def ((quote #%kernel) make-hash)) . ((91114 . 3))) ((def ((lib "racket/port.rkt") transplant-input-port)) . ((259402 . 17))) ((def ((quote #%kernel) checked-procedure-check-and-extract)) . ((112061 . 11))) ((form ((lib "racket/contract/private/struct-dc.rkt") struct/dc)) . ((145149 . 22))) ((def ((lib "racket/sequence.rkt") sequence-filter)) . ((100301 . 4))) ((def ((lib "racket/dict.rkt") in-dict-keys)) . ((105485 . 3))) ((def ((lib "racket/flonum.rkt") fl+)) . ((25996 . 4))) ((def ((lib "racket/contract/private/vector.rkt") vector-immutableof)) . ((143891 . 3))) ((def ((lib "racket/private/base.rkt") sequence-generate*)) . ((99094 . 5))) ((def ((quote #%kernel) semaphore?)) . ((186664 . 3))) ((def ((lib "racket/future.rkt") touch)) . ((190141 . 3))) ((def ((lib "racket/file.rkt") display-lines-to-file)) . ((338650 . 13))) ((def ((quote #%kernel) regexp?)) . ((58120 . 3))) ((def ((lib "racket/contract/private/prop.rkt") build-contract-property)) . ((160570 . 21))) ((def ((lib "racket/contract.rkt") contract-random-generate)) . ((164466 . 5))) ((def ((quote #%kernel) alarm-evt)) . ((185865 . 3))) ((def ((lib "racket/port.rkt") call-with-input-bytes)) . ((252679 . 4))) ((def ((lib "racket/tcp.rkt") tcp-accept/enable-break)) . ((345626 . 3))) ((def ((lib "racket/private/base.rkt") exn:fail:contract:arity)) . ((171626 . 4))) ((def ((quote #%kernel) banner)) . ((363272 . 2))) ((def ((lib "racket/trace.rkt") current-prefix-out)) . ((377895 . 4))) ((def ((lib "racket/private/class-internal.rkt") object-method-arity-includes?)) . ((134233 . 7))) ((def ((quote #%kernel) read-curly-brace-as-paren)) . ((277551 . 4))) ((def ((quote #%kernel) make-resolved-module-path)) . ((300384 . 7))) ((def ((quote #%kernel) unbox)) . ((90152 . 3))) ((def ((lib "racket/list.rkt") count)) . ((84204 . 4))) ((def ((lib "racket/private/misc.rkt") channel-put)) . ((186431 . 4))) ((def ((lib "racket/date.rkt") date->seconds)) . ((361921 . 4))) ((form ((lib "racket/stream.rkt") stream)) . ((100834 . 2))) ((def ((quote #%kernel) random)) . ((21339 . 8))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-flvector-length)) . ((373469 . 3))) ((def ((lib "racket/list.rkt") drop-right)) . ((82882 . 4))) ((def ((lib "racket/fixnum.rkt") fx+)) . ((29563 . 4))) ((def ((quote #%kernel) regexp-replace)) . ((73313 . 15))) ((def ((quote #%kernel) collect-garbage)) . ((367112 . 2))) ((def ((quote #%kernel) inspector?)) . ((317703 . 3))) ((def ((quote #%kernel) bytes-ref)) . ((48340 . 4))) ((def ((quote #%kernel) filesystem-root-list)) . ((336040 . 2))) ((def ((lib "racket/sandbox.rkt") sandbox-exit-handler)) . ((324437 . 4))) ((def ((lib "racket/trait.rkt") trait?)) . ((128087 . 3))) ((form ((lib "racket/generator.rkt") infinite-generator)) . ((102342 . 2))) ((form ((lib "racket/private/class-internal.rkt") ->dm)) . ((129616 . 6))) ((def ((lib "racket/port.rkt") regexp-match-evt)) . ((264652 . 4))) ((def ((lib "racket/private/base.rkt") in-lines)) . ((96896 . 5))) ((def ((lib "racket/private/base.rkt") make-exn:fail:read:non-char)) . ((173119 . 4))) ((def ((quote #%kernel) regexp-match?)) . ((63596 . 13))) ((def ((lib "racket/private/base.rkt") in-naturals)) . ((95689 . 3))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-comm?)) . ((210916 . 5))) ((def ((quote #%kernel) read-bytes!)) . ((266447 . 7))) ((form ((lib "racket/unit.rkt") invoke-unit/infer)) . ((139287 . 5))) ((def ((quote #%kernel) integer-sqrt/remainder)) . ((19490 . 3))) ((def ((quote #%kernel) make-continuation-prompt-tag)) . ((176568 . 4))) ((form ((lib "racket/contract/private/base.rkt") contract)) . ((153046 . 6))) ((def ((lib "racket/place/distributed.rkt") remote-connection%)) . ((203501 . 4))) ((def ((quote #%kernel) namespace-mapped-symbols)) . ((293028 . 3))) ((def ((lib "racket/contract.rkt") contract-proc)) . ((164288 . 6))) ((def ((lib "racket/flonum.rkt") fl->exact-integer)) . ((27665 . 3))) ((form ((lib "racket/private/more-scheme.rkt") let/cc)) . ((177693 . 2))) ((def ((lib "racket/flonum.rkt") fl-)) . ((26067 . 4))) ((def ((lib "racket/pretty.rkt") pretty-print-post-print-hook)) . ((286619 . 5))) ((form ((lib "racket/control.rkt") shift)) . ((179367 . 2))) ((def ((lib "racket/contract/private/misc.rkt") list/c)) . ((144937 . 3))) ((def ((quote #%kernel) write-bytes-avail-evt)) . ((275521 . 9))) ((def ((quote #%kernel) module-path-index-resolve)) . ((302176 . 3))) ((def ((quote #%kernel) string=?)) . ((34415 . 4))) ((def ((quote #%kernel) chaperone-vector)) . ((311273 . 12))) ((def ((lib "racket/file.rkt") make-handle-get-preference-locked)) . ((341957 . 16))) ((def ((quote #%kernel) compile)) . ((299488 . 3))) ((form ((lib "racket/runtime-path.rkt") define-runtime-module-path)) . ((336288 . 2))) ((def ((quote #%kernel) real?)) . ((16144 . 3))) ((form ((lib "racket/private/class-internal.rkt") public*)) . ((123187 . 2))) ((def ((lib "racket/private/list.rkt") compose)) . ((109629 . 3))) ((def ((lib "racket/dict.rkt") gen:dict)) . ((105860 . 2))) ((def ((lib "racket/dict.rkt") dict-ref!)) . ((103789 . 5))) ((form ((lib "racket/private/class-internal.rkt") rename-inner)) . ((123151 . 2))) ((form ((lib "racket/private/base.rkt") define-struct)) . ((114337 . 6))) ((def ((lib "racket/future.rkt") processor-count)) . ((190409 . 2))) ((def ((lib "racket/contract/private/guts.rkt") prop:contracted)) . ((157996 . 2))) ((def ((quote #%kernel) primitive-result-arity)) . ((112582 . 3))) ((def ((quote #%kernel) expand-syntax)) . ((236149 . 3))) ((def ((quote #%kernel) impersonator-prop:application-mark)) . ((315210 . 2))) ((def ((quote #%kernel) prop:set!-transformer)) . ((222605 . 2))) ((def ((lib "racket/private/base.rkt") date*)) . ((360475 . 5))) ((def ((lib "racket/set.rkt") set-equal?)) . ((108525 . 3))) ((def ((quote #%kernel) struct:exn:fail:read:non-char)) . ((173119 . 4))) ((form ((lib "racket/contract/private/ds.rkt") contract-struct)) . ((151158 . 2))) ((def ((lib "racket/place/distributed.rkt") spawn-node-supervise-place-at)) . ((194288 . 27))) ((def ((lib "racket/require-transform.rkt") import-src-sym)) . ((230218 . 19))) ((form ((lib "racket/private/more-scheme.rkt") time)) . ((361098 . 2))) ((def ((lib "racket/struct-info.rkt") struct-auto-info?)) . ((119247 . 3))) ((form ((lib "racket/stxparam.rkt") syntax-parameterize)) . ((234451 . 2))) ((def ((lib "racket/math.rkt") sgn)) . ((25235 . 3))) ((def ((quote #%kernel) cadaar)) . ((80410 . 3))) ((def ((lib "racket/fixnum.rkt") fxior)) . ((30134 . 4))) ((form ((lib "racket/private/class-internal.rkt") define-serializable-class*)) . ((132706 . 4))) ((def ((quote #%kernel) make-channel)) . ((186274 . 2))) ((def ((quote #%kernel) path-element->bytes)) . ((328908 . 3))) ((def ((lib "racket/private/base.rkt") regexp-replace*)) . ((73949 . 15))) ((form ((lib "racket/runtime-path.rkt") define-runtime-path)) . ((336094 . 2))) ((def ((quote #%kernel) continuation-mark-set->list)) . ((180583 . 8))) ((form ((lib "racket/contract/base.rkt") ->*)) . ((147137 . 24))) ((def ((quote #%kernel) syntax-local-name)) . ((227581 . 2))) ((def ((lib "racket/place.rkt") place-dead-evt)) . ((192135 . 3))) ((form ((lib "racket/unit.rkt") define-signature-form)) . ((140357 . 3))) ((def ((lib "racket/private/base.rkt") in-list)) . ((95782 . 3))) ((def ((quote #%kernel) sync)) . ((184781 . 3))) ((def ((lib "racket/sandbox.rkt") make-evaluator)) . ((318849 . 29))) ((def ((quote #%kernel) quotient)) . ((17759 . 4))) ((def ((quote #%kernel) error-display-handler)) . ((170308 . 4))) ((def ((lib "racket/stream.rkt") stream?)) . ((100497 . 3))) ((def ((quote #%kernel) exact-integer?)) . ((16304 . 3))) ((def ((lib "racket/private/base.rkt") procedure-rename)) . ((109772 . 4))) ((def ((quote #%kernel) raise-mismatch-error)) . ((168778 . 8))) ((form ((lib "racket/private/letstx-scheme.rkt") or)) . ((10030 . 2))) ((def ((quote #%kernel) raise)) . ((166216 . 4))) ((form ((lib "racket/unit.rkt") init-depend)) . ((137361 . 2))) ((def ((quote #%kernel) char-foldcase)) . ((57499 . 3))) ((def ((lib "racket/file.rkt") fold-files)) . ((339679 . 12))) ((def ((quote #%kernel) executable-yield-handler)) . ((183026 . 4))) ((def ((quote #%kernel) keyword<?)) . ((75510 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-bytes-set!)) . ((373332 . 5))) ((def ((quote #%kernel) srcloc-source)) . ((174901 . 9))) ((def ((quote #%kernel) format)) . ((280258 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-fxlshift)) . ((368162 . 4))) ((def ((quote #%kernel) lcm)) . ((18407 . 3))) ((def ((lib "racket/private/list.rkt") findf)) . ((78578 . 4))) ((def ((lib "racket/place/distributed.rkt") ssh-bin-path)) . ((206790 . 2))) ((def ((quote #%kernel) char-iso-control?)) . ((56973 . 3))) ((def ((quote #%kernel) identifier-prune-lexical-context)) . ((218789 . 5))) ((def ((lib "racket/private/base.rkt") make-exn:fail:network)) . ((173726 . 4))) ((def ((quote #%kernel) bitwise-and)) . ((20600 . 3))) ((form ((lib "racket/private/base.rkt") for/hasheqv)) . ((12117 . 2))) ((def ((quote #%kernel) write-bytes-avail/enable-break)) . ((274860 . 10))) ((form ((lib "racket/promise.rkt") delay/name)) . ((175568 . 2))) ((def ((lib "racket/control.rkt") fcontrol)) . ((179057 . 4))) ((def ((lib "racket/set.rkt") set-rest)) . ((107567 . 3))) ((def ((quote #%kernel) caddar)) . ((80610 . 3))) ((def ((lib "racket/list.rkt") partition)) . ((84313 . 4))) ((def ((quote #%kernel) thread-running?)) . ((183973 . 3))) ((form ((lib "racket/contract/base.rkt") ->i)) . ((147811 . 41))) ((def ((lib "racket/place/distributed/rmpi.rkt") rmpi-finish)) . ((213259 . 4))) ((form ((lib "racket/splicing.rkt") splicing-letrec-syntax)) . ((234804 . 2))) ((def ((lib "racket/private/base.rkt") hash->list)) . ((94393 . 3))) ((def ((lib "racket/port.rkt") peek-bytes-evt)) . ((263455 . 29))) ((def ((quote #%kernel) syntax-local-introduce)) . ((228543 . 3))) ((def ((lib "racket/private/list.rkt") foldl)) . ((77027 . 5))) ((def ((quote #%kernel) local-expand/capture-lifts)) . ((224225 . 11))) ((def ((quote #%kernel) sleep)) . ((183907 . 3))) ((def ((quote #%kernel) struct:exn:break:terminate)) . ((174551 . 4))) ((def ((lib "racket/private/misc.rkt") path-add-suffix)) . ((331512 . 4))) ((def ((lib "racket/unsafe/ops.rkt") unsafe-u16vector-set!)) . ((374306 . 5))) ((def ((lib "racket/set.rkt") set->list)) . ((109375 . 3))) ((def ((quote #%kernel) free-template-identifier=?)) . ((220090 . 4))) ((def ((lib "racket/private/serialize.rkt") deserialize)) . ((289103 . 3))) ((def ((lib "racket/file.rkt") file->bytes)) . ((336521 . 4))) ((def ((quote #%kernel) hash-count)) . ((94588 . 3))) ((form ((lib "racket/include.rkt") include-at/relative-to/reader)) . ((236754 . 2))) ((def ((lib "racket/private/base.rkt") make-exn:break:terminate)) . ((174551 . 4))) ((form ((lib "racket/trait.rkt") trait-exclude-field)) . ((128317 . 2))) ((form ((lib "racket/place/define-remote-server.rkt") define-remote-server)) . ((210230 . 2))) ((def ((lib "racket/future.rkt") futures-enabled?)) . ((190189 . 2))) ((def ((quote #%kernel) print-syntax-width)) . ((281441 . 5))) ((def ((quote #%kernel) cdadr)) . ((79764 . 3))) ((def ((quote #%kernel) bytes->string/locale)) . ((50274 . 9))) ((def ((quote #%kernel) log-level?)) . ((358418 . 4))) ((def ((quote #%kernel) read-string)) . ((265813 . 4))) ((form ((lib "racket/contract/private/guts.rkt") define/final-prop)) . ((161909 . 6))) ((def ((quote #%kernel) nack-guard-evt)) . ((185598 . 3))) ((def ((lib "racket/dict.rkt") in-dict)) . ((105425 . 3))) ((def ((lib "racket/private/class-internal.rkt") is-a?)) . ((133635 . 4))) ((def ((lib "racket/contract/private/misc.rkt") flat-contract)) . ((141985 . 3))) ((def ((lib "racket/stream.rkt") stream-filter)) . ((101940 . 4))))

(something id thing-expr ...)
 
  thing-expr : number?
syntax
(module id module-path form ...)
syntax
(module* id module-path form ...)
(module* id #f form ...)
syntax
(module+ id form ...)
syntax
(#%module-begin form ...)
syntax
(#%plain-module-begin form ...)
syntax
(require require-spec ...)
 
require-spec        = module-path
                    | (only-in require-spec id-maybe-renamed ...)
                    | (except-in require-spec id ...)
                    | (prefix-in prefix-id require-spec)
                    | (rename-in require-spec [orig-id bind-id] ...)
                    | (combine-in require-spec ...)
                    | (relative-in module-path require-spec ...)
                    | (only-meta-in phase-level require-spec ...)
                    | (for-syntax require-spec ...)
                    | (for-template require-spec ...)
                    | (for-label require-spec ...)
                    | (for-meta phase-level require-spec ...)
                    | derived-require-spec
                       
module-path         = root-module-path
                    | (submod root-module-path submod-path-element ...)
                    | (submod "." submod-path-element ...)
                    | (submod ".." submod-path-element ...)
                       
root-module-path    = (quote id)
                    | rel-string
                    | (lib rel-string ...+)
                    | id
                    | (file string)
                    | (planet id)
                    | (planet string)
                    | (planet rel-string
                              (user-string pkg-string vers)
                              rel-string ...)
                       
submod-path-element = id
                    | ".."
                       
id-maybe-renamed    = id
                    | [orig-id bind-id]
                       
phase-level         = exact-integer
                    | #f
                       
vers                = 
                    | nat
                    | nat minor-vers
                       
minor-vers          = nat
                    | (nat nat)
                    | (= nat)
                    | (+ nat)
                    | (- nat)

module-path
syntax
(only-in require-spec id-maybe-renamed ...)
syntax
(except-in require-spec id ...)
syntax
(prefix-in prefix-id require-spec)
syntax
(rename-in require-spec [orig-id bind-id] ...)
syntax
(combine-in require-spec ...)
syntax
(relative-in module-path require-spec ...)
syntax
(only-meta-in phase-level require-spec ...)

(for-meta phase-level require-spec ...)

(for-syntax require-spec ...)

(for-template require-spec ...)

(for-label require-spec ...)

derived-require-spec

(quote id)

rel-string
syntax
(lib rel-string ...+)

id
syntax
(file string)
syntax
(planet id)
(planet string)
(planet rel-string (user-string pkg-string vers)
        rel-string ...)
syntax
(submod root-module submod-path-element ...)
(submod "." submod-path-element ...)
(submod ".." submod-path-element ...)
syntax
(local-require require-spec ...)
syntax
(provide provide-spec ...)
 
provide-spec = id
             | (all-defined-out)
             | (all-from-out module-path ...)
             | (rename-out [orig-id export-id] ...)
             | (except-out provide-spec provide-spec ...)
             | (prefix-out prefix-id provide-spec)
             | (struct-out id)
             | (combine-out provide-spec ...)
             | (protect-out provide-spec ...)
             | (for-meta phase-level provide-spec ...)
             | (for-syntax provide-spec ...)
             | (for-template provide-spec ...)
             | (for-label provide-spec ...)
             | derived-provide-spec
                
phase-level  = exact-integer
             | #f

id
syntax
(all-defined-out)
syntax
(all-from-out module-path ...)
syntax
(rename-out [orig-id export-id] ...)
syntax
(except-out provide-spec provide-spec ...)
syntax
(prefix-out prefix-id provide-spec)
syntax
(struct-out id)
syntax
(combine-out provide-spec ...)
syntax
(protect-out provide-spec ...)

(for-meta phase-level provide-spec ...)

(for-syntax provide-spec ...)

(for-template provide-spec ...)

(for-label provide-spec ...)

derived-provide-spec
syntax
(for-meta phase-level require-spec ...)
syntax
(for-syntax require-spec ...)
syntax
(for-template require-spec ...)
syntax
(for-label require-spec ...)
syntax
(#%require raw-require-spec ...)
 
raw-require-spec     = phaseless-spec
                     | (for-meta phase-level phaseless-spec ...)
                     | (for-syntax phaseless-spec ...)
                     | (for-template phaseless-spec ...)
                     | (for-label phaseless-spec ...)
                     | (just-meta phase-level raw-require-spec ...)
                        
phase-level          = exact-integer
                     | #f
                        
phaseless-spec       = raw-module-path
                     | (only raw-module-path id ...)
                     | (prefix prefix-id raw-module-path)
                     | (all-except raw-module-path id ...)
                     | (prefix-all-except prefix-id
                                          raw-module-path id ...)
                     | (rename raw-module-path local-id exported-id)
                        
raw-module-path      = raw-root-module-path
                     | (submod raw-root-module-path id ...+)
                     | (submod "." id ...+)
                        
raw-root-module-path = (quote id)
                     | rel-string
                     | (lib rel-string ...)
                     | id
                     | (file string)
                     | (planet rel-string
                               (user-string pkg-string vers ...))
                     | literal-path
syntax
(#%provide raw-provide-spec ...)
 
raw-provide-spec = phaseless-spec
                 | (for-meta phase-level phaseless-spec)
                 | (for-syntax phaseless-spec)
                 | (for-label phaseless-spec)
                 | (protect raw-provide-spec)
                    
phase-level      = exact-integer
                 | #f
                    
phaseless-spec   = id
                 | (rename local-id export-id)
                 | (struct struct-id (field-id ...))
                 | (all-from raw-module-path)
                 | (all-from-except raw-module-path id ...)
                 | (all-defined)
                 | (all-defined-except id ...)
                 | (prefix-all-defined prefix-id)
                 | (prefix-all-defined-except prefix-id id ...)
                 | (protect phaseless-spec ...)
                 | (expand (id . datum))
syntax
(matching-identifiers-in regexp require-spec)
syntax
(subtract-in require-spec subtracted-spec ...)
syntax
(filtered-in proc-expr require-spec)
syntax
(path-up rel-string ...)
syntax
(multi-in subs ...+)
 
subs     = sub-path
         | (sub-path ...)
            
sub-path = rel-string
         | id
syntax
(matching-identifiers-out regexp provide-spec)
syntax
(filtered-out proc-expr provide-spec)
syntax
(quote datum)
syntax
(#%datum . datum)
syntax
(#%expression expr)
syntax
id
syntax
(#%top . id)
syntax
(#%variable-reference id)
(#%variable-reference (#%top . id))
(#%variable-reference)
syntax
(proc-expr arg ...)
syntax
(#%app proc-expr arg ...)

arg-expr

keyword arg-expr
syntax
(#%plain-app proc-expr arg-expr ...)
(#%plain-app)
syntax
(lambda kw-formals body ...+)
syntax
(λ kw-formals body ...+)
 
kw-formals = (arg ...)
           | (arg ...+ . rest-id)
           | rest-id
              
arg        = id
           | [id default-expr]
           | keyword id
           | keyword [id default-expr]

(id ...)

(id ...+ . rest-id)

rest-id

(arg ...)

id

[id default-expr]

keyword id

keyword [id default-expr]

(arg ...+ . rest-id)
syntax
(case-lambda [formals body ...+] ...)
 
formals = (id ...)
        | (id ...+ . rest-id)
        | rest-id
syntax
(#%plain-lambda formals body ...+)
syntax
(let ([id val-expr] ...) body ...+)
(let proc-id ([id init-expr] ...) body ...+)
syntax
(let* ([id val-expr] ...) body ...+)
syntax
(letrec ([id val-expr] ...) body ...+)
syntax
(let-values ([(id ...) val-expr] ...) body ...+)
syntax
(let*-values ([(id ...) val-expr] ...) body ...+)
syntax
(letrec-values ([(id ...) val-expr] ...) body ...+)
syntax
(let-syntax ([id trans-expr] ...) body ...+)
syntax
(letrec-syntax ([id trans-expr] ...) body ...+)
syntax
(let-syntaxes ([(id ...) trans-expr] ...) body ...+)
syntax
(letrec-syntaxes ([(id ...) trans-expr] ...) body ...+)
syntax
(letrec-syntaxes+values ([(trans-id ...) trans-expr] ...)
                        ([(val-id ...) val-expr] ...)
   body ...+)
syntax
(local [definition ...] body ...+)
syntax
(shared ([id expr] ...) body ...+)
syntax
(if test-expr then-expr else-expr)
syntax
(cond cond-clause ...)
 
cond-clause = [test-expr then-body ...+]
            | [else then-body ...+]
            | [test-expr => proc-expr]
            | [test-expr]

[test-expr then-body ...+]

[test-expr => proc-expr]

[test-expr]
syntax
else
syntax
=>
syntax
(and expr ...)
syntax
(or expr ...)
syntax
(case val-expr case-clause ...)
 
case-clause = [(datum ...) then-body ...+]
            | [else then-body ...+]
syntax
(define id expr)
(define (head args) body ...+)
 
head = id
     | (head args)
        
args = arg ...
     | arg ... . rest-id
        
arg  = arg-id
     | [arg-id default-expr]
     | keyword arg-id
     | keyword [arg-id default-expr]
syntax
(define-values (id ...) expr)
syntax
(define-syntax id expr)
(define-syntax (head args) body ...+)
syntax
(define-syntaxes (id ...) expr)
syntax
(define-for-syntax id expr)
(define-for-syntax (head args) body ...+)
syntax
(define-values-for-syntax (id ...) expr)
syntax
(define-require-syntax id proc-expr)
(define-require-syntax (id args ...) body ...+)
syntax
(define-provide-syntax id proc-expr)
(define-provide-syntax (id args ...) body ...+)
syntax
(begin form ...)
(begin expr ...+)
syntax
(begin0 expr body ...+)
syntax
(begin-for-syntax form ...)
syntax
(when test-expr body ...+)
syntax
(unless test-expr body ...+)
syntax
(set! id expr)
syntax
(set!-values (id ...) expr)
syntax
(for (for-clause ...) body-or-break ... body)
 
for-clause    = [id seq-expr]
              | [(id ...) seq-expr]
              | #:when guard-expr
              | #:unless guard-expr
              | break-clause
                 
break-clause  = #:break guard-expr
              | #:final guard-expr
                 
body-or-break = body
              | bleak-clause
 
  seq-expr : sequence?
syntax
(for/list (for-clause ...) body-or-break ... body)
syntax
(for/vector maybe-length (for-clause ...) body-or-break ... body)
 
maybe-length = 
             | #:length length-expr
             | #:length length-expr #:fill fill-expr
 
  length-expr : exact-nonnegative-integer?
syntax
(for/hash (for-clause ...) body-or-break ... body)
syntax
(for/hasheq (for-clause ...) body-or-break ... body)
syntax
(for/hasheqv (for-clause ...) body-or-break ... body)
syntax
(for/and (for-clause ...) body-or-break ... body)
syntax
(for/or (for-clause ...) body-or-break ... body)
syntax
(for/sum (for-clause ...) body-or-break ... body)
syntax
(for/product (for-clause ...) body-or-break ... body)
syntax
(for/lists (id ...) (for-clause ...) body-or-break ... body)
syntax
(for/first (for-clause ...) body-or-break ... body)
syntax
(for/last (for-clause ...) body-or-break ... body)
syntax
(for/fold ([accum-id init-expr] ...) (for-clause ...)
  body-or-break ... body)
syntax
(for* (for-clause ...) body-or-break ... body)
syntax
(for*/list (for-clause ...) body-or-break ... body)
syntax
(for*/lists (id ...) (for-clause ...) body-or-break ... body)
syntax
(for*/vector maybe-length (for-clause ...) body-or-break ... body)
syntax
(for*/hash (for-clause ...) body-or-break ... body)
syntax
(for*/hasheq (for-clause ...) body-or-break ... body)
syntax
(for*/hasheqv (for-clause ...) body-or-break ... body)
syntax
(for*/and (for-clause ...) body-or-break ... body)
syntax
(for*/or (for-clause ...) body-or-break ... body)
syntax
(for*/sum (for-clause ...) body-or-break ... body)
syntax
(for*/product (for-clause ...) body-or-break ... body)
syntax
(for*/first (for-clause ...) body-or-break ... body)
syntax
(for*/last (for-clause ...) body-or-break ... body)
syntax
(for*/fold ([accum-id init-expr] ...) (for-clause ...)
  body-or-break ... body)
syntax
(for/fold/derived orig-datum
  ([accum-id init-expr] ...) (for-clause ...)
  body-or-break ... body)
syntax
(for*/fold/derived orig-datum
  ([accum-id init-expr] ...) (for-clause ...)
  body-or-break ... body)
syntax
(define-sequence-syntax id
  expr-transform-expr
  clause-transform-expr)
 
  expr-transform-expr : (or/c (-> identifier?)
                              (syntax? . -> . syntax?))
  clause-transform-expr : (syntax? . -> . syntax?)
syntax
(:do-in ([(outer-id ...) outer-expr] ...)
        outer-check
        ([loop-id loop-expr] ...)
        pos-guard
        ([(inner-id ...) inner-expr] ...)
        pre-guard
        post-guard
        (loop-arg ...))
procedure
(for-clause-syntax-protect stx) -> syntax?
  stx : syntax?
syntax
(do ([id init-expr step-expr-maybe] ...)
    (stop?-expr finish-expr ...)
  expr ...)
 
step-expr-maybe = 
                | step-expr
syntax
(with-continuation-mark key-expr val-expr result-expr)
syntax
(quasiquote datum)
syntax
unquote
syntax
unquote-splicing
syntax
(quote-syntax datum)
syntax
(#%top-interaction . form)
syntax
(block defn-or-expr ...)
syntax
(#%stratified-body defn-or-expr ...)
syntax
(begin-encourage-inline form ...)
procedure
(boolean? v) -> boolean?
  v : any/c
procedure
(not v) -> boolean?
  v : any/c
procedure
(equal? v1 v2) -> boolean?
  v1 : any/c
  v2 : any/c
procedure
(eqv? v1 v2) -> boolean?
  v1 : any/c
  v2 : any/c
procedure
(eq? v1 v2) -> boolean?
  v1 : any/c
  v2 : any/c
procedure
(equal?/recur v1 v2 recur-proc) -> boolean?
  v1 : any/c
  v2 : any/c
  recur-proc : (any/c any/c -> any/c)
procedure
(immutable? v) -> boolean?
  v : any/c
value
gen:equal+hash : any/c
value
prop:equal+hash : struct-type-property?
value
true : boolean?
value
false : boolean?
procedure
(symbol=? a b) -> boolean?
  a : symbol?
  b : symbol?
procedure
(boolean=? a b) -> boolean?
  a : boolean?
  b : boolean?
procedure
(false? v) -> boolean?
  v : any/c
syntax
(nand expr ...)
syntax
(nor expr ...)
syntax
(implies expr1 expr2)
procedure
(xor b1 b2) -> any
  b1 : any/c
  b2 : any/c
procedure
(number? v) -> boolean?
  v : any/c
procedure
(complex? v) -> boolean?
  v : any/c
procedure
(real? v) -> boolean?
  v : any/c
procedure
(rational? v) -> boolean?
  v : any/c
procedure
(integer? v) -> boolean?
  v : any/c
procedure
(exact-integer? v) -> boolean?
  v : any/c
procedure
(exact-nonnegative-integer? v) -> boolean?
  v : any/c
procedure
(exact-positive-integer? v) -> boolean?
  v : any/c
procedure
(inexact-real? v) -> boolean?
  v : any/c
procedure
(fixnum? v) -> boolean?
  v : any/c
procedure
(flonum? v) -> boolean?
  v : any/c
procedure
(double-flonum? v) -> boolean?
  v : any/c
procedure
(single-flonum? v) -> boolean?
  v : any/c
procedure
(zero? z) -> boolean?
  z : number?
procedure
(positive? x) -> boolean?
  x : real?
procedure
(negative? x) -> boolean?
  x : real?
procedure
(even? n) -> boolean?
  n : integer?
procedure
(odd? n) -> boolean?
  n : integer?
procedure
(exact? z) -> boolean?
  z : number?
procedure
(inexact? z) -> boolean?
  z : number?
procedure
(inexact->exact z) -> exact?
  z : number?
procedure
(exact->inexact z) -> inexact?
  z : number?
procedure
(real->single-flonum x) -> single-flonum?
  x : real?
procedure
(real->double-flonum x) -> flonum?
  x : real?
procedure
(+ z ...) -> number?
  z : number?
procedure
(- z) -> number?
  z : number?
(- z w ...+) -> number?
  z : number?
  w : number?
procedure
(* z ...) -> number?
  z : number?
procedure
(/ z) -> number?
  z : number?
(/ z w ...+) -> number?
  z : number?
  w : number?
procedure
(quotient n m) -> integer?
  n : integer?
  m : integer?
procedure
(remainder n m) -> integer?
  n : integer?
  m : integer?
procedure
(quotient/remainder n m) -> integer? integer?
  n : integer?
  m : integer?
procedure
(modulo n m) -> integer?
  n : integer?
  m : integer?
procedure
(add1 z) -> number?
  z : number?
procedure
(sub1 z) -> number?
  z : number?
procedure
(abs x) -> number?
  x : real?
procedure
(max x ...+) -> real?
  x : real?
procedure
(min x ...+) -> real?
  x : real?
procedure
(gcd n ...) -> rational?
  n : rational?
procedure
(lcm n ...) -> rational?
  n : rational?
procedure
(round x) -> (or/c integer? +inf.0 -inf.0 +nan.0)
  x : real?
procedure
(floor x) -> (or/c integer? +inf.0 -inf.0 +nan.0)
  x : real?
procedure
(ceiling x) -> (or/c integer? +inf.0 -inf.0 +nan.0)
  x : real?
procedure
(truncate x) -> (or/c integer? +inf.0 -inf.0 +nan.0)
  x : real?
procedure
(numerator q) -> integer?
  q : rational?
procedure
(denominator q) -> integer?
  q : rational?
procedure
(rationalize x tolerance) -> real?
  x : real?
  tolerance : real?
procedure
(= z w ...+) -> boolean?
  z : number?
  w : number?
procedure
(< x y ...+) -> boolean?
  x : real?
  y : real?
procedure
(<= x y ...+) -> boolean?
  x : real?
  y : real?
procedure
(> x y ...+) -> boolean?
  x : real?
  y : real?
procedure
(>= x y ...+) -> boolean?
  x : real?
  y : real?
procedure
(sqrt z) -> number?
  z : number?
procedure
(integer-sqrt n) -> complex?
  n : integer?
procedure
(integer-sqrt/remainder n) -> complex? integer?
  n : integer?
procedure
(expt z w) -> number?
  z : number?
  w : number?
procedure
(exp z) -> number?
  z : number?
procedure
(log z) -> number?
  z : number?
procedure
(sin z) -> number?
  z : number?
procedure
(cos z) -> number?
  z : number?
procedure
(tan z) -> number?
  z : number?
procedure
(asin z) -> number?
  z : number?
procedure
(acos z) -> number?
  z : number?
procedure
(atan z) -> number?
  z : number?
(atan y x) -> number?
  y : real?
  x : real?
procedure
(make-rectangular x y) -> number?
  x : real?
  y : real?
procedure
(make-polar magnitude angle) -> number?
  magnitude : real?
  angle : real?
procedure
(real-part z) -> real?
  z : number?
procedure
(imag-part z) -> real?
  z : number?
procedure
(magnitude z) -> (and/c real? (not/c negative?))
  z : number?
procedure
(angle z) -> real?
  z : number?
procedure
(bitwise-ior n ...) -> exact-integer?
  n : exact-integer?
procedure
(bitwise-and n ...) -> exact-integer?
  n : exact-integer?
procedure
(bitwise-xor n ...) -> exact-integer?
  n : exact-integer?
procedure
(bitwise-not n) -> exact-integer?
  n : exact-integer?
procedure
(bitwise-bit-set? n m) -> boolean?
  n : exact-integer?
  m : exact-nonnegative-integer?
procedure
(bitwise-bit-field n start end) -> exact-integer?
  n : exact-integer?
  start : exact-nonnegative-integer?
  end : (and/c exact-nonnegative-integer?
               (start . <= . end))
procedure
(arithmetic-shift n m) -> exact-integer?
  n : exact-integer?
  m : exact-integer?
procedure
(integer-length n) -> exact-integer?
  n : exact-integer?
procedure
(random k [generator]) -> exact-nonnegative-integer?
  k : (integer-in 1 4294967087)
  generator : pseudo-random-generator?
            = (current-pseudo-random-generator)
(random [generator]) -> (and/c real? inexact? (>/c 0) (</c 1))
  generator : pseudo-random-generator?
            = (current-pseudo-random-generator)
procedure
(random-seed k) -> void?
  k : (integer-in 1 (sub1 (expt 2 31)))
procedure
(make-pseudo-random-generator) -> pseudo-random-generator?
procedure
(pseudo-random-generator? v) -> boolean?
  v : any/c
parameter
(current-pseudo-random-generator) -> pseudo-random-generator?
(current-pseudo-random-generator generator) -> void?
  generator : pseudo-random-generator?
procedure
(pseudo-random-generator->vector generator)
 -> pseudo-random-generator-vector?
  generator : pseudo-random-generator?
procedure
(vector->pseudo-random-generator vec)
 -> pseudo-random-generator?
  vec : pseudo-random-generator-vector?
procedure
(vector->pseudo-random-generator! generator     
                                  vec)      -> void?
  generator : pseudo-random-generator?
  vec : pseudo-random-generator-vector?
procedure
(pseudo-random-generator-vector? v) -> boolean?
  v : any/c
procedure
(number->string z [radix]) -> string?
  z : number?
  radix : (or/c 2 8 10 16) = 10
procedure
(string->number s [radix]) -> (or/c number? #f)
  s : string?
  radix : (integer-in 2 16) = 10
procedure
(real->decimal-string n [decimal-digits]) -> string?
  n : real?
  decimal-digits : exact-nonnegative-integer? = 2
procedure
(integer-bytes->integer  bstr            
                         signed?         
                        [big-endian?     
                         start           
                         end])       -> exact-integer?
  bstr : bytes?
  signed? : any/c
  big-endian? : any/c = (system-big-endian?)
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(integer->integer-bytes  n               
                         size-n          
                         signed?         
                        [big-endian?     
                         dest-bstr       
                         start])     -> bytes?
  n : exact-integer?
  size-n : (or/c 2 4 8)
  signed? : any/c
  big-endian? : any/c = (system-big-endian?)
  dest-bstr : (and/c bytes? (not/c immutable?))
            = (make-bytes size-n)
  start : exact-nonnegative-integer? = 0
procedure
(floating-point-bytes->real  bstr            
                            [big-endian?     
                             start           
                             end])       -> flonum?
  bstr : bytes?
  big-endian? : any/c = (system-big-endian?)
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(real->floating-point-bytes  x               
                             size-n          
                            [big-endian?     
                             dest-bstr       
                             start])     -> bytes?
  x : real?
  size-n : (or/c 4 8)
  big-endian? : any/c = (system-big-endian?)
  dest-bstr : (and/c bytes? (not/c immutable?))
            = (make-bytes size-n)
  start : exact-nonnegative-integer? = 0
procedure
(system-big-endian?) -> boolean?
value
pi : flonum?
value
pi.f : single-flonum?
procedure
(degrees->radians x) -> real?
  x : real?
procedure
(radians->degrees x) -> real?
  x : real?
procedure
(sqr z) -> number?
  z : number?
procedure
(sgn x) -> (or/c 1 0 -1 1.0 0.0 -1.0)
  x : real?
procedure
(conjugate z) -> number?
  z : number?
procedure
(sinh z) -> number?
  z : number?
procedure
(cosh z) -> number?
  z : number?
procedure
(tanh z) -> number?
  z : number?
procedure
(exact-round x) -> exact-integer?
  x : rational?
procedure
(exact-floor x) -> exact-integer?
  x : rational?
procedure
(exact-ceiling x) -> exact-integer?
  x : rational?
procedure
(exact-truncate x) -> exact-integer?
  x : rational?
procedure
(order-of-magnitude r) -> (and/c exact? integer?)
  r : (and/c real? positive?)
procedure
(nan? x) -> boolean?
  x : real?
procedure
(infinite? x) -> boolean?
  x : real?
procedure
(fl+ a b) -> flonum?
  a : flonum?
  b : flonum?
procedure
(fl- a b) -> flonum?
  a : flonum?
  b : flonum?
procedure
(fl* a b) -> flonum?
  a : flonum?
  b : flonum?
procedure
(fl/ a b) -> flonum?
  a : flonum?
  b : flonum?
procedure
(flabs a) -> flonum?
  a : flonum?
procedure
(fl= a b) -> boolean?
  a : flonum?
  b : flonum?
procedure
(fl< a b) -> boolean?
  a : flonum?
  b : flonum?
procedure
(fl> a b) -> boolean?
  a : flonum?
  b : flonum?
procedure
(fl<= a b) -> boolean?
  a : flonum?
  b : flonum?
procedure
(fl>= a b) -> boolean?
  a : flonum?
  b : flonum?
procedure
(flmin a b) -> flonum?
  a : flonum?
  b : flonum?
procedure
(flmax a b) -> flonum?
  a : flonum?
  b : flonum?
procedure
(flround a) -> flonum?
  a : flonum?
procedure
(flfloor a) -> flonum?
  a : flonum?
procedure
(flceiling a) -> flonum?
  a : flonum?
procedure
(fltruncate a) -> flonum?
  a : flonum?
procedure
(flsin a) -> flonum?
  a : flonum?
procedure
(flcos a) -> flonum?
  a : flonum?
procedure
(fltan a) -> flonum?
  a : flonum?
procedure
(flasin a) -> flonum?
  a : flonum?
procedure
(flacos a) -> flonum?
  a : flonum?
procedure
(flatan a) -> flonum?
  a : flonum?
procedure
(fllog a) -> flonum?
  a : flonum?
procedure
(flexp a) -> flonum?
  a : flonum?
procedure
(flsqrt a) -> flonum?
  a : flonum?
procedure
(flexpt a b) -> flonum?
  a : flonum?
  b : flonum?
procedure
(->fl a) -> flonum?
  a : exact-integer?
procedure
(fl->exact-integer a) -> exact-integer?
  a : flonum?
procedure
(make-flrectangular a b)
 -> (and/c complex? inexact? (not/c real?))
  a : flonum?
  b : flonum?
procedure
(flreal-part a) -> flonum?
  a : (and/c complex? inexact? (not/c real?))
procedure
(flimag-part a) -> flonum?
  a : (and/c complex? inexact? (not/c real?))
procedure
(flvector? v) -> boolean?
  v : any/c
procedure
(flvector x ...) -> flvector?
  x : flonum?
procedure
(make-flvector size [x]) -> flvector?
  size : exact-nonnegative-integer?
  x : flonum? = 0.0
procedure
(flvector-length vec) -> exact-nonnegative-integer?
  vec : flvector?
procedure
(flvector-ref vec pos) -> flonum?
  vec : flvector?
  pos : exact-nonnegative-integer?
procedure
(flvector-set! vec pos x) -> flonum?
  vec : flvector?
  pos : exact-nonnegative-integer?
  x : flonum?
procedure
(flvector-copy vec [start end]) -> flvector?
  vec : flvector?
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (vector-length v)
procedure
(in-flvector vec [start stop step]) -> sequence?
  vec : flvector?
  start : exact-nonnegative-integer? = 0
  stop : (or/c exact-integer? #f) = #f
  step : (and/c exact-integer? (not/c zero?)) = 1
syntax
(for/flvector maybe-length (for-clause ...) body ...)
syntax
(for*/flvector maybe-length (for-clause ...) body ...)
 
maybe-length = 
             | #:length length-expr
             | #:length length-expr #:fill fill-expr
 
  length-expr : exact-nonnegative-integer?
  fill-expr : flonum?
procedure
(shared-flvector x ...) -> flvector?
  x : flonum?
procedure
(make-shared-flvector size [x]) -> flvector?
  size : exact-nonnegative-integer?
  x : flonum? = 0.0
procedure
(fx+ a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fx- a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fx* a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fxquotient a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fxremainder a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fxmodulo a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fxabs a) -> fixnum?
  a : fixnum?
procedure
(fxand a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fxior a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fxxor a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fxnot a) -> fixnum?
  a : fixnum?
procedure
(fxlshift a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fxrshift a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fx= a b) -> boolean?
  a : fixnum?
  b : fixnum?
procedure
(fx< a b) -> boolean?
  a : fixnum?
  b : fixnum?
procedure
(fx> a b) -> boolean?
  a : fixnum?
  b : fixnum?
procedure
(fx<= a b) -> boolean?
  a : fixnum?
  b : fixnum?
procedure
(fx>= a b) -> boolean?
  a : fixnum?
  b : fixnum?
procedure
(fxmin a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fxmax a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fx->fl a) -> flonum?
  a : fixnum?
procedure
(fl->fx a) -> fixnum?
  a : flonum?
procedure
(fxvector? v) -> boolean?
  v : any/c
procedure
(fxvector x ...) -> fxvector?
  x : fixnum?
procedure
(make-fxvector size [x]) -> fxvector?
  size : exact-nonnegative-integer?
  x : fixnum? = 0
procedure
(fxvector-length vec) -> exact-nonnegative-integer?
  vec : fxvector?
procedure
(fxvector-ref vec pos) -> fixnum?
  vec : fxvector?
  pos : exact-nonnegative-integer?
procedure
(fxvector-set! vec pos x) -> fixnum?
  vec : fxvector?
  pos : exact-nonnegative-integer?
  x : fixnum?
procedure
(fxvector-copy vec [start end]) -> fxvector?
  vec : fxvector?
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (vector-length v)
procedure
(in-fxvector vec [start stop step]) -> sequence?
  vec : fxvector?
  start : exact-nonnegative-integer? = 0
  stop : (or/c exact-integer? #f) = #f
  step : (and/c exact-integer? (not/c zero?)) = 1
syntax
(for/fxvector maybe-length (for-clause ...) body ...)
syntax
(for*/fxvector maybe-length (for-clause ...) body ...)
 
maybe-length = 
             | #:length length-expr
             | #:length length-expr #:fill fill-expr
 
  length-expr : exact-nonnegative-integer?
  fill-expr : fixnum?
procedure
(shared-fxvector x ...) -> fxvector?
  x : fixnum?
procedure
(make-shared-fxvector size [x]) -> fxvector?
  size : exact-nonnegative-integer?
  x : fixnum? = 0
procedure
(string? v) -> boolean?
  v : any/c
procedure
(make-string k [char]) -> string?
  k : exact-nonnegative-integer?
  char : char? = #\nul
procedure
(string char ...) -> string?
  char : char?
procedure
(string->immutable-string str) -> (and/c string? immutable?)
  str : string?
procedure
(string-length str) -> exact-nonnegative-integer?
  str : string?
procedure
(string-ref str k) -> char?
  str : string?
  k : exact-nonnegative-integer?
procedure
(string-set! str k char) -> void?
  str : (and/c string? (not/c immutable?))
  k : exact-nonnegative-integer?
  char : char?
procedure
(substring str start [end]) -> string?
  str : string?
  start : exact-nonnegative-integer?
  end : exact-nonnegative-integer? = (string-length str)
procedure
(string-copy str) -> string?
  str : string?
procedure
(string-copy!  dest           
               dest-start     
               src            
              [src-start      
               src-end])  -> void?
  dest : (and/c string? (not/c immutable?))
  dest-start : exact-nonnegative-integer?
  src : string?
  src-start : exact-nonnegative-integer? = 0
  src-end : exact-nonnegative-integer? = (string-length src)
procedure
(string-fill! dest char) -> void?
  dest : (and/c string? (not/c immutable?))
  char : char?
procedure
(string-append str ...) -> string?
  str : string?
procedure
(string->list str) -> (listof char?)
  str : string?
procedure
(list->string lst) -> string?
  lst : (listof char?)
procedure
(build-string n proc) -> string?
  n : exact-nonnegative-integer?
  proc : (exact-nonnegative-integer? . -> . char?)
procedure
(string=? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string<? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string<=? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string>? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string>=? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string-ci=? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string-ci<? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string-ci<=? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string-ci>? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string-ci>=? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string-upcase str) -> string?
  str : string?
procedure
(string-downcase string) -> string?
  string : string?
procedure
(string-titlecase string) -> string?
  string : string?
procedure
(string-foldcase string) -> string?
  string : string?
procedure
(string-normalize-nfd string) -> string?
  string : string?
procedure
(string-normalize-nfkd string) -> string?
  string : string?
procedure
(string-normalize-nfc string) -> string?
  string : string?
procedure
(string-normalize-nfkc string) -> string?
  string : string?
procedure
(string-locale=? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string-locale<? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string-locale>? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string-locale-ci=? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string-locale-ci<? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string-locale-ci>? str1 str2 ...+) -> boolean?
  str1 : string?
  str2 : string?
procedure
(string-locale-upcase string) -> string?
  string : string?
procedure
(string-locale-downcase string) -> string?
  string : string?
procedure
(string-append* str ... strs) -> string?
  str : string?
  strs : (listof string?)
procedure
(string-join  strs                            
             [sep                             
              #:before-first before-first     
              #:before-last before-last       
              #:after-last after-last])   -> string?
  strs : (listof string?)
  sep : string? = " "
  before-first : string? = ""
  before-last : string? = sep
  after-last : string? = ""
procedure
(string-normalize-spaces  str                     
                         [sep                     
                          space                   
                          #:trim? trim?           
                          #:repeat? repeat?]) -> string?
  str : string?
  sep : (or/c string? regexp?) = #px"\\s+"
  space : string? = " "
  trim? : any/c = #t
  repeat? : any/c = #f
procedure
(string-replace str from to [#:all all?]) -> string?
  str : string?
  from : (or/c string? regexp?)
  to : string?
  all? : any/c = #t
procedure
(string-split  str                     
              [sep                     
               #:trim? trim?           
               #:repeat? repeat?]) -> (listof string?)
  str : string?
  sep : (or/c string? regexp?) = #px"\\s+"
  trim? : any/c = #t
  repeat? : any/c = #f
procedure
(string-trim  str                     
             [sep                     
              #:left? left?           
              #:right? right?         
              #:repeat? repeat?]) -> string?
  str : string?
  sep : (or/c string? regexp?) = #px"\\s+"
  left? : any/c = #t
  right? : any/c = #t
  repeat? : any/c = #f
procedure
(~a  v                                         
     ...                                       
    [#:separator separator                     
     #:width width                             
     #:max-width max-width                     
     #:min-width min-width                     
     #:limit-marker limit-marker               
     #:align align                             
     #:pad-string pad-string                   
     #:left-pad-string left-pad-string         
     #:right-pad-string right-pad-string]) -> string?
  v : any/c
  separator : string? = ""
  width : (or/c exact-nonnegative-integer? #f) = #f
  max-width : (or/c exact-nonnegative-integer? +inf.0)
            = (or width +inf.0)
  min-width : exact-nonnegative-integer? = (or width 0)
  limit-marker : string? = ""
  align : (or/c 'left 'center 'right) = 'left
  pad-string : non-empty-string? = " "
  left-pad-string : non-empty-string? = pad-string
  right-pad-string : non-empty-string? = pad-string
procedure
(~v  v                                         
     ...                                       
    [#:separator separator                     
     #:width width                             
     #:max-width max-width                     
     #:min-width min-width                     
     #:limit-marker limit-marker               
     #:align align                             
     #:pad-string pad-string                   
     #:left-pad-string left-pad-string         
     #:right-pad-string right-pad-string]) -> string?
  v : any/c
  separator : string? = " "
  width : (or/c exact-nonnegative-integer? #f) = #f
  max-width : (or/c exact-nonnegative-integer? +inf.0)
            = (or width +inf.0)
  min-width : exact-nonnegative-integer? = (or width 0)
  limit-marker : string? = "..."
  align : (or/c 'left 'center 'right) = 'left
  pad-string : non-empty-string? = " "
  left-pad-string : non-empty-string? = pad-string
  right-pad-string : non-empty-string? = pad-string
procedure
(~s  v                                         
     ...                                       
    [#:separator separator                     
     #:width width                             
     #:max-width max-width                     
     #:min-width min-width                     
     #:limit-marker limit-marker               
     #:align align                             
     #:pad-string pad-string                   
     #:left-pad-string left-pad-string         
     #:right-pad-string right-pad-string]) -> string?
  v : any/c
  separator : string? = " "
  width : (or/c exact-nonnegative-integer? #f) = #f
  max-width : (or/c exact-nonnegative-integer? +inf.0)
            = (or width +inf.0)
  min-width : exact-nonnegative-integer? = (or width 0)
  limit-marker : string? = "..."
  align : (or/c 'left 'center 'right) = 'left
  pad-string : non-empty-string? = " "
  left-pad-string : non-empty-string? = pad-string
  right-pad-string : non-empty-string? = pad-string
procedure
(~e  v                                         
     ...                                       
    [#:separator separator                     
     #:width width                             
     #:max-width max-width                     
     #:min-width min-width                     
     #:limit-marker limit-marker               
     #:align align                             
     #:pad-string pad-string                   
     #:left-pad-string left-pad-string         
     #:right-pad-string right-pad-string]) -> string?
  v : any/c
  separator : string? = " "
  width : (or/c exact-nonnegative-integer? #f) = #f
  max-width : (or/c exact-nonnegative-integer? +inf.0)
            = (or width +inf.0)
  min-width : exact-nonnegative-integer? = (or width 0)
  limit-marker : string? = "..."
  align : (or/c 'left 'center 'right) = 'left
  pad-string : non-empty-string? = " "
  left-pad-string : non-empty-string? = pad-string
  right-pad-string : non-empty-string? = pad-string
procedure
(~r  x                                     
    [#:sign sign                           
     #:base base                           
     #:precision precision                 
     #:notation notation                   
     #:format-exponent format-exponent     
     #:min-width min-width                 
     #:pad-string pad-string])         -> string?
  x : rational?
  sign : (or/c #f '+ '++ 'parens
               (let ([ind (or/c string? (list/c string? string?))])
                 (list/c ind ind ind)))
       = #f
  base : (or/c (integer-in 2 36) (list/c 'up (integer-in 2 36)))
       = 10
  precision : (or/c exact-nonnegative-integer?              = 3
                    (list/c '= exact-nonnegative-integer?))
  notation : (or/c 'positional 'exponential
                   (-> rational? (or/c 'positional 'exponential)))
           = 'positional
  format-exponent : (or/c #f string? (-> exact-integer? string?))
                  = #f
  min-width : exact-positive-integer? = 1
  pad-string : non-empty-string? = " "
procedure
(~.a  v                                         
      ...                                       
     [#:separator separator                     
      #:width width                             
      #:max-width max-width                     
      #:min-width min-width                     
      #:limit-marker limit-marker               
      #:align align                             
      #:pad-string pad-string                   
      #:left-pad-string left-pad-string         
      #:right-pad-string right-pad-string]) -> string?
  v : any/c
  separator : string? = ""
  width : (or/c exact-nonnegative-integer? #f) = #f
  max-width : (or/c exact-nonnegative-integer? +inf.0)
            = (or width +inf.0)
  min-width : exact-nonnegative-integer? = (or width 0)
  limit-marker : string? = ""
  align : (or/c 'left 'center 'right) = 'left
  pad-string : non-empty-string? = " "
  left-pad-string : non-empty-string? = pad-string
  right-pad-string : non-empty-string? = pad-string
procedure
(~.v  v                                         
      ...                                       
     [#:separator separator                     
      #:width width                             
      #:max-width max-width                     
      #:min-width min-width                     
      #:limit-marker limit-marker               
      #:align align                             
      #:pad-string pad-string                   
      #:left-pad-string left-pad-string         
      #:right-pad-string right-pad-string]) -> string?
  v : any/c
  separator : string? = " "
  width : (or/c exact-nonnegative-integer? #f) = #f
  max-width : (or/c exact-nonnegative-integer? +inf.0)
            = (or width +inf.0)
  min-width : exact-nonnegative-integer? = (or width 0)
  limit-marker : string? = "..."
  align : (or/c 'left 'center 'right) = 'left
  pad-string : non-empty-string? = " "
  left-pad-string : non-empty-string? = pad-string
  right-pad-string : non-empty-string? = pad-string
procedure
(~.s  v                                         
      ...                                       
     [#:separator separator                     
      #:width width                             
      #:max-width max-width                     
      #:min-width min-width                     
      #:limit-marker limit-marker               
      #:align align                             
      #:pad-string pad-string                   
      #:left-pad-string left-pad-string         
      #:right-pad-string right-pad-string]) -> string?
  v : any/c
  separator : string? = " "
  width : (or/c exact-nonnegative-integer? #f) = #f
  max-width : (or/c exact-nonnegative-integer? +inf.0)
            = (or width +inf.0)
  min-width : exact-nonnegative-integer? = (or width 0)
  limit-marker : string? = "..."
  align : (or/c 'left 'center 'right) = 'left
  pad-string : non-empty-string? = " "
  left-pad-string : non-empty-string? = pad-string
  right-pad-string : non-empty-string? = pad-string
procedure
(bytes? v) -> boolean?
  v : any/c
procedure
(make-bytes k [b]) -> bytes?
  k : exact-nonnegative-integer?
  b : byte? = 0
procedure
(bytes b ...) -> bytes?
  b : byte?
procedure
(bytes->immutable-bytes bstr) -> (and/c bytes? immutable?)
  bstr : bytes?
procedure
(byte? v) -> boolean?
  v : any/c
procedure
(bytes-length bstr) -> exact-nonnegative-integer?
  bstr : bytes?
procedure
(bytes-ref bstr k) -> byte?
  bstr : bytes?
  k : exact-nonnegative-integer?
procedure
(bytes-set! bstr k b) -> void?
  bstr : (and/c bytes? (not/c immutable?))
  k : exact-nonnegative-integer?
  b : byte?
procedure
(subbytes bstr start [end]) -> bytes?
  bstr : bytes?
  start : exact-nonnegative-integer?
  end : exact-nonnegative-integer? = (bytes-length str)
procedure
(bytes-copy bstr) -> bytes?
  bstr : bytes?
procedure
(bytes-copy!  dest           
              dest-start     
              src            
             [src-start      
              src-end])  -> void?
  dest : (and/c bytes? (not/c immutable?))
  dest-start : exact-nonnegative-integer?
  src : bytes?
  src-start : exact-nonnegative-integer? = 0
  src-end : exact-nonnegative-integer? = (bytes-length src)
procedure
(bytes-fill! dest b) -> void?
  dest : (and/c bytes? (not/c immutable?))
  b : byte?
procedure
(bytes-append bstr ...) -> bytes?
  bstr : bytes?
procedure
(bytes->list bstr) -> (listof byte?)
  bstr : bytes?
procedure
(list->bytes lst) -> bytes?
  lst : (listof byte?)
procedure
(make-shared-bytes k [b]) -> bytes?
  k : exact-nonnegative-integer?
  b : byte? = 0
procedure
(shared-bytes b ...) -> bytes?
  b : byte?
procedure
(bytes=? bstr1 bstr2 ...+) -> boolean?
  bstr1 : bytes?
  bstr2 : bytes?
procedure
(bytes<? bstr1 bstr2 ...+) -> boolean?
  bstr1 : bytes?
  bstr2 : bytes?
procedure
(bytes>? bstr1 bstr2 ...+) -> boolean?
  bstr1 : bytes?
  bstr2 : bytes?
procedure
(bytes->string/utf-8 bstr [err-char start end]) -> string?
  bstr : bytes?
  err-char : (or/c #f char?) = #f
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(bytes->string/locale  bstr         
                      [err-char     
                       start        
                       end])    -> string?
  bstr : bytes?
  err-char : (or/c #f char?) = #f
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(bytes->string/latin-1  bstr         
                       [err-char     
                        start        
                        end])    -> string?
  bstr : bytes?
  err-char : (or/c #f char?) = #f
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(string->bytes/utf-8 str [err-byte start end]) -> bytes?
  str : string?
  err-byte : (or/c #f byte?) = #f
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (string-length str)
procedure
(string->bytes/locale str [err-byte start end]) -> bytes?
  str : string?
  err-byte : (or/c #f byte?) = #f
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (string-length str)
procedure
(string->bytes/latin-1  str          
                       [err-byte     
                        start        
                        end])    -> bytes?
  str : string?
  err-byte : (or/c #f byte?) = #f
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (string-length str)
procedure
(string-utf-8-length str [start end]) -> exact-nonnegative-integer?
  str : string?
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (string-length str)
procedure
(bytes-utf-8-length bstr [err-char start end])
 -> exact-nonnegative-integer?
  bstr : bytes?
  err-char : (or/c #f char?) = #f
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(bytes-utf-8-ref bstr [skip err-char start end]) -> char?
  bstr : bytes?
  skip : exact-nonnegative-integer? = 0
  err-char : (or/c #f char?) = #f
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(bytes-utf-8-index  bstr         
                   [skip         
                    err-char     
                    start        
                    end])    -> exact-nonnegative-integer?
  bstr : bytes?
  skip : exact-nonnegative-integer? = 0
  err-char : (or/c #f char?) = #f
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(bytes-open-converter from-name to-name) -> bytes-converter?
  from-name : string?
  to-name : string?
procedure
(bytes-close-converter converter) -> void
  converter : bytes-converter?
procedure
(bytes-convert  converter      
                src-bstr       
               [src-start-pos  
                src-end-pos    
                dest-bstr      
                dest-start-pos 
                dest-end-pos]) 
 -> (or/c bytes? exact-nonnegative-integer?)
    exact-nonnegative-integer?
    (or/c 'complete 'continues 'aborts 'error)
  converter : bytes-converter?
  src-bstr : bytes?
  src-start-pos : exact-nonnegative-integer? = 0
  src-end-pos : exact-nonnegative-integer?
              = (bytes-length src-bstr)
  dest-bstr : (or/c bytes? #f) = #f
  dest-start-pos : exact-nonnegative-integer? = 0
  dest-end-pos : (or/c exact-nonnegative-integer? #f)
               = (and dest-bstr
                      (bytes-length dest-bstr))
procedure
(bytes-convert-end  converter      
                   [dest-bstr      
                    dest-start-pos 
                    dest-end-pos]) 
 -> (or/c bytes? exact-nonnegative-integer?)
    (or/c 'complete 'continues)
  converter : bytes-converter?
  dest-bstr : (or/c bytes? #f) = #f
  dest-start-pos : exact-nonnegative-integer? = 0
  dest-end-pos : (or/c exact-nonnegative-integer? #f)
               = (and dest-bstr
                      (bytes-length dest-bstr))
procedure
(bytes-converter? v) -> boolean?
  v : any/c
procedure
(locale-string-encoding) -> any
procedure
(bytes-append* str ... strs) -> bytes?
  str : bytes?
  strs : (listof bytes?)
procedure
(bytes-join strs sep) -> bytes?
  strs : (listof bytes?)
  sep : bytes?
procedure
(char? v) -> boolean?
  v : any/c
procedure
(char->integer char) -> exact-integer?
  char : char?
procedure
(integer->char k) -> char?
  k : (and/c exact-integer?
             (or/c (integer-in 0 55295)
                   (integer-in 57344 1114111)))
procedure
(char-utf-8-length char) -> (integer-in 1 6)
  char : char?
procedure
(char=? char1 char2 ...+) -> boolean?
  char1 : char?
  char2 : char?
procedure
(char<? char1 char2 ...+) -> boolean?
  char1 : char?
  char2 : char?
procedure
(char<=? char1 char2 ...+) -> boolean?
  char1 : char?
  char2 : char?
procedure
(char>? char1 char2 ...+) -> boolean?
  char1 : char?
  char2 : char?
procedure
(char>=? char1 char2 ...+) -> boolean?
  char1 : char?
  char2 : char?
procedure
(char-ci=? char1 char2 ...+) -> boolean?
  char1 : char?
  char2 : char?
procedure
(char-ci<? char1 char2 ...+) -> boolean?
  char1 : char?
  char2 : char?
procedure
(char-ci<=? char1 char2 ...+) -> boolean?
  char1 : char?
  char2 : char?
procedure
(char-ci>? char1 char2 ...+) -> boolean?
  char1 : char?
  char2 : char?
procedure
(char-ci>=? char1 char2 ...+) -> boolean?
  char1 : char?
  char2 : char?
procedure
(char-alphabetic? char) -> boolean?
  char : char?
procedure
(char-lower-case? char) -> boolean?
  char : char?
procedure
(char-upper-case? char) -> boolean?
  char : char?
procedure
(char-title-case? char) -> boolean?
  char : char?
procedure
(char-numeric? char) -> boolean?
  char : char?
procedure
(char-symbolic? char) -> boolean?
  char : char?
procedure
(char-punctuation? char) -> boolean?
  char : char?
procedure
(char-graphic? char) -> boolean?
  char : char?
procedure
(char-whitespace? char) -> boolean?
  char : char?
procedure
(char-blank? char) -> boolean?
  char : char?
procedure
(char-iso-control? char) -> boolean?
  char : char?
procedure
(char-general-category char) -> symbol?
  char : char?
procedure
(make-known-char-range-list)
 -> (listof (list/c exact-nonnegative-integer?
                    exact-nonnegative-integer?
                    boolean?))
procedure
(char-upcase char) -> char?
  char : char?
procedure
(char-downcase char) -> char?
  char : char?
procedure
(char-titlecase char) -> char?
  char : char?
procedure
(char-foldcase char) -> char?
  char : char?
procedure
(symbol? v) -> boolean?
  v : any/c
procedure
(symbol-interned? sym) -> boolean?
  sym : symbol?
procedure
(symbol-unreadable? sym) -> boolean?
  sym : symbol?
procedure
(symbol->string sym) -> string?
  sym : symbol?
procedure
(string->symbol str) -> symbol?
  str : string?
procedure
(string->uninterned-symbol str) -> symbol?
  str : string?
procedure
(string->unreadable-symbol str) -> symbol?
  str : string?
procedure
(gensym [base]) -> symbol?
  base : (or/c string? symbol?) = "g"
procedure
(regexp? v) -> boolean?
  v : any/c
procedure
(pregexp? v) -> boolean?
  v : any/c
procedure
(byte-regexp? v) -> boolean?
  v : any/c
procedure
(byte-pregexp? v) -> boolean?
  v : any/c
procedure
(regexp str) -> regexp?
  str : string?
procedure
(pregexp string) -> pregexp?
  string : string?
procedure
(byte-regexp bstr) -> byte-regexp?
  bstr : bytes?
procedure
(byte-pregexp bstr) -> byte-pregexp?
  bstr : bytes?
procedure
(regexp-quote str [case-sensitive?]) -> string?
  str : string?
  case-sensitive? : any/c = #t
(regexp-quote bstr [case-sensitive?]) -> bytes?
  bstr : bytes?
  case-sensitive? : any/c = #t
procedure
(regexp-max-lookbehind pattern) -> exact-nonnegative-integer?
  pattern : (or/c regexp? byte-regexp?)
procedure
(regexp-match  pattern        
               input          
              [start-pos      
               end-pos        
               output-port    
               input-prefix]) 
 -> (if (and (or (string? pattern) (regexp? pattern))
             (or (string? input) (path? input)))
        (or/c #f (cons/c string? (listof (or/c string? #f))))
        (or/c #f (cons/c bytes?  (listof (or/c bytes?  #f)))))
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : (or/c string? bytes? path? input-port?)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  output-port : (or/c output-port? #f) = #f
  input-prefix : bytes? = #""
procedure
(regexp-match*  pattern                     
                input                       
               [start-pos                   
                end-pos                     
                input-prefix                
                #:match-select match-select 
                #:gap-select? gap-select])  
 -> (if (and (or (string? pattern) (regexp? pattern))
             (or (string? input) (path? input)))
        (listof (or/c string? (listof (or/c #f string?))))
        (listof (or/c bytes? (listof (or/c #f bytes?)))))
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : (or/c string? bytes? path? input-port?)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  input-prefix : bytes? = #""
  match-select : (or/c (list? . -> . (or/c any/c list?)) = car
                       #f)
  gap-select : any/c = #f
procedure
(regexp-try-match  pattern        
                   input          
                  [start-pos      
                   end-pos        
                   output-port    
                   input-prefix]) 
 -> (if (and (or (string? pattern) (regexp? pattern))
             (string? input))
        (or/c #f (cons/c string? (listof (or/c string? #f))))
        (or/c #f (cons/c bytes?  (listof (or/c bytes?  #f)))))
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : input-port?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  output-port : (or/c output-port? #f) = #f
  input-prefix : bytes? = #""
procedure
(regexp-match-positions  pattern        
                         input          
                        [start-pos      
                         end-pos        
                         output-port    
                         input-prefix]) 
 -> (or/c (cons/c (cons/c exact-nonnegative-integer?
                          exact-nonnegative-integer?)
                  (listof (or/c (cons/c exact-nonnegative-integer?
                                        exact-nonnegative-integer?)
                                #f)))
          #f)
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : (or/c string? bytes? path? input-port?)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  output-port : (or/c output-port? #f) = #f
  input-prefix : bytes? = #""
procedure
(regexp-match-positions*  pattern                       
                          input                         
                         [start-pos                     
                          end-pos                       
                          input-prefix                  
                          #:match-select match-select]) 
 -> (or/c (listof (cons/c exact-nonnegative-integer?
                          exact-nonnegative-integer?))
          (listof (listof (or/c #f (cons/c exact-nonnegative-integer?
                                           exact-nonnegative-integer?)))))
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : (or/c string? bytes? path? input-port?)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  input-prefix : bytes? = #""
  match-select : (list? . -> . (or/c any/c list?)) = car
procedure
(regexp-match?  pattern            
                input              
               [start-pos          
                end-pos            
                output-port        
                input-prefix]) -> boolean?
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : (or/c string? bytes? path? input-port?)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  output-port : (or/c output-port? #f) = #f
  input-prefix : bytes? = #""
procedure
(regexp-match-exact? pattern input) -> boolean?
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : (or/c string? bytes? path?)
procedure
(regexp-match-peek  pattern        
                    input          
                   [start-pos      
                    end-pos        
                    progress       
                    input-prefix]) 
 -> (or/c (cons/c bytes? (listof (or/c bytes? #f)))
          #f)
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : input-port?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  progress : (or/c evt #f) = #f
  input-prefix : bytes? = #""
procedure
(regexp-match-peek-positions  pattern        
                              input          
                             [start-pos      
                              end-pos        
                              progress       
                              input-prefix]) 
 -> (or/c (cons/c (cons/c exact-nonnegative-integer?
                          exact-nonnegative-integer?)
                  (listof (or/c (cons/c exact-nonnegative-integer?
                                        exact-nonnegative-integer?)
                                #f)))
          #f)
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : input-port?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  progress : (or/c evt #f) = #f
  input-prefix : bytes? = #""
procedure
(regexp-match-peek-immediate  pattern        
                              input          
                             [start-pos      
                              end-pos        
                              progress       
                              input-prefix]) 
 -> (or/c (cons/c bytes? (listof (or/c bytes? #f)))
          #f)
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : input-port?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  progress : (or/c evt #f) = #f
  input-prefix : bytes? = #""
procedure
(regexp-match-peek-positions-immediate  pattern        
                                        input          
                                       [start-pos      
                                        end-pos        
                                        progress       
                                        input-prefix]) 
 -> (or/c (cons/c (cons/c exact-nonnegative-integer?
                          exact-nonnegative-integer?)
                  (listof (or/c (cons/c exact-nonnegative-integer?
                                        exact-nonnegative-integer?)
                                #f)))
          #f)
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : input-port?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  progress : (or/c evt #f) = #f
  input-prefix : bytes? = #""
procedure
(regexp-match-peek-positions*  pattern                       
                               input                         
                              [start-pos                     
                               end-pos                       
                               input-prefix                  
                               #:match-select match-select]) 
 -> (or/c (listof (cons/c exact-nonnegative-integer?
                          exact-nonnegative-integer?))
          (listof (listof (or/c #f (cons/c exact-nonnegative-integer?
                                           exact-nonnegative-integer?)))))
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : input-port?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  input-prefix : bytes? = #""
  match-select : (list? . -> . (or/c any/c list?)) = car
procedure
(regexp-match/end  pattern      
                   input        
                  [start-pos    
                   end-pos      
                   output-port  
                   input-prefix 
                   count])      
 -> (if (and (or (string? pattern) (regexp? pattern))
             (or/c (string? input) (path? input)))
        (or/c #f (cons/c string? (listof (or/c string? #f))))
        (or/c #f (cons/c bytes?  (listof (or/c bytes?  #f)))))
    (or/c #f bytes?)
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : (or/c string? bytes? path? input-port?)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  output-port : (or/c output-port? #f) = #f
  input-prefix : bytes? = #""
  count : nonnegative-exact-integer? = 1
procedure
(regexp-match-positions/end  pattern      
                             input        
                            [start-pos    
                             end-pos      
                             input-prefix 
                             count])      
 -> (listof (cons/c exact-nonnegative-integer?
                    exact-nonnegative-integer?))
    (or/c #f bytes?)
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : (or/c string? bytes? path? input-port?)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  input-prefix : bytes? = #""
  count : exact-nonnegative-integer? = 1
procedure
(regexp-match-peek-positions/end  pattern      
                                  input        
                                 [start-pos    
                                  end-pos      
                                  progress     
                                  input-prefix 
                                  count])      
 -> (or/c (cons/c (cons/c exact-nonnegative-integer?
                          exact-nonnegative-integer?)
                  (listof (or/c (cons/c exact-nonnegative-integer?
                                        exact-nonnegative-integer?)
                                #f)))
          #f)
    (or/c #f bytes?)
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : input-port?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  progress : (or/c evt #f) = #f
  input-prefix : bytes? = #""
  count : exact-nonnegative-integer? = 1
procedure
(regexp-match-peek-positions-immediate/end  pattern      
                                            input        
                                           [start-pos    
                                            end-pos      
                                            progress     
                                            input-prefix 
                                            count])      
 -> (or/c (cons/c (cons/c exact-nonnegative-integer?
                          exact-nonnegative-integer?)
                  (listof (or/c (cons/c exact-nonnegative-integer?
                                        exact-nonnegative-integer?)
                                #f)))
          #f)
    (or/c #f bytes?)
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : input-port?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  progress : (or/c evt #f) = #f
  input-prefix : bytes? = #""
  count : exact-nonnegative-integer? = 1
procedure
(regexp-split  pattern        
               input          
              [start-pos      
               end-pos        
               input-prefix]) 
 -> (if (and (or (string? pattern) (regexp? pattern))
             (string? input))
        (cons/c string? (listof string?))
        (cons/c bytes? (listof bytes?)))
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : (or/c string? bytes? input-port?)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  input-prefix : bytes? = #""
procedure
(regexp-replace  pattern        
                 input          
                 insert         
                [input-prefix]) 
 -> (if (and (or (string? pattern) (regexp? pattern))
             (string? input))
        string?
        bytes?)
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : (or/c string? bytes?)
  insert : (or/c string? bytes?
                 ((string?) () #:rest (listof string?) . ->* . string?)
                 ((bytes?) () #:rest (listof bytes?) . ->* . bytes?))
  input-prefix : bytes? = #""
procedure
(regexp-replace*  pattern            
                  input              
                  insert             
                 [start-pos          
                  end-pos            
                  input-prefix]) -> (or/c string? bytes?)
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  input : (or/c string? bytes?)
  insert : (or/c string? bytes?
                 ((string?) () #:rest (listof string?) . ->* . string?)
                 ((bytes?) () #:rest (listof bytes?) . ->* . bytes?))
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  input-prefix : bytes? = #""
procedure
(regexp-replaces input replacements) -> (or/c string? bytes?)
  input : (or/c string? bytes?)
  replacements : (listof
                  (list/c (or/c string? bytes? regexp? byte-regexp?)
                          (or/c string? bytes?
                              ((string?) () #:rest (listof string?) . ->* . string?)
                              ((bytes?) () #:rest (listof bytes?) . ->* . bytes?))))
procedure
(regexp-replace-quote str) -> string?
  str : string?
(regexp-replace-quote bstr) -> bytes?
  bstr : bytes?
procedure
(keyword? v) -> boolean?
  v : any/c
procedure
(keyword->string keyword) -> string?
  keyword : keyword?
procedure
(string->keyword str) -> keyword?
  str : string?
procedure
(keyword<? a-keyword b-keyword ...+) -> boolean?
  a-keyword : keyword?
  b-keyword : keyword?
procedure
(pair? v) -> boolean?
  v : any/c
procedure
(null? v) -> boolean?
  v : any/c
procedure
(cons a d) -> pair?
  a : any/c
  d : any/c
procedure
(car p) -> any/c
  p : pair?
procedure
(cdr p) -> any/c
  p : pair?
value
null : null?
procedure
(list? v) -> boolean?
  v : any/c
procedure
(list v ...) -> list?
  v : any/c
procedure
(list* v ... tail) -> any/c
  v : any/c
  tail : any/c
procedure
(build-list n proc) -> list?
  n : exact-nonnegative-integer?
  proc : (exact-nonnegative-integer? . -> . any)
procedure
(length lst) -> exact-nonnegative-integer?
  lst : list?
procedure
(list-ref lst pos) -> any/c
  lst : pair?
  pos : exact-nonnegative-integer?
procedure
(list-tail lst pos) -> any/c
  lst : any/c
  pos : exact-nonnegative-integer?
procedure
(append lst ...) -> list?
  lst : list?
(append lst ... v) -> any/c
  lst : list?
  v : any/c
procedure
(reverse lst) -> list?
  lst : list?
procedure
(map proc lst ...+) -> list?
  proc : procedure?
  lst : list?
procedure
(andmap proc lst ...+) -> any
  proc : procedure?
  lst : list?
procedure
(ormap proc lst ...+) -> any
  proc : procedure?
  lst : list?
procedure
(for-each proc lst ...+) -> void?
  proc : procedure?
  lst : list?
procedure
(foldl proc init lst ...+) -> any/c
  proc : procedure?
  init : any/c
  lst : list?
procedure
(foldr proc init lst ...+) -> any/c
  proc : procedure?
  init : any/c
  lst : list?
procedure
(filter pred lst) -> list?
  pred : procedure?
  lst : list?
procedure
(remove v lst [proc]) -> list?
  v : any/c
  lst : list?
  proc : procedure? = equal?
procedure
(remq v lst) -> list?
  v : any/c
  lst : list?
procedure
(remv v lst) -> list?
  v : any/c
  lst : list?
procedure
(remove* v-lst lst [proc]) -> list?
  v-lst : list?
  lst : list?
  proc : procedure? = equal?
procedure
(remq* v-lst lst) -> list?
  v-lst : list?
  lst : list?
procedure
(remv* v-lst lst) -> list?
  v-lst : list?
  lst : list?
procedure
(sort  lst                             
       less-than?                      
      [#:key extract-key               
       #:cache-keys? cache-keys?]) -> list?
  lst : list?
  less-than? : (any/c any/c . -> . any/c)
  extract-key : (any/c . -> . any/c) = (lambda (x) x)
  cache-keys? : boolean? = #f
procedure
(member v lst) -> (or/c list? #f)
  v : any/c
  lst : list?
procedure
(memv v lst) -> (or/c list? #f)
  v : any/c
  lst : list?
procedure
(memq v lst) -> (or/c list? #f)
  v : any/c
  lst : list?
procedure
(memf proc lst) -> (or/c list? #f)
  proc : procedure?
  lst : list?
procedure
(findf proc lst) -> any/c
  proc : procedure?
  lst : list?
procedure
(assoc v lst [is-equal?]) -> (or/c pair? #f)
  v : any/c
  lst : (listof pair?)
  is-equal? : (any/c any/c -> any/c) = equal?
procedure
(assv v lst) -> (or/c pair? #f)
  v : any/c
  lst : (listof pair?)
procedure
(assq v lst) -> (or/c pair? #f)
  v : any/c
  lst : (listof pair?)
procedure
(assf proc lst) -> (or/c list? #f)
  proc : procedure?
  lst : list?
procedure
(caar v) -> any/c
  v : (cons/c pair? any/c)
procedure
(cadr v) -> any/c
  v : (cons/c any/c pair?)
procedure
(cdar v) -> any/c
  v : (cons/c pair? any/c)
procedure
(cddr v) -> any/c
  v : (cons/c any/c pair?)
procedure
(caaar v) -> any/c
  v : (cons/c (cons/c pair? any/c) any/c)
procedure
(caadr v) -> any/c
  v : (cons/c any/c (cons/c pair? any/c))
procedure
(cadar v) -> any/c
  v : (cons/c (cons/c any/c pair?) any/c)
procedure
(caddr v) -> any/c
  v : (cons/c any/c (cons/c any/c pair?))
procedure
(cdaar v) -> any/c
  v : (cons/c (cons/c pair? any/c) any/c)
procedure
(cdadr v) -> any/c
  v : (cons/c any/c (cons/c pair? any/c))
procedure
(cddar v) -> any/c
  v : (cons/c (cons/c any/c pair?) any/c)
procedure
(cdddr v) -> any/c
  v : (cons/c any/c (cons/c any/c pair?))
procedure
(caaaar v) -> any/c
  v : (cons/c (cons/c (cons/c pair? any/c) any/c) any/c)
procedure
(caaadr v) -> any/c
  v : (cons/c any/c (cons/c (cons/c pair? any/c) any/c))
procedure
(caadar v) -> any/c
  v : (cons/c (cons/c any/c (cons/c pair? any/c)) any/c)
procedure
(caaddr v) -> any/c
  v : (cons/c any/c (cons/c any/c (cons/c pair? any/c)))
procedure
(cadaar v) -> any/c
  v : (cons/c (cons/c (cons/c any/c pair?) any/c) any/c)
procedure
(cadadr v) -> any/c
  v : (cons/c any/c (cons/c (cons/c any/c pair?) any/c))
procedure
(caddar v) -> any/c
  v : (cons/c (cons/c any/c (cons/c any/c pair?)) any/c)
procedure
(cadddr v) -> any/c
  v : (cons/c any/c (cons/c any/c (cons/c any/c pair?)))
procedure
(cdaaar v) -> any/c
  v : (cons/c (cons/c (cons/c pair? any/c) any/c) any/c)
procedure
(cdaadr v) -> any/c
  v : (cons/c any/c (cons/c (cons/c pair? any/c) any/c))
procedure
(cdadar v) -> any/c
  v : (cons/c (cons/c any/c (cons/c pair? any/c)) any/c)
procedure
(cdaddr v) -> any/c
  v : (cons/c any/c (cons/c any/c (cons/c pair? any/c)))
procedure
(cddaar v) -> any/c
  v : (cons/c (cons/c (cons/c any/c pair?) any/c) any/c)
procedure
(cddadr v) -> any/c
  v : (cons/c any/c (cons/c (cons/c any/c pair?) any/c))
procedure
(cdddar v) -> any/c
  v : (cons/c (cons/c any/c (cons/c any/c pair?)) any/c)
procedure
(cddddr v) -> any/c
  v : (cons/c any/c (cons/c any/c (cons/c any/c pair?)))
value
empty : null?
procedure
(cons? v) -> boolean?
  v : any/c
procedure
(empty? v) -> boolean?
  v : any/c
procedure
(first lst) -> any/c
  lst : list?
procedure
(rest lst) -> list?
  lst : list?
procedure
(second lst) -> any
  lst : list?
procedure
(third lst) -> any
  lst : list?
procedure
(fourth lst) -> any
  lst : list?
procedure
(fifth lst) -> any
  lst : list?
procedure
(sixth lst) -> any
  lst : list?
procedure
(seventh lst) -> any
  lst : list?
procedure
(eighth lst) -> any
  lst : list?
procedure
(ninth lst) -> any
  lst : list?
procedure
(tenth lst) -> any
  lst : list?
procedure
(last lst) -> any
  lst : list?
procedure
(last-pair p) -> pair?
  p : pair?
procedure
(make-list k v) -> list?
  k : exact-nonnegative-integer?
  v : any?
procedure
(take lst pos) -> list?
  lst : any/c
  pos : exact-nonnegative-integer?
procedure
(drop lst pos) -> any/c
  lst : any/c
  pos : exact-nonnegative-integer?
procedure
(split-at lst pos) -> list? any/c
  lst : any/c
  pos : exact-nonnegative-integer?
procedure
(take-right lst pos) -> any/c
  lst : any/c
  pos : exact-nonnegative-integer?
procedure
(drop-right lst pos) -> list?
  lst : any/c
  pos : exact-nonnegative-integer?
procedure
(split-at-right lst pos) -> list? any/c
  lst : any/c
  pos : exact-nonnegative-integer?
procedure
(add-between  lst                             
              v                               
             [#:before-first before-first     
              #:before-last before-last       
              #:after-last after-last         
              #:splice? splice?])         -> list?
  lst : list?
  v : any/c
  before-first : list? = '()
  before-last : any/c = v
  after-last : list? = '()
  splice? : any/c = #f
procedure
(append* lst ... lsts) -> list?
  lst : list?
  lsts : (listof list?)
(append* lst ... lsts) -> any/c
  lst : list?
  lsts : list?
procedure
(flatten v) -> list?
  v : any/c
procedure
(remove-duplicates  lst                     
                   [same?                   
                    #:key extract-key]) -> list?
  lst : list?
  same? : (any/c any/c . -> . any/c) = equal?
  extract-key : (any/c . -> . any/c) = (lambda (x) x)
procedure
(filter-map proc lst ...+) -> list?
  proc : procedure?
  lst : list?
procedure
(count proc lst ...+) -> exact-nonnegative-integer?
  proc : procedure?
  lst : list?
procedure
(partition pred lst) -> list? list?
  pred : procedure?
  lst : list?
procedure
(append-map proc lst ...+) -> list?
  proc : procedure?
  lst : list?
procedure
(filter-not pred lst) -> list?
  pred : (any/c . -> . any/c)
  lst : list?
procedure
(shuffle lst) -> list?
  lst : list?
procedure
(argmin proc lst) -> any/c
  proc : (-> any/c real?)
  lst : (and/c pair? list?)
procedure
(argmax proc lst) -> any/c
  proc : (-> any/c real?)
  lst : (and/c pair? list?)
procedure
(range end) -> list?
  end : real?
(range start end [step]) -> list?
  start : real?
  end : real?
  step : real? = 1
procedure
(make-reader-graph v) -> any/c
  v : any/c
procedure
(placeholder? v) -> boolean?
  v : any/c
procedure
(make-placeholder v) -> placeholder?
  v : any/c
procedure
(placeholder-set! ph datum) -> void?
  ph : placeholder?
  datum : any/c
procedure
(placeholder-get ph) -> any/c
  ph : placeholder?
procedure
(hash-placeholder? v) -> boolean?
  v : any/c
procedure
(make-hash-placeholder assocs) -> hash-placeholder?
  assocs : (listof pair?)
procedure
(make-hasheq-placeholder assocs) -> hash-placeholder?
  assocs : (listof pair?)
procedure
(make-hasheqv-placeholder assocs) -> hash-placeholder?
  assocs : (listof pair?)
procedure
(mpair? v) -> boolean?
  v : any/c
procedure
(mcons a d) -> pair?
  a : any/c
  d : any/c
procedure
(mcar p) -> any/c
  p : mpair?
procedure
(mcdr p) -> any/c
  p : mpair?
procedure
(set-mcar! p v) -> void?
  p : mpair?
  v : any/v
procedure
(set-mcdr! p v) -> void?
  p : mpair?
  v : any/v
procedure
(vector? v) -> boolean?
  v : any/c
procedure
(make-vector size [v]) -> vector?
  size : exact-nonnegative-integer?
  v : any/c = 0
procedure
(vector v ...) -> vector?
  v : any/c
procedure
(vector-immutable v ...) -> (and/c vector?
                                   immutable?)
  v : any/c
procedure
(vector-length vec) -> exact-nonnegative-integer?
  vec : vector?
procedure
(vector-ref vec pos) -> any/c
  vec : vector?
  pos : exact-nonnegative-integer?
procedure
(vector-set! vec pos v) -> void?
  vec : (and/c vector? (not/c immutable?))
  pos : exact-nonnegative-integer?
  v : any/c
procedure
(vector->list vec) -> list?
  vec : vector?
procedure
(list->vector lst) -> vector?
  lst : list?
procedure
(vector->immutable-vector vec) -> (and/c vector? immutable?)
  vec : vector?
procedure
(vector-fill! vec v) -> void?
  vec : (and/c vector? (not/c immutable?))
  v : any/c
procedure
(vector-copy!  dest           
               dest-start     
               src            
              [src-start      
               src-end])  -> void?
  dest : (and/c vector? (not/c immutable?))
  dest-start : exact-nonnegative-integer?
  src : vector?
  src-start : exact-nonnegative-integer? = 0
  src-end : exact-nonnegative-integer? = (vector-length src)
procedure
(vector->values vec [start-pos end-pos]) -> any
  vec : vector?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (vector-length vec)
procedure
(build-vector n proc) -> vector?
  n : exact-nonnegative-integer?
  proc : (exact-nonnegative-integer? . -> . any/c)
procedure
(vector-set*! vec pos v ... ...) -> void?
  vec : (and/c vector? (not/c immutable?))
  pos : exact-nonnegative-integer?
  v : any/c
procedure
(vector-map proc vec ...+) -> vector?
  proc : procedure?
  vec : vector?
procedure
(vector-map! proc vec ...+) -> vector?
  proc : procedure?
  vec : vector?
procedure
(vector-append vec ...) -> vector?
  vec : vector?
procedure
(vector-take vec pos) -> vector?
  vec : vector?
  pos : exact-nonnegative-integer?
procedure
(vector-take-right vec pos) -> vector?
  vec : vector?
  pos : exact-nonnegative-integer?
procedure
(vector-drop vec pos) -> vector?
  vec : vector?
  pos : exact-nonnegative-integer?
procedure
(vector-drop-right vec pos) -> vector?
  vec : vector?
  pos : exact-nonnegative-integer?
procedure
(vector-split-at vec pos) -> vector? vector?
  vec : vector?
  pos : exact-nonnegative-integer?
procedure
(vector-split-at-right vec pos) -> vector? vector?
  vec : vector?
  pos : exact-nonnegative-integer?
procedure
(vector-copy vec [start end]) -> vector?
  vec : vector?
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (vector-length v)
procedure
(vector-filter pred vec) -> vector?
  pred : procedure?
  vec : vector?
procedure
(vector-filter-not pred vec) -> vector?
  pred : procedure?
  vec : vector?
procedure
(vector-count proc vec ...+) -> exact-nonnegative-integer?
  proc : procedure?
  vec : vector?
procedure
(vector-argmin proc vec) -> any/c
  proc : (-> any/c real?)
  vec : vector?
procedure
(vector-argmax proc vec) -> any/c
  proc : (-> any/c real?)
  vec : vector?
procedure
(vector-member v lst) -> (or/c natural-number/c #f)
  v : any/c
  lst : vector?
procedure
(vector-memv v vec) -> (or/c natural-number/c #f)
  v : any/c
  vec : vector?
procedure
(vector-memq v vec) -> (or/c natural-number/c #f)
  v : any/c
  vec : vector?
procedure
(box? v) -> boolean?
  v : any/c
procedure
(box v) -> box?
  v : any/c
procedure
(box-immutable v) -> (and/c box? immutable?)
  v : any/c
procedure
(unbox box) -> any/c
  box : box?
procedure
(set-box! box v) -> void?
  box : (and/c box? (not/c immutable?))
  v : any/c
procedure
(box-cas! box old new) -> boolean?
  box : (and/c box? (not/c immutable?) (not/c impersonator?))
  old : any/c
  new : any/c
procedure
(hash? v) -> boolean?
  v : any/c
procedure
(hash-equal? hash) -> boolean?
  hash : hash?
procedure
(hash-eqv? hash) -> boolean?
  hash : hash?
procedure
(hash-eq? hash) -> boolean?
  hash : hash?
procedure
(hash-weak? hash) -> boolean?
  hash : hash?
procedure
(hash key val ... ...) -> (and/c hash? hash-equal? immutable?)
  key : any/c
  val : any/c
procedure
(hasheq key val ... ...) -> (and/c hash? hash-eq? immutable?)
  key : any/c
  val : any/c
procedure
(hasheqv key val ... ...) -> (and/c hash? hash-eqv? immutable?)
  key : any/c
  val : any/c
procedure
(make-hash [assocs]) -> (and/c hash? hash-equal?)
  assocs : (listof pair?) = null
procedure
(make-hasheqv [assocs]) -> (and/c hash? hash-eqv?)
  assocs : (listof pair?) = null
procedure
(make-hasheq [assocs]) -> (and/c hash? hash-eq?)
  assocs : (listof pair?) = null
procedure
(make-weak-hash [assocs]) -> (and/c hash? hash-equal? hash-weak?)
  assocs : (listof pair?) = null
procedure
(make-weak-hasheqv [assocs]) -> (and/c hash? hash-eqv? hash-weak?)
  assocs : (listof pair?) = null
procedure
(make-weak-hasheq [assocs]) -> (and/c hash? hash-eq? hash-weak?)
  assocs : (listof pair?) = null
procedure
(make-immutable-hash [assocs])
 -> (and/c hash? hash-equal? immutable?)
  assocs : (listof pair?) = null
procedure
(make-immutable-hasheqv [assocs])
 -> (and/c hash? hash-eqv? immutable?)
  assocs : (listof pair?) = null
procedure
(make-immutable-hasheq [assocs])
 -> (and/c hash? hash-eq? immutable?)
  assocs : (listof pair?) = null
procedure
(hash-set! hash key v) -> void?
  hash : (and/c hash? (not/c immutable?))
  key : any/c
  v : any/c
procedure
(hash-set*! hash key v ... ...) -> void?
  hash : (and/c hash? (not/c immutable?))
  key : any/c
  v : any/c
procedure
(hash-set hash key v) -> (and/c hash? immutable?)
  hash : (and/c hash? immutable?)
  key : any/c
  v : any/c
procedure
(hash-set* hash key v ... ...) -> (and/c hash? immutable?)
  hash : (and/c hash? immutable?)
  key : any/c
  v : any/c
procedure
(hash-ref hash key [failure-result]) -> any
  hash : hash?
  key : any/c
  failure-result : any/c
                 = (lambda ()
                     (raise (make-exn:fail:contract ....)))
procedure
(hash-ref! hash key to-set) -> any
  hash : hash?
  key : any/c
  to-set : any/c
procedure
(hash-has-key? hash key) -> boolean?
  hash : hash?
  key : any/c
procedure
(hash-update!  hash                 
               key                  
               updater              
              [failure-result]) -> void?
  hash : (and/c hash? (not/c immutable?))
  key : any/c
  updater : (any/c . -> . any/c)
  failure-result : any/c
                 = (lambda ()
                     (raise (make-exn:fail:contract ....)))
procedure
(hash-update hash key updater [failure-result])
 -> (and/c hash? immutable?)
  hash : (and/c hash? immutable?)
  key : any/c
  updater : (any/c . -> . any/c)
  failure-result : any/c
                 = (lambda ()
                     (raise (make-exn:fail:contract ....)))
procedure
(hash-remove! hash key) -> void?
  hash : (and/c hash? (not/c immutable?))
  key : any/c
procedure
(hash-remove hash key) -> (and/c hash? immutable?)
  hash : (and/c hash? immutable?)
  key : any/c
procedure
(hash-map hash proc) -> (listof any/c)
  hash : hash?
  proc : (any/c any/c . -> . any/c)
procedure
(hash-keys hash) -> (listof any/c)
  hash : hash?
procedure
(hash-values hash) -> (listof any/c)
  hash : hash?
procedure
(hash->list hash) -> (listof (cons/c any/c any/c))
  hash : hash?
procedure
(hash-for-each hash proc) -> void?
  hash : hash?
  proc : (any/c any/c . -> . any)
procedure
(hash-count hash) -> exact-nonnegative-integer?
  hash : hash?
procedure
(hash-iterate-first hash)
 -> (or/c #f exact-nonnegative-integer?)
  hash : hash?
procedure
(hash-iterate-next hash pos)
 -> (or/c #f exact-nonnegative-integer?)
  hash : hash?
  pos : exact-nonnegative-integer?
procedure
(hash-iterate-key hash pos) -> any
  hash : hash?
  pos : exact-nonnegative-integer?
procedure
(hash-iterate-value hash pos) -> any
  hash : hash?
  pos : exact-nonnegative-integer?
procedure
(hash-copy hash) -> (and/c hash? (not/c immutable?))
  hash : hash?
procedure
(eq-hash-code v) -> fixnum?
  v : any/c
procedure
(eqv-hash-code v) -> fixnum?
  v : any/c
procedure
(equal-hash-code v) -> fixnum?
  v : any/c
procedure
(equal-secondary-hash-code v) -> fixnum?
  v : any/c
procedure
(sequence? v) -> boolean?
  v : any/c
procedure
(in-range end) -> stream?
  end : number?
(in-range start end [step]) -> stream?
  start : number?
  end : number?
  step : number? = 1
procedure
(in-naturals [start]) -> stream?
  start : exact-nonnegative-integer? = 0
procedure
(in-list lst) -> stream?
  lst : list?
procedure
(in-mlist mlst) -> sequence?
  mlst : mlist?
procedure
(in-vector vec [start stop step]) -> sequence?
  vec : vector?
  start : exact-nonnegative-integer? = 0
  stop : (or/c exact-integer? #f) = #f
  step : (and/c exact-integer? (not/c zero?)) = 1
procedure
(in-string str [start stop step]) -> sequence?
  str : string?
  start : exact-nonnegative-integer? = 0
  stop : (or/c exact-integer? #f) = #f
  step : (and/c exact-integer? (not/c zero?)) = 1
procedure
(in-bytes bstr [start stop step]) -> sequence?
  bstr : bytes?
  start : exact-nonnegative-integer? = 0
  stop : (or/c exact-integer? #f) = #f
  step : (and/c exact-integer? (not/c zero?)) = 1
procedure
(in-port [r in]) -> sequence?
  r : (input-port? . -> . any/c) = read
  in : input-port? = (current-input-port)
procedure
(in-input-port-bytes in) -> sequence?
  in : input-port?
procedure
(in-input-port-chars in) -> sequence?
  in : input-port?
procedure
(in-lines [in mode]) -> sequence?
  in : input-port? = (current-input-port)
  mode : (or/c 'linefeed 'return 'return-linefeed 'any 'any-one)
       = 'any
procedure
(in-bytes-lines [in mode]) -> sequence?
  in : input-port? = (current-input-port)
  mode : (or/c 'linefeed 'return 'return-linefeed 'any 'any-one)
       = 'any
procedure
(in-hash hash) -> sequence?
  hash : hash?
procedure
(in-hash-keys hash) -> sequence?
  hash : hash?
procedure
(in-hash-values hash) -> sequence?
  hash : hash?
procedure
(in-hash-pairs hash) -> sequence?
  hash : hash?
procedure
(in-directory [dir]) -> sequence?
  dir : (or/c #f path-string?) = #f
procedure
(in-producer producer stop arg ...) -> sequence?
  producer : procedure?
  stop : any/c
  arg : any/c
procedure
(in-value v) -> sequence?
  v : any/c
procedure
(in-indexed seq) -> sequence?
  seq : sequence?
procedure
(in-sequences seq ...) -> sequence?
  seq : sequence?
procedure
(in-cycle seq ...) -> sequence?
  seq : sequence?
procedure
(in-parallel seq ...) -> sequence?
  seq : sequence?
procedure
(in-values-sequence seq) -> sequence?
  seq : sequence?
procedure
(in-values*-sequence seq) -> sequence?
  seq : sequence?
procedure
(stop-before seq pred) -> sequence?
  seq : sequence?
  pred : (any/c . -> . any)
procedure
(stop-after seq pred) -> sequence?
  seq : sequence?
  pred : (any/c . -> . any)
procedure
(make-do-sequence thunk) -> sequence?
  thunk : (-> (values (any/c . -> . any)
                      (any/c . -> . any/c)
                      any/c
                      (or/c (any/c . -> . any/c) #f)
                      (or/c (() () #:rest list? . ->* . any/c) #f)
                      (or/c ((any/c) () #:rest list? . ->* . any/c) #f)))
value
prop:sequence : struct-type-property?
procedure
(sequence->stream seq) -> stream?
  seq : sequence?
procedure
(sequence-generate seq) -> (-> boolean?) (-> any)
  seq : sequence?
procedure
(sequence-generate* seq)
 -> (or/c list? #f)
    (-> (values (or/c list? #f) procedure?))
  seq : sequence?
value
empty-sequence : sequence?
procedure
(sequence->list s) -> list?
  s : sequence?
procedure
(sequence-length s) -> exact-nonnegative-integer?
  s : sequence?
procedure
(sequence-ref s i) -> any
  s : sequence?
  i : exact-nonnegative-integer?
procedure
(sequence-tail s i) -> sequence?
  s : sequence?
  i : exact-nonnegative-integer?
procedure
(sequence-append s ...) -> sequence?
  s : sequence?
procedure
(sequence-map f s) -> sequence?
  f : procedure?
  s : sequence?
procedure
(sequence-andmap f s) -> boolean?
  f : (-> any/c ... boolean?)
  s : sequence?
procedure
(sequence-ormap f s) -> boolean?
  f : (-> any/c ... boolean?)
  s : sequence?
procedure
(sequence-for-each f s) -> void?
  f : (-> any/c ... any)
  s : sequence?
procedure
(sequence-fold f i s) -> any/c
  f : (-> any/c any/c ... any/c)
  i : any/c
  s : sequence?
procedure
(sequence-count f s) -> exact-nonnegative-integer?
  f : procedure?
  s : sequence?
procedure
(sequence-filter f s) -> sequence?
  f : (-> any/c ... boolean?)
  s : sequence?
procedure
(sequence-add-between s e) -> sequence?
  s : sequence?
  e : any/c
procedure
(stream? v) -> boolean?
  v : any/c
procedure
(stream-empty? s) -> boolean?
  s : stream?
procedure
(stream-first s) -> any
  s : (and/c stream? (not/c stream-empty?))
procedure
(stream-rest s) -> stream?
  s : (and/c stream? (not/c stream-empty?))
syntax
(stream-cons first-expr rest-expr)
syntax
(stream expr ...)
procedure
(in-stream s) -> sequence?
  s : stream?
value
empty-stream : stream?
procedure
(stream->list s) -> list?
  s : stream?
procedure
(stream-length s) -> exact-nonnegative-integer?
  s : stream?
procedure
(stream-ref s i) -> any
  s : stream?
  i : exact-nonnegative-integer?
procedure
(stream-tail s i) -> stream?
  s : stream?
  i : exact-nonnegative-integer?
procedure
(stream-append s ...) -> stream?
  s : stream?
procedure
(stream-map f s) -> stream?
  f : procedure?
  s : stream?
procedure
(stream-andmap f s) -> boolean?
  f : (-> any/c ... boolean?)
  s : stream?
procedure
(stream-ormap f s) -> boolean?
  f : (-> any/c ... boolean?)
  s : stream?
procedure
(stream-for-each f s) -> void?
  f : (-> any/c ... any)
  s : stream?
procedure
(stream-fold f i s) -> any/c
  f : (-> any/c any/c ... any/c)
  i : any/c
  s : stream?
procedure
(stream-count f s) -> exact-nonnegative-integer?
  f : procedure?
  s : stream?
procedure
(stream-filter f s) -> stream?
  f : (-> any/c ... boolean?)
  s : stream?
procedure
(stream-add-between s e) -> stream?
  s : stream?
  e : any/c
value
gen:stream : any/c
value
prop:stream : struct-type-property?
procedure
(generator? v) -> boolean?
  v : any/c
syntax
(generator formals body ...+)
procedure
(yield v ...) -> any
  v : any/c
syntax
(infinite-generator body ...+)
syntax
(in-generator maybe-arity body ...+)
 
maybe-arity = 
            | #:arity arity-k
procedure
(generator-state g) -> symbol?
  g : generator?
procedure
(sequence->generator s) -> (-> any)
  s : sequence?
procedure
(sequence->repeated-generator s) -> (-> any)
  s : sequence?
procedure
(dict? v) -> boolean?
  v : any/c
procedure
(dict-mutable? d) -> boolean?
  d : dict?
procedure
(dict-can-remove-keys? d) -> boolean?
  d : dict?
procedure
(dict-can-functional-set? d) -> boolean?
  d : dict?
procedure
(dict-set! dict key v) -> void?
  dict : (and/c dict? (not/c immutable?))
  key : any/c
  v : any/c
procedure
(dict-set*! dict key v ... ...) -> void?
  dict : (and/c dict? (not/c immutable?))
  key : any/c
  v : any/c
procedure
(dict-set dict key v) -> (and/c dict? immutable?)
  dict : (and/c dict? immutable?)
  key : any/c
  v : any/c
procedure
(dict-set* dict key v ... ...) -> (and/c dict? immutable?)
  dict : (and/c dict? immutable?)
  key : any/c
  v : any/c
procedure
(dict-has-key? dict key) -> boolean?
  dict : dict?
  key : any/c
procedure
(dict-ref dict key [failure-result]) -> any
  dict : dict?
  key : any/c
  failure-result : any/c
                 = (lambda () (raise (make-exn:fail ....)))
procedure
(dict-ref! dict key to-set) -> any
  dict : dict?
  key : any/c
  to-set : any/c
procedure
(dict-update!  dict                 
               key                  
               updater              
              [failure-result]) -> void?
  dict : (and/c dict? (not/c immutable?))
  key : any/c
  updater : (any/c . -> . any/c)
  failure-result : any/c
                 = (lambda () (raise (make-exn:fail ....)))
procedure
(dict-update dict key updater [failure-result])
 -> (and/c dict? immutable?)
  dict : dict?
  key : any/c
  updater : (any/c . -> . any/c)
  failure-result : any/c
                 = (lambda () (raise (make-exn:fail ....)))
procedure
(dict-remove! dict key) -> void?
  dict : (and/c dict? (not/c immutable?))
  key : any/c
procedure
(dict-remove dict key) -> (and/c dict? immutable?)
  dict : (and/c dict? immutable?)
  key : any/c
procedure
(dict-map dict proc) -> (listof any/c)
  dict : dict?
  proc : (any/c any/c . -> . any/c)
procedure
(dict-for-each dict proc) -> void?
  dict : dict?
  proc : (any/c any/c . -> . any)
procedure
(dict-count dict) -> exact-nonnegative-integer?
  dict : dict?
procedure
(dict-iterate-first dict) -> any/c
  dict : dict?
procedure
(dict-iterate-next dict pos) -> any/c
  dict : dict?
  pos : any/c
procedure
(dict-iterate-key dict pos) -> any
  dict : dict?
  pos : any/c
procedure
(dict-iterate-value dict pos) -> any
  dict : dict?
  pos : any/c
procedure
(in-dict dict) -> sequence?
  dict : dict?
procedure
(in-dict-keys dict) -> sequence?
  dict : dict?
procedure
(in-dict-values dict) -> sequence?
  dict : dict?
procedure
(in-dict-pairs dict) -> sequence?
  dict : dict?
procedure
(dict-keys dict) -> list?
  dict : dict?
procedure
(dict-values dict) -> list?
  dict : dict?
procedure
(dict->list dict) -> list?
  dict : dict?
value
gen:dict : any/c
value
prop:dict : struct-type-property?
value
prop:dict/contract : struct-type-property?
procedure
(dict-key-contract d) -> contract?
  d : dict?
procedure
(dict-value-contract d) -> contract?
  d : dict?
procedure
(dict-iter-contract d) -> contract?
  d : dict?
procedure
(make-custom-hash eql? hash-proc [hash2-proc]) -> dict?
  eql? : (any/c any/c . -> . any/c)
  hash-proc : (any/c . -> . exact-integer?)
  hash2-proc : (any/c . -> . exact-integer?)
             = (lambda (v) 10001)
procedure
(make-immutable-custom-hash  eql?             
                             hash-proc        
                            [hash2-proc]) -> dict?
  eql? : (any/c any/c . -> . any/c)
  hash-proc : (any/c . -> . exact-integer?)
  hash2-proc : (any/c . -> . exact-integer?)
             = (lambda (v) 10001)
procedure
(make-weak-custom-hash  eql?             
                        hash-proc        
                       [hash2-proc]) -> dict?
  eql? : (any/c any/c . -> . any/c)
  hash-proc : (any/c . -> . exact-integer?)
  hash2-proc : (any/c . -> . exact-integer?)
             = (lambda (v) 10001)
procedure
(set v ...) -> set?
  v : any/c
procedure
(seteqv v ...) -> set?
  v : any/c
procedure
(seteq v ...) -> set?
  v : any/c
procedure
(set-empty? st) -> boolean?
  st : set?
procedure
(set-count st) -> exact-nonnegative-integer?
  st : set?
procedure
(set-member? st v) -> boolean?
  st : set?
  v : any/c
procedure
(set-first st) -> any/c
  st : (and/c set? (not/c set-empty?))
procedure
(set-rest st) -> set?
  st : (and/c set? (not/c set-empty?))
procedure
(set-add st v) -> set?
  st : set?
  v : any/c
procedure
(set-remove st v) -> set?
  st : set?
  v : any/c
procedure
(set-union st ...+) -> set?
  st : set?
procedure
(set-intersect st ...+) -> set?
  st : set?
procedure
(set-subtract st ...+) -> set?
  st : set?
procedure
(set-symmetric-difference st ...+) -> set?
  st : set?
procedure
(set=? st st2) -> boolean?
  st : set?
  st2 : set?
procedure
(subset? st st2) -> boolean?
  st : set?
  st2 : set?
procedure
(proper-subset? st st2) -> boolean?
  st : set?
  st2 : set?
procedure
(set-map st proc) -> (listof any/c)
  st : set?
  proc : (any/c . -> . any/c)
procedure
(set-for-each st proc) -> void?
  st : set?
  proc : (any/c . -> . any)
procedure
(set? v) -> boolean?
  v : any/c
procedure
(set-equal? st) -> boolean?
  st : set?
procedure
(set-eqv? st) -> boolean?
  st : set?
procedure
(set-eq? st) -> boolean?
  st : set?
procedure
(set/c contract [#:cmp cmp]) -> contract?
  contract : chaperone-contract?
  cmp : (or/c 'dont-care 'equal 'eqv 'eq) = 'dont-care
procedure
(in-set st) -> sequence?
  st : set?
syntax
(for/set (for-clause ...) body ...+)
syntax
(for/seteq (for-clause ...) body ...+)
syntax
(for/seteqv (for-clause ...) body ...+)
syntax
(for*/set (for-clause ...) body ...+)
syntax
(for*/seteq (for-clause ...) body ...+)
syntax
(for*/seteqv (for-clause ...) body ...+)
procedure
(list->set lst) -> set?
  lst : list?
procedure
(list->seteq lst) -> set?
  lst : list?
procedure
(list->seteqv lst) -> set?
  lst : list?
procedure
(set->list st) -> list?
  st : set?
procedure
(procedure? v) -> boolean
  v : any/c
procedure
(apply proc v ... lst #:<kw> kw-arg ...) -> any
  proc : procedure?
  v : any/c
  lst : list?
  kw-arg : any/c
procedure
(compose proc ...) -> procedure?
  proc : procedure?
procedure
(compose1 proc ...) -> procedure?
  proc : procedure?
procedure
(procedure-rename proc name) -> procedure?
  proc : procedure?
  name : symbol?
procedure
(procedure->method proc) -> procedure?
  proc : procedure?
procedure
(keyword-apply proc                   
               kw-lst                 
               kw-val-lst             
               v ...                  
               lst                    
               #:<kw> kw-arg ...) -> any
  proc : procedure?
  kw-lst : (listof keyword?)
  kw-val-lst : list?
  v : any/c
  lst : list?
  kw-arg : any/c
procedure
(procedure-arity proc) -> procedure-arity?
  proc : procedure?
procedure
(procedure-arity? v) -> boolean?
  v : any/c
procedure
(procedure-arity-includes? proc k [kws-ok?]) -> boolean?
  proc : procedure?
  k : exact-nonnegative-integer?
  kws-ok? : any/c = #f
procedure
(procedure-reduce-arity proc arity) -> procedure?
  proc : procedure?
  arity : procedure-arity?
procedure
(procedure-keywords proc) -> (listof keyword?)
                             (or/c (listof keyword?) #f)
  proc : procedure?
procedure
(make-keyword-procedure proc [plain-proc]) -> procedure?
  proc : (((listof keyword?) list?) () #:rest list? . ->* . any)
  plain-proc : procedure?
             = (lambda args (apply proc null null args))
procedure
(procedure-reduce-keyword-arity proc             
                                arity            
                                required-kws     
                                allowed-kws) -> procedure?
  proc : procedure?
  arity : procedure-arity?
  required-kws : (listof keyword?)
  allowed-kws : (or/c (listof keyword?)
                      #f)
struct
(struct arity-at-least (value)
        #:extra-constructor-name make-arity-at-least)
  value : exact-nonnegative-integer?
value
prop:procedure : struct-type-property?
procedure
(procedure-struct-type? type) -> boolean?
  type : struct-type?
procedure
(procedure-extract-target proc) -> (or/c #f procedure?)
  proc : procedure?
value
prop:arity-string : struct-type-property?
value
prop:checked-procedure : struct-type-property?
procedure
(checked-procedure-check-and-extract type     
                                     v        
                                     proc     
                                     v1       
                                     v2)  -> any/c
  type : struct-type?
  v : any/c
  proc : (any/c any/c any/c . -> . any/c)
  v1 : any/c
  v2 : any/c
procedure
(primitive? v) -> boolean?
  v : any/c
procedure
(primitive-closure? v) -> boolean
  v : any/c
procedure
(primitive-result-arity prim) -> procedure-arity?
  prim : primitive?
procedure
(identity v) -> any/c
  v : any/c
procedure
(const v) -> procedure?
  v : any
syntax
(thunk  body ...+)
syntax
(thunk* body ...+)
procedure
(negate proc) -> procedure?
  proc : procedure?
procedure
(curry proc) -> procedure?
  proc : procedure?
(curry proc v ...+) -> any/c
  proc : procedure?
  v : any/c
procedure
(curryr proc) -> procedure?
  proc : procedure?
(curryr proc v ...+) -> any/c
  proc : procedure?
  v : any/c
procedure
(void? v) -> void?
  v : any/c
procedure
(void v ...) -> void?
  v : any/c
syntax
(struct id maybe-super (field ...)
        struct-option ...)
 
maybe-super   = 
              | super-id
                 
field         = field-id
              | [field-id field-option ...]
                 
struct-option = #:mutable
              | #:super super-expr
              | #:inspector inspector-expr
              | #:auto-value auto-expr
              | #:guard guard-expr
              | #:property prop-expr val-expr
              | #:transparent
              | #:prefab
              | #:constructor-name constructor-id
              | #:extra-constructor-name constructor-id
              | #:reflection-name symbol-expr
              | #:methods gen:name method-defs
              | #:omit-define-syntaxes
              | #:omit-define-values
                 
field-option  = #:mutable
              | #:auto
                 
method-defs   = (definition ...)
 
  gen:name : identifier?
syntax
(struct-field-index field-id)
syntax
(define-struct id-maybe-super (field ...)
               struct-option ...)
 
id-maybe-super = id
               | (id super-id)
syntax
(define-struct/derived (id . rest-form)
  id-maybe-super (field ...) struct-option ...)
procedure
(make-struct-type  name               
                   super-type         
                   init-field-cnt     
                   auto-field-cnt     
                  [auto-v             
                   props              
                   inspector          
                   proc-spec          
                   immutables         
                   guard              
                   constructor-name]) 
 -> struct-type?
    struct-constructor-procedure?
    struct-predicate-procedure?
    struct-accessor-procedure?
    struct-mutator-procedure?
  name : symbol?
  super-type : (or/c struct-type? #f)
  init-field-cnt : exact-nonnegative-integer?
  auto-field-cnt : exact-nonnegative-integer?
  auto-v : any/c = #f
  props : (listof (cons/c struct-type-property? = null
                          any/c))
  inspector : (or/c inspector? #f 'prefab) = (current-inspector)
  proc-spec : (or/c procedure?                 = #f
                    exact-nonnegative-integer?
                    #f)
  immutables : (listof exact-nonnegative-integer?) = null
  guard : (or/c procedure? #f) = #f
  constructor-name : (or/c symbol? #f) = #f
procedure
(make-struct-field-accessor  accessor-proc     
                             field-pos         
                            [field-name])  -> procedure?
  accessor-proc : struct-accessor-procedure?
  field-pos : exact-nonnegative-integer?
  field-name : (or/c symbol? #f)
             = (symbol->string (format "field~a" field-pos))
procedure
(make-struct-field-mutator  mutator-proc     
                            field-pos        
                           [field-name]) -> procedure?
  mutator-proc : struct-mutator-procedure?
  field-pos : exact-nonnegative-integer?
  field-name : (or/c symbol? #f)
             = (symbol->string (format "field~a" field-pos))
procedure
(make-struct-type-property  name               
                           [guard              
                            supers             
                            can-impersonate?]) 
 -> struct-type-property?
    procedure?
    procedure?
  name : symbol?
  guard : (or/c procedure? #f 'can-impersonate) = #f
  supers : (listof (cons/c struct-type-property?  = null
                           (any/c . -> . any/c)))
  can-impersonate? : any/c = #f
procedure
(struct-type-property? v) -> boolean?
  v : any/c
procedure
(struct-type-property-accessor-procedure? v) -> boolean?
  v : any/c
syntax
(define-generics id [#:defined-table defined-table-id]
  [method-id . kw-formals*]
  ...)
 
kw-formals* = (arg* ...)
            | (arg* ...+ . rest-id)
            | rest-id
               
arg*        = arg-id
            | [arg-id]
            | keyword arg-id
            | keyword [arg-id]
syntax
(define/generic local-id method-id)
 
  local-id : identifier?
  method-id : identifier?
syntax
(struct-copy id struct-expr fld-id ...)
 
fld-id = [field-id expr]
       | [field-id #:parent parent-id expr]
procedure
(struct->vector v [opaque-v]) -> vector?
  v : any/c
  opaque-v : any/c = '...
procedure
(struct? v) -> any
  v : any/c
procedure
(struct-type? v) -> boolean?
  v : any/c
procedure
(struct-constructor-procedure? v) -> boolean?
  v : any/c
procedure
(struct-predicate-procedure? v) -> boolean?
  v : any/c
procedure
(struct-accessor-procedure? v) -> boolean?
  v : any/c
procedure
(struct-mutator-procedure? v) -> boolean?
  v : any/c
procedure
(prefab-struct-key v) -> (or/c #f symbol? list?)
  v : any/c
procedure
(make-prefab-struct key v ...) -> struct?
  key : prefab-key?
  v : any/c
procedure
(prefab-key->struct-type key field-count) -> struct-type?
  key : prefab-key?
  field-count : (integer-in 0 32768)
procedure
(prefab-key? v) -> boolean?
  v : any/c
procedure
(struct-info? v) -> boolean?
  v : any/c
procedure
(checked-struct-info? v) -> boolean?
  v : any/c
procedure
(make-struct-info thunk) -> struct-info?
  thunk : (-> (and/c struct-info? list?))
procedure
(extract-struct-info v) -> (and/c struct-info? list?)
  v : struct-info?
value
struct:struct-info : struct-type?
value
prop:struct-info : struct-type-property?
value
prop:struct-auto-info : struct-type-property?
procedure
(struct-auto-info? v) -> boolean?
  v : any/c
procedure
(struct-auto-info-lists sai)
 -> (list/c (listof identifier?) (listof identifier?))
  sai : struct-auto-info?
syntax
(interface (super-interface-expr ...) name-clause ...)
 
name-clause = id
            | (id contract-expr)
syntax
(interface* (super-interface-expr ...)
            ([property-expr val-expr] ...)
  name-clause ...)
 
name-clause = id
            | (id contract-expr)
value
object% : class?
syntax
(class* superclass-expr (interface-expr ...)
  class-clause
  ...)
 
class-clause      = (inspect inspector-expr)
                  | (init init-decl ...)
                  | (init-field init-decl ...)
                  | (field field-decl ...)
                  | (inherit-field maybe-renamed ...)
                  | (init-rest id)
                  | (init-rest)
                  | (public maybe-renamed ...)
                  | (pubment maybe-renamed ...)
                  | (public-final maybe-renamed ...)
                  | (override maybe-renamed ...)
                  | (overment maybe-renamed ...)
                  | (override-final maybe-renamed ...)
                  | (augment maybe-renamed ...)
                  | (augride maybe-renamed ...)
                  | (augment-final maybe-renamed ...)
                  | (private id ...)
                  | (abstract id ...)
                  | (inherit maybe-renamed ...)
                  | (inherit/super maybe-renamed ...)
                  | (inherit/inner maybe-renamed ...)
                  | (rename-super renamed ...)
                  | (rename-inner renamed ...)
                  | method-definition
                  | definition
                  | expr
                  | (begin class-clause ...)
                     
init-decl         = id
                  | (renamed)
                  | (maybe-renamed default-value-expr)
                     
field-decl        = (maybe-renamed default-value-expr)
                     
maybe-renamed     = id
                  | renamed
                     
renamed           = (internal-id external-id)
                     
method-definition = (define-values (id) method-procedure)
                     
method-procedure  = (lambda kw-formals expr ...+)
                  | (case-lambda (formals expr ...+) ...)
                  | (#%plain-lambda formals expr ...+)
                  | (let-values ([(id) method-procedure] ...)
                      method-procedure)
                  | (letrec-values ([(id) method-procedure] ...)
                      method-procedure)
                  | (let-values ([(id) method-procedure] ...+)
                      id)
                  | (letrec-values ([(id) method-procedure] ...+)
                      id)
syntax
(class superclass-expr class-clause ...)
syntax
this
syntax
this%
syntax
(inspect inspector-expr)
syntax
(init init-decl ...)
syntax
(init-field init-decl ...)
syntax
(field field-decl ...)
syntax
(inherit-field maybe-renamed ...)
syntax
(init-rest id)
(init-rest)
syntax
(public maybe-renamed ...)
syntax
(pubment maybe-renamed ...)
syntax
(public-final maybe-renamed ...)
syntax
(override maybe-renamed ...)
syntax
(overment maybe-renamed ...)
syntax
(override-final maybe-renamed ...)
syntax
(augment maybe-renamed ...)
syntax
(augride maybe-renamed ...)
syntax
(augment-final maybe-renamed ...)
syntax
(private id ...)
syntax
(abstract id ...)
syntax
(inherit maybe-renamed ...)
syntax
(inherit/super maybe-renamed ...)
syntax
(inherit/inner maybe-renamed ...)
syntax
(rename-super renamed ...)
syntax
(rename-inner renamed ...)
syntax
(public* (id expr) ...)
syntax
(pubment* (id expr) ...)
syntax
(public-final* (id expr) ...)
syntax
(override* (id expr) ...)
syntax
(overment* (id expr) ...)
syntax
(override-final* (id expr) ...)
syntax
(augment* (id expr) ...)
syntax
(augride* (id expr) ...)
syntax
(augment-final* (id expr) ...)
syntax
(private* (id expr) ...)
syntax
(define/public id expr)
(define/public (id . formals) body ...+)
syntax
(define/pubment id expr)
(define/pubment (id . formals) body ...+)
syntax
(define/public-final id expr)
(define/public-final (id . formals) body ...+)
syntax
(define/override id expr)
(define/override (id . formals) body ...+)
syntax
(define/overment id expr)
(define/overment (id . formals) body ...+)
syntax
(define/override-final id expr)
(define/override-final (id . formals) body ...+)
syntax
(define/augment id expr)
(define/augment (id . formals) body ...+)
syntax
(define/augride id expr)
(define/augride (id . formals) body ...+)
syntax
(define/augment-final id expr)
(define/augment-final (id . formals) body ...+)
syntax
(define/private id expr)
(define/private (id . formals) body ...+)
syntax
(class/derived original-datum
  (name-id super-expr (interface-expr ...) deserialize-id-expr)
  class-clause
  ...)
syntax
(super id arg ...)
(super id arg ... . arg-list-expr)
syntax
(inner default-expr id arg ...)
(inner default-expr id arg ... . arg-list-expr)
syntax
(define-local-member-name id ...)
syntax
(define-member-name id key-expr)
syntax
(member-name-key identifier)
procedure
(generate-member-key) -> member-name-key?
procedure
(member-name-key? v) -> boolean?
  v : any/c
procedure
(member-name-key=? a-key b-key) -> boolean?
  a-key : member-name-key?
  b-key : member-name-key?
procedure
(member-name-key-hash-code a-key) -> integer?
  a-key : member-name-key?
procedure
(make-object class init-v ...) -> object?
  class : class?
  init-v : any/c
syntax
(new class-expr (id by-name-expr) ...)
syntax
(instantiate class-expr (by-pos-expr ...) (id by-name-expr) ...)
syntax
super-make-object
syntax
(super-instantiate (by-pos-expr ...) (id by-expr ...) ...)
syntax
(super-new (id by-name-expr ...) ...)

(method-id arg ... . arg-list-expr)
syntax
(send obj-expr method-id arg ...)
(send obj-expr method-id arg ... . arg-list-expr)
syntax
(send/apply obj-expr method-id arg ... arg-list-expr)
syntax
(send/keyword-apply obj-expr method-id
                    keyword-list-expr value-list-expr
                    arg ... arg-list-expr)
procedure
(dynamic-send obj                    
              method-name            
              v ...                  
              #:<kw> kw-arg ...) -> any
  obj : object?
  method-name : symbol?
  v : any/c
  kw-arg : any/c
syntax
(send* obj-expr msg ...+)
 
msg = (method-id arg ...)
    | (method-id arg ... . arg-list-expr)
syntax
(send+ obj-expr msg ...)
 
msg = (method-id arg ...)
    | (method-id arg ... . arg-list-expr)
syntax
(with-method ((id (obj-expr method-id)) ...)
  body ...+)
syntax
(get-field id obj-expr)
procedure
(dynamic-get-field field-name obj) -> any/c
  field-name : symbol?
  obj : object?
syntax
(set-field! id obj-expr expr)
procedure
(dynamic-set-field! field-name obj v) -> void?
  field-name : symbol?
  obj : object?
  v : any/c
syntax
(field-bound? id obj-expr)
syntax
(class-field-accessor class-expr field-id)
syntax
(class-field-mutator class-expr field-id)
syntax
(generic class-or-interface-expr id)
syntax
(send-generic obj-expr generic-expr arg ...)
(send-generic obj-expr generic-expr arg ... . arg-list-expr)
procedure
(make-generic type method-name) -> generic?
  type : (or/c class? interface?)
  method-name : symbol?
syntax
(mixin (interface-expr ...) (interface-expr ...)
  class-clause ...)
syntax
(trait trait-clause ...)
 
trait-clause = (public maybe-renamed ...)
             | (pubment maybe-renamed ...)
             | (public-final maybe-renamed ...)
             | (override maybe-renamed ...)
             | (overment maybe-renamed ...)
             | (override-final maybe-renamed ...)
             | (augment maybe-renamed ...)
             | (augride maybe-renamed ...)
             | (augment-final maybe-renamed ...)
             | (inherit maybe-renamed ...)
             | (inherit/super maybe-renamed ...)
             | (inherit/inner maybe-renamed ...)
             | method-definition
             | (field field-declaration ...)
             | (inherit-field maybe-renamed ...)
procedure
(trait? v) -> boolean?
  v : any/c
procedure
(trait->mixin tr) -> (class? . -> . class?)
  tr : trait?
procedure
(trait-sum tr ...+) -> trait?
  tr : trait?
syntax
(trait-exclude trait-expr id)
syntax
(trait-exclude-field trait-expr id)
syntax
(trait-alias trait-expr id new-id)
syntax
(trait-rename trait-expr id new-id)
syntax
(trait-rename-field trait-expr id new-id)
syntax
(class/c maybe-opaque member-spec ...)
 
maybe-opaque = 
             | #:opaque
                
member-spec  = method-spec
             | (field field-spec ...)
             | (init field-spec ...)
             | (init-field field-spec ...)
             | (inherit method-spec ...)
             | (inherit-field field-spec ...)
             | (super method-spec ...)
             | (inner method-spec ...)
             | (override method-spec ...)
             | (augment method-spec ...)
             | (augride method-spec ...)
             | (absent absent-spec ...)
                
method-spec  = method-id
             | (method-id method-contract)
                
field-spec   = field-id
             | (field-id contract-expr)
                
absent-spec  = method-id
             | (field field-id ...)
syntax
(absent method-id ...)
syntax
(->m dom ... range)
syntax
(->*m (mandatory-dom ...) (optional-dom ...) rest range)
syntax
(case->m (-> dom ... rest range) ...)
syntax
(->dm (mandatory-dependent-dom ...)
      (optional-dependent-dom ...)
      dependent-rest
      pre-cond
      dep-range)
syntax
(object/c member-spec ...)
 
member-spec = method-spec
            | (field field-spec ...)
               
method-spec = method-id
            | (method-id method-contract)
               
field-spec  = field-id
            | (field-id contract-expr)
procedure
(instanceof/c class-contract) -> contract?
  class-contract : contract?
syntax
(object-contract member-spec ...)
 
member-spec             = (method-id method-contract)
                        | (field field-id contract-expr)
                           
method-contract         = (-> dom ... range)
                        | (->* (mandatory-dom ...)
                               (optional-dom ...)
                               rest
                               range)
                        | (->d (mandatory-dependent-dom ...)
                               (optional-dependent-dom ...)
                               dependent-rest
                               pre-cond
                               dep-range)
                           
dom                     = dom-expr
                        | keyword dom-expr
                           
range                   = range-expr
                        | (values range-expr ...)
                        | any
                           
mandatory-dom           = dom-expr
                        | keyword dom-expr
                           
optional-dom            = dom-expr
                        | keyword dom-expr
                           
rest                    = 
                        | #:rest rest-expr
                           
mandatory-dependent-dom = [id dom-expr]
                        | keyword [id dom-expr]
                           
optional-dependent-dom  = [id dom-expr]
                        | keyword [id dom-expr]
                           
dependent-rest          = 
                        | #:rest id rest-expr
                           
pre-cond                = 
                        | #:pre-cond boolean-expr
                           
dep-range               = any
                        | [id range-expr] post-cond
                        | (values [id range-expr] ...) post-cond
                           
post-cond               = 
                        | #:post-cond boolean-expr
value
mixin-contract : contract?
procedure
(make-mixin-contract type ...) -> contract?
  type : (or/c class? interface?)
procedure
(is-a?/c type) -> flat-contract?
  type : (or/c class? interface?)
procedure
(implementation?/c interface) -> flat-contract?
  interface : interface?
procedure
(subclass?/c class) -> flat-contract?
  class : class?
interface
equal<%> : interface?
syntax
(define-serializable-class* class-id superclass-expr
                                     (interface-expr ...)
  class-clause ...)
syntax
(define-serializable-class class-id superclass-expr
  class-clause ...)
interface
externalizable<%> : interface?
value
printable<%> : interface?
value
writable<%> : interface?
procedure
(object? v) -> boolean?
  v : any/c
procedure
(class? v) -> boolean?
  v : any/c
procedure
(interface? v) -> boolean?
  v : any/c
procedure
(generic? v) -> boolean?
  v : any/c
procedure
(object=? a b) -> boolean?
  a : object?
  b : object?
procedure
(object->vector object [opaque-v]) -> vector?
  object : object?
  opaque-v : any/c = #f
procedure
(class->interface class) -> interface?
  class : class?
procedure
(object-interface object) -> interface?
  object : object?
procedure
(is-a? v type) -> boolean?
  v : any/c
  type : (or/c interface? class?)
procedure
(subclass? v class) -> boolean?
  v : any/c
  class : class?
procedure
(implementation? v interface) -> boolean?
  v : any/c
  interface : interface?
procedure
(interface-extension? v interface) -> boolean?
  v : any/c
  interface : interface?
procedure
(method-in-interface? sym interface) -> boolean?
  sym : symbol?
  interface : interface?
procedure
(interface->method-names interface) -> (listof symbol?)
  interface : interface?
procedure
(object-method-arity-includes? object     
                               sym        
                               cnt)   -> boolean?
  object : object?
  sym : symbol?
  cnt : exact-nonnegative-integer?
procedure
(field-names object) -> (listof symbol?)
  object : object?
procedure
(object-info object) -> (or/c class? #f) boolean?
  object : any/c
procedure
(class-info class)
 -> symbol?
    exact-nonnegative-integer?
    (listof symbol?)
    (any/c exact-nonnegative-integer? . -> . any/c)
    (any/c exact-nonnegative-integer? any/c . -> . any/c)
    (or/c class? #f)
    boolean?
  class : class?
struct
(struct exn:fail:object exn:fail ()
        #:extra-constructor-name make-exn:fail:object)
syntax
(surrogate method-spec ...)
 
method-spec = (method-id arg-spec ...)
            | (override method-id arg-spec ...)
            | (override-final method-id (lambda () default-expr)
                              arg-spec ...)
               
arg-spec    = (id ...)
            | id
syntax
(unit
  (import tagged-sig-spec ...)
  (export tagged-sig-spec ...)
  init-depends-decl
  unit-body-expr-or-defn
  ...)
 
tagged-sig-spec   = sig-spec
                  | (tag id sig-spec)
                     
sig-spec          = sig-id
                  | (prefix id sig-spec)
                  | (rename sig-spec (id id) ...)
                  | (only sig-spec id ...)
                  | (except sig-spec id ...)
                     
init-depends-decl = 
                  | (init-depend tagged-sig-id ...)
                     
tagged-sig-id     = sig-id
                  | (tag id sig-id)
syntax
(define-signature id extension-decl
  (sig-elem ...))
 
extension-decl = 
               | extends sig-id
                  
sig-elem       = id
               | (define-syntaxes (id ...) expr)
               | (define-values (id ...) expr)
               | (define-values-for-export (id ...) expr)
               | (contracted [id contract] ...)
               | (open sig-spec)
               | (struct id (field ...) struct-option ...)
               | (sig-form-id . datum)
                  
field          = id
               | [id #:mutable]
                  
struct-option  = #:mutable
               | #:constructor-name constructor-id
               | #:extra-constructor-name constructor-id
               | #:omit-constructor
               | #:omit-define-syntaxes
               | #:omit-define-values
syntax
(open sig-spec)
syntax
(define-values-for-export (id ...) expr)
syntax
(contracted [id contract] ...)
syntax
(only sig-spec id ...)
syntax
(except sig-spec id ...)
syntax
(rename sig-spec (id id) ...)
syntax
(prefix id sig-spec)
syntax
(import tagged-sig-spec ...)
syntax
(export tagged-sig-spec ...)
syntax
(link linkage-decl ...)
syntax
(tag id sig-spec)
(tag id sig-id)
syntax
(init-depend tagged-sig-id ...)
syntax
extends
syntax
(invoke-unit unit-expr)
(invoke-unit unit-expr (import tagged-sig-spec ...))
syntax
(define-values/invoke-unit unit-expr
  (import tagged-sig-spec ...)
  (export tagged-sig-spec ...))
syntax
(compound-unit
  (import link-binding ...)
  (export tagged-link-id ...)
  (link linkage-decl ...))
 
link-binding   = (link-id : tagged-sig-id)
                  
tagged-link-id = (tag id link-id)
               | link-id
                  
linkage-decl   = ((link-binding ...) unit-expr tagged-link-id ...)
syntax
(define-unit unit-id
  (import tagged-sig-spec ...)
  (export tagged-sig-spec ...)
  init-depends-decl
  unit-body-expr-or-defn
  ...)
syntax
(compound-unit/infer
  (import tagged-infer-link-import ...)
  (export tagged-infer-link-export ...)
  (link infer-linkage-decl ...))
 
tagged-infer-link-import = tagged-sig-id
                         | (link-id : tagged-sig-id)
                            
tagged-infer-link-export = (tag id infer-link-export)
                         | infer-link-export
                            
infer-link-export        = link-id
                         | sig-id
                            
infer-linkage-decl       = ((link-binding ...) unit-id
                                               tagged-link-id ...)
                         | unit-id
syntax
(define-compound-unit id
  (import link-binding ...)
  (export tagged-link-id ...)
  (link linkage-decl ...))
syntax
(define-compound-unit/infer id
  (import link-binding ...)
  (export tagged-infer-link-export ...)
  (link infer-linkage-decl ...))
syntax
(define-unit-binding unit-id
  unit-expr
  (import tagged-sig-spec ...+)
  (export tagged-sig-spec ...+)
  init-depends-decl)
syntax
(invoke-unit/infer unit-spec)
 
unit-spec = unit-id
          | (link link-unit-id ...)
syntax
(define-values/invoke-unit/infer maybe-exports unit-spec)
 
maybe-exports = 
              | (export tagged-sig-spec ...)
                 
unit-spec     = unit-id
              | (link link-unit-id ...)
syntax
(unit-from-context tagged-sig-spec)
syntax
(define-unit-from-context id tagged-sig-spec)
syntax
(unit/new-import-export
  (import tagged-sig-spec ...)
  (export tagged-sig-spec ...)
  init-depends-decl
  ((tagged-sig-spec ...) unit-expr tagged-sig-spec))
syntax
(define-unit/new-import-export unit-id
  (import tagged-sig-spec ...)
  (export tagged-sig-spec ...)
  init-depends-decl
  ((tagged-sig-spec ...) unit-expr tagged-sig-spec))
syntax
(unit/s
  (import tagged-sig-spec ...)
  (export tagged-sig-spec ...)
  init-depends-decl
  unit-id)
syntax
(define-unit/s name-id
  (import tagged-sig-spec ...)
  (export tagged-sig-spec ...)
  init-depends-decl
  unit-id)
syntax
(define-signature-form sig-form-id expr)
(define-signature-form (sig-form-id id) body ...+)
syntax
(struct/ctc id ([field contract-expr] ...) struct-option ...)
 
field         = id
              | [id #:mutable]
                 
struct-option = #:mutable
              | #:omit-constructor
              | #:omit-define-syntaxes
              | #:omit-define-values
procedure
(unit? v) -> boolean?
  v : any/c
syntax
(provide-signature-elements sig-spec ...)
syntax
(unit/c (import sig-block ...) (export sig-block ...))
 
sig-block = (tagged-sig-id [id contract] ...)
          | tagged-sig-id
syntax
(define-unit/contract unit-id
  (import sig-spec-block ...)
  (export sig-spec-block ...)
  init-depends-decl
  unit-body-expr-or-defn
  ...)
 
sig-spec-block = (tagged-sig-spec [id contract] ...)
               | tagged-sig-spec
procedure
(unit-static-signatures unit-identifier 
                        err-syntax)     
 -> (list/c (cons/c (or/c symbol? #f)
                    identifier?))
    (list/c (cons/c (or/c symbol? #f)
                    identifier?))
  unit-identifier : identifier?
  err-syntax : syntax?
procedure
(signature-members sig-identifier     
                   err-syntax)    -> (or/c identifier? #f)
                                     (listof identifier?)
                                     (listof identifier?)
                                     (listof identifier?)
  sig-identifier : identifier?
  err-syntax : syntax?
procedure
(flat-contract predicate) -> flat-contract?
  predicate : (any/c . -> . any/c)
procedure
(flat-named-contract  type-name       
                      predicate       
                     [generator]) -> flat-contract?
  type-name : any/c
  predicate : (or/c flat-contract? (any/c . -> . any))
  generator : (or/c #f (-> contract (-> int? any))) = #f
value
any/c : flat-contract?
value
none/c : flat-contract?
procedure
(or/c contract ...) -> contract?
  contract : contract?
procedure
(and/c contract ...) -> contract?
  contract : (or/c contract? (any/c . -> . any/c))
procedure
(not/c flat-contract) -> flat-contract?
  flat-contract : (or/c flat-contract? (any/c . -> . any/c))
procedure
(=/c z) -> flat-contract?
  z : real?
procedure
(</c n) -> flat-contract?
  n : real?
procedure
(>/c n) -> flat-contract?
  n : real?
procedure
(<=/c n) -> flat-contract?
  n : real?
procedure
(>=/c n) -> flat-contract?
  n : real?
procedure
(between/c n m) -> flat-contract?
  n : real?
  m : real?
procedure
(real-in n m) -> flat-contract?
  n : real?
  m : real?
procedure
(integer-in j k) -> flat-contract?
  j : exact-integer?
  k : exact-integer?
value
natural-number/c : flat-contract?
procedure
(string-len/c len) -> flat-contract?
  len : exact-nonnegative-integer?
value
false/c : flat-contract?
value
printable/c : flat-contract?
procedure
(one-of/c v ...+) -> flat-contract?
  v : any/c
procedure
(symbols sym ...+) -> flat-contract?
  sym : symbol?
procedure
(vectorof  c                         
          [#:immutable immutable     
           #:flat? flat?])       -> contract?
  c : contract?
  immutable : (or/c #t #f 'dont-care) = 'dont-care
  flat? : boolean? = #f
procedure
(vector-immutableof c) -> contract?
  c : contract?
procedure
(vector/c  c                         
           ...                       
          [#:immutable immutable     
           #:flat? flat?])       -> contract?
  c : contract?
  immutable : (or/c #t #f 'dont-care) = 'dont-care
  flat? : boolean? = #f
procedure
(vector-immutable/c c ...) -> contract?
  c : contract?
procedure
(box/c  c                         
       [#:immutable immutable     
        #:flat? flat?])       -> contract?
  c : contract?
  immutable : (or/c #t #f 'dont-care) = 'dont-care
  flat? : boolean? = #f
procedure
(box-immutable/c c) -> contract?
  c : contract?
procedure
(listof c) -> contract?
  c : (or/c contract? (any/c . -> . any/c))
procedure
(non-empty-listof c) -> contract?
  c : (or/c contract? (any/c . -> . any/c))
procedure
(cons/c car-c cdr-c) -> contract?
  car-c : contract?
  cdr-c : contract?
procedure
(list/c c ...) -> contract?
  c : (or/c contract? (any/c . -> . any/c))
procedure
(syntax/c c) -> flat-contract?
  c : flat-contract?
syntax
(struct/c struct-id contract-expr ...)
syntax
(struct/dc struct-id field-spec ...)
 
field-spec                 = [field-name maybe-lazy contract-expr]
                           | [field-name (dep-field-name ...)
                                         maybe-lazy
                                         maybe-flat-or-impersonator
                                         maybe-dep-state
                                         contract-expr]
                              
field-name                 = field-id
                           | (field-id #:parent struct-id)
                              
maybe-lazy                 = 
                           | #:lazy
                              
maybe-flat-or-impersonator = 
                           | #:flat
                           | #:impersonator
                              
maybe-dep-state            = 
                           | #:depends-on-state
procedure
(parameter/c c) -> contract?
  c : contract?
procedure
(procedure-arity-includes/c n) -> flat-contract?
  n : exact-nonnegative-integer?
procedure
(hash/c  key                       
         val                       
        [#:immutable immutable     
         #:flat? flat?])       -> contract?
  key : chaperone-contract?
  val : contract?
  immutable : (or/c #t #f 'dont-care) = 'dont-care
  flat? : boolean? = #f
procedure
(prompt-tag/c contract ...) -> contract?
  contract : contract?
procedure
(continuation-mark-key/c contract) -> contract?
  contract : contract?
syntax
(flat-rec-contract id flat-contract-expr ...)
syntax
(flat-murec-contract ([id flat-contract-expr ...] ...) body ...+)
syntax
any
syntax
(promise/c expr)
syntax
(-> dom ... range)
 
dom   = dom-expr
      | keyword dom-expr
         
range = range-expr
      | (values range-expr ...)
      | any
syntax
(->* (mandatory-dom ...) optional-doms rest pre range post)
 
mandatory-dom = dom-expr
              | keyword dom-expr
                 
optional-doms = 
              | (optional-dom ...)
                 
optional-dom  = dom-expr
              | keyword dom-expr
                 
rest          = 
              | #:rest rest-expr
                 
pre           = 
              | #:pre pre-cond-expr
                 
range         = range-expr
              | (values range-expr ...)
              | any
                 
post          = 
              | #:post post-cond-expr
syntax
(->i (mandatory-dependent-dom ...)
     dependent-rest
     pre-condition
     dep-range
     post-condition)
(->i (mandatory-dependent-dom ...)
     (optional-dependent-dom ...)
     dependent-rest
     pre-condition
     dep-range
     post-condition)
 
mandatory-dependent-dom = id+ctc
                        | keyword id+ctc
                           
optional-dependent-dom  = id+ctc
                        | keyword id+ctc
                           
dependent-rest          = 
                        | #:rest id+ctc
                           
pre-condition           = 
                        | #:pre (id ...) boolean-expr pre-condition
                        | #:pre/name (id ...) string boolean-expr pre-condition
                           
dependent-range         = any
                        | id+ctc
                        | un+ctc
                        | (values id+ctc ...)
                        | (values un+ctc ...)
                           
post-condition          = 
                        | #:post (id ...) boolean-expr post-condition
                        | #:post/name (id ...) string boolean-expr post-condition
                           
id+ctc                  = [id contract-expr]
                        | [id (id ...) contract-expr]
                           
un+ctc                  = [_ contract-expr]
                        | [_ (id ...) contract-expr]
syntax
(->d (mandatory-dependent-dom ...)
     dependent-rest
     pre-condition
     dependent-range
     post-condition)
(->d (mandatory-dependent-dom ...)
     (optional-dependent-dom ...)
     dependent-rest
     pre-condition
     dependent-range
     post-condition)
 
mandatory-dependent-dom = [id dom-expr]
                        | keyword [id dom-expr]
                           
optional-dependent-dom  = [id dom-expr]
                        | keyword [id dom-expr]
                           
dependent-rest          = 
                        | #:rest id rest-expr
                           
pre-condition           = 
                        | #:pre boolean-expr
                        | #:pre-cond boolean-expr
                           
dependent-range         = any
                        | [_ range-expr]
                        | (values [_ range-expr] ...)
                        | [id range-expr]
                        | (values [id range-expr] ...)
                           
post-condition          = 
                        | #:post-cond boolean-expr
syntax
(case-> (-> dom-expr ... rest range) ...)
 
rest  = 
      | #:rest rest-expr
         
range = range-expr
      | (values range-expr ...)
      | any
syntax
(unconstrained-domain-> range-expr ...)
value
predicate/c : contract?
value
the-unsupplied-arg : unsupplied-arg?
procedure
(unsupplied-arg? v) -> boolean?
  v : any/c
syntax
(parametric->/c (x ...) c)
procedure
(new-∀/c name) -> contract?
  name : symbol?
procedure
(new-∃/c name) -> contract?
  name : symbol?
syntax
(contract-struct id (field-id ...))

(id/dc field-spec ...)
 
field-spec = [field-id contract-expr]
           | [field-id (field-id ...) contract-expr]
syntax
(define-contract-struct id (field-id ...))
procedure
(struct-type-property/c value-contract) -> contract?
  value-contract : contract?
syntax
(contract-out p/c-item ...)
 
p/c-item       = (struct id ((id contract-expr) ...))
               | (struct (id identifier) ((id contract-expr) ...))
               | (rename orig-id id contract-expr)
               | (id contract-expr)
               | #:∃ poly-variables
               | #:exists poly-variables
               | #:∀ poly-variables
               | #:forall poly-variables
                  
poly-variables = identifier
               | (identifier ...)
syntax
(provide/contract p/c-item ...)
syntax
(with-contract blame-id (wc-export ...) free-var-list ... body ...+)
(with-contract blame-id results-spec free-var-list ... body ...+)
 
wc-export     = (id contract-expr)
                 
result-spec   = #:result contract-expr
              | #:results (contract-expr ...)
                 
free-var-list = 
              | #:freevar id contract-expr
              | #:freevars ([id contract-expr] ...)
syntax
(define/contract id contract-expr free-var-list init-value-expr)
(define/contract (head args) contract-expr free-var-list body ...+)
syntax
(define-struct/contract struct-id ([field contract-expr] ...)
                        struct-option ...)
(define-struct/contract (struct-id super-struct-id)
                        ([field contract-expr] ...)
                        struct-option ...)
syntax
current-contract-region
syntax
(contract contract-expr to-protect-expr
          positive-blame-expr negative-blame-expr)
(contract contract-expr to-protect-expr
          positive-blame-expr negative-blame-expr
          value-name-expr source-location-expr)
procedure
(make-contract [#:name name               
                #:first-order test        
                #:projection proj         
                #:stronger stronger]) -> contract?
  name : any/c = 'anonymous-contract
  test : (-> any/c any/c) = (λ (x) #t)
  proj : (-> blame? (-> any/c any/c))
       = (λ (b)
           (λ (x)
             (if (test x)
               x
               (raise-blame-error
                b x
                '(expected: "~a" given: "~e")
                name x))))
  stronger : (or/c #f (-> contract? contract? boolean?)) = #f
procedure
(make-chaperone-contract [#:name name           
                          #:first-order test    
                          #:projection proj     
                          #:stronger stronger]) 
 -> chaperone-contract?
  name : any/c = 'anonymous-chaperone-contract
  test : (-> any/c any/c) = (λ (x) #t)
  proj : (-> blame? (-> any/c any/c))
       = (λ (b)
           (λ (x)
             (if (test x)
               x
               (raise-blame-error
                b x
                '(expected: "~a" given: "~e")
                name x))))
  stronger : (or/c #f (-> contract? contract? boolean?)) = #f
procedure
(make-flat-contract [#:name name               
                     #:first-order test        
                     #:projection proj         
                     #:stronger stronger]) -> flat-contract?
  name : any/c = 'anonymous-flat-contract
  test : (-> any/c any/c) = (λ (x) #t)
  proj : (-> blame? (-> any/c any/c))
       = (λ (b)
           (λ (x)
             (if (test x)
               x
               (raise-blame-error
                b x
                '(expected: "~a" given: "~e")
                name x))))
  stronger : (or/c #f (-> contract? contract? boolean?)) = #f
procedure
(build-compound-type-name c/s ...) -> any
  c/s : any/c
procedure
(coerce-contract id x) -> contract?
  id : symbol?
  x : any/c
procedure
(coerce-contracts id xs) -> (listof contract?)
  id : symbol?
  xs : (listof any/c)
procedure
(coerce-chaperone-contract id x) -> chaperone-contract?
  id : symbol?
  x : any/c
procedure
(coerce-chaperone-contracts id x)
 -> (listof/c chaperone-contract?)
  id : symbol?
  x : (listof any/c)
procedure
(coerce-flat-contract id x) -> flat-contract?
  id : symbol?
  x : any/c
procedure
(coerce-flat-contracts id x) -> (listof/c flat-contract?)
  id : symbol?
  x : (listof any/c)
procedure
(coerce-contract/f x) -> (or/c contract? #f)
  x : any/c
procedure
(blame? x) -> boolean?
  x : any/c
procedure
(blame-add-context  blame                     
                    context                   
                   [#:important important     
                    #:swap? swap?])       -> blame?
  blame : blame?
  context : (or/c string? #f)
  important : (or/c string? #f) = #f
  swap? : boolean? = #f
procedure
(blame-positive b) -> any/c
  b : blame?
procedure
(blame-negative b) -> any/c
  b : blame?
procedure
(blame-contract b) -> any/c
  b : blame?
procedure
(blame-value b) -> any/c
  b : blame?
procedure
(blame-source b) -> srcloc?
  b : blame?
procedure
(blame-swap b) -> blame?
  b : blame?
procedure
(blame-original? b) -> boolean?
  b : blame?
procedure
(blame-swapped? b) -> boolean?
  b : blame?
procedure
(blame-replace-negative b neg) -> blame?
  b : blame?
  neg : any/c
procedure
(raise-blame-error b x fmt v ...) -> none/c
  b : blame?
  x : any/c
  fmt : (or/c string?
              (listof (or/c string?
                            'given 'given:
                            'expected 'expected:)))
  v : any/c
struct
(struct exn:fail:contract:blame exn:fail:contract (object)
        #:extra-constructor-name make-exn:fail:contract:blame)
  object : blame?
parameter
(current-blame-format) -> (-> blame? any/c string? string?)
(current-blame-format proc) -> void?
  proc : (-> blame? any/c string? string?)
value
prop:contract : struct-type-property?
value
prop:chaperone-contract : struct-type-property?
value
prop:flat-contract : struct-type-property?
value
prop:contracted : struct-type-property?
value
impersonator-prop:contracted : impersonator-property?
procedure
(build-flat-contract-property [#:name get-name               
                               #:first-order get-first-order 
                               #:projection get-projection   
                               #:stronger stronger           
                               #:generator generator])       
 -> flat-contract-property?
  get-name : (-> contract? any/c)
           = (λ (c) 'anonymous-flat-contract)
  get-first-order : (-> contract? (-> any/c boolean?))
                  = (λ (c) (λ (x) #t))
  get-projection : (-> contract? (-> blame? (-> any/c any/c)))
                 = (λ (c)
                     (λ (b)
                       (λ (x)
                         (if ((get-first-order c) x)
                           x
                           (raise-blame-error
                            b x '(expected: "~a" given: "~e") (get-name c) x)))))
  stronger : (or/c (-> contract? contract? boolean?) #f) = #f
  generator : (or/c (-> number? (listof (list any/c contract?)) any/c) #f)
            = #f
procedure
(build-chaperone-contract-property                                
                                   [#:name get-name               
                                    #:first-order get-first-order 
                                    #:projection get-projection   
                                    #:stronger stronger           
                                    #:generator generator])       
 -> chaperone-contract-property?
  get-name : (-> contract? any/c)
           = (λ (c) 'anonymous-chaperone-contract)
  get-first-order : (-> contract? (-> any/c boolean?))
                  = (λ (c) (λ (x) #t))
  get-projection : (-> contract? (-> blame? (-> any/c any/c)))
                 = (λ (c)
                     (λ (b)
                       (λ (x)
                         (if ((get-first-order c) x)
                           x
                           (raise-blame-error
                            b x '(expected: "~a" given: "~e") (get-name c) x)))))
  stronger : (or/c (-> contract? contract? boolean?) #f) = #f
  generator : (or/c (-> number? (listof (list any/c contract?)) any/c) #f)
            = #f
procedure
(build-contract-property [#:name get-name               
                          #:first-order get-first-order 
                          #:projection get-projection   
                          #:stronger stronger           
                          #:generator generator])       
 -> contract-property?
  get-name : (-> contract? any/c) = (λ (c) 'anonymous-contract)
  get-first-order : (-> contract? (-> any/c boolean?))
                  = (λ (c) (λ (x) #t))
  get-projection : (-> contract? (-> blame? (-> any/c any/c)))
                 = (λ (c)
                     (λ (b)
                       (λ (x)
                         (if ((get-first-order c) x)
                           x
                           (raise-blame-error
                            b x '(expected: "~a" given: "~e") (get-name c) x)))))
  stronger : (or/c (-> contract? contract? boolean?) #f) = #f
  generator : (or/c (-> number? (listof (list any/c contract?)) any/c) #f)
            = #f
procedure
(contract-property? x) -> boolean?
  x : any/c
procedure
(chaperone-contract-property? x) -> boolean?
  x : any/c
procedure
(flat-contract-property? x) -> boolean?
  x : any/c
syntax
(define/final-prop header body ...)
 
header = main-id
       | (main-id id ...)
       | (main-id id ... . id)
syntax
(define/subexpression-pos-prop header body ...)
 
header = main-id
       | (main-id id ...)
       | (main-id id ... . id)
procedure
(contract-stronger? x y) -> boolean?
  x : contract?
  y : contract?
procedure
(contract-first-order-passes? contract v) -> boolean?
  contract : contract?
  v : any/c
procedure
(contract-first-order c) -> (-> any/c boolean?)
  c : contract?
procedure
(contract? v) -> boolean?
  v : any/c
procedure
(chaperone-contract? v) -> boolean?
  v : any/c
procedure
(impersonator-contract? v) -> boolean?
  v : any/c
procedure
(flat-contract? v) -> boolean?
  v : any/c
procedure
(flat-contract-predicate v) -> (any/c . -> . any/c)
  v : flat-contract?
procedure
(contract-name c) -> any/c
  c : contract?
procedure
(value-contract v) -> contract?
  v : has-contract?
procedure
(has-contract? v) -> boolean?
  v : any/c
procedure
(contract-projection c) -> (-> blame? (-> any/c any/c))
  c : contract?
procedure
(make-none/c sexp-name) -> contract?
  sexp-name : any/c
syntax
(recursive-contract contract-expr)
(recursive-contract contract-expr type)
syntax
(opt/c contract-expr)
syntax
(define-opt/c (id id ...) expr)
procedure
(make-proj-contract name proj first-order) -> contract?
  name : any/c
  proj : (or/c (-> any/c
                   any/c
                   (list/c any/c any/c)
                   contact?
                   (-> any/c any/c))
               (-> any/c
                   any/c
                   (list/c any/c any/c)
                   contact?
                   boolean?
                   (-> any/c any/c)))
  first-order : (-> any/c boolean?)
procedure
(raise-contract-error val          
                      src          
                      pos          
                      name         
                      fmt          
                      arg ...) -> any/c
  val : any/c
  src : any/c
  pos : any/c
  name : any/c
  fmt : string?
  arg : any/c
procedure
(contract-proc c)
 -> (->* (symbol? symbol? (or/c syntax? (list/c any/c any/c)))
         (boolean?)
         (-> any/c any))
  c : contract?
procedure
(contract-random-generate ctc fuel [fail]) -> any/c
  ctc : contract?
  fuel : int?
  fail : (-> any/c) = (λ () (error ...))
syntax
(match val-expr clause ...)
 
clause = [pat body ...+]
       | [pat (=> id) body ...+]
syntax
(match* (val-expr ...+) clause* ...)
 
clause* = [(pat ...+) body ...+]
        | [(pat ...+) (=> id) body ...+]
syntax
(match/values expr clause clause ...)
syntax
(match-lambda clause ...)
syntax
(match-lambda* clause ...)
syntax
(match-lambda** clause* ...)
syntax
(match-let ([pat expr] ...) body ...+)
syntax
(match-let* ([pat expr] ...) body ...+)
syntax
(match-let-values ([(pat ...) expr] ...) body ...+)
syntax
(match-let*-values ([(pat ...) expr] ...) body ...+)
syntax
(match-letrec ([pat expr] ...) body ...+)
syntax
(match-define pat expr)
syntax
(match-define-values (pat pats ...) expr)
procedure
(exn:misc:match? v) -> boolean?
  v : any/c
syntax
(define-match-expander id proc-expr)
(define-match-expander id proc-expr proc-expr)
value
prop:match-expander : struct-type-property?
value
prop:legacy-match-expander : struct-type-property?
parameter
(match-equality-test) -> (any/c any/c . -> . any)
(match-equality-test comp-proc) -> void?
  comp-proc : (any/c any/c . -> . any)
syntax
(match/derived val-expr original-datum clause ...)
syntax
(match*/derived (val-expr ...) original-datum clause* ...)
syntax
(== val comparator)
(== val)
syntax
(struct* struct-id ([field pat] ...))
procedure
(values v ...) -> any
  v : any/c
procedure
(call-with-values generator receiver) -> any
  generator : (-> any)
  receiver : procedure?
procedure
(raise v [barrier?]) -> any
  v : any/c
  barrier? : any/c = #t
procedure
(error sym) -> any
  sym : symbol?
(error msg v ...) -> any
  msg : string?
  v : any/c
(error src format v ...) -> any
  src : symbol?
  format : string?
  v : any/c
procedure
(raise-user-error sym) -> any
  sym : symbol?
(raise-user-error msg v ...) -> any
  msg : string?
  v : any/c
(raise-user-error src format v ...) -> any
  src : symbol?
  format : string?
  v : any/c
procedure
(raise-argument-error name expected v) -> any
  name : symbol?
  expected : string?
  v : any/c
(raise-argument-error name         
                      expected     
                      bad-pos      
                      v ...)   -> any
  name : symbol?
  expected : string?
  bad-pos : exact-nonnegative-integer?
  v : any/c
procedure
(raise-result-error name expected v) -> any
  name : symbol?
  expected : string?
  v : any/c
(raise-result-error name         
                    expected     
                    bad-pos      
                    v ...)   -> any
  name : symbol?
  expected : string?
  bad-pos : exact-nonnegative-integer?
  v : any/c
procedure
(raise-arguments-error name        
                       message     
                       field       
                       v ...       
                       ...)    -> any
  name : symbol?
  message : string?
  field : string?
  v : any/c
procedure
(raise-range-error name                 
                   type-description     
                   index-prefix         
                   index                
                   in-value             
                   lower-bound          
                   upper-bound          
                   alt-lower-bound) -> any
  name : symbol?
  type-description : string?
  index-prefix : string?
  index : exact-integer?
  in-value : any/c
  lower-bound : exact-integer?
  upper-bound : exact-integer?
  alt-lower-bound : (or/c #f exact-integer?)
procedure
(raise-type-error name expected v) -> any
  name : symbol?
  expected : string?
  v : any/c
(raise-type-error name expected bad-pos v ...) -> any
  name : symbol?
  expected : string?
  bad-pos : exact-nonnegative-integer?
  v : any/c
procedure
(raise-mismatch-error name        
                      message     
                      v ...+      
                      ...+)   -> any
  name : symbol?
  message : string?
  v : any/c
procedure
(raise-arity-error name arity-v [arg-v ...]) -> any
  name : (or/c symbol? procedure?)
  arity-v : (or/c exact-nonnegative-integer?
                  arity-at-least?
                  (listof
                   (or/c exact-nonnegative-integer?
                         arity-at-least?)))
  arg-v : any/c = #f
procedure
(raise-syntax-error  name                
                     message             
                    [expr                
                     sub-expr            
                     extra-sources]) -> any
  name : (or/c symbol? #f)
  message : string?
  expr : any/c = #f
  sub-expr : any/c = #f
  extra-sources : (listof syntax?) = null
procedure
(call-with-exception-handler f thunk) -> any
  f : (any/c . -> . any)
  thunk : (-> any)
parameter
(uncaught-exception-handler) -> (any/c . -> . any)
(uncaught-exception-handler f) -> void?
  f : (any/c . -> . any)
syntax
(with-handlers ([pred-expr handler-expr] ...)
  body ...+)
syntax
(with-handlers* ([pred-expr handler-expr] ...)
  body ...+)
parameter
(error-escape-handler) -> (-> any)
(error-escape-handler proc) -> void?
  proc : (-> any)
parameter
(error-display-handler) -> (string? any/c . -> . any)
(error-display-handler proc) -> void?
  proc : (string? any/c . -> . any)
parameter
(error-print-width) -> (and/c exact-integer? (>=/c 3))
(error-print-width width) -> void?
  width : (and/c exact-integer? (>=/c 3))
parameter
(error-print-context-length) -> exact-nonnegative-integer?
(error-print-context-length cnt) -> void?
  cnt : exact-nonnegative-integer?
parameter
(error-value->string-handler)
 -> (any/c exact-nonnegative-integer?
           . -> .
           string?)
(error-value->string-handler proc) -> void?
  proc : (any/c exact-nonnegative-integer?
                . -> .
                string?)
parameter
(error-print-source-location) -> boolean?
(error-print-source-location include?) -> void?
  include? : any/c
struct
(struct exn (message continuation-marks)
        #:extra-constructor-name make-exn
        #:transparent)
  message : string?
  continuation-marks : continuation-mark-set?
struct
(struct exn:fail exn ()
        #:extra-constructor-name make-exn:fail
        #:transparent)
struct
(struct exn:fail:contract exn:fail ()
        #:extra-constructor-name make-exn:fail:contract
        #:transparent)
struct
(struct exn:fail:contract:arity exn:fail:contract ()
        #:extra-constructor-name make-exn:fail:contract:arity
        #:transparent)
struct
(struct exn:fail:contract:divide-by-zero exn:fail:contract ()
        #:extra-constructor-name
        make-exn:fail:contract:divide-by-zero
        #:transparent)
struct
(struct exn:fail:contract:non-fixnum-result exn:fail:contract ()
        #:extra-constructor-name
        make-exn:fail:contract:non-fixnum-result
        #:transparent)
struct
(struct exn:fail:contract:continuation exn:fail:contract ()
        #:extra-constructor-name
        make-exn:fail:contract:continuation
        #:transparent)
struct
(struct exn:fail:contract:variable exn:fail:contract (id)
        #:extra-constructor-name make-exn:fail:contract:variable
        #:transparent)
  id : symbol?
struct
(struct exn:fail:syntax exn:fail (exprs)
        #:extra-constructor-name make-exn:fail:syntax
        #:transparent)
  exprs : (listof syntax?)
struct
(struct exn:fail:syntax:unbound exn:fail:syntax ()
        #:extra-constructor-name make-exn:fail:syntax:unbound
        #:transparent)
struct
(struct exn:fail:read exn:fail (srclocs)
        #:extra-constructor-name make-exn:fail:read
        #:transparent)
  srclocs : (listof srcloc?)
struct
(struct exn:fail:read:eof exn:fail:read ()
        #:extra-constructor-name make-exn:fail:read:eof
        #:transparent)
struct
(struct exn:fail:read:non-char exn:fail:read ()
        #:extra-constructor-name make-exn:fail:read:non-char
        #:transparent)
struct
(struct exn:fail:filesystem exn:fail ()
        #:extra-constructor-name make-exn:fail:filesystem
        #:transparent)
struct
(struct exn:fail:filesystem:exists exn:fail:filesystem ()
        #:extra-constructor-name make-exn:fail:filesystem:exists
        #:transparent)
struct
(struct exn:fail:filesystem:version exn:fail:filesystem ()
        #:extra-constructor-name make-exn:fail:filesystem:version
        #:transparent)
struct
(struct exn:fail:network exn:fail ()
        #:extra-constructor-name make-exn:fail:network
        #:transparent)
struct
(struct exn:fail:out-of-memory exn:fail ()
        #:extra-constructor-name make-exn:fail:out-of-memory
        #:transparent)
struct
(struct exn:fail:unsupported exn:fail ()
        #:extra-constructor-name make-exn:fail:unsupported
        #:transparent)
struct
(struct exn:fail:user exn:fail ()
        #:extra-constructor-name make-exn:fail:user
        #:transparent)
struct
(struct exn:break exn (continuation)
        #:extra-constructor-name make-exn:break
        #:transparent)
  continuation : continuation?
struct
(struct exn:break:hang-up exn:break ()
        #:extra-constructor-name make-exn:break:hang-up
        #:transparent)
struct
(struct exn:break:terminate exn:break ()
        #:extra-constructor-name make-exn:break:terminate
        #:transparent)
value
prop:exn:srclocs : struct-type-property?
procedure
(exn:srclocs? v) -> boolean?
  v : any/c
procedure
(exn:srclocs-accessor v)
 -> (exn:srclocs? . -> . (listof srcloc))
  v : exn:srclocs?
struct
(struct srcloc (source line column position span)
        #:extra-constructor-name make-srcloc
        #:transparent)
  source : any/c
  line : (or/c exact-positive-integer? #f)
  column : (or/c exact-nonnegative-integer? #f)
  position : (or/c exact-positive-integer? #f)
  span : (or/c exact-nonnegative-integer? #f)
procedure
(promise? v) -> boolean?
  v : any/c
syntax
(delay body ...+)
syntax
(lazy body ...+)
procedure
(force v) -> any
  v : any/c
procedure
(promise-forced? promise) -> boolean?
  promise : promise?
procedure
(promise-running? promise) -> boolean?
  promise : promise?
syntax
(delay/name body ...+)
syntax
(delay/strict body ...+)
syntax
(delay/sync body ...+)
syntax
(delay/thread body/option ...+)
 
body/option = body
            | #:group thread-group-expr
syntax
(delay/idle body/option ...+)
 
body/option = body
            | #:wait-for wait-evt-expr
            | #:work-while while-evt-expr
            | #:tick tick-secs-expr
            | #:use use-ratio-expr
procedure
(call-with-continuation-prompt  proc           
                               [prompt-tag     
                                handler]       
                                arg ...)   -> any
  proc : procedure?
  prompt-tag : continuation-prompt-tag?
             = (default-continuation-prompt-tag)
  handler : (or/c procedure? #f) = #f
  arg : any/c
procedure
(abort-current-continuation prompt-tag     
                            v ...)     -> any
  prompt-tag : any/c
  v : any/c
procedure
(make-continuation-prompt-tag) -> continuation-prompt-tag?
(make-continuation-prompt-tag sym) -> continuation-prompt-tag?
  sym : symbol?
procedure
(default-continuation-prompt-tag) -> continuation-prompt-tag?
procedure
(call-with-current-continuation  proc             
                                [prompt-tag]) -> any
  proc : (continuation? . -> . any)
  prompt-tag : continuation-prompt-tag?
             = (default-continuation-prompt-tag)
procedure
(call/cc proc [prompt-tag]) -> any
  proc : (continuation? . -> . any)
  prompt-tag : continuation-prompt-tag?
             = (default-continuation-prompt-tag)
procedure
(call-with-composable-continuation  proc             
                                   [prompt-tag]) -> any
  proc : (continuation? . -> . any)
  prompt-tag : continuation-prompt-tag?
             = (default-continuation-prompt-tag)
procedure
(call-with-escape-continuation proc) -> any
  proc : (continuation? . -> . any)
procedure
(call/ec proc) -> any
  proc : (continuation? . -> . any)
syntax
(let/cc k body ...+)
syntax
(let/ec k body ...+)
procedure
(call-with-continuation-barrier thunk) -> any
  thunk : (-> any)
procedure
(continuation-prompt-available?  prompt-tag     
                                [cont])     -> any
  prompt-tag : continuation-prompt-tag?
  cont : continuation? = (call/cc values)
procedure
(continuation? v) -> boolean?
  v : any/c
procedure
(continuation-prompt-tag? v) -> boolean?
  v : any/c
procedure
(dynamic-wind pre-thunk       
              value-thunk     
              post-thunk) -> any
  pre-thunk : (-> any)
  value-thunk : (-> any)
  post-thunk : (-> any)
procedure
(call/prompt proc [prompt-tag handler] arg ...) -> any
  proc : procedure?
  prompt-tag : continuation-prompt-tag?
             = (default-continuation-prompt-tag)
  handler : (or/c procedure? #f) = #f
  arg : any/c
procedure
(abort/cc prompt-tag v ...) -> any
  prompt-tag : any/c
  v : any/c
procedure
(call/comp proc [prompt-tag]) -> any
  proc : (continuation? . -> . any)
  prompt-tag : continuation-prompt-tag?
             = (default-continuation-prompt-tag)
procedure
(abort v ...) -> any
  v : any/c
syntax
(% expr)
(% expr handler-expr)
(% expr handler-expr #:tag tag-expr)
procedure
(fcontrol v #:tag prompt-tag) -> any
  v : any/c
  prompt-tag : (default-continuation-prompt-tag)
syntax
(prompt expr ...+)
syntax
(control id expr ...+)
syntax
(prompt-at prompt-tag-expr expr ...+)
syntax
(control-at prompt-tag-expr id expr ...+)
syntax
(reset expr ...+)
syntax
(shift id expr ...+)
syntax
(reset-at prompt-tag-expr expr ...+)
syntax
(shift-at prompt-tag-expr identifier expr ...+)
syntax
(prompt0 expr ...+)
syntax
(reset0 expr ...+)
syntax
(control0 id expr ...+)
syntax
(shift0 id expr ...+)
syntax
(prompt0-at prompt-tag-expr expr ...+)
syntax
(reset0-at prompt-tag-expr expr ...+)
syntax
(control0-at prompt-tag-expr id expr ...+)
syntax
(shift0-at prompt-tag-expr id expr ...+)
procedure
(spawn proc) -> any
  proc : ((any/c . -> . any) . -> . any)
procedure
(splitter proc) -> any
  proc : (((-> any) . -> . any)
          ((continuation? . -> . any) . -> . any)
          . -> . any)
procedure
(new-prompt) -> any
syntax
(set prompt-expr expr ...+)
syntax
(cupto prompt-expr id expr ...+)
procedure
(continuation-marks cont [prompt-tag]) -> continuation-mark-set?
  cont : (or/c continuation? thread? #f)
  prompt-tag : continuation-prompt-tag?
             = (default-continuation-prompt-tag)
procedure
(current-continuation-marks [prompt-tag])
 -> continuation-mark-set?
  prompt-tag : continuation-prompt-tag?
             = (default-continuation-prompt-tag)
procedure
(continuation-mark-set->list  mark-set         
                              key-v            
                             [prompt-tag]) -> list?
  mark-set : continuation-mark-set?
  key-v : any/c
  prompt-tag : continuation-prompt-tag?
             = (default-continuation-prompt-tag)
procedure
(make-continuation-mark-key) -> continuation-mark-key?
(make-continuation-mark-key sym) -> continuation-mark-key?
  sym : symbol?
procedure
(continuation-mark-set->list*  mark-set         
                               key-list         
                              [none-v           
                               prompt-tag]) -> (listof vector?)
  mark-set : continuation-mark-set?
  key-list : (listof any/c)
  none-v : any/c = #f
  prompt-tag : continuation-prompt-tag?
             = (default-continuation-prompt-tag)
procedure
(continuation-mark-set-first  mark-set         
                              key-v            
                             [none-v           
                              prompt-tag]) -> any
  mark-set : (or/c continuation-mark-set? #f)
  key-v : any/c
  none-v : any/c = #f
  prompt-tag : continuation-prompt-tag?
             = (default-continuation-prompt-tag)
procedure
(call-with-immediate-continuation-mark  key-v           
                                        proc            
                                       [default-v]) -> any
  key-v : any/c
  proc : (any/c . -> . any)
  default-v : any/c = #f
procedure
(continuation-mark-key? v) -> boolean?
  v : any/c
procedure
(continuation-mark-set? v) -> boolean?
  v : any/c
procedure
(continuation-mark-set->context mark-set) -> list?
  mark-set : continuation-mark-set?
procedure
(break-enabled) -> boolean?
(break-enabled on?) -> void?
  on? : any/c
syntax
(parameterize-break boolean-expr body ...+)
procedure
(current-break-parameterization) -> break-parameterization?
procedure
(call-with-break-parameterization break-param     
                                  thunk)      -> any
  break-param : break-parameterization?
  thunk : (-> any)
procedure
(exit [v]) -> any
  v : any/c = #t
parameter
(exit-handler) -> (any/c . -> . any)
(exit-handler proc) -> void?
  proc : (any/c . -> . any)
parameter
(executable-yield-handler) -> (byte? . -> . any)
(executable-yield-handler proc) -> void?
  proc : (byte? . -> . any)
procedure
(thread thunk) -> thread?
  thunk : (-> any)
procedure
(thread? v) -> thread?
  v : any/c
procedure
(current-thread) -> thread?
procedure
(thread/suspend-to-kill thunk) -> thread
  thunk : (-> any)
procedure
(call-in-nested-thread thunk [cust]) -> any
  thunk : (->any)
  cust : custodian? = (current-custodian)
procedure
(thread-suspend thd) -> void?
  thd : thread?
procedure
(thread-resume thd [benefactor]) -> void?
  thd : thread?
  benefactor : (or/c thread? custodian? #f) = #f
procedure
(kill-thread thd) -> void?
  thd : thread?
procedure
(break-thread thd [kind]) -> void?
  thd : thread?
  kind : (or/c #f 'hang-up 'terminate) = #f
procedure
(sleep [secs]) -> void?
  secs : (>=/c 0) = 0
procedure
(thread-running? thd) -> any
  thd : thread?
procedure
(thread-dead? thd) -> any
  thd : thread?
procedure
(thread-wait thd) -> void?
  thd : thread?
procedure
(thread-dead-evt thd) -> evt?
  thd : thread?
procedure
(thread-resume-evt thd) -> evt?
  thd : thread?
procedure
(thread-suspend-evt thd) -> evt?
  thd : thread?
procedure
(thread-send thd v [fail-thunk]) -> any
  thd : thread?
  v : any/c
  fail-thunk : (or/c (-> any) #f)
             = (lambda () (raise-mismatch-error ....))
procedure
(thread-receive) -> any/c
procedure
(thread-try-receive) -> any/c
procedure
(thread-receive-evt) -> evt?
procedure
(thread-rewind-receive lst) -> void?
  lst : list?
procedure
(evt? v) -> boolean?
  v : any/c
procedure
(sync evt ...+) -> any
  evt : evt?
procedure
(sync/timeout timeout evt ...+) -> any
  timeout : (or/c #f (and/c real? (not/c negative?)) (-> any))
  evt : evt?
procedure
(sync/enable-break evt ...+) -> any
  evt : evt?
procedure
(sync/timeout/enable-break timeout evt ...+) -> any
  timeout : (or/c #f (and/c real? (not/c negative?)) (-> any))
  evt : evt?
procedure
(choice-evt evt ...) -> evt?
  evt : evt?
procedure
(wrap-evt evt wrap) -> evt?
  evt : (and/c evt? (not/c handle-evt?))
  wrap : (any/c . -> . any)
procedure
(handle-evt evt handle) -> handle-evt?
  evt : (and/c evt? (not/c handle-evt?))
  handle : (any/c . -> . any)
procedure
(guard-evt generator) -> evt?
  generator : (-> evt?)
procedure
(nack-guard-evt generator) -> evt?
  generator : (evt? . -> . evt?)
procedure
(poll-guard-evt generator) -> evt?
  generator : (boolean? . -> . evt?)
value
always-evt : evt?
value
never-evt : evt?
procedure
(system-idle-evt) -> evt?
procedure
(alarm-evt msecs) -> evt
  msecs : nonnegative-number?
procedure
(handle-evt? evt) -> boolean?
  evt : evt?
value
prop:evt : struct-type-property?
parameter
(current-evt-pseudo-random-generator)
 -> pseudo-random-generator?
(current-evt-pseudo-random-generator generator) -> void?
  generator : pseudo-random-generator?
procedure
(channel? v) -> boolean?
  v : any/c
procedure
(make-channel) -> channel?
procedure
(channel-get ch) -> any
  ch : channel?
procedure
(channel-try-get ch) -> any
  ch : channel?
procedure
(channel-put ch v) -> void?
  ch : channel?
  v : any/c
procedure
(channel-put-evt ch v) -> channel-put-evt?
  ch : channel?
  v : any/c
procedure
(channel-put-evt? v) -> boolean?
  v : any/c
procedure
(semaphore? v) -> boolean?
  v : any/c
procedure
(make-semaphore [init]) -> semaphore?
  init : exact-nonnegative-integer? = 0
procedure
(semaphore-post sema) -> void?
  sema : semaphore?
procedure
(semaphore-wait sema) -> void?
  sema : semaphore?
procedure
(semaphore-try-wait? sema) -> boolean?
  sema : semaphore?
procedure
(semaphore-wait/enable-break sema) -> void?
  sema : semaphore?
procedure
(semaphore-peek-evt sema) -> semaphore-peek-evt?
  sema : semaphore?
procedure
(semaphore-peek-evt? v) -> boolean?
  v : any/c
procedure
(call-with-semaphore  sema                
                      proc                
                     [try-fail-thunk]     
                      arg ...)        -> any
  sema : semaphore?
  proc : procedure?
  try-fail-thunk : (or/c (-> any) #f) = #f
  arg : any/c
procedure
(call-with-semaphore/enable-break  sema                
                                   proc                
                                  [try-fail-thunk]     
                                   arg ...)        -> any
  sema : semaphore?
  proc : procedure?
  try-fail-thunk : (or/c (-> any) #f) = #f
  arg : any/c
procedure
(async-channel? v) -> boolean?
  v : any/c
procedure
(make-async-channel [limit]) -> async-channel?
  limit : (or/c exact-positive-integer? #f) = #f
procedure
(async-channel-get ach) -> any/c
  ach : async-channel?
procedure
(async-channel-try-get ach) -> any/c
  ach : async-channel?
procedure
(async-channel-put ach v) -> void?
  ach : async-channel?
  v : any/c
procedure
(async-channel-put-evt ach v) -> evt?
  ach : async-channel?
  v : any/c
procedure
(thread-cell? v) -> boolean?
  v : any/c
procedure
(make-thread-cell v [preserved?]) -> thread-cell?
  v : any/c
  preserved? : any/c = #f
procedure
(thread-cell-ref cell) -> any
  cell : thread-cell?
procedure
(thread-cell-set! cell v) -> any
  cell : thread-cell?
  v : any/c
procedure
(current-preserved-thread-cell-values) -> thread-cell-values?
(current-preserved-thread-cell-values thread-cell-vals) -> void?
  thread-cell-vals : thread-cell-values?
procedure
(thread-cell-values? v) -> boolean?
  v : any/c
procedure
(make-parameter v [guard]) -> parameter?
  v : any/c
  guard : (or/c (any/c . -> . any) #f) = #f
syntax
(parameterize ([parameter-expr value-expr] ...)
  body ...+)
 
  parameter-expr : parameter?
syntax
(parameterize* ((parameter-expr value-expr) ...)
  body ...+)
procedure
(make-derived-parameter parameter     
                        guard         
                        wrap)     -> parameter?
  parameter : parameter?
  guard : (any/c . -> . any)
  wrap : (any/c . -> . any)
procedure
(parameter? v) -> boolean?
  v : any/c
procedure
(parameter-procedure=? a b) -> boolean?
  a : parameter?
  b : parameter?
procedure
(current-parameterization) -> parameterization?
procedure
(call-with-parameterization parameterization     
                            thunk)           -> any
  parameterization : parameterization?
  thunk : (-> any)
procedure
(parameterization? v) -> boolean?
  v : any/c
procedure
(future thunk) -> future?
  thunk : (-> any)
procedure
(touch f) -> any
  f : future?
procedure
(futures-enabled?) -> boolean?
procedure
(current-future) -> (or/c #f future?)
procedure
(future? v) -> boolean?
  v : any/c
procedure
(would-be-future thunk) -> future?
  thunk : (-> any)
procedure
(processor-count) -> exact-positive-integer?
procedure
(make-fsemaphore init) -> fsemaphore?
  init : exact-nonnegative-integer?
procedure
(fsemaphore? v) -> boolean?
  v : any/c
procedure
(fsemaphore-post fsema) -> void?
  fsema : fsemaphore?
procedure
(fsemaphore-wait fsema) -> void?
  fsema : fsemaphore?
procedure
(fsemaphore-try-wait? fsema) -> boolean?
  fsema : fsemaphore?
procedure
(fsemaphore-count fsema) -> exact-nonnegative-integer?
  fsema : fsemaphore?
procedure
(place-enabled?) -> boolean?
procedure
(place? v) -> boolean?
  v : any/c
procedure
(place-channel? v) -> boolean?
  v : any/c
procedure
(dynamic-place module-path start-name) -> place?
  module-path : (or/c module-path? path?)
  start-name : symbol?
procedure
(dynamic-place*  module-path     
                 start-name      
                [#:in in         
                 #:out out       
                 #:err err]) -> place?
                                (or/c output-port? #f)
                                (or/c input-port? #f)
                                (or/c input-port? #f)
  module-path : (or/c module-path? path?)
  start-name : symbol?
  in : (or/c input-port? #f) = #f
  out : (or/c output-port? #f) = (current-output-port)
  err : (or/c output-port? #f) = (current-error-port)
syntax
(place id body ...+)
syntax
(place* maybe-port ...
        id
        body ...+)
 
maybe-port = 
           | #:in in-expr
           | #:out out-expr
           | #:err err-expr
procedure
(place-wait p) -> exact-integer?
  p : place?
procedure
(place-dead-evt p) -> evt?
  p : place?
procedure
(place-kill p) -> void?
  p : place?
procedure
(place-break p [kind]) -> void?
  p : place?
  kind : (or/c #f 'hang-up 'terminate) = #f
procedure
(place-channel) -> place-channel? place-channel?
procedure
(place-channel-put pch v) -> void
  pch : place-channel?
  v : place-message-allowed?
procedure
(place-channel-get pch) -> place-message-allowed?
  pch : place-channel?
procedure
(place-channel-put/get pch v) -> any/c
  pch : place-channel?
  v : any/c
procedure
(place-message-allowed? v) -> boolean?
  v : any/c
procedure
(message-router ec ...+) -> void?
  ec : (is-a?/c event-container<%>)
procedure
(spawn-node-with-place-at                                          
                           hostname                                
                           instance-module-path                    
                           instance-place-function-name            
                          [#:listen-port port                      
                           #:initial-message initial-message       
                           #:racket-path racket-path               
                           #:ssh-bin-path ssh-path                 
                           #:distributed-launch-path launcher-path 
                           #:restart-on-exit restart-on-exit       
                           #:named place-name                      
                           #:thunk thunk])                         
 -> (is-a?/c remote-connection%)
  hostname : string?
  instance-module-path : module-path?
  instance-place-function-name : symbol?
  port : port-no? = DEFAULT-ROUTER-PORT
  initial-message : any = #f
  racket-path : string-path? = (racket-path)
  ssh-path : string-path? = (ssh-bin-path)
  launcher-path : string-path?
                = (path->string distributed-launch-path)
  restart-on-exit : any/c = #f
  place-name : (or/c #f symbol?) = #f
  thunk : (or/c #f #t) = #f
procedure
(spawn-node-supervise-place-at                                          
                                hostname                                
                                instance-module-path                    
                                instance-place-function-name            
                               [#:listen-port port                      
                                #:initial-message initial-message       
                                #:racket-path racket-path               
                                #:ssh-bin-path ssh-path                 
                                #:distributed-launch-path launcher-path 
                                #:restart-on-exit restart-on-exit       
                                #:named named                           
                                #:thunk thunk])                         
 -> (is-a?/c remote-node%)
    (is-a?/c remote-connection%)
  hostname : string?
  instance-module-path : module-path?
  instance-place-function-name : symbol?
  port : port-no? = DEFAULT-ROUTER-PORT
  initial-message : any = #f
  racket-path : string-path? = (racket-path)
  ssh-path : string-path? = (ssh-bin-path)
  launcher-path : string-path?
                = (path->string distributed-launch-path)
  restart-on-exit : any/c = #f
  named : (or/c #f string?) = #f
  thunk : (or/c #f #t) = #f
procedure
(spawn-remote-racket-node                                           
                           hostname                                 
                          [#:listen-port port                       
                           #:racket-path racket-path                
                           #:ssh-bin-path ssh-path                  
                           #:distributed-launch-path launcher-path] 
                           #:use-current-ports use-current-ports)   
 -> (is-a?/c remote-node%)
  hostname : string?
  port : port-no? = DEFAULT-ROUTER-PORT
  racket-path : string-path? = (racket-path)
  ssh-path : string-path? = (ssh-bin-path)
  launcher-path : string-path?
                = (path->string distributed-launch-path)
  use-current-ports : #f
procedure
(create-place-node  hostname                                
                   [#:listen-port port                      
                    #:racket-path racket-path               
                    #:ssh-bin-path ssh-path                 
                    #:distributed-launch-path launcher-path 
                    #:use-current-ports use-current-ports]) 
 -> (is-a?/c remote-node%)
  hostname : string?
  port : port-no? = DEFAULT-ROUTER-PORT
  racket-path : string-path? = (racket-path)
  ssh-path : string-path? = (ssh-bin-path)
  launcher-path : string-path?
                = (path->string distributed-launch-path)
  use-current-ports : boolean? = #t
procedure
(supervise-place-at  remote-node                       
                     instance-module-path              
                     instance-place-function-name      
                    [#:restart-on-exit restart-on-exit 
                     #:named named                     
                     #:thunk thunk])                   
 -> (is-a?/c remote-connection%)
  remote-node : (is-a?/c remote-node%)
  instance-module-path : module-path?
  instance-place-function-name : symbol?
  restart-on-exit : any/c = #f
  named : (or/c #f symbol?) = #f
  thunk : (or/c #f #t) = #f
procedure
(supervise-process-at  hostname                  
                       commandline-argument ...+ 
                      [#:listen-port port])      
 -> (is-a?/c remote-process%)
  hostname : string?
  commandline-argument : string?
  port : port-no? = DEFAULT-ROUTER-PORT
procedure
(supervise-thread-at  remote-node                         
                      instance-module-path                
                      instance-thunk-function-name        
                     [#:restart-on-exit restart-on-exit]) 
 -> (is-a?/c remote-connection%)
  remote-node : (is-a?/c remote-node%)
  instance-module-path : module-path?
  instance-thunk-function-name : symbol?
  restart-on-exit : any/c = #f
procedure
(restart-every  seconds                         
               [#:retry retry                   
                #:on-final-fail on-final-fail]) 
 -> (is-a/c respawn-and-fire%)
  seconds : (number?)
  retry : (or/c number? #f) = #f
  on-final-fail : (or/c #f (-> any/c)) = #f
syntax
(every-seconds seconds-expr body ....)
syntax
(after-seconds seconds-expr body ....)
procedure
(connect-to-named-place node name)
 -> (is-a?/c remote-connection%)
  node : (is-a?/c remote-node%)
  name : symbol?
procedure
(log-message severity msg) -> void?
  severity : (or/c 'fatal 'error 'warning 'info 'debug)
  msg : string?
interface
event-container<%> : interface?
method
(send an-event-container register events) -> (listof events?)
  events : (listof events?)
class
spawned-process% : class?
  superclass: object%
  extends: event-container<%>
method
(send a-spawned-process get-pid) -> exact-positive-integer?
constructor
(new spawned-process%                              
                       [cmdline-list cmdline-list] 
                      [[parent parent]])           
 -> (is-a?/c spawned-process%)
  cmdline-list : (listof (or/c string? path?))
  parent : (is-a?/c remote-node%) = #f
class
place-socket-bridge% : class?
  superclass: object%
  extends: event-container<%>
method
(send a-place-socket-bridge get-sc-id)
 -> exact-positive-integer?
constructor
(new place-socket-bridge%           
                          [pch pch] 
                          [sch sch] 
                          [id id])  
 -> (is-a?/c place-socket-bridge%)
  pch : place-channel?
  sch : (is-a?/c socket-connection%)
  id : exact-positive-integer?
class
socket-connection% : class?
  superclass: object%
  extends: event-container<%>
constructor
(new socket-connection%                                            
                        [[host host]                               
                         [port port]                               
                         [retry-times retry-times]                 
                         [delay delay]                             
                         [background-connect? background-connect?] 
                         [in in]                                   
                         [out out]                                 
                         [remote-node remote-node]])               
 -> (is-a?/c socket-connection%)
  host : (or/c string? #f) = #f
  port : (or/c port-no? #f) = #f
  retry-times : exact-nonnegative-integer? = 30
  delay : number? = 1
  background-connect? : any/c = #f
  in : (or/c input-port? #f) = #f
  out : (or/c output-port #f) = #f
  remote-node : (or/c (is-a?/c remote-node%) #f) = #f
class
node% : class?
  superclass: object%
  extends: event-container<%>
constructor
(new node% [[listen-port listen-port]]) -> (is-a?/c node%)
  listen-port : tcp-listen-port? = #f
method
(send a-node sync-events) -> void?
class
remote-node% : class?
  superclass: object%
  extends: event-container<%>
constructor
(new remote-node%                                      
                  [[listen-port listen-port]           
                   [restart-on-exit restart-on-exit]]) 
 -> (is-a?/c remote-node%)
  listen-port : tcp-listen-port? = #f
  restart-on-exit : any/c = #f
method
(send a-remote-node get-first-place)
 -> (is-a?/c remote-connection%)
method
(send a-remote-node get-first-place-channel) -> place-channel?
method
(send a-remote-node get-log-prefix) -> string?
method
(send a-remote-node launch-place                                        
                                  place-exec                            
                                 [#:restart-on-exit restart-on-exit     
                                  #:one-sided-place? one-sided-place?]) 
 -> (is-a?/c remote-connection%)
  place-exec : list?
  restart-on-exit : any/c = #f
  one-sided-place? : any/c = #f
method
(send a-remote-node remote-connect name) -> remote-connection%
  name : string?
method
(send a-remote-node send-exit) -> void?
procedure
(node-send-exit remote-node%) -> void?
  remote-node% : node
procedure
(node-get-first-place remote-node%)
 -> (is-a?/c remote-connection%)
  remote-node% : node
procedure
(distributed-place-wait remote-connection%) -> void?
  remote-connection% : place
class
remote-connection% : class?
  superclass: object%
  extends: event-container<%>
constructor
(new remote-connection%                                     
                        [node node]                         
                        [place-exec place-exec]             
                        [name name]                         
                        [restart-on-exit restart-on-exit]   
                        [one-sided-place? one-sided-place?] 
                        [on-channel on-channel])            
 -> (is-a?/c remote-connection%)
  node : (is-a?/c remote-node%)
  place-exec : list?
  name : string?
  restart-on-exit : #f
  one-sided-place? : #f
  on-channel : #f
method
(send a-remote-connection set-on-channel! callback) -> void?
  callback : (-> channel msg void?)
class
place% : class?
  superclass: object%
  extends: event-container<%>
constructor
(new place%                                      
             [node node]                         
             [place-exec place-exec]             
             [ch-id ch-id]                       
             [sc sc]                             
            [[on-place-dead on-place-dead]]) -> (is-a?/c place%)
  node : (is-a?/c remote-connection%)
  place-exec : list?
  ch-id : exact-positive-integer?
  sc : (is-a?/c socket-connection%)
  on-place-dead : (-> event void?) = default-on-place-dead
method
(send a-place wait-for-die) -> void?
class
connection% : class?
  superclass: object%
  extends: event-container<%>
constructor
(new connection%                   
                 [node node]       
                 [name name]       
                 [ch-id ch-id]     
                 [sc sc])      -> (is-a?/c connection%)
  node : (is-a?/c remote-node%)
  name : string?
  ch-id : exact-positive-integer?
  sc : (is-a?/c socket-connection%)
class
respawn-and-fire% : class?
  superclass: object%
  extends: event-container<%>
constructor
(new respawn-and-fire%                   
                       [seconds seconds] 
                       [thunk thunk])    
 -> (is-a?/c respawn-and-fire%)
  seconds : (and/c real? (not/c negative?))
  thunk : (-> void?)
class
after-seconds% : class?
  superclass: object%
  extends: event-container<%>
constructor
(new after-seconds%                   
                    [seconds seconds] 
                    [thunk thunk])    
 -> (is-a?/c after-seconds%)
  seconds : (and/c real? (not/c negative?))
  thunk : (-> void?)
class
restarter% : class?
  superclass: after-seconds%
  extends: event-container<%>
constructor
(new restarter%                                  
                 [seconds seconds]               
                [[retry retry]                   
                 [on-final-fail on-final-fail]]) 
 -> (is-a?/c restarter%)
  seconds : number?
  retry : (or/c number? #f) = #f
  on-final-fail : (or/c #f (-> any/c)) = #f
value
distributed-launch-path : path?
procedure
(ssh-bin-path) -> string?
procedure
(racket-path) -> path?
procedure
(build-distributed-launch-path collects-path) -> string?
  collects-path : path-string?
procedure
(spawn-node-at  hostname                                  
               [#:listen-port port                        
                #:racket-path racket-path                 
                #:ssh-bin-path ssh-path                   
                #:distributed-launch-path launcher-path]) 
 -> channel?
  hostname : string?
  port : port-no? = DEFAULT-ROUTER-PORT
  racket-path : string-path? = (racket-path)
  ssh-path : string-path? = (ssh-bin-path)
  launcher-path : string-path?
                = (path->string distributed-launch-path)
procedure
(spawn-nodes/join nodes-descs) -> void?
  nodes-descs : list?
procedure
(*channel-put ch msg) -> void?
  ch : (or/c place-channel? async-bi-channel?
             channel? (is-a?/c remote-connection%))
  msg : any
procedure
(*channel-get ch) -> any
  ch : (or/c place-channel? async-bi-channel?
             channel? (is-a?/c remote-connection%))
procedure
(*channel? v) -> boolean?
  v : any/c
procedure
(send-new-place-channel-to-named-dest ch         
                                      src-id     
                                      dest-list) 
 -> place-channel?
  ch : *channel?
  src-id : any
  dest-list : (listof string? port-no? string?)
procedure
(mr-spawn-remote-node  mrch                          
                       host                          
                      [#:listen-port listen-port     
                       #:solo solo])             -> void?
  mrch : *channel?
  host : string?
  listen-port : port-no? = DEFAULT-ROUTER-PORT
  solo : boolean? = #f
procedure
(mr-supervise-named-dynamic-place-at mrch      
                                     dest      
                                     name      
                                     path      
                                     func) -> void?
  mrch : *channel?
  dest : (listof string? port-no?)
  name : string?
  path : string?
  func : symbol?
procedure
(mr-connect-to mrch dest name) -> void?
  mrch : *channel?
  dest : (listof string? port-no?)
  name : string?
procedure
(start-message-router/thread [#:listen-port listen-port 
                              #:nodes nodes])           
 -> thread? channel?
  listen-port : port-no? = DEFAULT-ROUTER-PORT
  nodes : list? = null
procedure
(port-no? no) -> boolean?
  no : (and/c exact-nonnegative-integer?  (integer-in 0 65535))
value
DEFAULT-ROUTER-PORT : port-no?
class
named-place-typed-channel% : class?
  superclass: object%
constructor
(new named-place-typed-channel% [ch ch])
 -> (is-a?/c named-place-typed-channel%)
  ch : place-channel?
method
(send a-named-place-typed-channel get type) -> any
  type : symbol?
procedure
(tc-get type ch) -> void?
  type : symbol?
  ch : place-channel?
procedure
(write-flush datum port) -> void?
  datum : any
  port : port?
procedure
(printf/f format args ...) -> void?
  format : string?
  args : any
procedure
(displayln/f item) -> void?
  item : any
syntax
(define-remote-server [name identifier?] rpc-forms ...+)
syntax
(define-named-remote-server [name identifier?] rpc-forms ...+)
syntax
(define-state id value)
syntax
(define-rpc (id args ...) body ...)
syntax
(define-cast (id args ...) body ...)
procedure
(log-to-parent msg [#:severity severity]) -> void?
  msg : string?
  severity : symbol? = 'info
procedure
(make-async-bi-channel) -> async-bi-channel?
procedure
(async-bi-channel? ch) -> boolean?
  ch : any
procedure
(async-bi-channel-get ch) -> any
  ch : async-bi-channel?
procedure
(async-bi-channel-put ch msg) -> void?
  ch : async-bi-channel?
  msg : any
struct
(struct rmpi-comm (id cnt channels))
  id : exact-nonnegative-integer?
  cnt : exact-positive-integer?
  channels : vector?
procedure
(rmpi-id comm) -> exact-nonnegative-integer?
  comm : rmpi-comm?
procedure
(rmpi-cnt comm) -> exact-positive-integer?
  comm : rmpi-comm?
procedure
(rmpi-send comm dest val) -> void?
  comm : rmpi-comm?
  dest : exact-nonnegative-integer?
  val : any
procedure
(rmpi-recv comm src) -> any
  comm : rmpi-comm?
  src : exact-nonnegative-integer?
procedure
(rmpi-init ch) -> rmpi-comm?
                  (listof any)
                  (is-a?/c named-place-typed-channel%)
  ch : place-channel?
procedure
(rmpi-broadcast comm src) -> any
  comm : rmpi-comm?
  src : exact-nonnegative-integer?
(rmpi-broadcast comm src val) -> any
  comm : rmpi-comm?
  src : exact-nonnegative-integer?
  val : any
procedure
(rmpi-reduce comm dest op val) -> any
  comm : rmpi-comm?
  dest : exact-nonnegative-integer?
  op : procedure?
  val : any
procedure
(rmpi-barrier comm) -> void?
  comm : rmpi-comm?
procedure
(rmpi-allreduce comm op val) -> any
  comm : rmpi-comm?
  op : procedure?
  val : any
procedure
(rmpi-partition comm num) -> exact-nonnegative-integer?
                             exact-nonnegative-integer?
  comm : rmpi-comm?
  num : exact-nonnegative-integer?
procedure
(rmpi-build-default-config                                                   
                           #:racket-path racket-path                         
                           #:distributed-launch-path distributed-launch-path 
                           #:mpi-module mpi-module                           
                           #:mpi-func mpi-func                               
                           #:mpi-args mpi-args)                              
 -> hash?
  racket-path : string?
  distributed-launch-path : string?
  mpi-module : string?
  mpi-func : symbol?
  mpi-args : (listof any)
procedure
(rmpi-launch default-node-config config) -> void?
  default-node-config : hash?
  config : (listof (list/c string? port-no? symbol?
                           exact-nonnegative-integer?))
procedure
(rmpi-finish comm tc) -> void?
  comm : rmpi-comm?
  tc : (is-a?/c named-place-typed-channel%)
procedure
(engine proc) -> engine?
  proc : ((any/c . -> . void?) . -> . any/c)
procedure
(engine? v) -> any
  v : any/c
procedure
(engine-run until engine) -> boolean?
  until : (or/c evt? real?)
  engine : engine?
procedure
(engine-result engine) -> any
  engine : engine
procedure
(engine-kill engine) -> void?
  engine : engine?
syntax
(syntax-case stx-expr (literal-id ...)
  clause ...)
 
clause       = [pattern result-expr]
             | [pattern fender-expr result-expr]
                
pattern      = _
             | id
             | (pattern ...)
             | (pattern ...+ . pattern)
             | (pattern ... pattern ellipsis pattern ...)
             | (pattern ... pattern ellipsis pattern ... . pattern)
             | #(pattern ...)
             | #(pattern ... pattern ellipsis pattern ...)
             | #s(key-datum pattern ...)
             | #s(key-datum pattern ... pattern ellipsis pattern ...)
             | (ellipsis stat-pattern)
             | const
                
stat-pattern = id
             | (stat-pattern ...)
             | (stat-pattern ...+ . stat-pattern)
             | #(stat-pattern ...)
             | const
                
ellipsis     = ...

_

id

(pattern ...)

(pattern ...+ . pattern)

(pattern ... pattern ellipsis pattern ...)

(pattern ... pattern ellipsis pattern ... . pattern)

#(pattern ...)

#(pattern ... pattern ellipsis pattern ...)

#s(key-datum pattern ...)

#s(key-datum pattern ... pattern ellipsis pattern ...)

(ellipsis stat-pattern)

const
syntax
(syntax-case* stx-expr (literal-id ...) id-compare-expr
  clause ...)
syntax
(with-syntax ([pattern stx-expr] ...)
  body ...+)
syntax
(syntax template)
 
template      = id
              | (template-elem ...)
              | (template-elem ...+ . template)
              | #(template-elem ...)
              | #s(key-datum template-elem ...)
              | (ellipsis stat-template)
              | const
                 
template-elem = template ellipsis ...
                 
stat-template = id
              | (stat-template ...)
              | (stat-template ... . stat-template)
              | #(stat-template ...)
              | #s(key-datum stat-template ...)
              | const
                 
ellipsis      = ...

id

(template-elem ...)

(template-elem ... . template)

#(template-elem ...)

#s(key-datum template-elem ...)

(ellipsis stat-template)

const
syntax
(quasisyntax template)
syntax
(unsyntax expr)
syntax
(unsyntax-splicing expr)
syntax
(syntax/loc stx-expr template)
syntax
(quasisyntax/loc stx-expr template)
syntax
(quote-syntax/prune id)
syntax
(syntax-rules (literal-id ...)
  [(id . pattern) template] ...)
syntax
(syntax-id-rules (literal-id ...)
  [pattern template] ...)
syntax
(define-syntax-rule (id . pattern) template)
syntax
...
syntax
_
procedure
(syntax-pattern-variable? v) -> boolean?
  v : any/c
procedure
(syntax? v) -> boolean?
  v : any/c
procedure
(identifier? v) -> boolean?
  v : any/c
procedure
(syntax-source stx) -> any
  stx : syntax?
procedure
(syntax-line stx) -> (or/c exact-positive-integer? #f)
  stx : syntax?
procedure
(syntax-column stx) -> (or/c exact-nonnegative-integer? #f)
  stx : syntax?
procedure
(syntax-position stx) -> (or/c exact-positive-integer? #f)
  stx : syntax?
procedure
(syntax-span stx) -> (or/c exact-nonnegative-integer? #f)
  stx : syntax?
procedure
(syntax-original? stx) -> boolean?
  stx : syntax?
procedure
(syntax-source-module stx [source?])
 -> (or/c module-path-index? symbol? path? resolved-module-path? #f)
  stx : syntax?
  source? : any/c = #f
procedure
(syntax-e stx) -> any
  stx : syntax?
procedure
(syntax->list stx) -> (or/c list? #f)
  stx : syntax?
procedure
(syntax->datum stx) -> any
  stx : syntax?
procedure
(datum->syntax ctxt v [srcloc prop ignored]) -> syntax?
  ctxt : (or/c syntax? #f)
  v : any/c
  srcloc : (or/c syntax? #f
                 (list/c any/c
                         (or/c exact-positive-integer? #f)
                         (or/c exact-nonnegative-integer? #f)
                         (or/c exact-positive-integer? #f)
                         (or/c exact-nonnegative-integer? #f))
                 (vector/c any/c
                          (or/c exact-positive-integer? #f)
                          (or/c exact-nonnegative-integer? #f)
                          (or/c exact-positive-integer? #f)
                          (or/c exact-nonnegative-integer? #f)))
         = #f
  prop : (or/c syntax? #f) = #f
  ignored : (or/c syntax? #f) = #f
procedure
(datum-intern-literal v) -> any/c
  v : any/c
procedure
(syntax-shift-phase-level stx shift) -> syntax?
  stx : syntax?
  shift : (or/c exact-integer? #f)
procedure
(generate-temporaries stx-pair) -> (listof identifier?)
  stx-pair : (or syntax? list?)
procedure
(identifier-prune-lexical-context  id-stx     
                                  [syms]) -> identifier?
  id-stx : identifier?
  syms : (listof symbol?) = (list (syntax-e id-stx))
procedure
(identifier-prune-to-source-module id-stx) -> identifier?
  id-stx : identifier?
procedure
(syntax-recertify new-stx       
                  old-stx       
                  inspector     
                  key)      -> syntax?
  new-stx : syntax?
  old-stx : syntax?
  inspector : inspector?
  key : any/c
procedure
(bound-identifier=? a-id b-id [phase-level]) -> boolean?
  a-id : syntax?
  b-id : syntax?
  phase-level : (or/c exact-integer? #f)
              = (syntax-local-phase-level)
procedure
(free-identifier=?  a-id                
                    b-id                
                   [a-phase-level       
                    b-phase-level]) -> boolean?
  a-id : syntax?
  b-id : syntax?
  a-phase-level : (or/c exact-integer? #f)
                = (syntax-local-phase-level)
  b-phase-level : (or/c exact-integer? #f) = a-phase-level
procedure
(free-transformer-identifier=? a-id b-id) -> boolean?
  a-id : syntax?
  b-id : syntax?
procedure
(free-template-identifier=? a-id b-id) -> boolean?
  a-id : syntax?
  b-id : syntax?
procedure
(free-label-identifier=? a-id b-id) -> boolean?
  a-id : syntax?
  b-id : syntax?
procedure
(check-duplicate-identifier ids) -> (or/c identifier? #f)
  ids : (listof identifier?)
procedure
(identifier-binding id-stx [phase-level])
 -> (or/c 'lexical
          #f
          (listof module-path-index?
                  symbol?
                  module-path-index?
                  symbol?
                  (or/c 0 1)
                  (or/c exact-integer? #f)
                  (or/c exact-integer? #f)))
  id-stx : syntax?
  phase-level : (or/c exact-integer? #f)
              = (syntax-local-phase-level)
procedure
(identifier-transformer-binding id-stx)
 -> (or/c 'lexical
          #f
          (listof module-path-index?
                  symbol?
                  module-path-index?
                  symbol?
                  (or/c 0 1)
                  (or/c exact-integer? #f)
                  (or/c exact-integer? #f)))
  id-stx : syntax?
procedure
(identifier-template-binding id-stx)
 -> (or/c 'lexical
          #f
          (listof module-path-index?
                  symbol?
                  module-path-index?
                  symbol?
                  (or/c 0 1)
                  (or/c exact-integer? #f)
                  (or/c exact-integer? #f)))
  id-stx : syntax?
procedure
(identifier-label-binding id-stx)
 -> (or/c 'lexical
          #f
          (listof module-path-index?
                  symbol?
                  module-path-index?
                  symbol?
                  (or/c 0 1)
                  (or/c exact-integer? #f)
                  (or/c exact-integer? #f)))
  id-stx : syntax?
procedure
(set!-transformer? v) -> boolean?
  v : any/c
procedure
(make-set!-transformer proc) -> set!-transformer?
  proc : (syntax? . -> . syntax?)
procedure
(set!-transformer-procedure transformer)
 -> (syntax? . -> . syntax?)
  transformer : set!-transformer?
value
prop:set!-transformer : struct-type-property?
procedure
(rename-transformer? v) -> boolean?
  v : any/c
procedure
(make-rename-transformer  id-stx                
                         [delta-introduce]) -> rename-transformer?
  id-stx : syntax?
  delta-introduce : (identifier? . -> . identifier?)
                  = (lambda (id) id)
procedure
(rename-transformer-target transformer) -> identifier?
  transformer : rename-transformer?
value
prop:rename-transformer : struct-type-property?
procedure
(local-expand  stx              
               context-v        
               stop-ids         
              [intdef-ctx]) -> syntax?
  stx : syntax?
  context-v : (or/c 'expression 'top-level 'module 'module-begin list?)
  stop-ids : (or/c (listof identifier?) #f)
  intdef-ctx : (or/c internal-definition-context?
                     (and/c pair?
                            (listof internal-definition-context?))
                     #f)
             = #f
procedure
(syntax-local-expand-expression stx) -> syntax? syntax?
  stx : syntax?
procedure
(local-transformer-expand  stx              
                           context-v        
                           stop-ids         
                          [intdef-ctx]) -> syntax?
  stx : syntax?
  context-v : (or/c 'expression 'top-level 'module 'module-begin list?)
  stop-ids : (or/c (listof identifier?) #f)
  intdef-ctx : (or/c internal-definition-context? #f) = #f
procedure
(local-expand/capture-lifts  stx            
                             context-v      
                             stop-ids       
                            [intdef-ctx     
                             lift-ctx]) -> syntax?
  stx : syntax?
  context-v : (or/c 'expression 'top-level 'module 'module-begin list?)
  stop-ids : (or/c (listof identifier?) #f)
  intdef-ctx : (or/c internal-definition-context? #f) = #f
  lift-ctx : any/c = (gensym 'lifts)
procedure
(local-transformer-expand/capture-lifts  stx            
                                         context-v      
                                         stop-ids       
                                        [intdef-ctx     
                                         lift-ctx]) -> syntax?
  stx : syntax?
  context-v : (or/c 'expression 'top-level 'module 'module-begin list?)
  stop-ids : (or/c (listof identifier?) #f)
  intdef-ctx : (or/c internal-definition-context? #f) = #f
  lift-ctx : any/c = (gensym 'lifts)
procedure
(internal-definition-context? v) -> boolean?
  v : any/c
procedure
(syntax-local-make-definition-context [intdef-ctx])
 -> internal-definition-context?
  intdef-ctx : (or/c internal-definition-context? #f) = #f
procedure
(syntax-local-bind-syntaxes id-list         
                            expr            
                            intdef-ctx) -> void?
  id-list : (listof identifier?)
  expr : (or/c syntax? #f)
  intdef-ctx : internal-definition-context?
procedure
(internal-definition-context-seal intdef-ctx) -> void?
  intdef-ctx : internal-definition-context?
procedure
(identifier-remove-from-definition-context id-stx      
                                           intdef-ctx) 
 -> identifier?
  id-stx : identifier?
  intdef-ctx : (or/c internal-definition-context?
                     (listof internal-definition-context?))
procedure
(syntax-local-value  id-stx            
                    [failure-thunk     
                     intdef-ctx])  -> any
  id-stx : syntax?
  failure-thunk : (or/c (-> any) #f) = #f
  intdef-ctx : (or/c internal-definition-context? = #f
                     #f)
procedure
(syntax-local-value/immediate  id-stx            
                              [failure-thunk     
                               intdef-ctx])  -> any
  id-stx : syntax?
  failure-thunk : (or/c (-> any) #f) = #f
  intdef-ctx : (or/c internal-definition-context? = #f
                     #f)
procedure
(syntax-local-lift-expression stx) -> identifier?
  stx : syntax?
procedure
(syntax-local-lift-values-expression n stx)
 -> (listof identifier?)
  n : exact-nonnegative-integer?
  stx : syntax?
procedure
(syntax-local-lift-context) -> any/c
procedure
(syntax-local-lift-module-end-declaration stx) -> void?
  stx : syntax?
procedure
(syntax-local-lift-require raw-require-spec     
                           stx)             -> syntax?
  raw-require-spec : any/c
  stx : syntax?
procedure
(syntax-local-lift-provide raw-provide-spec-stx) -> void?
  raw-provide-spec-stx : syntax?
procedure
(syntax-local-name) -> any/c
procedure
(syntax-local-context)
 -> (or/c 'expression 'top-level 'module 'module-begin list?)
procedure
(syntax-local-phase-level) -> (or/c exact-integer? #f)
procedure
(syntax-local-module-exports mod-path)
 -> (listof (cons/c (or/c exact-integer? #f) (listof symbol?)))
  mod-path : (or/c module-path?
                   (and/c syntax?
                          (lambda (stx)
                            (module-path? (syntax->datum stx)))))
procedure
(syntax-local-submodules) -> (listof symbol?)
procedure
(syntax-local-get-shadower id-stx) -> identifier?
  id-stx : identifier?
procedure
(syntax-local-certifier [active?])
 -> ((syntax?) (any/c (or/c procedure? #f))
     . ->* . syntax?)
  active? : boolean? = #f
procedure
(syntax-transforming?) -> boolean?
procedure
(syntax-transforming-module-expression?) -> boolean?
procedure
(syntax-local-introduce stx) -> syntax?
  stx : syntax?
procedure
(make-syntax-introducer) -> (syntax? . -> . syntax?)
procedure
(make-syntax-delta-introducer  ext-stx       
                               base-stx      
                              [phase-level]) 
 -> (syntax? . -> . syntax?)
  ext-stx : syntax?
  base-stx : (or/c syntax? #f)
  phase-level : (or/c #f exact-integer?)
              = (syntax-local-phase-level)
procedure
(syntax-local-make-delta-introducer id)
 -> (identifier? . -> . identifier?)
  id : identifier?
procedure
(syntax-local-transforming-module-provides?) -> boolean?
procedure
(syntax-local-module-defined-identifiers)
 -> (and/c hash? immutable?)
procedure
(syntax-local-module-required-identifiers mod-path     
                                          phase-level) 
 -> (listof (cons/c (or/c exact-integer? #f)
                    (listof identifier?)))
  mod-path : (or/c module-path? #f)
  phase-level : (or/c exact-integer? #f #t)
value
prop:liberal-define-context : struct-type-property?
procedure
(liberal-define-context? v) -> boolean?
  v : any/c
procedure
(expand-import stx) -> (listof import?) (listof import-source?)
  stx : syntax?
procedure
(make-require-transformer proc) -> require-transformer?
  proc : (syntax? . -> . (values
                          (listof import?)
                          (listof import-source?)))
value
prop:require-transformer : struct-type-property?
procedure
(require-transformer? v) -> boolean?
  v : any/c
struct
(struct import                                (local-id
                                              src-sym
                                              src-mod-path
                                              mode
                                              req-mode
                                              orig-mode
                                              orig-stx)
        #:extra-constructor-name make-import)
  local-id : identifier?
  src-sym : symbol?
  src-mod-path : (or/c module-path?
                       (and/c syntax?
                              (lambda (stx)
                                (module-path? (syntax->datum stx)))))
  mode : (or/c exact-integer? #f)
  req-mode : (or/c exact-integer? #f)
  orig-mode : (or/c exact-integer? #f)
  orig-stx : syntax?
struct
(struct import-source (mod-path-stx mode)
        #:extra-constructor-name make-import-source)
  mod-path-stx : (and/c syntax?
                        (lambda (x)
                          (module-path? (syntax->datum x))))
  mode : (or/c exact-integer? #f)
parameter
(current-require-module-path) -> (or/c #f module-path-index?)
(current-require-module-path module-path) -> void?
  module-path : (or/c #f module-path-index?)
procedure
(convert-relative-module-path module-path)
 -> (or/c module-path?
          (and/c syntax?
                 (lambda (stx)
                   (module-path? (syntax-e stx)))))
  module-path : (or/c module-path?
                      (and/c syntax?
                             (lambda (stx)
                               (module-path? (syntax-e stx)))))
procedure
(syntax-local-require-certifier)
 -> ((syntax?) (or/c #f (syntax? . -> . syntax?))
     . ->* . syntax?)
procedure
(expand-export stx modes) -> (listof export?)
  stx : syntax?
  modes : (listof (or/c exact-integer? #f))
procedure
(pre-expand-export stx modes) -> syntax?
  stx : syntax?
  modes : (listof (or/c exact-integer? #f))
procedure
(make-provide-transformer proc) -> provide-transformer?
  proc : (syntax? (listof (or/c exact-integer? #f))
          . -> . (listof export?))
(make-provide-transformer proc pre-proc)
 -> (and/c provide-transformer? provide-pre-transformer?)
  proc : (syntax? (listof (or/c exact-integer? #f))
          . -> . (listof export?))
  pre-proc : (syntax? (listof (or/c exact-integer? #f))
              . -> . syntax?)
procedure
(make-provide-pre-transformer pre-proc)
 -> provide-pre-transformer?
  pre-proc : (syntax? (listof (or/c exact-integer? #f))
              . -> . syntax?)
value
prop:provide-transformer : struct-type-property?
value
prop:provide-pre-transformer : struct-type-property?
procedure
(provide-transformer? v) -> boolean?
  v : any/c
procedure
(provide-pre-transformer? v) -> boolean?
  v : any/c
struct
(struct export (local-id out-sym mode protect? orig-stx)
        #:extra-constructor-name make-export)
  local-id : identifier?
  out-sym : symbol?
  mode : (or/c exact-integer? #f)
  protect? : any/c
  orig-stx : syntax?
procedure
(syntax-local-provide-certifier)
 -> ((syntax?) (or/c #f (syntax? . -> . syntax?))
     . ->* . syntax?)
procedure
(syntax-procedure-alias-property stx)
 -> (or/c #f
          (letrec ([val? (recursive-contract
                          (or/c (cons/c identifier? identifier?)
                                (cons/c val? val?)))])
            val?))
  stx : syntax?
procedure
(syntax-procedure-converted-arguments-property stx)
 -> (or/c #f
          (letrec ([val? (recursive-contract
                          (or/c (cons/c identifier? identifier?)
                                (cons/c val? val?)))])
            val?))
  stx : syntax?
syntax
(define-syntax-parameter id expr)
syntax
(syntax-parameterize ([id expr] ...) body-expr ...+)
procedure
(syntax-parameter-value id-stx) -> any
  id-stx : syntax?
procedure
(make-parameter-rename-transformer id-stx) -> any
  id-stx : syntax?
syntax
splicing-let
syntax
splicing-letrec
syntax
splicing-let-values
syntax
splicing-letrec-values
syntax
splicing-let-syntax
syntax
splicing-letrec-syntax
syntax
splicing-let-syntaxes
syntax
splicing-letrec-syntaxes
syntax
splicing-letrec-syntaxes+values
syntax
splicing-local
syntax
splicing-syntax-parameterize
procedure
(syntax-property stx key v) -> syntax?
  stx : syntax?
  key : any/c
  v : any/c
(syntax-property stx key) -> any
  stx : syntax?
  key : any/c
procedure
(syntax-property-symbol-keys stx) -> list?
  stx : syntax?
procedure
(syntax-track-origin new-stx      
                     orig-stx     
                     id-stx)  -> any
  new-stx : syntax?
  orig-stx : syntax?
  id-stx : syntax?
procedure
(syntax-tainted? stx) -> boolean?
  stx : syntax?
procedure
(syntax-arm stx [inspector use-mode?]) -> syntax?
  stx : syntax?
  inspector : (or/c inspector? #f) = #f
  use-mode? : any/c = #f
procedure
(syntax-protect stx) -> syntax?
  stx : syntax?
procedure
(syntax-disarm stx inspector) -> syntax?
  stx : syntax?
  inspector : (or/c inspector? #f)
procedure
(syntax-rearm stx from-stx [use-mode?]) -> syntax?
  stx : syntax?
  from-stx : syntax?
  use-mode? : any/c = #f
procedure
(syntax-taint stx) -> syntax?
  stx : syntax?
procedure
(expand top-level-form) -> syntax?
  top-level-form : any/c
procedure
(expand-syntax stx) -> syntax?
  stx : syntax?
procedure
(expand-once top-level-form) -> syntax?
  top-level-form : any/c
procedure
(expand-syntax-once stx) -> syntax?
  stx : syntax?
procedure
(expand-to-top-form top-level-form) -> syntax?
  top-level-form : any/c
procedure
(expand-syntax-to-top-form stx) -> syntax?
  stx : syntax?
syntax
(include path-spec)
 
path-spec = string
          | (file string)
          | (lib string ...+)
syntax
(include-at/relative-to context source path-spec)
syntax
(include/reader path-spec reader-expr)
syntax
(include-at/relative-to/reader context source path-spec reader-expr)
procedure
(format-id  lctx                 
            fmt                  
            v ...                
           [#:source src         
            #:props props        
            #:cert ignored]) -> identifier?
  lctx : (or/c syntax? #f)
  fmt : string?
  v : (or/c string? symbol? identifier? keyword? char? number?)
  src : (or/c syntax? #f) = #f
  props : (or/c syntax? #f) = #f
  ignored : (or/c syntax? #f) = #f
procedure
(format-symbol fmt v ...) -> symbol?
  fmt : string?
  v : (or/c string? symbol? identifier? keyword? char? number?)
syntax
(define/with-syntax pattern stx-expr)
 
  stx-expr : syntax?
parameter
(current-syntax-context) -> (or/c syntax? false/c)
(current-syntax-context stx) -> void?
  stx : (or/c syntax? false/c)
procedure
(wrong-syntax stx format-string v ...) -> any
  stx : syntax?
  format-string : string?
  v : any/c
parameter
(current-recorded-disappeared-uses)
 -> (or/c (listof identifier?) false/c)
(current-recorded-disappeared-uses ids) -> void?
  ids : (or/c (listof identifier?) false/c)
syntax
(with-disappeared-uses stx-expr)
 
  stx-expr : syntax?
procedure
(syntax-local-value/record id predicate) -> any/c
  id : identifier?
  predicate : (-> any/c boolean?)
procedure
(record-disappeared-uses ids) -> void?
  ids : (listof identifier?)
procedure
(generate-temporary [name-base]) -> identifier?
  name-base : any/c = 'g
procedure
(internal-definition-context-apply intdef-ctx     
                                   stx)       -> syntax?
  intdef-ctx : internal-definition-context?
  stx : syntax?
procedure
(syntax-local-eval stx [intdef-ctx]) -> any
  stx : syntax?
  intdef-ctx : (or/c internal-definition-context? #f) = #f
syntax
(with-syntax* ([pattern stx-expr] ...)
  body ...+)
 
  stx-expr : syntax?
parameter
(current-locale) -> (or/c string? #f)
(current-locale locale) -> void?
  locale : (or/c string? #f)
procedure
(input-port? v) -> boolean?
  v : any/c
procedure
(output-port? v) -> boolean?
  v : any/c
procedure
(port? v) -> boolean?
  v : any/c
procedure
(close-input-port in) -> void?
  in : input-port?
procedure
(close-output-port out) -> void?
  out : output-port?
procedure
(port-closed? port) -> boolean?
  port : port?
procedure
(port-closed-evt port) -> evt?
  port : port?
parameter
(current-input-port) -> input-port?
(current-input-port in) -> void?
  in : input-port?
parameter
(current-output-port) -> output-port?
(current-output-port out) -> void?
  out : output-port?
parameter
(current-error-port) -> output-port?
(current-error-port out) -> void?
  out : output-port?
procedure
(file-stream-port? port) -> boolean?
  port : port?
procedure
(terminal-port? port) -> boolean?
  port : port?
value
eof : eof-object?
procedure
(eof-object? a) -> boolean?
  a : any/c
procedure
(flush-output [out]) -> void?
  out : output-port? = (current-output-port)
procedure
(file-stream-buffer-mode port) -> (or/c 'none 'line 'block #f)
  port : port?
(file-stream-buffer-mode port mode) -> void?
  port : port?
  mode : (or/c 'none 'line 'block)
procedure
(file-position port) -> exact-nonnegative-integer?
  port : port?
(file-position port pos) -> void?
  port : port?
  pos : (or/c exact-nonnegative-integer? eof-object?)
procedure
(file-position* port) -> (or/c exact-nonnegative-integer? #f)
  port : port?
procedure
(port-count-lines! port) -> void?
  port : port?
procedure
(port-next-location port)
 -> (or/c exact-positive-integer? #f)
    (or/c exact-nonnegative-integer? #f)
    (or/c exact-positive-integer? #f)
  port : port?
procedure
(set-port-next-location! port          
                         line          
                         column        
                         position) -> void?
  port : port?
  line : (or/c exact-positive-integer? #f)
  column : (or/c exact-nonnegative-integer? #f)
  position : (or/c exact-positive-integer? #f)
parameter
(port-count-lines-enabled) -> boolean?
(port-count-lines-enabled on?) -> void?
  on? : any/c
procedure
(open-input-file path [#:mode mode-flag]) -> input-port?
  path : path-string?
  mode-flag : (or/c 'binary 'text) = 'binary
procedure
(open-output-file  path                       
                  [#:mode mode-flag           
                   #:exists exists-flag]) -> output-port?
  path : path-string?
  mode-flag : (or/c 'binary 'text) = 'binary
  exists-flag : (or/c 'error 'append 'update 'can-update
                      'replace 'truncate
                      'must-truncate 'truncate/replace)
              = 'error
procedure
(open-input-output-file  path                   
                        [#:mode mode-flag       
                         #:exists exists-flag]) 
 -> input-port? output-port?
  path : path-string?
  mode-flag : (or/c 'binary 'text) = 'binary
  exists-flag : (or/c 'error 'append 'update 'can-update
                      'replace 'truncate 'truncate/replace)
              = 'error
procedure
(call-with-input-file  path                   
                       proc                   
                      [#:mode mode-flag]) -> any
  path : path-string?
  proc : (input-port? . -> . any)
  mode-flag : (or/c 'binary 'text) = 'binary
procedure
(call-with-output-file  path                       
                        proc                       
                       [#:mode mode-flag           
                        #:exists exists-flag]) -> any
  path : path-string?
  proc : (output-port? . -> . any)
  mode-flag : (or/c 'binary 'text) = 'binary
  exists-flag : (or/c 'error 'append 'update
                      'replace 'truncate 'truncate/replace)
              = 'error
procedure
(call-with-input-file*  path                   
                        proc                   
                       [#:mode mode-flag]) -> any
  path : path-string?
  proc : (input-port? . -> . any)
  mode-flag : (or/c 'binary 'text) = 'binary
procedure
(call-with-output-file*  path                       
                         proc                       
                        [#:mode mode-flag           
                         #:exists exists-flag]) -> any
  path : path-string?
  proc : (output-port? . -> . any)
  mode-flag : (or/c 'binary 'text) = 'binary
  exists-flag : (or/c 'error 'append 'update
                      'replace 'truncate 'truncate/replace)
              = 'error
procedure
(with-input-from-file  path                   
                       thunk                  
                      [#:mode mode-flag]) -> any
  path : path-string?
  thunk : (-> any)
  mode-flag : (or/c 'binary 'text) = 'binary
procedure
(with-output-to-file  path                       
                      thunk                      
                     [#:mode mode-flag           
                      #:exists exists-flag]) -> any
  path : path-string?
  thunk : (-> any)
  mode-flag : (or/c 'binary 'text) = 'binary
  exists-flag : (or/c 'error 'append 'update
                      'replace 'truncate 'truncate/replace)
              = 'error
procedure
(port-try-file-lock? port mode) -> boolean?
  port : file-stream-port?
  mode : (or/c 'shared 'exclusive)
procedure
(port-file-unlock port) -> void?
  port : file-stream-port?
procedure
(port-file-identity port) -> exact-positive-integer?
  port : file-stream-port?
procedure
(open-input-bytes bstr [name]) -> input-port?
  bstr : bytes?
  name : any/c = 'string
procedure
(open-input-string str [name]) -> input-port?
  str : string?
  name : any/c = 'string
procedure
(open-output-bytes [name]) -> output-port?
  name : any/c = 'string
procedure
(open-output-string [name]) -> output-port?
  name : any/c = 'string
procedure
(get-output-bytes  out           
                  [reset?        
                   start-pos     
                   end-pos]) -> bytes?
  out : output-port?
  reset? : any/c = #f
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = #f
procedure
(get-output-string out) -> string?
  out : output-port?
procedure
(make-pipe [limit input-name output-name])
 -> input-port? output-port?
  limit : exact-positive-integer? = #f
  input-name : any/c = 'pipe
  output-name : any/c = 'pipe
procedure
(pipe-content-length pipe-port) -> exact-nonnegative-integer?
  pipe-port : port?
value
prop:input-port : struct-type-property?
value
prop:output-port : struct-type-property?
procedure
(make-input-port  name                 
                  read-in              
                  peek                 
                  close                
                 [get-progress-evt     
                  commit               
                  get-location         
                  count-lines!         
                  init-position        
                  buffer-mode])    -> input-port?
  name : any/c
  read-in : (or/c
             (bytes?
              . -> . (or/c exact-nonnegative-integer?
                           eof-object?
                           procedure?
                           evt?))
             input-port?)
  peek : (or/c
          (bytes? exact-nonnegative-integer? (or/c evt? #f)
                  . -> . (or/c exact-nonnegative-integer?
                               eof-object?
                               procedure?
                               evt?
                               #f))
          input-port?)
  close : (-> any)
  get-progress-evt : (or/c (-> evt?) #f) = #f
  commit : (or/c (exact-positive-integer? evt? evt? . -> . any)
                 #f)
         = #f
  get-location : (or/c                                   = #f
                  (()
                   . ->* .
                   ((or/c exact-positive-integer? #f)
                    (or/c exact-nonnegative-integer? #f)
                    (or/c exact-positive-integer? #f)))
                  #f)
  count-lines! : (-> any) = void
  init-position : (or/c exact-positive-integer?
                        port?
                        #f
                        (-> (or/c exact-positive-integer? #f)))
                = 1
  buffer-mode : (or/c (case-> ((or/c 'block 'none) . -> . any)
                              (-> (or/c 'block 'none #f)))
                      #f)
              = #f
procedure
(make-output-port  name                      
                   evt                       
                   write-out                 
                   close                     
                  [write-out-special         
                   get-write-evt             
                   get-write-special-evt     
                   get-location              
                   count-lines!              
                   init-position             
                   buffer-mode])         -> output-port?
  name : any/c
  evt : evt?
  write-out : (or/c
               (bytes? exact-nonnegative-integer?
                       exact-nonnegative-integer?
                       boolean?
                       boolean?
                       . -> .
                       (or/c exact-nonnegative-integer?
                             #f
                             evt?))
               output-port?)
  close : (-> any)
  write-out-special : (or/c (any/c boolean? boolean? = #f
                                   . -> .
                                   (or/c any/c
                                         #f
                                         evt?))
                            output-port?
                            #f)
  get-write-evt : (or/c                               = #f
                   (bytes? exact-nonnegative-integer?
                           exact-nonnegative-integer?
                           . -> .
                           evt?)
                   #f)
  get-write-special-evt : (or/c                = #f
                           (any/c . -> . evt?)
                           #f)
  get-location : (or/c                                   = #f
                  (()
                   . ->* .
                   ((or/c exact-positive-integer? #f)
                    (or/c exact-nonnegative-integer? #f)
                    (or/c exact-positive-integer? #f)))
                  #f)
  count-lines! : (-> any) = void
  init-position : (or/c exact-positive-integer?
                        port?
                        #f
                        (-> (or/c exact-positive-integer? #f)))
                = 1
  buffer-mode : (or/c (case->
                       ((or/c 'block 'line 'none) . -> . any)
                       (-> (or/c 'block 'line 'none #f)))
                      #f)
              = #f
procedure
(port->list [r in]) -> (listof any/c)
  r : (input-port? . -> . any/c) = read
  in : input-port? = (current-input-port)
procedure
(port->string [in]) -> string?
  in : input-port? = (current-input-port)
procedure
(port->bytes [in]) -> bytes?
  in : input-port? = (current-input-port)
procedure
(port->lines [in #:line-mode line-mode]) -> (listof string?)
  in : input-port? = (current-input-port)
  line-mode : (or/c 'linefeed 'return 'return-linefeed 'any 'any-one)
            = 'any
procedure
(port->bytes-lines [in                          
                    #:line-mode line-mode]) -> (listof bytes?)
  in : input-port? = (current-input-port)
  line-mode : (or/c 'linefeed 'return 'return-linefeed 'any 'any-one)
            = 'any
procedure
(display-lines  lst                         
               [out                         
                #:separator separator]) -> void?
  lst : list?
  out : output-port? = (current-output-port)
  separator : any/c = #"\n"
procedure
(call-with-output-string proc) -> string?
  proc : (output-port? . -> . any)
procedure
(call-with-output-bytes proc) -> bytes?
  proc : (output-port? . -> . any)
procedure
(with-output-to-string proc) -> string?
  proc : (-> any)
procedure
(with-output-to-bytes proc) -> bytes?
  proc : (-> any)
procedure
(call-with-input-string str proc) -> any
  str : string?
  proc : (input-port? . -> . any)
procedure
(call-with-input-bytes bstr proc) -> any
  bstr : bytes?
  proc : (input-port? . -> . any)
procedure
(with-input-from-string str proc) -> any
  str : string?
  proc : (-> any)
procedure
(with-input-from-bytes bstr proc) -> any
  bstr : bytes?
  proc : (-> any)
procedure
(input-port-append close-at-eof? in ...) -> input-port?
  close-at-eof? : any/c
  in : input-port?
procedure
(make-input-port/read-to-peek  name              
                               read-in           
                               fast-peek         
                               close             
                              [get-location      
                               count-lines!      
                               init-position     
                               buffer-mode       
                               buffering?        
                               on-consumed]) -> input-port?
  name : any/c
  read-in : (bytes?
             . -> . (or/c exact-nonnegative-integer?
                          eof-object?
                          procedure?
                          evt?))
  fast-peek : (or/c #f
                    (bytes? exact-nonnegative-integer?
                     (bytes? exact-nonnegative-integer?
                      . -> . (or/c exact-nonnegative-integer?
                                   eof-object?
                                   procedure?
                                   evt?
                                   #f))
                     . -> . (or/c exact-nonnegative-integer?
                                  eof-object?
                                  procedure?
                                  evt?
                                  #f)))
  close : (-> any)
  get-location : (or/c                                   = #f
                  (->
                   (values
                    (or/c exact-positive-integer? #f)
                    (or/c exact-nonnegative-integer? #f)
                    (or/c exact-positive-integer? #f)))
                  #f)
  count-lines! : (-> any) = void
  init-position : exact-positive-integer? = 1
  buffer-mode : (or/c (case-> ((or/c 'block 'none) . -> . any)
                              (-> (or/c 'block 'none #f)))
                      #f)
              = #f
  buffering? : any/c = #f
  on-consumed : (or/c ((or/c exact-nonnegative-integer? eof-object?
                             procedure? evt?)
                       . -> . any)
                      #f)
              = #f
procedure
(make-limited-input-port  in                
                          limit             
                         [close-orig?]) -> input-port?
  in : input-port?
  limit : exact-nonnegative-integer?
  close-orig? : any/c = #t
procedure
(make-pipe-with-specials [limit          
                          in-name        
                          out-name]) -> input-port? output-port?
  limit : exact-nonnegative-integer? = #f
  in-name : any/c = 'pipe
  out-name : any/c = 'pipe
procedure
(merge-input a-in b-in [buffer-limit]) -> input-port?
  a-in : input-port?
  b-in : input-port?
  buffer-limit : (or/c exact-nonnegative-integer? #f) = 4096
procedure
(open-output-nowhere [name special-ok?]) -> output-port?
  name : any/c = 'nowhere
  special-ok? : any/c = #t
procedure
(peeking-input-port  in                                  
                    [name                                
                     skip                                
                     #:init-position init-position]) -> input-port
  in : input-port?
  name : any/c = (object-name in)
  skip : exact-nonnegative-integer? = 0
  init-position : exact-positive-integer? = 1
procedure
(reencode-input-port  in                    
                      encoding              
                     [error-bytes           
                      close?                
                      name                  
                      convert-newlines?     
                      enc-error])       -> input-port?
  in : input-port?
  encoding : string?
  error-bytes : (or/c #f bytes?) = #f
  close? : any/c = #f
  name : any/c = (object-name in)
  convert-newlines? : any/c = #f
  enc-error : (string? input-port? . -> . any)
            = (lambda (msg port) (error ...))
procedure
(reencode-output-port  out               
                       encoding          
                      [error-bytes       
                       close?            
                       name              
                       newline-bytes     
                       enc-error])   -> output-port?
  out : output-port?
  encoding : string?
  error-bytes : (or/c #f bytes?) = #f
  close? : any/c = #f
  name : any/c = (object-name out)
  newline-bytes : (or/c #f bytes?) = #f
  enc-error : (string? output-port? . -> . any)
            = (lambda (msg port) (error ...))
procedure
(dup-input-port in [close?]) -> input-port?
  in : input-port?
  close? : any/c = #f
procedure
(dup-output-port out [close?]) -> output-port?
  out : output-port?
  close? : any/c = #f
procedure
(relocate-input-port  in           
                      line         
                      column       
                      position     
                     [close?]) -> input-port?
  in : input-port?
  line : (or/c exact-positive-integer? #f)
  column : (or/c exact-nonnegative-integer? #f)
  position : exact-positive-integer?
  close? : any/c = #t
procedure
(relocate-output-port  out          
                       line         
                       column       
                       position     
                      [close?]) -> output-port?
  out : output-port?
  line : (or/c exact-positive-integer? #f)
  column : (or/c exact-nonnegative-integer? #f)
  position : exact-positive-integer?
  close? : any/c = #t
procedure
(transplant-input-port  in                 
                        get-location       
                        init-pos           
                       [close?             
                        count-lines!]) -> input-port?
  in : input-port?
  get-location : (or/c
                  (->
                   (values
                    (or/c exact-positive-integer? #f)
                    (or/c exact-nonnegative-integer? #f)
                    (or/c exact-positive-integer? #f)))
                  #f)
  init-pos : exact-positive-integer?
  close? : any/c = #t
  count-lines! : (-> any) = void
procedure
(transplant-output-port  out                
                         get-location       
                         init-pos           
                        [close?             
                         count-lines!]) -> output-port?
  out : output-port?
  get-location : (or/c
                  (->
                   (values
                    (or/c exact-positive-integer? #f)
                    (or/c exact-nonnegative-integer? #f)
                    (or/c exact-positive-integer? #f)))
                  #f)
  init-pos : exact-positive-integer?
  close? : any/c = #t
  count-lines! : (-> any) = void
procedure
(filter-read-input-port  in            
                         read-wrap     
                         peek-wrap     
                        [close?])  -> input-port?
  in : input-port?
  read-wrap : (bytes? (or/c exact-nonnegative-integer?
                            eof-object?
                            procedure?
                            evt?)
                      . -> .
                      (or/c exact-nonnegative-integer?
                            eof-object?
                            procedure?
                            evt?))
  peek-wrap : (bytes? exact-nonnegative-integer? (or/c evt? #f)
                      (or/c exact-nonnegative-integer?
                       eof-object?
                       procedure?
                       evt?
                       #f)
               . -> . (or/c exact-nonnegative-integer?
                       eof-object?
                       procedure?
                       evt?
                       #f))
  close? : any/c = #t
procedure
(special-filter-input-port in proc [close?]) -> input-port?
  in : input-port?
  proc : (procedure? bytes? . -> . (or/c exact-nonnegative-integer?
                                         eof-object?
                                         procedure?
                                         evt?))
  close? : any/c = #t
procedure
(eof-evt in) -> evt?
  in : input-port?
procedure
(read-bytes-evt k in) -> evt?
  k : exact-nonnegative-integer?
  in : input-port?
procedure
(read-bytes!-evt bstr in progress-evt) -> evt?
  bstr : (and/c bytes? (not/c immutable?))
  in : input-port?
  progress-evt : (or/c progress-evt? #f)
procedure
(read-bytes-avail!-evt bstr in) -> evt?
  bstr : (and/c bytes? (not/c immutable?))
  in : input-port?
procedure
(read-string-evt k in) -> evt?
  k : exact-nonnegative-integer?
  in : input-port?
procedure
(read-string!-evt str in) -> evt?
  str : (and/c string? (not/c immutable?))
  in : input-port?
procedure
(read-line-evt in mode) -> evt?
  in : input-port?
  mode : (or/c 'linefeed 'return 'return-linefeed 'any 'any-one)
procedure
(read-bytes-line-evt in mode) -> evt?
  in : input-port?
  mode : (or/c 'linefeed 'return 'return-linefeed 'any 'any-one)
procedure
(peek-bytes-evt k skip progress-evt in) -> evt?
  k : exact-nonnegative-integer?
  skip : exact-nonnegative-integer?
  progress-evt : (or/c progress-evt? #f)
  in : input-port?
(peek-bytes!-evt bstr skip progress-evt in) -> evt?
  bstr : (and/c bytes? (not/c immutable?))
  skip : exact-nonnegative-integer?
  progress-evt : (or/c progress-evt? #f)
  in : input-port?
(peek-bytes-avail!-evt bstr             
                       skip             
                       progress-evt     
                       in)          -> evt?
  bstr : (and/c bytes? (not/c immutable?))
  skip : exact-nonnegative-integer?
  progress-evt : (or/c progress-evt? #f)
  in : input-port?
(peek-string-evt k skip progress-evt in) -> evt?
  k : exact-nonnegative-integer?
  skip : exact-nonnegative-integer?
  progress-evt : (or/c progress-evt? #f)
  in : input-port?
(peek-string!-evt str skip progress-evt in) -> evt?
  str : (and/c string? (not/c immutable?))
  skip : exact-nonnegative-integer?
  progress-evt : (or/c progress-evt? #f)
  in : input-port?
procedure
(regexp-match-evt pattern in) -> any
  pattern : (or/c string? bytes? regexp? byte-regexp?)
  in : input-port?
procedure
(convert-stream from-encoding     
                in                
                to-encoding       
                out)          -> void?
  from-encoding : string?
  in : input-port?
  to-encoding : string?
  out : output-port?
procedure
(copy-port in out ...+) -> void?
  in : input-port?
  out : output-port?
procedure
(read-char [in]) -> (or/c char? eof-object?)
  in : input-port? = (current-input-port)
procedure
(read-byte [in]) -> (or/c byte? eof-object?)
  in : input-port? = (current-input-port)
procedure
(read-line [in mode]) -> (or/c string? eof-object?)
  in : input-port? = (current-input-port)
  mode : (or/c 'linefeed 'return 'return-linefeed 'any 'any-one)
       = 'linefeed
procedure
(read-bytes-line [in mode]) -> (or/c bytes? eof-object?)
  in : input-port? = (current-input-port)
  mode : (or/c 'linefeed 'return 'return-linefeed 'any 'any-one)
       = 'linefeed
procedure
(read-string amt [in]) -> (or/c string? eof-object?)
  amt : exact-nonnegative-integer?
  in : input-port? = (current-input-port)
procedure
(read-bytes amt [in]) -> (or/c bytes? eof-object?)
  amt : exact-nonnegative-integer?
  in : input-port? = (current-input-port)
procedure
(read-string! str [in start-pos end-pos])
 -> (or/c exact-positive-integer? eof-object?)
  str : (and/c string? (not/c immutable?))
  in : input-port? = (current-input-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (string-length str)
procedure
(read-bytes! bstr [in start-pos end-pos])
 -> (or/c exact-positive-integer? eof-object?)
  bstr : bytes?
  in : input-port? = (current-input-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(read-bytes-avail! bstr [in start-pos end-pos])
 -> (or/c exact-positive-integer? eof-object? procedure?)
  bstr : bytes?
  in : input-port? = (current-input-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(read-bytes-avail!*  bstr      
                    [in        
                     start-pos 
                     end-pos]) 
 -> (or/c exact-nonnegative-integer? eof-object? procedure?)
  bstr : bytes?
  in : input-port? = (current-input-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(read-bytes-avail!/enable-break  bstr      
                                [in        
                                 start-pos 
                                 end-pos]) 
 -> (or/c exact-positive-integer? eof-object? procedure?)
  bstr : bytes?
  in : input-port? = (current-input-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(peek-string amt skip-bytes-amt [in]) -> (or/c string? eof-object?)
  amt : exact-nonnegative-integer?
  skip-bytes-amt : exact-nonnegative-integer?
  in : input-port? = (current-input-port)
procedure
(peek-bytes amt skip-bytes-amt [in]) -> (or/c bytes? eof-object?)
  amt : exact-nonnegative-integer?
  skip-bytes-amt : exact-nonnegative-integer?
  in : input-port? = (current-input-port)
procedure
(peek-string!  str            
               skip-bytes-amt 
              [in             
               start-pos      
               end-pos])      
 -> (or/c exact-positive-integer? eof-object?)
  str : (and/c string? (not/c immutable?))
  skip-bytes-amt : exact-nonnegative-integer?
  in : input-port? = (current-input-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (string-length str)
procedure
(peek-bytes!  bstr           
              skip-bytes-amt 
             [in             
              start-pos      
              end-pos])      
 -> (or/c exact-positive-integer? eof-object?)
  bstr : (and/c bytes? (not/c immutable?))
  skip-bytes-amt : exact-nonnegative-integer?
  in : input-port? = (current-input-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(peek-bytes-avail!  bstr           
                    skip-bytes-amt 
                   [progress       
                    in             
                    start-pos      
                    end-pos])      
 -> (or/c exact-nonnegative-integer? eof-object? procedure?)
  bstr : (and/c bytes? (not/c immutable?))
  skip-bytes-amt : exact-nonnegative-integer?
  progress : (or/c progress-evt? #f) = #f
  in : input-port? = (current-input-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(peek-bytes-avail!*  bstr           
                     skip-bytes-amt 
                    [progress       
                     in             
                     start-pos      
                     end-pos])      
 -> (or/c exact-nonnegative-integer? eof-object? procedure?)
  bstr : (and/c bytes? (not/c immutable?))
  skip-bytes-amt : exact-nonnegative-integer?
  progress : (or/c progress-evt? #f) = #f
  in : input-port? = (current-input-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(peek-bytes-avail!/enable-break  bstr           
                                 skip-bytes-amt 
                                [progress       
                                 in             
                                 start-pos      
                                 end-pos])      
 -> (or/c exact-nonnegative-integer? eof-object? procedure?)
  bstr : (and/c bytes? (not/c immutable?))
  skip-bytes-amt : exact-nonnegative-integer?
  progress : (or/c progress-evt? #f) = #f
  in : input-port? = (current-input-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(read-char-or-special [in]) -> (or/c char? eof-object? any/c)
  in : input-port? = (current-input-port)
procedure
(read-byte-or-special [in]) -> (or/c byte? eof-object? any/c)
  in : input-port? = (current-input-port)
procedure
(peek-char [in skip-bytes-amt]) -> (or/c char? eof-object?)
  in : input-port? = (current-input-port)
  skip-bytes-amt : exact-nonnegative-integer? = 0
procedure
(peek-byte [in skip-bytes-amt]) -> (or/c byte? eof-object?)
  in : input-port? = (current-input-port)
  skip-bytes-amt : exact-nonnegative-integer? = 0
procedure
(peek-char-or-special [in skip-bytes-amt])
 -> (or/c char? eof-object? any/c)
  in : input-port? = (current-input-port)
  skip-bytes-amt : exact-nonnegative-integer? = 0
procedure
(peek-byte-or-special [in             
                       skip-bytes-amt 
                       progress])     
 -> (or/c byte? eof-object? any/c)
  in : input-port? = (current-input-port)
  skip-bytes-amt : exact-nonnegative-integer? = 0
  progress : (or/c progress-evt? #f) = #f
procedure
(port-progress-evt [in]) -> progress-evt?
  in : (and/c input-port? port-provides-progress-evts?)
     = (current-input-port)
procedure
(port-provides-progress-evts? in) -> boolean
  in : input-port?
procedure
(port-commit-peeked amt progress evt [in]) -> boolean?
  amt : exact-nonnegative-integer?
  progress : progress-evt?
  evt : evt?
  in : input-port? = (current-input-port)
procedure
(byte-ready? [in]) -> boolean?
  in : input-port? = (current-input-port)
procedure
(char-ready? [in]) -> boolean?
  in : input-port? = (current-input-port)
procedure
(progress-evt? v) -> boolean?
  v : any/c
(progress-evt? evt in) -> boolean?
  evt : progress-evt?
  in : input-port?
procedure
(write-char char [out]) -> void?
  char : character?
  out : output-port? = (current-output-port)
procedure
(write-byte byte [out]) -> void?
  byte : any/c
  out : output-port? = (current-output-port)
procedure
(newline [out]) -> void?
  out : output-port? = (current-output-port)
procedure
(write-string str [out start-pos end-pos])
 -> exact-nonnegative-integer?
  str : string?
  out : output-port? = (current-output-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (string-length str)
procedure
(write-bytes bstr [out start-pos end-pos])
 -> exact-nonnegative-integer?
  bstr : bytes?
  out : output-port? = (current-output-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(write-bytes-avail  bstr          
                   [out           
                    start-pos     
                    end-pos]) -> exact-nonnegative-integer?
  bstr : bytes?
  out : output-port? = (current-output-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(write-bytes-avail*  bstr      
                    [out       
                     start-pos 
                     end-pos]) 
 -> (or/c exact-nonnegative-integer? #f)
  bstr : bytes?
  out : output-port? = (current-output-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(write-bytes-avail/enable-break  bstr      
                                [out       
                                 start-pos 
                                 end-pos]) 
 -> exact-nonnegative-integer?
  bstr : bytes?
  out : output-port? = (current-output-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(write-special v [out]) -> boolean?
  v : any/c
  out : output-port? = (current-output-port)
procedure
(write-special-avail* v [out]) -> boolean?
  v : any/c
  out : output-port? = (current-output-port)
procedure
(write-bytes-avail-evt  bstr          
                       [out           
                        start-pos     
                        end-pos]) -> evt?
  bstr : bytes?
  out : output-port? = (current-output-port)
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(write-special-evt v [out]) -> evt?
  v : any/c
  out : output-port? = (current-output-port)
procedure
(port-writes-atomic? out) -> boolean?
  out : output-port?
procedure
(port-writes-special? out) -> boolean?
  out : output-port?
procedure
(read [in]) -> any
  in : input-port? = (current-input-port)
procedure
(read-syntax [source-name in]) -> (or/c syntax? eof-object?)
  source-name : any/c = (object-name in)
  in : input-port? = (current-input-port)
procedure
(read/recursive [in start readtable graph?]) -> any
  in : input-port? = (current-input-port)
  start : (or/c char? #f) = #f
  readtable : (or/c readtable? #f) = (current-readtable)
  graph? : any/c = #t
procedure
(read-syntax/recursive [source-name     
                        in              
                        start           
                        readtable       
                        graph?])    -> any
  source-name : any/c = (object-name in)
  in : input-port? = (current-input-port)
  start : (or/c char? #f) = #f
  readtable : (or/c readtable? #f) = (current-readtable)
  graph? : any/c = #t
procedure
(read-language [in fail-thunk]) -> (any/c any/c . -> . any)
  in : input-port? = (current-input-port)
  fail-thunk : (-> any) = (lambda () (error ...))
parameter
(read-case-sensitive) -> boolean?
(read-case-sensitive on?) -> void?
  on? : any/c
parameter
(read-square-bracket-as-paren) -> boolean?
(read-square-bracket-as-paren on?) -> void?
  on? : any/c
parameter
(read-curly-brace-as-paren) -> boolean?
(read-curly-brace-as-paren on?) -> void?
  on? : any/c
parameter
(read-accept-box) -> boolean?
(read-accept-box on?) -> void?
  on? : any/c
parameter
(read-accept-compiled) -> boolean?
(read-accept-compiled on?) -> void?
  on? : any/c
parameter
(read-accept-bar-quote) -> boolean?
(read-accept-bar-quote on?) -> void?
  on? : any/c
parameter
(read-accept-graph) -> boolean?
(read-accept-graph on?) -> void?
  on? : any/c
parameter
(read-decimal-as-inexact) -> boolean?
(read-decimal-as-inexact on?) -> void?
  on? : any/c
parameter
(read-accept-dot) -> boolean?
(read-accept-dot on?) -> void?
  on? : any/c
parameter
(read-accept-infix-dot) -> boolean?
(read-accept-infix-dot on?) -> void?
  on? : any/c
parameter
(read-accept-quasiquote) -> boolean?
(read-accept-quasiquote on?) -> void?
  on? : any/c
parameter
(read-accept-reader) -> boolean?
(read-accept-reader on?) -> void?
  on? : any/c
parameter
(read-accept-lang) -> boolean?
(read-accept-lang on?) -> void?
  on? : any/c
parameter
(current-reader-guard) -> (any/c . -> . any)
(current-reader-guard proc) -> void?
  proc : (any/c . -> . any)
parameter
(current-readtable) -> (or/c readtable? #f)
(current-readtable readtable) -> void?
  readtable : (or/c readtable? #f)
parameter
(read-on-demand-source) -> (and/c path? complete-path?)
(read-on-demand-source path) -> void?
  path : (and/c path? complete-path?)
procedure
(port-read-handler in) -> (case->
                           (input-port? . -> . any)
                           (input-port?  any/c . -> . any))
  in : input-port?
(port-read-handler in proc) -> void?
  in : input-port?
  proc : (case->
          (input-port? . -> . any)
          (input-port? any/c . -> . any))
procedure
(write datum [out]) -> void?
  datum : any/c
  out : output-port? = (current-output-port)
procedure
(display datum [out]) -> void?
  datum : any/c
  out : output-port? = (current-output-port)
procedure
(print datum [out quote-depth]) -> void?
  datum : any/c
  out : output-port? = (current-output-port)
  quote-depth : (or/c 0 1) = 0
procedure
(displayln datum [out]) -> void?
  datum : any/c
  out : output-port? = (current-output-port)
procedure
(fprintf out form v ...) -> void?
  out : output-port?
  form : string?
  v : any/c
procedure
(printf form v ...) -> void?
  form : string?
  v : any/c
procedure
(eprintf form v ...) -> void?
  form : string?
  v : any/c
procedure
(format form v ...) -> string?
  form : string?
  v : any/c
parameter
(print-pair-curly-braces) -> boolean?
(print-pair-curly-braces on?) -> void?
  on? : any/c
parameter
(print-mpair-curly-braces) -> boolean?
(print-mpair-curly-braces on?) -> void?
  on? : any/c
parameter
(print-unreadable) -> boolean?
(print-unreadable on?) -> void?
  on? : any/c
parameter
(print-graph) -> boolean?
(print-graph on?) -> void?
  on? : any/c
parameter
(print-struct) -> boolean?
(print-struct on?) -> void?
  on? : any/c
parameter
(print-box) -> boolean?
(print-box on?) -> void?
  on? : any/c
parameter
(print-vector-length) -> boolean?
(print-vector-length on?) -> void?
  on? : any/c
parameter
(print-hash-table) -> boolean?
(print-hash-table on?) -> void?
  on? : any/c
parameter
(print-boolean-long-form) -> boolean?
(print-boolean-long-form on?) -> void?
  on? : any/c
parameter
(print-reader-abbreviations) -> boolean?
(print-reader-abbreviations on?) -> void?
  on? : any/c
parameter
(print-as-expression) -> boolean?
(print-as-expression on?) -> void?
  on? : any/c
parameter
(print-syntax-width)
 -> (or/c +inf.0 0 (and/c exact-integer? (>/c 3)))
(print-syntax-width width) -> void?
  width : (or/c +inf.0 0 (and/c exact-integer? (>/c 3)))
parameter
(current-write-relative-directory)
 -> (or/c (and/c path? complete-path?)
          (cons/c (and/c path? complete-path?)
                  (and/c path? complete-path?))
          #f)
(current-write-relative-directory path) -> void?
  path : (or/c (and/c path-string? complete-path?)
               (cons/c (and/c path-string? complete-path?)
                       (and/c path-string? complete-path?))
               #f)
procedure
(port-write-handler out) -> (any/c output-port? . -> . any)
  out : output-port?
(port-write-handler out proc) -> void?
  out : output-port?
  proc : (any/c output-port? . -> . any)
procedure
(port-display-handler out) -> (any/c output-port? . -> . any)
  out : output-port?
(port-display-handler out proc) -> void?
  out : output-port?
  proc : (any/c output-port? . -> . any)
procedure
(port-print-handler out)
 -> ((any/c output-port?) ((or/c 0 1)) . ->* . any)
  out : output-port?
(port-print-handler out proc) -> void?
  out : output-port?
  proc : (any/c output-port? . -> . any)
procedure
(global-port-print-handler)
 -> (->* (any/c output-port?) ((or/c 0 1)) any)
(global-port-print-handler proc) -> void?
  proc : (or/c (->* (any/c output-port?) ((or/c 0 1)) any)
               (any/c output-port? . -> . any))
procedure
(pretty-print v [port quote-depth]) -> void?
  v : any/c
  port : output-port? = (current-output-port)
  quote-depth : (or/c 0 1) = 0
procedure
(pretty-write v [port]) -> void?
  v : any/c
  port : output-port? = (current-output-port)
procedure
(pretty-display v [port]) -> void?
  v : any/c
  port : output-port? = (current-output-port)
procedure
(pretty-format v [columns]) -> string?
  v : any/c
  columns : exact-nonnegative-integer? = (pretty-print-columns)
procedure
(pretty-print-handler v) -> void?
  v : any/c
parameter
(pretty-print-columns)
 -> (or/c exact-positive-integer? 'infinity)
(pretty-print-columns width) -> void?
  width : (or/c exact-positive-integer? 'infinity)
parameter
(pretty-print-depth) -> (or/c exact-nonnegative-integer? #f)
(pretty-print-depth depth) -> void?
  depth : (or/c exact-nonnegative-integer? #f)
parameter
(pretty-print-exact-as-decimal) -> boolean?
(pretty-print-exact-as-decimal as-decimal?) -> void?
  as-decimal? : any/c
parameter
(pretty-print-.-symbol-without-bars) -> boolean?
(pretty-print-.-symbol-without-bars on?) -> void?
  on? : any/c
parameter
(pretty-print-show-inexactness) -> boolean?
(pretty-print-show-inexactness show?) -> void?
  show? : any/c
parameter
(pretty-print-abbreviate-read-macros) -> boolean?
(pretty-print-abbreviate-read-macros abbrev?) -> void?
  abbrev? : any/c
procedure
(pretty-print-style-table? v) -> boolean?
  v : any/c
parameter
(pretty-print-current-style-table) -> pretty-print-style-table?
(pretty-print-current-style-table style-table) -> void?
  style-table : pretty-print-style-table?
procedure
(pretty-print-extend-style-table style-table       
                                 symbol-list       
                                 like-symbol-list) 
 -> pretty-print-style-table?
  style-table : pretty-print-style-table?
  symbol-list : (listof symbol?)
  like-symbol-list : (listof symbol?)
parameter
(pretty-print-remap-stylable)
 -> (any/c . -> . (or/c symbol? #f))
(pretty-print-remap-stylable proc) -> void?
  proc : (any/c . -> . (or/c symbol? #f))
procedure
(pretty-print-newline port width) -> void?
  port : out-port?
  width : exact-nonnegative-integer?
parameter
(pretty-print-print-line)
 -> ((or/c exact-nonnegative-integer? #f)
     output-port?
     exact-nonnegative-integer?
     (or/c exact-nonnegative-integer? 'infinity)
     . -> .
     exact-nonnegative-integer?)
(pretty-print-print-line proc) -> void?
  proc : ((or/c exact-nonnegative-integer? #f)
          output-port?
          exact-nonnegative-integer?
          (or/c exact-nonnegative-integer? 'infinity)
          . -> .
          exact-nonnegative-integer?)
parameter
(pretty-print-size-hook)
 -> (any/c boolean? output-port?
     . -> .
     (or/c #f exact-nonnegative-integer?))
(pretty-print-size-hook proc) -> void?
  proc : (any/c boolean? output-port?
          . -> .
          (or/c #f exact-nonnegative-integer?))
parameter
(pretty-print-print-hook)
 -> (any/c boolean? output-port? . -> . void?)
(pretty-print-print-hook proc) -> void?
  proc : (any/c boolean? output-port? . -> . void?)
parameter
(pretty-print-pre-print-hook)
 -> (any/c output-port? . -> . void)
(pretty-print-pre-print-hook proc) -> void?
  proc : (any/c output-port? . -> . void)
parameter
(pretty-print-post-print-hook)
 -> (any/c output-port? . -> . void)
(pretty-print-post-print-hook proc) -> void?
  proc : (any/c output-port? . -> . void)
parameter
(pretty-printing) -> boolean?
(pretty-printing on?) -> void?
  on? : any/c
procedure
(make-tentative-pretty-print-output-port out             
                                         width           
                                         overflow-thunk) 
 -> output-port?
  out : output-port?
  width : exact-nonnegative-integer?
  overflow-thunk : (-> any)
procedure
(tentative-pretty-print-port-transfer tentative-out     
                                      orig-out)     -> void?
  tentative-out : output-port?
  orig-out : output-port?
procedure
(tentative-pretty-print-port-cancel tentative-out) -> void?
  tentative-out : output-port?
procedure
(readtable? v) -> boolean?
  v : any/c
procedure
(make-readtable readtable        
                key              
                mode             
                action ...+) -> readtable?
  readtable : readtable?
  key : (or/c character? #f)
  mode : (or/c (or/c 'terminating-macro
                     'non-terminating-macro
                     'dispatch-macro)
               character?)
  action : (or/c procedure?
                 readtable?)
procedure
(readtable-mapping readtable char)
 -> (or/c character?
          (or/c 'terminating-macro
                'non-terminating-macro))
    (or/c #f procedure?)
    (or/c #f procedure?)
  readtable : readtable?
  char : character?
procedure
(make-special-comment v) -> special-comment?
  v : any/c
procedure
(special-comment? v) -> boolean?
  v : any/c
procedure
(special-comment-value sc) -> any
  sc : special-comment?
value
gen:custom-write : any/c
value
prop:custom-write : struct-type-property?
procedure
(custom-write? v) -> boolean?
  v : any/c
procedure
(custom-write-accessor v)
 -> (custom-write? output-port? boolean? . -> . any)
  v : custom-write?
value
prop:custom-print-quotable : struct-type-property?
value
custom-print-quotable? : struct-type-property?
value
custom-print-quotable-accessor : struct-type-property?
procedure
(serializable? v) -> boolean?
  v : any/c
procedure
(serialize v) -> any
  v : serializable?
procedure
(deserialize v) -> any
  v : any/c
procedure
(serialized=? v1 v2) -> boolean?
  v1 : any/c
  v2 : any/c
parameter
(deserialize-module-guard)
 -> (module-path? symbol? . -> . void?)
(deserialize-module-guard guard) -> void?
  guard : (module-path? symbol? . -> . void?)
syntax
(serializable-struct id maybe-super (field ...)
                     struct-option ...)
syntax
(define-serializable-struct id-maybe-super (field ...)
                             struct-option ...)
syntax
(serializable-struct/versions id maybe-super vers (field ...)
                              (other-version-clause ...)
                              struct-option ...)
 
other-version-clause = (other-vers make-proc-expr
                                   cycle-make-proc-expr)
syntax
(define-serializable-struct/versions id-maybe-super vers (field ...)
                                     (other-version-clause ...)
                                     struct-option ...)
procedure
(make-deserialize-info make cycle-make) -> any
  make : procedure?
  cycle-make : (-> (values any/c procedure?))
value
prop:serializable : property?
procedure
(make-serialize-info to-vector          
                     deserialize-id     
                     can-cycle?         
                     dir)           -> any
  to-vector : (any/c . -> . vector?)
  deserialize-id : (or identifier?
                       symbol?
                       (cons/c symbol?
                               module-path-index?))
  can-cycle? : any/c
  dir : path-string?
procedure
(s-exp->fasl v [out]) -> (or/c (void) bytes?)
  v : any/c
  out : (or/c output-port? #f) = #f
procedure
(fasl->s-exp in) -> any/c
  in : (or/c input-port? bytes?)
procedure
(namespace? v) -> boolean?
  v : any/c
procedure
(make-empty-namespace) -> namespace?
procedure
(make-base-empty-namespace) -> namespace?
procedure
(make-base-namespace) -> namespace?
syntax
(define-namespace-anchor id)
procedure
(namespace-anchor? v) -> boolean?
  v : any/c
procedure
(namespace-anchor->empty-namespace a) -> namespace?
  a : namespace-anchor?
procedure
(namespace-anchor->namespace a) -> namespace?
  a : namespace-anchor?
parameter
(current-namespace) -> namespace?
(current-namespace n) -> void?
  n : namespace?
procedure
(namespace-symbol->identifier sym) -> identifier?
  sym : symbol?
procedure
(namespace-base-phase [namespace]) -> exact-integer?
  namespace : namespace? = (current-namespace)
procedure
(namespace-module-identifier [where]) -> identifier?
  where : (or/c namespace? exact-integer? #f)
        = (current-namespace)
procedure
(namespace-variable-value  sym               
                          [use-mapping?      
                           failure-thunk     
                           namespace])   -> any
  sym : symbol?
  use-mapping? : any/c = #t
  failure-thunk : (or/c (-> any) #f) = #f
  namespace : namespace? = (current-namespace)
procedure
(namespace-set-variable-value!  sym             
                                v               
                               [map?            
                                namespace]) -> void?
  sym : symbol?
  v : any/c
  map? : any/c = #f
  namespace : namespace? = (current-namespace)
procedure
(namespace-undefine-variable!  sym             
                              [namespace]) -> void?
  sym : symbol?
  namespace : namespace? = (current-namespace)
procedure
(namespace-mapped-symbols [namespace]) -> (listof symbol?)
  namespace : namespace? = (current-namespace)
procedure
(namespace-require quoted-raw-require-spec) -> void?
  quoted-raw-require-spec : any/c
procedure
(namespace-require/copy quoted-raw-require-spec) -> void?
  quoted-raw-require-spec : any/c
procedure
(namespace-require/constant quoted-raw-require-spec) -> void?
  quoted-raw-require-spec : any/c
procedure
(namespace-require/expansion-time quoted-raw-require-spec)
 -> void?
  quoted-raw-require-spec : any/c
procedure
(namespace-attach-module  src-namespace        
                          modname              
                         [dest-namespace]) -> void?
  src-namespace : namespace?
  modname : module-path?
  dest-namespace : namespace? = (current-namespace)
procedure
(namespace-attach-module-declaration  src-namespace        
                                      modname              
                                     [dest-namespace]) -> void?
  src-namespace : namespace?
  modname : module-path?
  dest-namespace : namespace? = (current-namespace)
procedure
(namespace-unprotect-module  inspector       
                             modname         
                            [namespace]) -> void?
  inspector : inspector?
  modname : module-path?
  namespace : namespace? = (current-namespace)
procedure
(namespace-module-registry namespace) -> any
  namespace : namespace?
procedure
(module->namespace modname) -> namespace?
  modname : module-path?
procedure
(namespace-syntax-introduce stx) -> syntax-object?
  stx : syntax-object?
procedure
(module-provide-protected? module-path-index     
                           sym)              -> boolean?
  module-path-index : (or/c symbol? module-path-index?)
  sym : symbol?
procedure
(variable-reference? v) -> boolean?
  v : any/c
procedure
(variable-reference-constant? varref) -> boolean?
  varref : variable-reference?
procedure
(variable-reference->empty-namespace varref) -> namespace?
  varref : variable-reference?
procedure
(variable-reference->namespace varref) -> namespace?
  varref : variable-reference?
procedure
(variable-reference->resolved-module-path varref)
 -> (or/c resolved-module-path? #f)
  varref : variable-reference?
procedure
(variable-reference->module-path-index varref)
 -> (or/c module-path-index? #f)
  varref : variable-reference?
procedure
(variable-reference->module-source varref)
 -> (or/c symbol? (and/c path? complete-path?) #f)
  varref : variable-reference?
procedure
(variable-reference->phase varref) -> exact-nonnegative-integer?
  varref : variable-reference?
procedure
(variable-reference->module-base-phase varref) -> exact-integer?
  varref : variable-reference?
procedure
(variable-reference->module-declaration-inspector varref)
 -> inspector?
  varref : variable-reference?
parameter
(current-eval) -> (any/c . -> . any)
(current-eval proc) -> void?
  proc : (any/c . -> . any)
procedure
(eval top-level-form [namespace]) -> any
  top-level-form : any/c
  namespace : namespace? = (current-namespace)
procedure
(eval-syntax stx [namespace]) -> any
  stx : syntax?
  namespace : namespace? = (current-namespace)
parameter
(current-load)
 -> (path? (or/c #f
                 symbol?
                 (cons/c (or/c #f symbol?)
                         (non-empty-listof symbol?)))
           . -> .
           any)
(current-load proc) -> void?
  proc : (path? (or/c #f
                      symbol?
                      (cons/c (or/c #f symbol?)
                              (non-empty-listof symbol?)))
                . -> .
                any)
procedure
(load file) -> any
  file : path-string?
procedure
(load-relative file) -> any
  file : path-string?
procedure
(load/cd file) -> any
  file : path-string?
parameter
(current-load-extension)
 -> (path? (or/c symbol? #f) . -> . any)
(current-load-extension proc) -> void?
  proc : (path? (or/c symbol? #f) . -> . any)
procedure
(load-extension file) -> any
  file : path-string?
procedure
(load-relative-extension file) -> any
  file : path-string?
parameter
(current-load/use-compiled)
 -> (path? (or/c #f
                 symbol?
                 (cons/c (or/c #f symbol?)
                         (non-empty-listof symbol?)))
           . -> . any)
(current-load/use-compiled proc) -> void?
  proc : (path? (or/c #f
                      symbol?
                      (cons/c (or/c #f symbol?)
                              (non-empty-listof symbol?)))
                . -> . any)
procedure
(load/use-compiled file) -> any
  file : path-string?
parameter
(current-load-relative-directory)
 -> (or/c (and/c path-string? complete-path?) #f)
(current-load-relative-directory path) -> void?
  path : (or/c (and/c path-string? complete-path?) #f)
parameter
(use-compiled-file-paths) -> (listof path?)
(use-compiled-file-paths paths) -> void?
  paths : (listof path-string?)
parameter
(current-compiled-file-roots) -> (listof (or/c path? 'path))
(current-compiled-file-roots paths) -> void?
  paths : (listof (or/c path-string? 'same))
procedure
(read-eval-print-loop) -> any
parameter
(current-prompt-read) -> (-> any)
(current-prompt-read proc) -> void?
  proc : (-> any)
parameter
(current-get-interaction-input-port) -> (-> input-port?)
(current-get-interaction-input-port proc) -> void?
  proc : (-> input-port?)
parameter
(current-read-interaction) -> (any/c input-port? -> any)
(current-read-interaction proc) -> void?
  proc : (any/c input-port? -> any)
parameter
(current-print) -> (any/c -> any)
(current-print proc) -> void?
  proc : (any/c -> any)
parameter
(current-compile)
 -> (any/c boolean? . -> . compiled-expression?)
(current-compile proc) -> void?
  proc : (any/c boolean? . -> . compiled-expression?)
procedure
(compile top-level-form) -> compiled-expression?
  top-level-form : any/c
procedure
(compile-syntax stx) -> compiled-expression?
  stx : syntax?
procedure
(compiled-expression? v) -> boolean?
  v : any/c
parameter
(compile-enforce-module-constants) -> boolean?
(compile-enforce-module-constants on?) -> void?
  on? : any/c
parameter
(compile-allow-set!-undefined) -> boolean?
(compile-allow-set!-undefined allow?) -> void?
  allow? : any/c
parameter
(compile-context-preservation-enabled) -> boolean?
(compile-context-preservation-enabled on?) -> void?
  on? : any/c
parameter
(eval-jit-enabled) -> boolean?
(eval-jit-enabled on?) -> void?
  on? : any/c
parameter
(load-on-demand-enabled) -> boolean?
(load-on-demand-enabled on?) -> void?
  on? : any/c
procedure
(resolved-module-path? v) -> boolean?
  v : any/c
procedure
(make-resolved-module-path path) -> resolved-module-path?
  path : (or/c symbol?
               (and/c path? complete-path?)
               (cons/c (or/c symbol?
                             (and/c path? complete-path?))
                       (non-empty-listof symbol?)))
procedure
(resolved-module-path-name module-path)
 -> (or/c symbol?
          (and/c path? complete-path?)
          (cons/c (or/c symbol?
                        (and/c path? complete-path?))
                  (non-empty-listof symbol?)))
  module-path : resolved-module-path?
procedure
(module-path? v) -> boolean?
  v : any/c
parameter
(current-module-name-resolver)
 -> (case->
     (resolved-module-path? (or/c #f namespace?) . -> . any)
     (module-path?
      (or/c #f resolved-module-path?)
      (or/c #f syntax?)
      boolean?
      . -> .
      resolved-module-path?))
(current-module-name-resolver proc) -> void?
  proc : (case->
          (resolved-module-path? (or/c #f namespace?) . -> . any)
          (module-path?
           (or/c #f resolved-module-path?)
           (or/c #f syntax?)
           boolean?
           . -> .
           resolved-module-path?))
parameter
(current-module-declare-name)
 -> (or/c resolved-module-path? #f)
(current-module-declare-name name) -> void?
  name : (or/c resolved-module-path? #f)
parameter
(current-module-declare-source)
 -> (or/c symbol? (and/c path? complete-path?) #f)
(current-module-declare-source src) -> void?
  src : (or/c symbol? (and/c path? complete-path?) #f)
procedure
(module-path-index? v) -> boolean?
  v : any/c
procedure
(module-path-index-resolve mpi) -> resolved-module-path?
  mpi : module-path-index?
procedure
(module-path-index-split mpi)
 -> (or/c module-path? #f)
    (or/c module-path-index? resolved-module-path? #f)
  mpi : module-path-index?
procedure
(module-path-index-submodule mpi)
 -> (or/c #f (non-empty-listof symbol?))
  mpi : module-path-index?
procedure
(module-path-index-join path base [submod]) -> module-path-index?
  path : (or/c module-path? #f)
  base : (or/c module-path-index? resolved-module-path? #f)
  submod : (or/c #f (non-empty-listof symbol?)) = #f
procedure
(compiled-module-expression? v) -> boolean?
  v : any/c
procedure
(module-compiled-name compiled-module-code)
 -> (or/c symbol? (cons/c symbol? (non-empty-listof symbol?)))
  compiled-module-code : compiled-module-expression?
(module-compiled-name compiled-module-code 
                      name)                
 -> compiled-module-expression?
  compiled-module-code : compiled-module-expression?
  name : (or/c symbol? (cons/c symbol? (non-empty-listof symbol?)))
procedure
(module-compiled-submodules compiled-module-code 
                            non-star?)           
 -> (listof compiled-module-expression?)
  compiled-module-code : compiled-module-expression?
  non-star? : any/c
(module-compiled-submodules compiled-module-code 
                            non-star?            
                            submodules)          
 -> compiled-module-expression?
  compiled-module-code : compiled-module-expression?
  non-star? : any/c
  submodules : (listof compiled-module-expression?)
procedure
(module-compiled-imports compiled-module-code)
 -> (listof (cons/c (or/c exact-integer? #f)
                    (listof module-path-index?)))
  compiled-module-code : compiled-module-expression?
procedure
(module-compiled-exports compiled-module-code)
 -> (listof (cons/c (or/c exact-integer? #f) list?))
    (listof (cons/c (or/c exact-integer? #f) list?))
  compiled-module-code : compiled-module-expression?
procedure
(module-compiled-language-info compiled-module-code)
 -> (or/c #f (vector/c module-path? symbol? any/c))
  compiled-module-code : compiled-module-expression?
procedure
(dynamic-require mod provided [fail-thunk]) -> any
  mod : (or/c module-path?
              resolved-module-path?
              module-path-index?)
  provided : (or/c symbol? #f 0 void?)
  fail-thunk : (-> any) = (lambda () ....)
procedure
(dynamic-require-for-syntax  mod              
                             provided         
                            [fail-thunk]) -> any
  mod : module-path?
  provided : (or/c symbol? #f)
  fail-thunk : (-> any) = (lambda () ....)
procedure
(module-declared? mod [load?]) -> boolean?
  mod : (or/c module-path? module-path-index?
              resolved-module-path?)
  load? : any/c = #f
procedure
(module->language-info mod [load?])
 -> (or/c #f (vector/c module-path? symbol? any/c))
  mod : (or/c module-path? module-path-index?
              resolved-module-path?)
  load? : any/c = #f
procedure
(module->imports mod)
 -> (listof (cons/c (or/c exact-integer? #f)
                    (listof module-path-index?)))
  mod : (or/c module-path? module-path-index?
              resolved-module-path?)
procedure
(module->exports mod)
 -> (listof (cons/c (or/c exact-integer? #f) list?))
    (listof (cons/c (or/c exact-integer? #f) list?))
  mod : (or/c module-path? resolved-module-path?)
procedure
(module-predefined? mod) -> boolean?
  mod : (or/c module-path? resolved-module-path?)
procedure
(impersonator? v) -> boolean?
  v : any/c
procedure
(chaperone? v) -> boolean?
  v : any/c
procedure
(impersonator-of? v1 v2) -> boolean?
  v1 : any/c
  v2 : any/c
procedure
(chaperone-of? v1 v2) -> boolean?
  v1 : any/c
  v2 : any/c
procedure
(impersonate-procedure proc         
                       wrapper-proc 
                       prop         
                       prop-val ... 
                       ...)         
 -> (and/c procedure? impersonator?)
  proc : procedure?
  wrapper-proc : procedure?
  prop : impersonator-property?
  prop-val : any
procedure
(impersonate-struct v                     
                    orig-proc             
                    redirect-proc ...     
                    ...                   
                    prop                  
                    prop-val ...          
                    ...)              -> any/c
  v : any/c
  orig-proc : (or/c struct-accessor-procedure?
                    struct-mutator-procedure?
                    struct-type-property-accessor-procedure?)
  redirect-proc : procedure?
  prop : impersonator-property?
  prop-val : any
procedure
(impersonate-vector vec          
                    ref-proc     
                    set-proc     
                    prop         
                    prop-val ... 
                    ...)         
 -> (and/c vector? impersonator?)
  vec : (and/c vector? (not/c immutable?))
  ref-proc : (vector? exact-nonnegative-integer? any/c . -> . any/c)
  set-proc : (vector? exact-nonnegative-integer? any/c . -> . any/c)
  prop : impersonator-property?
  prop-val : any
procedure
(impersonate-box box              
                 unbox-proc       
                 set-proc         
                 prop             
                 prop-val ...     
                 ...)         -> (and/c box? impersonator?)
  box : (and/c box? (not/c immutable?))
  unbox-proc : (box? any/c . -> . any/c)
  set-proc : (box? any/c . -> . any/c)
  prop : impersonator-property?
  prop-val : any
procedure
(impersonate-hash hash             
                  ref-proc         
                  set-proc         
                  remove-proc      
                  key-proc         
                  prop             
                  prop-val ...     
                  ...)         -> (and/c hash? impersonator?)
  hash : (and/c hash? (not/c immutable?))
  ref-proc : (hash? any/c . -> . (values
                                  any/c
                                  (hash? any/c any/c . -> . any/c)))
  set-proc : (hash? any/c any/c . -> . (values any/c any/c))
  remove-proc : (hash? any/c . -> . any/c)
  key-proc : (hash? any/c . -> . any/c)
  prop : impersonator-property?
  prop-val : any
procedure
(impersonate-prompt-tag prompt-tag   
                        handle-proc  
                        abort-proc   
                        prop         
                        prop-val ... 
                        ...)         
 -> (and/c continuation-prompt-tag? impersonator?)
  prompt-tag : continuation-prompt-tag?
  handle-proc : procedure?
  abort-proc : procedure?
  prop : impersonator-property?
  prop-val : any
procedure
(impersonate-continuation-mark-key key          
                                   get-proc     
                                   set-proc     
                                   prop         
                                   prop-val ... 
                                   ...)         
 -> (and/c continuation-mark? impersonator?)
  key : continuation-mark-key?
  get-proc : procedure?
  set-proc : procedure?
  prop : impersonator-property?
  prop-val : any
value
prop:impersonator-of : struct-type-property?
procedure
(chaperone-procedure proc         
                     wrapper-proc 
                     prop         
                     prop-val ... 
                     ...)         
 -> (and/c procedure? chaperone?)
  proc : procedure?
  wrapper-proc : procedure?
  prop : impersonator-property?
  prop-val : any
procedure
(chaperone-struct v                     
                  orig-proc             
                  redirect-proc ...     
                  ...                   
                  prop                  
                  prop-val ...          
                  ...)              -> any/c
  v : any/c
  orig-proc : (or/c struct-accessor-procedure?
                    struct-mutator-procedure?
                    struct-type-property-accessor-procedure?
                    (one-of/c struct-info))
  redirect-proc : procedure?
  prop : impersonator-property?
  prop-val : any
procedure
(chaperone-vector vec              
                  ref-proc         
                  set-proc         
                  prop             
                  prop-val ...     
                  ...)         -> (and/c vector? chaperone?)
  vec : vector?
  ref-proc : (vector? exact-nonnegative-integer? any/c . -> . any/c)
  set-proc : (vector? exact-nonnegative-integer? any/c . -> . any/c)
  prop : impersonator-property?
  prop-val : any
procedure
(chaperone-box box              
               unbox-proc       
               set-proc         
               prop             
               prop-val ...     
               ...)         -> (and/c box? chaperone?)
  box : box?
  unbox-proc : (box? any/c . -> . any/c)
  set-proc : (box? any/c . -> . any/c)
  prop : impersonator-property?
  prop-val : any
procedure
(chaperone-hash hash             
                ref-proc         
                set-proc         
                remove-proc      
                key-proc         
                prop             
                prop-val ...     
                ...)         -> (and/c hash? chaperone?)
  hash : hash?
  ref-proc : (hash? any/c . -> . (values
                                  any/c
                                  (hash? any/c any/c . -> . any/c)))
  set-proc : (hash? any/c any/c . -> . (values any/c any/c))
  remove-proc : (hash? any/c . -> . any/c)
  key-proc : (hash? any/c . -> . any/c)
  prop : impersonator-property?
  prop-val : any
procedure
(chaperone-struct-type struct-type           
                       struct-info-proc      
                       make-constructor-proc 
                       guard-proc            
                       prop                  
                       prop-val ...          
                       ...)                  
 -> (and/c struct-type? chaperone?)
  struct-type : struct-type?
  struct-info-proc : procedure?
  make-constructor-proc : (procedure? . -> . procedure?)
  guard-proc : procedure?
  prop : impersonator-property?
  prop-val : any
procedure
(chaperone-evt evt proc prop prop-val ... ...)
 -> (and/c evt? chaperone?)
  evt : evt?
  proc : (evt? . -> . (values evt? (any/c . -> . any/c)))
  prop : impersonator-property?
  prop-val : any
procedure
(chaperone-prompt-tag prompt-tag   
                      handle-proc  
                      abort-proc   
                      prop         
                      prop-val ... 
                      ...)         
 -> (and/c continuation-prompt-tag? chaperone?)
  prompt-tag : continuation-prompt-tag?
  handle-proc : procedure?
  abort-proc : procedure?
  prop : impersonator-property?
  prop-val : any
procedure
(chaperone-continuation-mark-key key          
                                 get-proc     
                                 set-proc     
                                 prop         
                                 prop-val ... 
                                 ...)         
 -> (and/c continuation-mark-key? chaperone?)
  key : continuation-mark-key?
  get-proc : procedure?
  set-proc : procedure?
  prop : impersonator-property?
  prop-val : any
procedure
(make-impersonator-property name) -> impersonator-property?
                                     (-> any/c boolean?)
                                     (-> impersonator? any)
  name : symbol?
procedure
(impersonator-property? v) -> boolean?
  v : any/c
procedure
(impersonator-property-accessor-procedure? v) -> boolean?
  v : any/c
value
impersonator-prop:application-mark : impersonator-property?
procedure
(security-guard? v) -> boolean?
  v : any/c
procedure
(make-security-guard  parent            
                      file-guard        
                      network-guard     
                     [link-guard])  -> security-guard?
  parent : security-guard?
  file-guard : (symbol?
                (or/c path? #f)
                (listof symbol?)
                . -> . any)
  network-guard : (symbol?
                   (or/c (and/c string? immutable?) #f)
                   (or/c (integer-in 1 65535) #f)
                   (or/c 'server 'client)
                   . -> . any)
  link-guard : (or/c (symbol? path? path? . -> . any) #f) = #f
parameter
(current-security-guard) -> security-guard?
(current-security-guard guard) -> void?
  guard : security-guard?
procedure
(custodian? v) -> boolean?
  v : any/c
procedure
(make-custodian [cust]) -> custodian?
  cust : custodian? = (current-custodian)
procedure
(custodian-shutdown-all cust) -> void?
  cust : custodian?
parameter
(current-custodian) -> custodian?
(current-custodian cust) -> void?
  cust : custodian?
procedure
(custodian-managed-list cust super) -> list?
  cust : custodian?
  super : custodian?
procedure
(custodian-memory-accounting-available?) -> boolean?
procedure
(custodian-require-memory limit-cust     
                          need-amt       
                          stop-cust) -> void?
  limit-cust : custodian?
  need-amt : exact-nonnegative-integer?
  stop-cust : custodian?
procedure
(custodian-limit-memory  limit-cust      
                         limit-amt       
                        [stop-cust]) -> void?
  limit-cust : custodian?
  limit-amt : exact-nonnegative-integer?
  stop-cust : custodian? = limit-cust
procedure
(make-custodian-box cust v) -> custodian-box?
  cust : custodian?
  v : any/c
procedure
(custodian-box? v) -> boolean?
  v : any/c
procedure
(custodian-box-value cb) -> any
  cb : custodian-box?
procedure
(make-thread-group [group]) -> thread-group?
  group : thread-group? = (current-thread-group)
procedure
(thread-group? v) -> boolean?
  v : any/c
parameter
(current-thread-group) -> thread-group?
(current-thread-group group) -> void?
  group : thread-group?
procedure
(inspector? v) -> boolean?
  v : any/c
procedure
(make-inspector [inspector]) -> inspector?
  inspector : inspector? = (current-inspector)
procedure
(make-sibling-inspector [inspector]) -> inspector?
  inspector : inspector? = (current-inspector)
parameter
(current-inspector) -> inspector?
(current-inspector insp) -> void?
  insp : inspector?
procedure
(struct-info v) -> (or/c struct-type? #f) boolean?
  v : any/c
procedure
(struct-type-info struct-type)
 -> symbol?
    exact-nonnegative-integer?
    exact-nonnegative-integer?
    struct-accessor-procedure?
    struct-mutator-procedure?
    (listof exact-nonnegative-integer?)
    (or/c struct-type? #f)
    boolean?
  struct-type : struct-type?
procedure
(struct-type-make-constructor struct-type)
 -> struct-constructor-procedure?
  struct-type : struct-type?
procedure
(struct-type-make-predicate struct-type) -> any
  struct-type : any/c
procedure
(object-name v) -> any
  v : any/c
parameter
(current-code-inspector) -> inspector?
(current-code-inspector insp) -> void?
  insp : inspector?
procedure
(make-evaluator  language                              
                 input-program ...                     
                [#:requires requires                   
                 #:allow-for-require allow-for-require 
                 #:allow-for-load allow-for-load       
                 #:allow-read allow-read])             
 -> (any/c . -> . any)
  language : (or/c module-path?
                   (list/c 'special symbol?)
                   (cons/c 'begin list?))
  input-program : any/c
  requires : (listof (or/c module-path? path-string?
                           (cons/c 'for-syntax (listof module-path?))))
           = null
  allow-for-require : (listof (or/c module-path? path?)) = null
  allow-for-load : (listof path-string?) = null
  allow-read : (listof (or/c module-path? path-string?)) = null
(make-module-evaluator  module-decl                           
                       [#:language lang                       
                        #:allow-for-require allow-for-require 
                        #:allow-for-load allow-for-load       
                        #:allow-read allow-read])             
 -> (any/c . -> . any)
  module-decl : (or/c syntax? pair? path? input-port? string? bytes?)
  lang : (or/c #f module-path?) = #f
  allow-for-require : (listof (or/c module-path? path?)) = null
  allow-for-load : (listof path-string?) = null
  allow-read : (listof (or/c module-path? path-string?)) = null
procedure
(exn:fail:sandbox-terminated? v) -> boolean?
  v : any/c
(exn:fail:sandbox-terminated-reason exn) -> symbol/c
  exn : exn:fail:sandbox-terminated?
procedure
(call-with-trusted-sandbox-configuration thunk) -> any
  thunk : (-> any)
parameter
(sandbox-init-hook) -> (-> any)
(sandbox-init-hook thunk) -> void?
  thunk : (-> any)
parameter
(sandbox-reader) -> (any/c . -> . any)
(sandbox-reader proc) -> void?
  proc : (any/c . -> . any)
parameter
(sandbox-input) -> (or/c #f
                         string? bytes?
                         input-port?
                         'pipe
                         (-> input-port?))
(sandbox-input in) -> void?
  in : (or/c #f
             string? bytes?
             input-port?
             'pipe
             (-> input-port?))
parameter
(sandbox-output) -> (or/c #f
                          output-port?
                          'pipe
                          'bytes
                          'string
                          (-> output-port?))
(sandbox-output in) -> void?
  in : (or/c #f
             output-port?
             'pipe
             'bytes
             'string
             (-> output-port?))
parameter
(sandbox-error-output) -> (or/c #f
                                output-port?
                                'pipe
                                'bytes
                                'string
                                (-> output-port?))
(sandbox-error-output in) -> void?
  in : (or/c #f
             output-port?
             'pipe
             'bytes
             'string
             (-> output-port?))
parameter
(sandbox-coverage-enabled) -> boolean?
(sandbox-coverage-enabled enabled?) -> void?
  enabled? : any/c
parameter
(sandbox-propagate-breaks) -> boolean?
(sandbox-propagate-breaks propagate?) -> void?
  propagate? : any/c
parameter
(sandbox-propagate-exceptions) -> boolean?
(sandbox-propagate-exceptions propagate?) -> void?
  propagate? : any/c
parameter
(sandbox-namespace-specs) -> (cons/c (-> namespace?)
                                     (listof module-path?))
(sandbox-namespace-specs spec) -> void?
  spec : (cons/c (-> namespace?)
                 (listof module-path?))
procedure
(sandbox-make-namespace) -> namespace?
parameter
(sandbox-gui-available) -> boolean?
(sandbox-gui-available avail?) -> void?
  avail? : any/c
parameter
(sandbox-override-collection-paths) -> (listof path-string?)
(sandbox-override-collection-paths paths) -> void?
  paths : (listof path-string?)
parameter
(sandbox-security-guard)
 -> (or/c security-guard? (-> security-guard?))
(sandbox-security-guard guard) -> void?
  guard : (or/c security-guard? (-> security-guard?))
parameter
(sandbox-path-permissions)
 -> (listof (list/c (or/c 'execute 'write 'delete
                          'read-bytecode 'read 'exists)
                    (or/c byte-regexp? bytes? string? path?)))
(sandbox-path-permissions perms) -> void?
  perms : (listof (list/c (or/c 'execute 'write 'delete
                                'read-bytecode 'read 'exists)
                          (or/c byte-regexp? bytes? string? path?)))
parameter
(sandbox-network-guard)
 -> (symbol?
     (or/c (and/c string? immutable?) #f)
     (or/c (integer-in 1 65535) #f)
     (or/c 'server 'client)
     . -> . any)
(sandbox-network-guard proc) -> void?
  proc : (symbol?
          (or/c (and/c string? immutable?) #f)
          (or/c (integer-in 1 65535) #f)
          (or/c 'server 'client)
          . -> . any)
parameter
(sandbox-exit-handler) -> (any/c . -> . any)
(sandbox-exit-handler handler) -> void?
  handler : (any/c . -> . any)
parameter
(sandbox-memory-limit) -> (or/c nonnegative-number? #f)
(sandbox-memory-limit limit) -> void?
  limit : (or/c nonnegative-number? #f)
parameter
(sandbox-eval-limits)
 -> (or/c (list/c (or/c nonnegative-number? #f)
                  (or/c nonnegative-number? #f))
          #f)
(sandbox-eval-limits limits) -> void?
  limits : (or/c (list/c (or/c nonnegative-number? #f)
                         (or/c nonnegative-number? #f))
                 #f)
parameter
(sandbox-eval-handlers)
 -> (list/c (or/c #f ((-> any) . -> . any))
            (or/c #f ((-> any) . -> . any)))
(sandbox-eval-handlers handlers) -> void?
  handlers : (list/c (or/c #f ((-> any) . -> . any))
                     (or/c #f ((-> any) . -> . any)))
parameter
(sandbox-make-inspector) -> (-> inspector?)
(sandbox-make-inspector make) -> void?
  make : (-> inspector?)
parameter
(sandbox-make-code-inspector) -> (-> inspector?)
(sandbox-make-code-inspector make) -> void?
  make : (-> inspector?)
parameter
(sandbox-make-logger) -> (-> logger?)
(sandbox-make-logger make) -> void?
  make : (-> logger?)
procedure
(evaluator-alive? evaluator) -> boolean?
  evaluator : (any/c . -> . any)
procedure
(kill-evaluator evaluator) -> void?
  evaluator : (any/c . -> . any)
procedure
(break-evaluator evaluator) -> void?
  evaluator : (any/c . -> . any)
procedure
(get-user-custodian evaluator) -> void?
  evaluator : (any/c . -> . any)
procedure
(set-eval-limits evaluator secs mb) -> void?
  evaluator : (any/c . -> . any)
  secs : (or/c exact-nonnegative-integer? #f)
  mb : (or/c exact-nonnegative-integer? #f)
procedure
(set-eval-handler evaluator handler) -> void?
  evaluator : (any/c . -> . any)
  handler : (or/c #f ((-> any) . -> . any))
procedure
(call-with-custodian-shutdown thunk) -> any
  thunk : (-> any)
(call-with-killing-threads thunk) -> any
  thunk : (-> any)
procedure
(put-input evaluator) -> output-port?
  evaluator : (any/c . -> . any)
(put-input evaluator i/o) -> void?
  evaluator : (any/c . -> . any)
  i/o : (or/c bytes? string? eof-object?)
procedure
(get-output evaluator) -> (or/c #f input-port? bytes? string?)
  evaluator : (any/c . -> . any)
(get-error-output evaluator)
 -> (or/c #f input-port? bytes? string?)
  evaluator : (any/c . -> . any)
procedure
(get-uncovered-expressions  evaluator     
                           [prog?         
                            src])     -> (listof syntax?)
  evaluator : (any/c . -> . any)
  prog? : any/c = #t
  src : any/c = default-src
procedure
(call-in-sandbox-context  evaluator           
                          thunk               
                         [unrestricted?]) -> any
  evaluator : (any/c . -> . any)
  thunk : (-> any)
  unrestricted? : boolean? = #f
value
gui? : boolean?
procedure
(call-with-limits secs mb thunk) -> any
  secs : (or/c exact-nonnegative-integer? #f)
  mb : (or/c exact-nonnegative-integer? #f)
  thunk : (-> any)
syntax
(with-limits sec-expr mb-expr body ...)
procedure
(exn:fail:resource? v) -> boolean?
  v : any/c
(exn:fail:resource-resource exn) -> (or/c 'time 'memory)
  exn : exn:fail:resource?
procedure
(path? v) -> boolean?
  v : any/c
procedure
(path-string? v) -> boolean?
  v : any/c
procedure
(path-for-some-system? v) -> boolean?
  v : any/c
procedure
(string->path str) -> path?
  str : string?
procedure
(bytes->path bstr [type]) -> path?
  bstr : bytes?
  type : (or/c 'unix 'windows) = (system-path-convention-type)
procedure
(path->string path) -> string?
  path : path?
procedure
(path->bytes path) -> bytes?
  path : path-for-some-system?
procedure
(string->path-element str) -> path?
  str : string?
procedure
(bytes->path-element bstr [type]) -> path-for-some-system?
  bstr : bytes?
  type : (or/c 'unix 'windows) = (system-path-convention-type)
procedure
(path-element->string path) -> string?
  path : path-element?
procedure
(path-element->bytes path) -> bytes?
  path : path-element?
procedure
(path-convention-type path) -> (or/c 'unix 'windows)
  path : path-for-some-system?
procedure
(system-path-convention-type) -> (or/c 'unix 'windows)
procedure
(build-path base sub ...) -> path-for-some-system?
  base : (or/c path-string? path-for-some-system? 'up 'same)
  sub : (or/c (and/c (or/c path-string? path-for-some-system?)
                     (not/c complete-path?))
              (or/c 'up 'same))
procedure
(build-path/convention-type type         
                            base         
                            sub ...) -> path-for-some-system?
  type : (or/c 'unix 'windows)
  base : (or/c path-string? path-for-some-system? 'up 'same)
  sub : (or/c (and/c (or/c path-string? path-for-some-system?)
                     (not/c complete-path?))
              (or/c 'up 'same))
procedure
(absolute-path? path) -> boolean?
  path : (or/c path-string? path-for-some-system?)
procedure
(relative-path? path) -> boolean?
  path : (or/c path-string? path-for-some-system?)
procedure
(complete-path? path) -> boolean?
  path : (or/c path-string? path-for-some-system?)
procedure
(path->complete-path path [base]) -> path-for-some-system?
  path : (or/c path-string? path-for-some-system?)
  base : (or/c path-string? path-for-some-system?)
       = (current-directory)
procedure
(path->directory-path path) -> path-for-some-system?
  path : (or/c path-string? path-for-some-system?)
procedure
(resolve-path path) -> path?
  path : path-string?
procedure
(cleanse-path path) -> path-for-some-system?
  path : (or/c path-string? path-for-some-system?)
procedure
(expand-user-path path) -> path?
  path : path-string?
procedure
(simplify-path path [use-filesystem?]) -> path-for-some-system?
  path : (or/c path-string? path-for-some-system?)
  use-filesystem? : boolean? = #t
procedure
(normal-case-path path) -> path-for-some-system?
  path : (or/c path-string? path-for-some-system?)
procedure
(split-path path) -> (or/c path-for-some-system? 'relative #f)
                     (or/c path-for-some-system? 'up 'same)
                     boolean?
  path : (or/c path-string? path-for-some-system?)
procedure
(path-replace-suffix path suffix) -> path-for-some-system?
  path : (or/c path-string? path-for-some-system?)
  suffix : (or/c string? bytes?)
procedure
(path-add-suffix path suffix) -> path-for-some-system?
  path : (or/c path-string? path-for-some-system?)
  suffix : (or/c string? bytes?)
procedure
(reroot-path path root-path) -> path-for-some-system?
  path : (or/c path-string? path-for-some-system?)
  root-path : (or/c path-string? path-for-some-system?)
procedure
(explode-path path)
 -> (listof (or/c path-for-some-system? 'up 'same))
  path : (or/c path-string? path-for-some-system?)
procedure
(file-name-from-path path) -> (or/c path-for-some-system? #f)
  path : (or/c path-string? path-for-some-system?)
procedure
(filename-extension path) -> (or/c bytes? #f)
  path : (or/c path-string? path-for-some-system?)
procedure
(find-relative-path  base                                
                     path                                
                    [#:more-than-root? more-than-root?]) 
 -> path-for-some-system?
  base : (or/c path-string? path-for-some-system?)
  path : (or/c path-string?  path-for-some-system?)
  more-than-root? : any/c = #f
procedure
(normalize-path path [wrt]) -> path?
  path : path-string?
  wrt : (and/c path-string? complete-path?)
      = (current-directory)
procedure
(path-element? path) -> boolean?
  path : any/c
procedure
(path-only path) -> (or/c #f path-for-some-system?)
  path : (or/c path-string? path-for-some-system?)
procedure
(simple-form-path path) -> path?
  path : path-string?
procedure
(some-system-path->string path) -> string?
  path : path-for-some-system?
procedure
(string->some-system-path str kind) -> path-for-some-system?
  str : string?
  kind : (or/c 'unix 'windows)
procedure
(find-system-path kind) -> path?
  kind : symbol?
procedure
(path-list-string->path-list str                
                             default-path-list) 
 -> (listof path?)
  str : (or/c string? bytes?)
  default-path-list : (listof path?)
procedure
(find-executable-path  program-sub     
                      [related-sub     
                       deepest?])  -> (or/c path? #f)
  program-sub : path-string?
  related-sub : (or/c path-string? #f) = #f
  deepest? : any/c = #f
procedure
(file-exists? path) -> boolean?
  path : path-string?
procedure
(link-exists? path) -> boolean?
  path : path-string?
procedure
(delete-file path) -> void?
  path : path-string?
procedure
(rename-file-or-directory  old              
                           new              
                          [exists-ok?]) -> void?
  old : path-string?
  new : path-string?
  exists-ok? : any/c = #f
procedure
(file-or-directory-modify-seconds  path             
                                  [secs-n           
                                   fail-thunk]) -> any
  path : path-string?
  secs-n : (or/c exact-integer? #f) = #f
  fail-thunk : (-> any)
             = (lambda () (raise (make-exn:fail:filesystem ....)))
procedure
(file-or-directory-permissions path [mode])
 -> (listof (or/c 'read 'write 'execute))
  path : path-string?
  mode : #f = #f
(file-or-directory-permissions path mode) -> (integer-in 0 65535)
  path : path-string?
  mode : 'bits
(file-or-directory-permissions path mode) -> void
  path : path-string?
  mode : (integer-in 0 65535)
procedure
(file-or-directory-identity path [as-link?])
 -> exact-positive-integer?
  path : path-string?
  as-link? : any/c = #f
procedure
(file-size path) -> exact-nonnegative-integer?
  path : path-string?
procedure
(copy-file src dest [exists-ok?]) -> void?
  src : path-string?
  dest : path-string?
  exists-ok? : any/c = #f
procedure
(make-file-or-directory-link to path) -> void?
  to : path-string?
  path : path-string?
parameter
(current-directory) -> path-string?
(current-directory path) -> void?
  path : path-string?
procedure
(current-drive) -> path?
procedure
(directory-exists? path) -> boolean?
  path : path-string?
procedure
(make-directory path) -> void?
  path : path-string?
procedure
(delete-directory path) -> void?
  path : path-string?
procedure
(directory-list [path #:build? build?]) -> (listof path?)
  path : path-string? = (current-directory)
  build? : any/c = #f
procedure
(filesystem-root-list) -> (listof path?)
syntax
(define-runtime-path id expr)
syntax
(define-runtime-paths (id ...) expr)
syntax
(define-runtime-path-list id expr)
syntax
(define-runtime-module-path-index id module-path-expr)
syntax
(define-runtime-module-path id module-path)
syntax
(runtime-paths module-path)
procedure
(file->string path [#:mode mode-flag]) -> string?
  path : path-string?
  mode-flag : (or/c 'binary 'text) = 'binary
procedure
(file->bytes path [#:mode mode-flag]) -> bytes?
  path : path-string?
  mode-flag : (or/c 'binary 'text) = 'binary
procedure
(file->value path [#:mode mode-flag]) -> any
  path : path-string?
  mode-flag : (or/c 'binary 'text) = 'binary
procedure
(file->list path [proc #:mode mode-flag]) -> (listof any/c)
  path : path-string?
  proc : (input-port? . -> . any/c) = read
  mode-flag : (or/c 'binary 'text) = 'binary
procedure
(file->lines  path                        
             [#:mode mode-flag            
              #:line-mode line-mode]) -> (listof string?)
  path : path-string?
  mode-flag : (or/c 'binary 'text) = 'binary
  line-mode : (or/c 'linefeed 'return 'return-linefeed 'any 'any-one)
            = 'any
procedure
(file->bytes-lines  path                        
                   [#:mode mode-flag            
                    #:line-mode line-mode]) -> (listof bytes?)
  path : path-string?
  mode-flag : (or/c 'binary 'text) = 'binary
  line-mode : (or/c 'linefeed 'return 'return-linefeed 'any 'any-one)
            = 'any
procedure
(display-to-file  v                          
                  path                       
                 [#:mode mode-flag           
                  #:exists exists-flag]) -> void?
  v : any/c
  path : path-string?
  mode-flag : (or/c 'binary 'text) = 'binary
  exists-flag : (or/c 'error 'append 'update
                      'replace 'truncate 'truncate/replace)
              = 'error
procedure
(write-to-file  v                          
                path                       
               [#:mode mode-flag           
                #:exists exists-flag]) -> void?
  v : any/c
  path : path-string?
  mode-flag : (or/c 'binary 'text) = 'binary
  exists-flag : (or/c 'error 'append 'update
                      'replace 'truncate 'truncate/replace)
              = 'error
procedure
(display-lines-to-file  lst                        
                        path                       
                       [#:separator separator      
                        #:mode mode-flag           
                        #:exists exists-flag]) -> void?
  lst : list?
  path : path-string?
  separator : any/c = #"\n"
  mode-flag : (or/c 'binary 'text) = 'binary
  exists-flag : (or/c 'error 'append 'update
                      'replace 'truncate 'truncate/replace)
              = 'error
procedure
(copy-directory/files src dest) -> void?
  src : path-string?
  dest : path-string?
procedure
(delete-directory/files path) -> void?
  path : path-string?
procedure
(find-files predicate [start-path]) -> (listof path?)
  predicate : (path? . -> . any/c)
  start-path : (or/c path-string? #f) = #f
procedure
(pathlist-closure path-list) -> (listof path?)
  path-list : (listof path-string?)
procedure
(fold-files  proc                
             init-val            
            [start-path          
             follow-links?]) -> any
  proc : (or/c (path? (or/c 'file 'dir 'link) any/c
                 . -> . any/c)
               (path? (or/c 'file 'dir 'link) any/c
                 . -> . (values any/c any/c)))
  init-val : any/c
  start-path : (or/c path-string? #f) = #f
  follow-links? : any/c = #t
procedure
(make-directory* path) -> void?
  path : path-string?
procedure
(make-temporary-file [template               
                      copy-from-filename     
                      directory])        -> path?
  template : string? = "rkttmp~a"
  copy-from-filename : (or/c path-string? #f 'directory) = #f
  directory : (or/c path-string? #f) = #f
procedure
(get-preference  name                                        
                [failure-thunk                               
                 flush-mode                                  
                 filename                                    
                 #:use-lock? use-lock?                       
                 #:timeout-lock-there timeout-lock-there     
                 #:lock-there lock-there])               -> any
  name : symbol?
  failure-thunk : (-> any) = (lambda () #f)
  flush-mode : any/c = 'timestamp
  filename : (or/c string-path? #f) = #f
  use-lock? : any/c = #t
  timeout-lock-there : (or/c (path? . -> . any) #f) = #f
  lock-there : (or/c (path? . -> . any) #f)
             = (make-handle-get-preference-locked
                0.01 name failure-thunk flush-mode filename
                #:lock-there timeout-lock-there)
procedure
(put-preferences  names           
                  vals            
                 [locked-proc     
                  filename])  -> void?
  names : (listof symbol?)
  vals : list?
  locked-proc : (or/c #f (path? . -> . any)) = #f
  filename : (or/c #f path-string?) = #f
procedure
(preferences-lock-file-mode) -> (or/c 'exists 'file-lock)
procedure
(make-handle-get-preference-locked  delay                   
                                    name                    
                                   [failure-thunk           
                                    flush-mode              
                                    filename                
                                    #:lock-there lock-there 
                                    #:max-delay max-delay]) 
 -> (path-string? . -> . any)
  delay : real?
  name : symbol?
  failure-thunk : (-> any) = (lambda () #f)
  flush-mode : any/c = 'timestamp
  filename : (or/c path-string? #f) = #f
  lock-there : (or/c (path? . -> . any) #f) = #f
  max-delay : real? = 0.2
procedure
(call-with-file-lock/timeout  filename                    
                              kind                        
                              thunk                       
                              failure-thunk               
                             [#:lock-file lock-file       
                              #:delay delay               
                              #:max-delay max-delay]) -> any
  filename : (or/c path-string? #f)
  kind : (or/c 'shared 'exclusive)
  thunk : (-> any)
  failure-thunk : (-> any)
  lock-file : (or/c #f path-string?) = #f
  delay : (and/c real? (not/c negative?)) = 0.01
  max-delay : (and/c real? (not/c negative?)) = 0.2
procedure
(make-lock-file-name path) -> path?
  path : (or path-string? path-for-some-system?)
(make-lock-file-name dir name) -> path?
  dir : (or path-string? path-for-some-system?)
  name : path-element?
value
user-read-bit : #o400
value
user-write-bit : #o200
value
user-execute-bit : #o100
value
group-read-bit : #o040
value
group-write-bit : #o020
value
group-execute-bit : #o010
value
other-read-bit : #o004
value
other-write-bit : #o002
value
other-execute-bit : #o001
procedure
(tcp-listen  port-no            
            [max-allow-wait     
             reuse?             
             hostname])     -> tcp-listener?
  port-no : (and/c exact-nonnegative-integer?
                   (integer-in 0 65535))
  max-allow-wait : exact-nonnegative-integer? = 4
  reuse? : any/c = #f
  hostname : (or/c string? #f) = #f
procedure
(tcp-connect  hostname            
              port-no             
             [local-hostname      
              local-port-no]) -> input-port? output-port?
  hostname : string?
  port-no : (and/c exact-nonnegative-integer?
                  (integer-in 1 65535))
  local-hostname : (or/c string? #f) = #f
  local-port-no : (or/c (and/c exact-nonnegative-integer? = #f
                               (integer-in 1 65535))
                        #f)
procedure
(tcp-connect/enable-break  hostname        
                           port-no         
                          [local-hostname] 
                           local-port-no)  
 -> input-port? output-port?
  hostname : string?
  port-no : (and/c exact-nonnegative-integer?
                  (integer-in 1 65535))
  local-hostname : (or/c string? #f) = #f
  local-port-no : (or/c (and/c exact-nonnegative-integer?
                               (integer-in 1 65535))
                        #f)
procedure
(tcp-accept listener) -> input-port? output-port?
  listener : tcp-listener?
procedure
(tcp-accept/enable-break listener) -> input-port? output-port?
  listener : tcp-listener?
procedure
(tcp-accept-ready? listener) -> boolean?
  listener : tcp-listener?
procedure
(tcp-close listener) -> void?
  listener : tcp-listener?
procedure
(tcp-listener? v) -> boolean?
  v : any/c
procedure
(tcp-accept-evt listener) -> evt?
  listener : tcp-listener?
procedure
(tcp-abandon-port tcp-port) -> void?
  tcp-port : tcp-port?
procedure
(tcp-addresses tcp-port [port-numbers?])
 -> (or/c (values string? string?)
          (values string? (integer-in 1 65535)
                  string? (integer-in 0 65535)))
  tcp-port : (or/c tcp-port? tcp-listener?)
  port-numbers? : any/c = #f
procedure
(tcp-port? v) -> boolean?
  v : any/c
procedure
(udp-open-socket [family-hostname      
                  family-port-no]) -> udp?
  family-hostname : (or/c string? #f) = #f
  family-port-no : (or/c string? #f) = #f
procedure
(udp-bind! udp-socket          
           hostname-string     
           port-no)        -> void?
  udp-socket : udp?
  hostname-string : (or/c string? #f)
  port-no : (and/c exact-nonnegative-integer?
                   (integer-in 0 65535))
procedure
(udp-connect! udp-socket          
              hostname-string     
              port-no)        -> void?
  udp-socket : udp?
  hostname-string : (or/c string? #f)
  port-no : (or/c (and/c exact-nonnegative-integer?
                         (integer-in 1 65535))
                  #f)
procedure
(udp-send-to  udp-socket     
              hostname       
              port-no        
              bstr           
             [start-pos      
              end-pos])  -> void
  udp-socket : udp?
  hostname : string?
  port-no : (and/c exact-nonnegative-integer?
                   (integer-in 1 65535))
  bstr : bytes?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(udp-send udp-socket bstr [start-pos end-pos]) -> void
  udp-socket : udp?
  bstr : bytes?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(udp-send-to*  udp-socket     
               hostname       
               port-no        
               bstr           
              [start-pos      
               end-pos])  -> boolean?
  udp-socket : udp?
  hostname : string?
  port-no : (and/c exact-nonnegative-integer?
                   (integer-in 1 65535))
  bstr : bytes?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(udp-send* udp-socket bstr [start-pos end-pos]) -> boolean?
  udp-socket : udp?
  bstr : bytes?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(udp-send-to/enable-break  udp-socket     
                           hostname       
                           port-no        
                           bstr           
                          [start-pos      
                           end-pos])  -> void
  udp-socket : udp?
  hostname : string?
  port-no : (and/c exact-nonnegative-integer?
                   (integer-in 1 65535))
  bstr : bytes?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(udp-send/enable-break  udp-socket     
                        bstr           
                       [start-pos      
                        end-pos])  -> void
  udp-socket : udp?
  bstr : bytes?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(udp-receive!  udp-socket     
               bstr           
              [start-pos      
               end-pos])  -> exact-nonnegative-integer?
                             string?
                             (integer-in 1 65535)
  udp-socket : udp?
  bstr : (and/c bytes? (not immutable?))
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(udp-receive!*  udp-socket 
                bstr       
               [start-pos  
                end-pos])  
 -> (or/c exact-nonnegative-integer? #f)
    (or/c string? #f)
    (or/c (integer-in 1 65535) #f)
  udp-socket : udp?
  bstr : (and/c bytes? (not immutable?))
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(udp-receive!/enable-break  udp-socket 
                            bstr       
                           [start-pos  
                            end-pos])  
 -> exact-nonnegative-integer?
    string?
    (integer-in 1 65535)
  udp-socket : udp?
  bstr : (and/c bytes? (not immutable?))
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(udp-close udp-socket) -> void?
  udp-socket : udp?
procedure
(udp? v) -> boolean?
  v : any/c
procedure
(udp-bound? udp-socket) -> boolean?
  udp-socket : udp?
procedure
(udp-connected? udp-socket) -> boolean?
  udp-socket : udp?
procedure
(udp-send-ready-evt udp-socket) -> evt?
  udp-socket : udp?
procedure
(udp-receive-ready-evt udp-socket) -> evt?
  udp-socket : udp?
procedure
(udp-send-to-evt  udp-socket     
                  hostname       
                  port-no        
                  bstr           
                 [start-pos      
                  end-pos])  -> evt?
  udp-socket : udp?
  hostname : string?
  port-no : (and/c exact-nonnegative-integer?
                   (integer-in 1 65535))
  bstr : bytes?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(udp-send-evt  udp-socket     
               bstr           
              [start-pos      
               end-pos])  -> evt?
  udp-socket : udp?
  bstr : bytes?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(udp-receive!-evt  udp-socket     
                   bstr           
                  [start-pos      
                   end-pos])  -> evt?
  udp-socket : udp?
  bstr : (and/c bytes? (not immutable?))
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(udp-addresses udp-port [port-numbers?])
 -> (or/c (values string? string?)
          (values string? (integer-in 0 65535)
                  string? (integer-in 0 65535)))
  udp-port : udp?
  port-numbers? : any/c = #f
procedure
(subprocess stdout   
            stdin    
            stderr   
            command  
            arg ...) 
 -> subprocess?
    (or/c (and/c input-port? file-stream-port?) #f)
    (or/c (and/c output-port? file-stream-port?) #f)
    (or/c (and/c input-port? file-stream-port?) #f)
  stdout : (or/c (and/c output-port? file-stream-port?) #f)
  stdin : (or/c (and/c input-port? file-stream-port?) #f)
  stderr : (or/c (and/c output-port? file-stream-port?) #f 'stdout)
  command : path-string?
  arg : (or/c path? string-no-nuls? bytes-no-nuls?)
(subprocess stdout  
            stdin   
            stderr  
            command 
            exact   
            arg)    
 -> subprocess?
    (or/c (and/c input-port? file-stream-port?) #f)
    (or/c (and/c output-port? file-stream-port?) #f)
    (or/c (and/c input-port? file-stream-port?) #f)
  stdout : (or/c (and/c output-port? file-stream-port?) #f)
  stdin : (or/c (and/c input-port? file-stream-port?) #f)
  stderr : (or/c (and/c output-port? file-stream-port?) #f)
  command : path-string?
  exact : 'exact
  arg : string?
procedure
(subprocess-wait subproc) -> void?
  subproc : subprocess?
procedure
(subprocess-status subproc) -> (or/c 'running
                                     exact-nonnegative-integer?)
  subproc : subprocess?
procedure
(subprocess-kill subproc force?) -> void?
  subproc : subprocess?
  force? : any/c
procedure
(subprocess-pid subproc) -> exact-nonnegative-integer?
  subproc : subprocess?
procedure
(subprocess? v) -> boolean?
  v : any/c
parameter
(current-subprocess-custodian-mode)
 -> (or/c #f 'kill 'interrupt)
(current-subprocess-custodian-mode mode) -> void?
  mode : (or/c #f 'kill 'interrupt)
parameter
(subprocess-group-enabled) -> boolean?
(subprocess-group-enabled on?) -> void?
  on? : any/c
procedure
(shell-execute verb           
               target         
               parameters     
               dir            
               show-mode) -> #f
  verb : (or/c string? #f)
  target : string?
  parameters : string?
  dir : path-string?
  show-mode : symbol?
procedure
(system command) -> boolean?
  command : (or/c string-no-nuls? bytes-no-nuls?)
procedure
(system* command arg ...) -> boolean?
  command : path-string?
  arg : (or/c path? string-no-nuls? bytes-no-nuls?)
(system* command exact arg) -> boolean?
  command : path-string?
  exact : 'exact
  arg : string?
procedure
(system/exit-code command) -> byte?
  command : (or/c string-no-nuls? bytes-no-nuls?)
procedure
(system*/exit-code command arg ...) -> byte?
  command : path-string?
  arg : (or/c path? string-no-nuls? bytes-no-nuls?)
(system*/exit-code command exact arg) -> byte?
  command : path-string?
  exact : 'exact
  arg : string?
procedure
(process command)
 -> (list input-port?
          output-port?
          exact-nonnegative-integer?
          input-port?
          ((or/c 'status 'wait 'interrupt 'kill) . -> . any))
  command : (or/c string-no-nuls? bytes-no-nuls?)
procedure
(process* command arg ...) -> list?
  command : path-string?
  arg : (or/c path? string-no-nuls? bytes-no-nuls?)
(process* command exact arg) -> list?
  command : path-string?
  exact : 'exact
  arg : string?
procedure
(process/ports out in error-out command) -> list?
  out : (or/c #f output-port?)
  in : (or/c #f input-port?)
  error-out : (or/c #f output-port? 'stdout)
  command : (or/c path? string-no-nuls? bytes-no-nuls?)
procedure
(process*/ports out           
                in            
                error-out     
                command       
                arg ...)  -> list?
  out : (or/c #f output-port?)
  in : (or/c #f input-port?)
  error-out : (or/c #f output-port? 'stdout)
  command : path-string?
  arg : (or/c path? string-no-nuls? bytes-no-nuls?)
(process*/ports out           
                in            
                error-out     
                command       
                exact         
                arg)      -> list?
  out : (or/c #f output-port?)
  in : (or/c #f input-port?)
  error-out : (or/c #f output-port? 'stdout)
  command : path-string?
  exact : 'exact
  arg : string?
procedure
(string-no-nuls? x) -> boolean?
  x : any/c
procedure
(bytes-no-nuls? x) -> boolean?
  x : any/c
procedure
(logger? v) -> boolean?
  v : any/c
procedure
(make-logger [name parent]) -> logger?
  name : (or/c symbol? #f) = #f
  parent : (or/c logger? #f) = #f
procedure
(logger-name logger) -> (or/c symbol? #f)
  logger : logger?
parameter
(current-logger) -> logger?
(current-logger logger) -> void?
  logger : logger?
syntax
(define-logger id)
procedure
(log-message logger level message data) -> void?
  logger : logger?
  level : (or/c 'fatal 'error 'warning 'info 'debug)
  message : string?
  data : any/c
procedure
(log-level? logger level) -> boolean?
  logger : logger?
  level : (or/c 'fatal 'error 'warning 'info 'debug)
procedure
(log-max-level logger)
 -> (or/c #f 'fatal 'error 'warning 'info 'debug)
  logger : logger?
syntax
(log-fatal string-expr)
(log-fatal format-string-expr v ...)
syntax
(log-error string-expr)
(log-error format-string-expr v ...)
syntax
(log-warning string-expr)
(log-warning format-string-expr v ...)
syntax
(log-info string-expr)
(log-info format-string-expr v ...)
syntax
(log-debug string-expr)
(log-debug format-string-expr v ...)
procedure
(log-receiver? v) -> boolean?
  v : any/c
procedure
(make-log-receiver logger level [name ...] ...) -> log-receiver?
  logger : logger?
  level : (or/c 'none 'fatal 'error 'warning 'info 'debug)
  name : (or/c #f symbol?) = #f
procedure
(current-seconds) -> exact-integer?
procedure
(current-inexact-milliseconds) -> real?
procedure
(seconds->date secs-n [local-time?]) -> date*?
  secs-n : real?
  local-time? : any/c = #t
struct
(struct date                               (second
                                           minute
                                           hour
                                           day
                                           month
                                           year
                                           week-day
                                           year-day
                                           dst?
                                           time-zone-offset)
        #:extra-constructor-name make-date
        #:transparent)
  second : (integer-in 0 60)
  minute : (integer-in 0 59)
  hour : (integer-in 0 23)
  day : (integer-in 1 31)
  month : (integer-in 1 12)
  year : exact-integer?
  week-day : (integer-in 0 6)
  year-day : (integer-in 0 365)
  dst? : boolean?
  time-zone-offset : exact-integer?
struct
(struct date* date (nanosecond time-zone-name)
        #:extra-constructor-name make-date*)
  nanosecond : (integer-in 0 999999999)
  time-zone-name : (and/c string? immutable?)
procedure
(current-milliseconds) -> exact-integer?
procedure
(current-process-milliseconds thread) -> exact-integer?
  thread : (or/c thread? #f)
procedure
(current-gc-milliseconds) -> exact-integer?
procedure
(time-apply proc lst) -> list?
                         exact-integer?
                         exact-integer?
                         exact-integer?
  proc : procedure?
  lst : list?
syntax
(time expr)
procedure
(current-date) -> date*?
procedure
(date->string date [time?]) -> string?
  date : date?
  time? : any/c = #f
parameter
(date-display-format) -> (or/c 'american
                               'chinese
                               'german
                               'indian
                               'irish
                               'iso-8601
                               'rfc2822
                               'julian)
(date-display-format format) -> void?
  format : (or/c 'american
                 'chinese
                 'german
                 'indian
                 'irish
                 'iso-8601
                 'rfc2822
                 'julian)
procedure
(date->seconds date [local-time?]) -> exact-integer?
  date : date?
  local-time? : any/c = #t
procedure
(find-seconds  second            
               minute            
               hour              
               day               
               month             
               year              
              [local-time?]) -> exact-integer?
  second : (integer-in 0 61)
  minute : (integer-in 0 59)
  hour : (integer-in 0 23)
  day : (integer-in 1 31)
  month : (integer-in 1 12)
  year : exact-nonnegative-integer?
  local-time? : any/c = #t
procedure
(date->julian/scalinger date) -> exact-integer?
  date : date?
procedure
(julian/scalinger->string date-number) -> string?
  date-number : exact-integer?
procedure
(getenv name) -> (or/c string? #f)
  name : string?
procedure
(putenv name value) -> boolean?
  name : string?
  value : string?
procedure
(system-type [mode]) -> (or/c symbol? string? bytes?)
  mode : (or/c 'os 'gc 'link 'so-suffix 'machine) = 'os
procedure
(system-language+country) -> string?
procedure
(system-library-subpath [mode]) -> path?
  mode : (or/c 'cgc '3m #f) = (system-type 'gc)
procedure
(version) -> (and/c string? immutable?)
procedure
(banner) -> (and/c string? immutable?)
parameter
(current-command-line-arguments)
 -> (vectorof (and/c string? immutable?))
(current-command-line-arguments argv) -> void?
  argv : (vectorof (and/c string? immutable?))
parameter
(current-thread-initial-stack-size) -> exact-positive-integer?
(current-thread-initial-stack-size size) -> void?
  size : exact-positive-integer?
procedure
(vector-set-performance-stats! results [thd]) -> void?
  results : (and/c vector?
                   (not/c immutable?))
  thd : (or/c thread? #f) = #f
syntax
(command-line optional-name-expr optional-argv-expr
              flag-clause ...
              finish-clause)
 
optional-name-expr = 
                   | #:program name-expr
                      
optional-argv-expr = 
                   | #:argv argv-expr
                      
flag-clause        = #:multi flag-spec ...
                   | #:once-each flag-spec ...
                   | #:once-any flag-spec ...
                   | #:final flag-spec ...
                   | #:help-labels string ...
                   | #:ps string ...
                      
flag-spec          = (flags id ... help-spec body ...+)
                   | (flags => handler-expr help-expr)
                      
flags              = flag-string
                   | (flag-string ...+)
                      
help-spec          = string
                   | (string-expr ...+)
                      
finish-clause      = 
                   | #:args arg-formals body ...+
                   | #:handlers handlers-exprs
                      
arg-formals        = rest-id
                   | (arg ...)
                   | (arg ...+ . rest-id)
                      
arg                = id
                   | [id default-expr]
                      
handlers-exprs     = finish-expr arg-strings-expr
                   | finish-expr arg-strings-expr help-expr
                   | finish-expr arg-strings-expr help-expr
                     unknown-expr
procedure
(parse-command-line  name               
                     argv               
                     table              
                     finish-proc        
                     arg-help-strs      
                    [help-proc          
                     unknown-proc]) -> any
  name : (or/c string? path?)
  argv : (or/c (listof string?) (vectorof string?))
  table : (listof (cons/c symbol? list?))
  finish-proc : ((list?) () #:rest list? . ->* . any)
  arg-help-strs : (listof string?)
  help-proc : (string? . -> . any) = (lambda (str) ....)
  unknown-proc : (string? . -> . any) = (lambda (str) ...)
procedure
(make-weak-box v) -> weak-box?
  v : any/c
procedure
(weak-box-value weak-box [gced-v]) -> any/c
  weak-box : weak-box?
  gced-v : any/c = #f
procedure
(weak-box? v) -> boolean?
  v : any/c
procedure
(make-ephemeron key v) -> ephemeron?
  key : any/c
  v : any/c
procedure
(ephemeron-value ephemeron [gced-v]) -> any/c
  ephemeron : ephemeron?
  gced-v : any/c = #f
procedure
(ephemeron? v) -> boolean?
  v : any/c
procedure
(make-will-executor) -> will-executor?
procedure
(will-executor? v) -> boolean?
  v : any/c
procedure
(will-register executor v proc) -> void?
  executor : will-executor?
  v : any/c
  proc : (any/c . -> . any)
procedure
(will-execute executor) -> any
  executor : will-executor?
procedure
(will-try-execute executor) -> any
  executor : any/c
procedure
(collect-garbage) -> void?
procedure
(current-memory-use [cust]) -> exact-nonnegative-integer?
  cust : custodian? = #f
procedure
(dump-memory-stats v ...) -> any
  v : any/c
procedure
(unsafe-fx+ a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fx- a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fx* a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fxquotient a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fxremainder a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fxmodulo a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fxabs a) -> fixnum?
  a : fixnum?
procedure
(unsafe-fxand a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fxior a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fxxor a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fxnot a) -> fixnum?
  a : fixnum?
procedure
(unsafe-fxlshift a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fxrshift a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fx= a b) -> boolean?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fx< a b) -> boolean?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fx> a b) -> boolean?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fx<= a b) -> boolean?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fx>= a b) -> boolean?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fxmin a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fxmax a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fl+ a b) -> flonum?
  a : flonum?
  b : flonum?
procedure
(unsafe-fl- a b) -> flonum?
  a : flonum?
  b : flonum?
procedure
(unsafe-fl* a b) -> flonum?
  a : flonum?
  b : flonum?
procedure
(unsafe-fl/ a b) -> flonum?
  a : flonum?
  b : flonum?
procedure
(unsafe-flabs a) -> flonum?
  a : flonum?
procedure
(unsafe-fl= a b) -> boolean?
  a : flonum?
  b : flonum?
procedure
(unsafe-fl< a b) -> boolean?
  a : flonum?
  b : flonum?
procedure
(unsafe-fl> a b) -> boolean?
  a : flonum?
  b : flonum?
procedure
(unsafe-fl<= a b) -> boolean?
  a : flonum?
  b : flonum?
procedure
(unsafe-fl>= a b) -> boolean?
  a : flonum?
  b : flonum?
procedure
(unsafe-flmin a b) -> flonum?
  a : flonum?
  b : flonum?
procedure
(unsafe-flmax a b) -> flonum?
  a : flonum?
  b : flonum?
procedure
(unsafe-flround a) -> flonum?
  a : flonum?
procedure
(unsafe-flfloor a) -> flonum?
  a : flonum?
procedure
(unsafe-flceiling a) -> flonum?
  a : flonum?
procedure
(unsafe-fltruncate a) -> flonum?
  a : flonum?
procedure
(unsafe-flsin a) -> flonum?
  a : flonum?
procedure
(unsafe-flcos a) -> flonum?
  a : flonum?
procedure
(unsafe-fltan a) -> flonum?
  a : flonum?
procedure
(unsafe-flasin a) -> flonum?
  a : flonum?
procedure
(unsafe-flacos a) -> flonum?
  a : flonum?
procedure
(unsafe-flatan a) -> flonum?
  a : flonum?
procedure
(unsafe-fllog a) -> flonum?
  a : flonum?
procedure
(unsafe-flexp a) -> flonum?
  a : flonum?
procedure
(unsafe-flsqrt a) -> flonum?
  a : flonum?
procedure
(unsafe-flexpt a b) -> flonum?
  a : flonum?
  b : flonum?
procedure
(unsafe-make-flrectangular a b)
 -> (and/c complex? inexact? (not/c real?))
  a : flonum?
  b : flonum?
procedure
(unsafe-flreal-part a) -> flonum?
  a : (and/c complex? inexact? (not/c real?))
procedure
(unsafe-flimag-part a) -> flonum?
  a : (and/c complex? inexact? (not/c real?))
procedure
(unsafe-fx->fl a) -> flonum?
  a : fixnum?
procedure
(unsafe-fl->fx a) -> fixnum?
  a : flonum?
procedure
(unsafe-car p) -> any/c
  p : pair?
procedure
(unsafe-cdr p) -> any/c
  p : pair?
procedure
(unsafe-mcar p) -> any/c
  p : mpair?
procedure
(unsafe-mcdr p) -> any/c
  p : mpair?
procedure
(unsafe-set-mcar! p v) -> void?
  p : mpair?
  v : any/c
procedure
(unsafe-set-mcdr! p v) -> void?
  p : mpair?
  v : any/c
procedure
(unsafe-list-ref lst pos) -> any/c
  lst : pair?
  pos : (and/c exact-nonnegative-integer? fixnum?)
procedure
(unsafe-list-tail lst pos) -> any/c
  lst : any/c
  pos : (and/c exact-nonnegative-integer? fixnum?)
procedure
(unsafe-unbox b) -> fixnum?
  b : box?
procedure
(unsafe-set-box! b k) -> void?
  b : box?
  k : fixnum?
procedure
(unsafe-unbox* v) -> any/c
  v : (and/c box? (not/c impersonator?))
procedure
(unsafe-set-box*! v val) -> void?
  v : (and/c box? (not/c impersonator?))
  val : any/c
procedure
(unsafe-box*-cas! loc old new) -> boolean?
  loc : box?
  old : any/c
  new : any/c
procedure
(unsafe-vector-length v) -> fixnum?
  v : vector?
procedure
(unsafe-vector-ref v k) -> any/c
  v : vector?
  k : fixnum?
procedure
(unsafe-vector-set! v k val) -> void?
  v : vector?
  k : fixnum?
  val : any/c
procedure
(unsafe-vector*-length v) -> fixnum?
  v : (and/c vector? (not/c impersonator?))
procedure
(unsafe-vector*-ref v k) -> any/c
  v : (and/c vector? (not/c impersonator?))
  k : fixnum?
procedure
(unsafe-vector*-set! v k val) -> void?
  v : (and/c vector? (not/c impersonator?))
  k : fixnum?
  val : any/c
procedure
(unsafe-string-length str) -> fixnum?
  str : string?
procedure
(unsafe-string-ref str k)
 -> (and/c char? (lambda (ch) (<= 0 (char->integer ch) 255)))
  str : string?
  k : fixnum?
procedure
(unsafe-string-set! str k ch) -> void?
  str : (and/c string? (not/c immutable?))
  k : fixnum?
  ch : char?
procedure
(unsafe-bytes-length bstr) -> fixnum?
  bstr : bytes?
procedure
(unsafe-bytes-ref bstr k) -> byte?
  bstr : bytes?
  k : fixnum?
procedure
(unsafe-bytes-set! bstr k b) -> void?
  bstr : (and/c bytes? (not/c immutable?))
  k : fixnum?
  b : byte?
procedure
(unsafe-flvector-length v) -> fixnum?
  v : flvector?
procedure
(unsafe-flvector-ref v k) -> any/c
  v : flvector?
  k : fixnum?
procedure
(unsafe-flvector-set! v k x) -> void?
  v : flvector?
  k : fixnum?
  x : flonum?
procedure
(unsafe-f64vector-ref vec k) -> flonum?
  vec : f64vector?
  k : fixnum?
procedure
(unsafe-f64vector-set! vec k n) -> void?
  vec : f64vector?
  k : fixnum?
  n : flonum?
procedure
(unsafe-s16vector-ref vec k) -> (integer-in -32768 32767)
  vec : s16vector?
  k : fixnum?
procedure
(unsafe-s16vector-set! vec k n) -> void?
  vec : s16vector?
  k : fixnum?
  n : (integer-in -32768 32767)
procedure
(unsafe-u16vector-ref vec k) -> (integer-in 0 65535)
  vec : u16vector?
  k : fixnum?
procedure
(unsafe-u16vector-set! vec k n) -> void?
  vec : u16vector?
  k : fixnum?
  n : (integer-in 0 65535)
procedure
(unsafe-struct-ref v k) -> any/c
  v : any/c
  k : fixnum?
procedure
(unsafe-struct-set! v k val) -> void?
  v : any/c
  k : fixnum?
  val : any/c
procedure
(unsafe-struct*-ref v k) -> any/c
  v : (not/c impersonator?)
  k : fixnum?
procedure
(unsafe-struct*-set! v k val) -> void?
  v : (not/c impersonator?)
  k : fixnum?
  val : any/c
procedure
(find-library-collection-paths [pre-extras        
                                post-extras]) -> (listof path?)
  pre-extras : (listof path-string?) = null
  post-extras : (listof path-string?) = null
procedure
(collection-file-path file collection ...+) -> path?
  file : path-string?
  collection : path-string?
(collection-file-path file                  
                      collection ...+       
                      #:fail fail-proc) -> any
  file : path-string?
  collection : path-string?
  fail-proc : (string? . -> . any)
procedure
(collection-path collection ...+) -> path?
  collection : path-string?
(collection-path collection            
                 ...+                  
                 #:fail fail-proc) -> any
  collection : path-string?
  fail-proc : (string? . -> . any)
parameter
(current-library-collection-paths)
 -> (listof (and/c path? complete-path?))
(current-library-collection-paths paths) -> void?
  paths : (listof (and/c path? complete-path?))
parameter
(use-user-specific-search-paths) -> boolean?
(use-user-specific-search-paths on?) -> void?
  on? : any/c
parameter
(use-collection-link-paths) -> boolean?
(use-collection-link-paths on?) -> void?
  on? : any/c
syntax
help
(help string ...)
(help id)
(help id #:from module-path)
(help #:search datum ...)
syntax
(enter! module-path)
(enter! #f)
(enter! module-path flag ...+)
 
flag = #:quiet
     | #:verbose-reload
     | #:verbose
     | #:dont-re-require-enter
syntax
(trace id ...)
syntax
(untrace id ...)
parameter
(current-trace-notify) -> (string? . -> . any)
(current-trace-notify proc) -> void?
  proc : (string? . -> . any)
procedure
(trace-call id proc #:<kw> kw-arg ...) -> any/c
  id : symbol?
  proc : procedure?
  kw-arg : any/c
parameter
(current-trace-print-args) -> (-> symbol?
                                  list?
                                  (listof keyword?)
                                  list?
                                  number?
                                  void?)
(current-trace-print-args trace-print-args) -> void?
  trace-print-args : (-> symbol?
                         list?
                         (listof keyword?)
                         list?
                         number?
                         void?)
parameter
(current-trace-print-results) -> (-> symbol?
                                     list?
                                     number?
                                     any)
(current-trace-print-results trace-print-results) -> void?
  trace-print-results : (-> symbol?
                            list?
                            number?
                            any)
parameter
(current-prefix-in) -> string?
(current-prefix-in prefix) -> void?
  prefix : string?
parameter
(current-prefix-out) -> string?
(current-prefix-out prefix) -> void?
  prefix : string?
