205537
((3) 0 () 151 ((q quote #%kernel) (q lib "racket/port.rkt") (q lib "racket/control.rkt") (q lib "racket/private/base.rkt") (q lib "racket/file.rkt") (q lib "racket/private/class-internal.rkt") (q lib "racket/private/more-scheme.rkt") (q lib "racket/unsafe/ops.rkt") (q lib "racket/place.rkt") (q lib "racket/private/list.rkt") (q lib "racket/contract/private/guts.rkt") (q lib "racket/extflonum.rkt") (q lib "racket/match.rkt") (q lib "racket/list.rkt") (q lib "racket/contract.rkt") (q lib "racket/fixnum.rkt") (q lib "racket/treelist.rkt") (q lib "racket/contract/private/misc.rkt") (q lib "racket/sandbox.rkt") (q lib "racket/vector.rkt") (q lib "racket/bool.rkt") (q lib "racket/sequence.rkt") (q lib "racket/set.rkt") (q lib "racket/require-transform.rkt") (q lib "racket/linklet.rkt") (q lib "racket/runtime-path.rkt") (q lib "racket/contract/base.rkt") (q lib "racket/unit.rkt") (q lib "racket/udp.rkt") (q 508861 . 23) (q lib "racket/string.rkt") (q lib "racket/dict.rkt") (q lib "racket/flonum.rkt") (q lib "racket/promise.rkt") (q lib "racket/trace.rkt") (q lib "racket/future.rkt") (q lib "racket/function.rkt") (q lib "racket/pretty.rkt") (q lib "racket/private/letstx-scheme.rkt") (q lib "racket/private/stxcase-scheme.rkt") (q 334117 . 5) (q lib "racket/date.rkt") (q 212444 . 3) (q lib "racket/generator.rkt") (q lib "racket/syntax.rkt") (q lib "racket/provide-transform.rkt") (q lib "racket/private/misc.rkt") (q 279620 . 4) (q lib "racket/trait.rkt") (q lib "racket/contract/collapsible.rkt") (q 263003 . 9) (q 280251 . 4) (q lib "racket/stream.rkt") (q lib "racket/mutable-treelist.rkt") (q lib "racket/path.rkt") (q lib "racket/contract/region.rkt") (q lib "racket/splicing.rkt") (q 283164 . 5) (q lib "racket/generic.rkt") (q lib "racket/math.rkt") (q 262845 . 5) (q lib "racket/format.rkt") (q lib "racket/struct-info.rkt") (q lib "racket/fasl.rkt") (q lib "racket/system.rkt") (q 281974 . 5) (q lib "racket/tcp.rkt") (q 336039 . 8) (q 280590 . 5) (q lib "racket/class.rkt") (q 333594 . 17) (q lib "racket/async-channel.rkt") (q 182494 . 4) (q lib "racket/private/map.rkt") (q lib "racket/contract/private/blame.rkt") (q lib "racket/provide-syntax.rkt") (q lib "racket/contract/private/base.rkt") (q lib "racket/hash-code.rkt") (q lib "racket/contract/combinator.rkt") (q lib "racket/phase+space.rkt") (q 280071 . 5) (q 454021 . 6) (q 283318 . 4) (q lib "racket/private/serialize.rkt") (q 453655 . 5) (q lib "racket/hash.rkt") (q 283044 . 4) (q lib "racket/mutability.rkt") (q lib "racket/serialize.rkt") (q lib "racket/require-syntax.rkt") (q 263602 . 5) (q lib "racket/contract/private/prop.rkt") (q lib "racket/engine.rkt") (q lib "racket/contract/parametric.rkt") (q 282205 . 7) (q 281250 . 4) (q 280414 . 5) (q 509521 . 5) (q lib "racket/unit-exptime.rkt") (q lib "racket/private/qqstx.rkt") (q lib "racket/keyword-transform.rkt") (q 373500 . 29) (q 282772 . 4) (q 282424 . 4) (q 280898 . 5) (q 279748 . 4) (q 279325 . 6) (q lib "racket/include.rkt") (q lib "racket/deprecation/transformer.rkt") (q 247842 . 4) (q 283793 . 9) (q 281089 . 5) (q 283447 . 4) (q 281815 . 4) (q 281526 . 4) (q 191167 . 3) (q 281658 . 4) (q lib "racket/contract/private/vector.rkt") (q lib "racket/cmdline.rkt") (q lib "racket/logging.rkt") (q lib "racket/contract/private/box.rkt") (q lib "racket/unsafe/undefined.rkt") (q lib "racket/require.rkt") (q 263755 . 5) (q 282550 . 5) (q 279897 . 5) (q 279515 . 4) (q 281383 . 4) (q lib "racket/stxparam.rkt") (q 280751 . 4) (q lib "racket/contract/private/opt.rkt") (q lib "racket/bytes.rkt") (q 455227 . 6) (q lib "racket/case.rkt") (q lib "racket/provide.rkt") (q 444523 . 40) (q lib "racket/enter.rkt") (q lib "racket/os.rkt") (q lib "racket/random.rkt") (q 282910 . 4) (q lib "racket/contract/private/struct-dc.rkt") (q 263983 . 4) (q lib "racket/struct.rkt") (q lib "racket/stxparam-exptime.rkt") (q lib "racket/contract/private/ds.rkt") (q 447038 . 5) (q lib "racket/list/grouping.rkt") (q lib "racket/list/iteration.rkt") (q lib "racket/lazy-require.rkt") (q lib "racket/performance-hint.rkt") (q lib "racket/contract/private/hash.rkt")) () (h ! (equal) ((c def c (c (? . 26) q predicate/c)) q (235091 . 2)) ((c def c (c (? . 0) q environment-variables-names)) q (513187 . 4)) ((c def c (c (? . 33) q promise-forced?)) q (285646 . 3)) ((c def c (c (? . 3) q syntax-serialize)) q (340306 . 12)) ((c def c (c (? . 7) q unsafe-extflceiling)) q (541757 . 3)) ((c def c (c (? . 0) q make-hashalw)) q (122286 . 4)) ((c def c (c (? . 45) q make-provide-pre-transformer)) q (335621 . 5)) ((c def c (c (? . 0) q exn-classify-errno)) q (284470 . 3)) ((c def c (c (? . 0) q struct:date)) c (? . 29)) ((c def c (c (? . 1) q with-input-from-string)) q (362185 . 4)) ((c def c (c (? . 0) q call-with-continuation-prompt)) q (286596 . 10)) ((c def c (c (? . 0) q stencil-vector-ref)) q (119767 . 4)) ((c def c (c (? . 4) q other-permission-bits)) q (487752 . 2)) ((c def c (c (? . 1) q make-pipe-with-specials)) q (365439 . 7)) ((c form c (c (? . 2) q shift)) q (290057 . 2)) ((c def c (c (? . 0) q struct:exn:fail:filesystem:missing-module)) c (? . 94)) ((c def c (c (? . 0) q struct-accessor-procedure?)) q (193485 . 3)) ((c def c (c (? . 0) q current-load-extension)) q (413307 . 15)) ((c form c (c (? . 2) q control0)) q (290251 . 2)) ((c def c (c (? . 28) q udp-bind!)) q (490177 . 9)) ((c def c (c (? . 15) q most-positive-fixnum)) q (43764 . 2)) ((c form c (c (? . 22) q for/mutable-seteq)) q (170472 . 2)) ((c form c (c (? . 3) q define-struct/derived)) q (186449 . 3)) ((c def c (c (? . 23) q import?)) c (? . 70)) ((c def c (c (? . 6) q hash-ref!)) q (125523 . 5)) ((c form c (c (? . 18) q with-deep-time-limit)) q (455175 . 2)) ((c def c (c (? . 0) q nack-guard-evt)) q (297602 . 3)) ((c def c (c (? . 5) q make-exn:fail:object)) c (? . 42)) ((c def c (c (? . 0) q current-input-port)) q (345531 . 4)) ((c def c (c (? . 0) q make-struct-field-accessor)) q (187851 . 12)) ((c def c (c (? . 10) q contract-late-neg-projection)) q (259241 . 4)) ((c def c (c (? . 13) q sixth)) q (103125 . 3)) ((c def c (c (? . 0) q bytes>?)) q (68007 . 4)) ((c def c (c (? . 0) q current-module-path-for-load)) q (419837 . 11)) ((c def c (c (? . 37) q pretty-print-columns)) q (396342 . 5)) ((c def c (c (? . 0) q module-path?)) q (418792 . 3)) ((c def c (c (? . 83) q serialized=?)) q (402554 . 4)) ((c def c (c (? . 4) q put-preferences)) q (484863 . 9)) ((c def c (c (? . 0) q hash-iterate-pair)) q (128760 . 4)) ((c def c (c (? . 0) q make-custodian-box)) q (441696 . 4)) ((c def c (c (? . 11) q extflonum-available?)) q (43912 . 2)) ((c def c (c (? . 1) q dup-output-port)) q (368140 . 4)) ((c def c (c (? . 52) q stream-empty?)) q (155879 . 3)) ((c def c (c (? . 5) q is-a?)) q (211209 . 4)) ((c def c (c (? . 66) q tcp-connect/enable-break)) q (488591 . 10)) ((c def c (c (? . 0) q peek-char)) q (381990 . 4)) ((c def c (c (? . 8) q place-dead-evt)) q (305731 . 3)) ((c def c (c (? . 16) q treelist-first)) q (131727 . 3)) ((c form c (c (? . 27) q prefix)) q (215432 . 2)) ((c def c (c (? . 0) q make-continuation-prompt-tag)) q (287158 . 4)) ((c form c (c (? . 6) q log-info)) q (507004 . 3)) ((c def c (c (? . 0) q procedure-arity-mask)) q (179873 . 3)) ((c form c (c (? . 6) q do)) q (19556 . 7)) ((c def c (c (? . 0) q will-try-execute)) q (518184 . 4)) ((c def c (c (? . 0) q semaphore?)) q (298834 . 3)) ((c def c (c (? . 9) q build-list)) q (95359 . 4)) ((c def c (c (? . 14) q contract-random-generate-env?)) q (266001 . 3)) ((c def c (c (? . 1) q port->bytes)) q (360506 . 4)) ((c def c (c (? . 0) q hash-set)) q (124772 . 5)) ((c def c (c (? . 4) q preferences-lock-file-mode)) q (485198 . 2)) ((c def c (c (? . 0) q unquoted-printing-string-value)) q (276860 . 3)) ((c def c (c (? . 4) q group-execute-bit)) q (487715 . 2)) ((c def c (c (? . 32) q flround)) q (36654 . 3)) ((c def c (c (? . 6) q hash-has-key?)) q (125638 . 4)) ((c def c (c (? . 0) q bytes-length)) q (66336 . 3)) ((c def c (c (? . 0) q char-grapheme-break-property)) q (75274 . 3)) ((c def c (c (? . 7) q unsafe-char=?)) q (524058 . 4)) ((c def c (c (? . 24) q linklet-body-reserved-symbol?)) q (460555 . 3)) ((c def c (c (? . 0) q impersonate-struct)) q (426963 . 17)) ((c def c (c (? . 19) q vector*-append)) q (118777 . 3)) ((c def c (c (? . 0) q struct-type-make-predicate)) q (443597 . 3)) ((c def c (c (? . 8) q place-wait)) q (305668 . 3)) ((c def c (c (? . 9) q assv)) q (99622 . 7)) ((c def c (c (? . 69) q dynamic-object/c)) q (207189 . 9)) ((c def c (c (? . 3) q make-exn:break)) c (? . 57)) ((c def c (c (? . 7) q unsafe-string-length)) q (527503 . 3)) ((c def c (c (? . 93) q new-∀/c)) q (235266 . 3)) ((c def c (c (? . 0) q syntax-rearm)) q (339278 . 5)) ((c def c (c (? . 0) q memq)) q (98650 . 7)) ((c def c (c (? . 10) q contract-custom-write-property-proc)) q (260253 . 7)) ((c def c (c (? . 0) q car)) q (94997 . 3)) ((c def c (c (? . 0) q bytes=?)) q (67817 . 4)) ((c def c (c (? . 20) q false?)) q (22960 . 3)) ((c form c (c (? . 3) q for*/lists)) q (17034 . 3)) ((c def c (c (? . 64) q system)) q (500460 . 4)) ((c def c (c (? . 21) q sequence-length)) q (152996 . 3)) ((c form c (c (? . 39) q syntax)) q (308880 . 22)) ((c def c (c (? . 0) q struct:exn:break:hang-up)) c (? . 82)) ((c def c (c (? . 0) q namespace-variable-value)) q (407050 . 9)) ((c def c (c (? . 0) q make-ephemeron-hash)) q (123305 . 4)) ((c def c (c (? . 11) q extfl-)) q (44042 . 4)) ((c form c (c (? . 5) q send)) q (202316 . 3)) ((c form c (c (? . 12) q match-define)) q (267742 . 2)) ((c def c (c (? . 3) q in-mutable-hash-pairs)) q (147295 . 3)) ((c def c (c (? . 0) q char-upcase)) q (75547 . 3)) ((c form c (c (? . 12) q match-letrec-values)) q (267674 . 2)) ((c def c (c (? . 13) q takef)) q (105349 . 7)) ((c def c (c (? . 14) q contract-random-generate-fail?)) q (265925 . 3)) ((c def c (c (? . 7) q unsafe-fxpopcount)) q (519914 . 3)) ((c def c (c (? . 0) q string>?)) q (50951 . 4)) ((c def c (c (? . 6) q current-parameterization)) q (303255 . 2)) ((c def c (c (? . 0) q string-grapheme-count)) q (53199 . 6)) ((c def c (c (? . 3) q procedure-reduce-keyword-arity-mask)) q (181860 . 14)) ((c def c (c (? . 15) q fxmin)) q (41918 . 4)) ((c def c (c (? . 0) q raise-arity-mask-error)) q (274746 . 5)) ((c def c (c (? . 13) q check-duplicates)) q (108260 . 9)) ((c def c (c (? . 11) q extflvector-ref)) q (46661 . 4)) ((c def c (c (? . 13) q eleventh)) q (103388 . 3)) ((c form c (c (? . 3) q for*/hash)) q (17207 . 2)) ((c def c (c (? . 3) q exn:fail:filesystem:errno)) c (? . 65)) ((c def c (c (? . 1) q peek-bytes-avail!-evt)) c (? . 101)) ((c def c (c (? . 0) q port-read-handler)) q (390653 . 10)) ((c def c (c (? . 16) q treelist-filter)) q (133662 . 4)) ((c def c (c (? . 0) q hash?)) q (121133 . 3)) ((c def c (c (? . 0) q remainder)) q (25619 . 4)) ((c form c (c (? . 5) q public)) q (199190 . 2)) ((c def c (c (? . 17) q continuation-mark-key/c)) q (228286 . 3)) ((c def c (c (? . 0) q security-guard?)) q (439669 . 3)) ((c def c (c (? . 31) q dict-ref!)) q (160701 . 5)) ((c def c (c (? . 0) q string-ci>?)) q (51432 . 4)) ((c form c (c (? . 25) q define-runtime-paths)) q (476266 . 2)) ((c form c (c (? . 56) q splicing-letrec)) q (337727 . 2)) ((c def c (c (? . 0) q arity-at-least?)) c (? . 72)) ((c def c (c (? . 17) q string-len/c)) q (223333 . 3)) ((c def c (c (? . 5) q object?)) q (210481 . 3)) ((c def c (c (? . 0) q struct:exn:fail:filesystem:version)) c (? . 113)) ((c def c (c (? . 7) q unsafe-list-ref)) q (525014 . 4)) ((c def c (c (? . 18) q sandbox-make-inspector)) q (452119 . 4)) ((c def c (c (? . 1) q display-lines)) q (361347 . 7)) ((c def c (c (? . 19) q vector-append)) q (115189 . 3)) ((c def c (c (? . 0) q acos)) q (27792 . 3)) ((c def c (c (? . 0) q system-language+country)) q (514060 . 2)) ((c def c (c (? . 0) q read)) q (387027 . 3)) ((c def c (c (? . 0) q keyword?)) q (94362 . 3)) ((c form c (c (? . 20) q implies)) q (23061 . 2)) ((c form c (c (? . 6) q parameterize*)) q (302579 . 3)) ((c def c (c (? . 21) q sequence-tail)) q (153176 . 4)) ((c def c (c (? . 0) q mcar)) q (112061 . 3)) ((c def c (c (? . 41) q date->julian/scaliger)) q (511753 . 3)) ((c def c (c (? . 0) q vector*-ref)) q (113104 . 4)) ((c def c (c (? . 22) q list->mutable-setalw)) q (169268 . 4)) ((c def c (c (? . 0) q continuation-mark-set->list*)) q (291706 . 10)) ((c def c (c (? . 23) q current-require-module-path)) q (334300 . 4)) ((c def c (c (? . 58) q struct:exn:fail:support)) c (? . 115)) ((c def c (c (? . 0) q variable-reference->phase)) q (411659 . 3)) ((c form c (c (? . 89) q define-require-syntax)) q (14119 . 3)) ((c def c (c (? . 0) q file-position)) q (346441 . 6)) ((c def c (c (? . 15) q fxior)) q (40512 . 3)) ((c def c (c (? . 11) q extfl/)) q (44208 . 4)) ((c def c (c (? . 73) q andmap)) q (96213 . 4)) ((c def c (c (? . 24) q instance-describe-variable!)) q (462078 . 7)) ((c def c (c (? . 0) q bound-identifier=?)) q (316900 . 6)) ((c def c (c (? . 0) q bytes-utf-8-index)) q (70717 . 12)) ((c def c (c (? . 0) q link-exists?)) q (471945 . 3)) ((c def c (c (? . 36) q negate)) q (183866 . 3)) ((c def c (c (? . 7) q unsafe-extfl->fx)) q (542677 . 3)) ((c def c (c (? . 0) q delete-directory)) q (475423 . 3)) ((c def c (c (? . 0) q eval)) q (412224 . 6)) ((c def c (c (? . 15) q fx+)) q (39984 . 3)) ((c def c (c (? . 0) q read-bytes-avail!*)) q (377107 . 10)) ((c form c (c (? . 25) q define-runtime-path-list)) q (476332 . 2)) ((c def c (c (? . 23) q import-source?)) c (? . 40)) ((c def c (c (? . 48) q trait-sum)) q (204979 . 3)) ((c def c (c (? . 13) q indexes-of)) q (104474 . 6)) ((c def c (c (? . 26) q listof)) q (224811 . 3)) ((c def c (c (? . 10) q contract-first-order-passes?)) q (258411 . 4)) ((c def c (c (? . 4) q file->lines)) q (477237 . 8)) ((c def c (c (? . 0) q syntax-taint)) q (339420 . 3)) ((c def c (c (? . 0) q free-identifier=?)) q (317108 . 10)) ((c def c (c (? . 61) q ~.s)) q (64735 . 25)) ((c def c (c (? . 9) q remv*)) q (97556 . 4)) ((c form c (c (? . 0) q #%top)) q (10977 . 2)) ((c def c (c (? . 22) q set-eqv?)) q (167361 . 3)) ((c def c (c (? . 0) q syntax-local-phase-level)) q (330419 . 2)) ((c def c (c (? . 35) q fsemaphore?)) q (304174 . 3)) ((c def c (c (? . 4) q make-parent-directory*)) q (481624 . 3)) ((c def c (c (? . 0) q path->bytes)) q (465146 . 3)) ((c def c (c (? . 3) q in-input-port-chars)) q (145394 . 3)) ((c def c (c (? . 0) q syntax-property-symbol-keys)) q (338582 . 3)) ((c def c (c (? . 62) q struct-auto-info?)) q (195048 . 3)) ((c def c (c (? . 46) q bytes-environment-variable-name?)) q (512328 . 3)) ((c def c (c (? . 0) q string->immutable-string)) q (48992 . 3)) ((c def c (c (? . 3) q stop-after)) q (151448 . 4)) ((c form c (c (? . 27) q provide-signature-elements)) q (219639 . 2)) ((c def c (c (? . 0) q imag-part)) q (28184 . 3)) ((c def c (c (? . 0) q string->bytes/locale)) q (69316 . 6)) ((c def c (c (? . 17) q char-in)) q (223213 . 4)) ((c def c (c (? . 0) q stencil-vector-set!)) q (119886 . 5)) ((c def c (c (? . 28) q udp-send)) q (491163 . 6)) ((c def c (c (? . 0) q make-readtable)) q (400227 . 11)) ((c def c (c (? . 13) q third)) q (102968 . 3)) ((c def c (c (? . 1) q make-limited-input-port)) q (365172 . 7)) ((c form c (c (? . 5) q class-field-accessor)) q (203587 . 2)) ((c def c (c (? . 26) q symbols)) q (223537 . 3)) ((c def c (c (? . 0) q round)) q (26263 . 3)) ((c def c (c (? . 3) q apply)) q (178565 . 6)) ((c def c (c (? . 74) q blame-contract)) q (246979 . 3)) ((c def c (c (? . 79) q phase+space-phase)) q (344505 . 3)) ((c def c (c (? . 0) q char?)) q (73057 . 3)) ((c def c (c (? . 75) q syntax-local-provide-introduce)) q (14398 . 3)) ((c def c (c (? . 0) q date-minute)) c (? . 29)) ((c def c (c (? . 6) q current-break-parameterization)) q (293958 . 2)) ((c def c (c (? . 0) q identifier-prune-to-source-module)) q (316265 . 3)) ((c form c (c (? . 5) q inner)) q (201199 . 3)) ((c form c (c (? . 5) q super-instantiate)) q (202155 . 2)) ((c def c (c (? . 0) q srcloc?)) c (? . 110)) ((c def c (c (? . 7) q unsafe-flround)) q (522113 . 3)) ((c def c (c (? . 0) q find-compiled-file-roots)) q (415219 . 2)) ((c def c (c (? . 26) q list/c)) q (225448 . 3)) ((c def c (c (? . 30) q string-normalize-spaces)) q (53963 . 11)) ((c def c (c (? . 3) q in-parallel)) q (151001 . 3)) ((c def c (c (? . 1) q eof-evt)) q (372523 . 3)) ((c def c (c (? . 14) q contract-random-generate)) q (265253 . 5)) ((c def c (c (? . 0) q random-seed)) q (29854 . 3)) ((c def c (c (? . 30) q string-trim)) q (54930 . 11)) ((c form c (c (? . 27) q init-depend)) q (215616 . 2)) ((c def c (c (? . 7) q unsafe-fl<=)) q (521773 . 4)) ((c def c (c (? . 0) q module-path-index-submodule)) q (420806 . 4)) ((c def c (c (? . 0) q make-interned-syntax-introducer)) q (331941 . 4)) ((c def c (c (? . 31) q dict-iterate-key)) q (160146 . 4)) ((c def c (c (? . 3) q make-base-empty-namespace)) q (406212 . 2)) ((c def c (c (? . 34) q current-trace-print-args)) q (550836 . 14)) ((c def c (c (? . 0) q char-ci>?)) q (74195 . 4)) ((c def c (c (? . 3) q procedure-reduce-keyword-arity)) q (181255 . 14)) ((c def c (c (? . 0) q rename-transformer?)) q (322701 . 3)) ((c def c (c (? . 0) q peek-bytes)) q (378181 . 5)) ((c def c (c (? . 0) q error-message-adjuster-key)) q (285448 . 2)) ((c def c (c (? . 22) q set-union)) q (173557 . 4)) ((c def c (c (? . 7) q unsafe-string-set!)) q (527722 . 5)) ((c form c (c (? . 15) q for*/fxvector)) q (43309 . 9)) ((c def c (c (? . 120) q box-immutable/c)) q (224745 . 3)) ((c form c (c (? . 5) q absent)) q (206257 . 2)) ((c def c (c (? . 44) q format-symbol)) q (342502 . 5)) ((c def c (c (? . 0) q dynamic-wind)) q (288869 . 7)) ((c def c (c (? . 0) q peek-char-or-special)) q (382350 . 10)) ((c def c (c (? . 32) q flfloor)) q (36708 . 3)) ((c def c (c (? . 11) q extflabs)) q (44291 . 3)) ((c def c (c (? . 59) q sqr)) q (34653 . 3)) ((c def c (c (? . 0) q unquoted-printing-string?)) q (276700 . 3)) ((c def c (c (? . 0) q port-print-handler)) q (394606 . 7)) ((c def c (c (? . 0) q make-output-port)) q (357481 . 59)) ((c def c (c (? . 0) q string-fill!)) q (50098 . 4)) ((c def c (c (? . 0) q complex?)) q (23820 . 3)) ((c def c (c (? . 7) q unsafe-fltan)) q (522704 . 3)) ((c def c (c (? . 13) q drop)) q (104967 . 7)) ((c form c (c (? . 22) q for*/weak-seteq)) q (171158 . 2)) ((c def c (c (? . 0) q syntax-local-lift-module)) q (329742 . 3)) ((c def c (c (? . 0) q keyword<?)) q (94558 . 4)) ((c def c (c (? . 77) q hash-code-combine-unordered)) q (22255 . 3)) ((c def c (c (? . 17) q none/c)) q (222194 . 2)) ((c def c (c (? . 0) q equal-hash-code)) q (21416 . 3)) ((c form c (c (? . 33) q delay)) q (285547 . 2)) ((c form c (c (? . 38) q let/ec)) q (288414 . 2)) ((c def c (c (? . 21) q sequence-add-between)) q (154081 . 4)) ((c form c (c (? . 34) q untrace)) q (550544 . 2)) ((c def c (c (? . 0) q syntax-bound-interned-scope-symbols)) q (321903 . 9)) ((c def c (c (? . 0) q cddr)) q (100367 . 3)) ((c def c (c (? . 35) q fsemaphore-post)) q (304231 . 3)) ((c def c (c (? . 19) q vector-argmax)) q (116854 . 4)) ((c def c (c (? . 32) q fl<=)) q (36342 . 4)) ((c form c (c (? . 2) q shift0-at)) q (290468 . 2)) ((c def c (c (? . 22) q list->weak-set)) q (169599 . 4)) ((c def c (c (? . 22) q list->weak-setalw)) q (169700 . 4)) ((c def c (c (? . 36) q normalize-arity)) q (184444 . 4)) ((c def c (c (? . 0) q namespace?)) q (406107 . 3)) ((c form c (c (? . 99) q unsyntax-splicing)) q (309995 . 2)) ((c def c (c (? . 7) q unsafe-fltruncate)) q (522298 . 3)) ((c def c (c (? . 28) q udp-addresses)) q (496031 . 7)) ((c form c (c (? . 22) q for*/setalw)) q (170364 . 2)) ((c def c (c (? . 5) q member-name-key=?)) q (201533 . 4)) ((c def c (c (? . 4) q set-group-id-bit)) q (487396 . 2)) ((c def c (c (? . 0) q identifier-label-binding)) q (319811 . 12)) ((c def c (c (? . 7) q unsafe-extflvector-ref)) q (542820 . 4)) ((c def c (c (? . 0) q vector->immutable-vector)) q (113758 . 3)) ((c form c (c (? . 33) q lazy)) q (285574 . 2)) ((c def c (c (? . 4) q make-temporary-directory*)) q (482929 . 8)) ((c def c (c (? . 5) q dynamic-set-field!)) q (203426 . 5)) ((c form c (c (? . 33) q delay/thread)) q (285968 . 5)) ((c def c (c (? . 1) q convert-stream)) q (374834 . 9)) ((c def c (c (? . 37) q tentative-pretty-print-port-transfer)) q (399861 . 5)) ((c def c (c (? . 0) q real-part)) q (28130 . 3)) ((c def c (c (? . 0) q cdaadr)) q (101987 . 3)) ((c form c (c (? . 3) q for-meta)) q (7026 . 2)) ((c def c (c (? . 0) q port-progress-evt)) q (383296 . 4)) ((c form c (c (? . 38) q letrec-syntax)) q (12372 . 2)) ((c def c (c (? . 39) q syntax-pattern-variable?)) q (311945 . 3)) ((c def c (c (? . 0) q read-accept-lang)) q (390000 . 4)) ((c def c (c (? . 17) q false/c)) q (223401 . 2)) ((c def c (c (? . 49) q collapsible-leaf/c-proj-list)) c (? . 50)) ((c def c (c (? . 12) q prop:legacy-match-expander)) q (268059 . 2)) ((c def c (c (? . 0) q current-compile-realm)) q (417727 . 4)) ((c def c (c (? . 0) q keyword->string)) q (94416 . 3)) ((c def c (c (? . 0) q readtable-mapping)) q (400618 . 9)) ((c def c (c (? . 0) q hasheqv)) q (122011 . 5)) ((c def c (c (? . 7) q unsafe-flreal-part)) q (523424 . 5)) ((c def c (c (? . 0) q make-empty-namespace)) q (406163 . 2)) ((c def c (c (? . 0) q local-expand)) q (323022 . 11)) ((c def c (c (? . 0) q cddddr)) q (102587 . 3)) ((c def c (c (? . 19) q vector-extend)) q (116256 . 5)) ((c def c (c (? . 22) q set-intersect!)) q (173864 . 4)) ((c def c (c (? . 23) q struct:import-source)) c (? . 40)) ((c def c (c (? . 14) q contract-random-generate-fail)) q (265854 . 2)) ((c def c (c (? . 3) q make-exn:break:terminate)) c (? . 112)) ((c def c (c (? . 0) q write-bytes-avail/enable-break)) q (385716 . 10)) ((c def c (c (? . 0) q make-shared-bytes)) q (67647 . 4)) ((c def c (c (? . 0) q struct:exn:fail:contract)) c (? . 47)) ((c def c (c (? . 22) q subset?)) q (174491 . 4)) ((c def c (c (? . 54) q path-has-extension?)) q (469673 . 4)) ((c def c (c (? . 22) q set-intersect)) q (173757 . 4)) ((c def c (c (? . 18) q sandbox-namespace-specs)) q (449267 . 6)) ((c def c (c (? . 0) q exn:fail:syntax?)) c (? . 68)) ((c def c (c (? . 3) q exn:fail:contract:continuation)) c (? . 51)) ((c def c (c (? . 41) q julian/scaliger->string)) q (511832 . 3)) ((c def c (c (? . 11) q extfl<=)) q (44595 . 4)) ((c def c (c (? . 0) q error-print-width)) q (277621 . 4)) ((c def c (c (? . 3) q hash-keys)) q (127296 . 4)) ((c def c (c (? . 26) q property/c)) q (228857 . 5)) ((c def c (c (? . 3) q prop:sequence)) q (152565 . 2)) ((c def c (c (? . 78) q skip-projection-wrapper?)) q (245485 . 5)) ((c def c (c (? . 0) q hash-remove!)) q (126364 . 4)) ((c def c (c (? . 6) q hash-update!)) q (125722 . 8)) ((c def c (c (? . 30) q string-prefix?)) q (55616 . 4)) ((c def c (c (? . 0) q continuation-mark-set->iterator)) q (292159 . 11)) ((c def c (c (? . 0) q set-box*!)) q (120848 . 4)) ((c def c (c (? . 3) q in-weak-hash-keys)) q (148701 . 3)) ((c form c (c (? . 38) q let*-values)) q (12187 . 2)) ((c def c (c (? . 32) q fl->exact-integer)) q (37689 . 3)) ((c def c (c (? . 0) q date*?)) c (? . 97)) ((c def c (c (? . 28) q udp-receive!*)) q (493420 . 12)) ((c def c (c (? . 24) q make-instance)) q (460691 . 12)) ((c def c (c (? . 0) q semaphore-peek-evt)) q (299280 . 3)) ((c def c (c (? . 5) q method-in-interface?)) q (211572 . 4)) ((c def c (c (? . 0) q read-curly-brace-as-paren)) q (388438 . 4)) ((c def c (c (? . 0) q make-hashalw-placeholder)) q (111842 . 3)) ((c def c (c (? . 5) q exn:fail:object)) c (? . 42)) ((c def c (c (? . 7) q unsafe-extfltruncate)) q (541829 . 3)) ((c def c (c (? . 11) q extflcos)) q (45247 . 3)) ((c def c (c (? . 7) q unsafe-cons-list)) q (524914 . 4)) ((c def c (c (? . 24) q linklet-summarize-target-machine-info)) q (459617 . 3)) ((c def c (c (? . 13) q cons?)) q (102709 . 3)) ((c def c (c (? . 0) q current-library-collection-links)) q (548206 . 11)) ((c def c (c (? . 30) q string-suffix?)) q (55709 . 4)) ((c form c (c (? . 6) q define-logger)) q (505608 . 7)) ((c form c (c (? . 25) q define-runtime-path)) q (476132 . 5)) ((c def c (c (? . 0) q current-compiled-file-roots)) q (415043 . 4)) ((c def c (c (? . 24) q linklet-directory?)) q (459822 . 3)) ((c def c (c (? . 0) q make-set!-transformer)) q (322421 . 3)) ((c def c (c (? . 0) q ephemeron-value)) q (517646 . 5)) ((c def c (c (? . 15) q fxvector-set!)) q (42681 . 5)) ((c form c (c (? . 3) q define-sequence-syntax)) q (18652 . 8)) ((c def c (c (? . 11) q ->extfl)) q (45825 . 3)) ((c def c (c (? . 0) q print-boolean-long-form)) q (392940 . 4)) ((c def c (c (? . 0) q length)) q (95496 . 3)) ((c def c (c (? . 0) q syntax-local-lift-expression)) q (329469 . 3)) ((c def c (c (? . 4) q other-execute-bit)) q (487862 . 2)) ((c def c (c (? . 0) q prefab-key?)) q (194088 . 3)) ((c def c (c (? . 4) q user-permission-bits)) q (487462 . 2)) ((c def c (c (? . 43) q sequence->repeated-generator)) q (158720 . 3)) ((c def c (c (? . 10) q has-contract?)) q (259054 . 3)) ((c def c (c (? . 7) q unsafe-extfl>=)) q (541344 . 4)) ((c def c (c (? . 0) q eq-hash-code)) q (21947 . 3)) ((c def c (c (? . 0) q eqv?)) q (20980 . 4)) ((c form c (c (? . 3) q provide)) q (5598 . 24)) ((c def c (c (? . 7) q unsafe-assert-unreachable)) q (544686 . 2)) ((c def c (c (? . 0) q procedure-arity-includes?)) q (179956 . 5)) ((c def c (c (? . 31) q dict-values)) q (162216 . 3)) ((c def c (c (? . 4) q file-type-bits)) q (487045 . 2)) ((c form c (c (? . 3) q lib)) q (5235 . 2)) ((c form c (c (? . 43) q in-generator)) q (158484 . 5)) ((c def c (c (? . 0) q exn:fail:contract:variable-id)) c (? . 96)) ((c form c (c (? . 3) q submod)) q (5415 . 4)) ((c def c (c (? . 22) q set-empty?)) q (172845 . 3)) ((c form c (c (? . 27) q define-unit/contract)) q (220157 . 15)) ((c def c (c (? . 12) q prop:match-expander)) q (268007 . 2)) ((c form c (c (? . 0) q set!)) q (14666 . 2)) ((c def c (c (? . 0) q make-weak-hasheq)) q (123162 . 4)) ((c def c (c (? . 0) q call-with-composable-continuation)) q (287841 . 6)) ((c def c (c (? . 44) q syntax-local-eval)) q (343901 . 7)) ((c def c (c (? . 45) q pre-expand-export)) q (335067 . 4)) ((c def c (c (? . 7) q unsafe-fxpopcount32)) q (520007 . 3)) ((c def c (c (? . 0) q current-readtable)) q (390096 . 4)) ((c def c (c (? . 0) q caddar)) q (101687 . 3)) ((c form c (c (? . 2) q reset)) q (290030 . 2)) ((c def c (c (? . 0) q expand-to-top-form)) q (340019 . 4)) ((c def c (c (? . 1) q input-port-append)) q (362381 . 7)) ((c def c (c (? . 0) q quotient)) q (25540 . 4)) ((c def c (c (? . 15) q fxpopcount16)) q (41013 . 3)) ((c def c (c (? . 0) q namespace-symbol->identifier)) q (406695 . 3)) ((c def c (c (? . 0) q load-extension)) q (413858 . 3)) ((c form c (c (? . 38) q let-syntaxes)) q (12432 . 2)) ((c def c (c (? . 7) q unsafe-bytes->immutable-bytes!)) q (528663 . 4)) ((c def c (c (? . 0) q cadar)) q (100595 . 3)) ((c def c (c (? . 14) q contract-random-generate-get-current-environment)) q (266215 . 3)) ((c form c (c (? . 44) q define/with-syntax)) q (342716 . 4)) ((c def c (c (? . 15) q fxrshift)) q (40754 . 4)) ((c def c (c (? . 0) q dynamic-require)) q (423441 . 11)) ((c def c (c (? . 0) q use-compiled-file-check)) q (415292 . 4)) ((c def c (c (? . 46) q port?)) q (345215 . 3)) ((c def c (c (? . 0) q single-flonum?)) q (24460 . 3)) ((c def c (c (? . 0) q exn:fail:contract?)) c (? . 47)) ((c def c (c (? . 0) q delete-file)) q (472191 . 3)) ((c def c (c (? . 37) q pretty-display)) q (395897 . 5)) ((c def c (c (? . 53) q mutable-treelist-delete!)) q (138652 . 4)) ((c def c (c (? . 0) q thread-send)) q (296124 . 6)) ((c def c (c (? . 0) q hash-for-each)) q (127736 . 5)) ((c def c (c (? . 0) q procedure-specialize)) q (183360 . 3)) ((c def c (c (? . 22) q set->list)) q (174682 . 3)) ((c def c (c (? . 18) q set-eval-handler)) q (453503 . 4)) ((c form c (c (? . 0) q #%variable-reference)) q (10998 . 4)) ((c form c (c (? . 12) q match-lambda*)) q (267246 . 2)) ((c def c (c (? . 0) q caaadr)) q (101187 . 3)) ((c def c (c (? . 11) q fx->extfl)) q (46161 . 3)) ((c def c (c (? . 26) q treelist/c)) q (225626 . 5)) ((c def c (c (? . 18) q evaluator-alive?)) q (452940 . 3)) ((c def c (c (? . 0) q abs)) q (25977 . 3)) ((c form c (c (? . 48) q trait-exclude-field)) q (205080 . 2)) ((c def c (c (? . 4) q user-execute-bit)) q (487569 . 2)) ((c def c (c (? . 0) q list?)) q (95110 . 3)) ((c form c (c (? . 26) q flat-murec-contract)) q (228525 . 2)) ((c def c (c (? . 7) q unsafe-fxmodulo)) q (519264 . 4)) ((c def c (c (? . 3) q exn:fail:contract:non-fixnum-result)) c (? . 80)) ((c def c (c (? . 0) q syntax-transforming?)) q (331255 . 2)) ((c form c (c (? . 3) q for-space)) q (7194 . 2)) ((c def c (c (? . 15) q fixnum-for-every-system?)) q (42182 . 3)) ((c def c (c (? . 3) q make-parallel-thread-pool)) q (296573 . 3)) ((c form c (c (? . 26) q ->)) q (229163 . 12)) ((c def c (c (? . 21) q in-slice)) q (154433 . 4)) ((c def c (c (? . 0) q syntax-position)) q (312372 . 3)) ((c def c (c (? . 0) q string-locale-ci<?)) q (52626 . 4)) ((c def c (c (? . 32) q fltan)) q (37189 . 3)) ((c form c (c (? . 55) q define-struct/contract)) q (237833 . 6)) ((c def c (c (? . 49) q collapsible-leaf/c?)) c (? . 50)) ((c def c (c (? . 0) q chaperone-continuation-mark-key)) q (438686 . 13)) ((c form c (c (? . 150) q hash/dc)) q (227761 . 7)) ((c def c (c (? . 0) q make-file-or-directory-link)) q (474643 . 4)) ((c def c (c (? . 0) q pipe-content-length)) q (355088 . 3)) ((c def c (c (? . 3) q make-exn:fail:contract:continuation)) c (? . 51)) ((c def c (c (? . 38) q call/ec)) q (288208 . 3)) ((c def c (c (? . 18) q get-uncovered-expressions)) q (454256 . 7)) ((c form c (c (? . 52) q stream-cons)) q (156119 . 5)) ((c def c (c (? . 7) q unsafe-box*-cas!)) q (525769 . 5)) ((c def c (c (? . 0) q regexp-max-lookbehind)) q (78015 . 3)) ((c def c (c (? . 0) q syntax-disarm)) q (339162 . 4)) ((c form c (c (? . 38) q when)) q (14590 . 2)) ((c def c (c (? . 0) q angle)) q (28321 . 3)) ((c def c (c (? . 9) q compose)) q (178711 . 3)) ((c def c (c (? . 3) q regexp-replace*)) q (93069 . 15)) ((c def c (c (? . 0) q error-syntax->srcloc-handler)) q (278841 . 5)) ((c def c (c (? . 0) q read-bytes-avail!/enable-break)) q (377509 . 10)) ((c def c (c (? . 0) q close-output-port)) q (345333 . 3)) ((c def c (c (? . 0) q vector*-length)) q (112987 . 3)) ((c def c (c (? . 0) q error-message->adjusted-string)) q (284700 . 9)) ((c def c (c (? . 0) q syntax-local-apply-transformer)) q (325539 . 12)) ((c def c (c (? . 0) q current-thread)) q (294991 . 2)) ((c def c (c (? . 0) q inspector?)) q (442220 . 3)) ((c def c (c (? . 0) q flonum?)) q (24347 . 3)) ((c def c (c (? . 53) q mutable-treelist-prepend!)) q (139063 . 4)) ((c def c (c (? . 16) q treelist-sublist)) q (132901 . 5)) ((c form c (c (? . 3) q for*/or)) q (17534 . 2)) ((c def c (c (? . 22) q list->weak-seteqv)) q (169811 . 4)) ((c form c (c (? . 12) q ==)) q (268614 . 3)) ((c def c (c (? . 87) q immutable-string?)) q (23220 . 3)) ((c form c (c (? . 3) q #%plain-app)) q (11187 . 3)) ((c def c (c (? . 15) q fxnot)) q (40626 . 3)) ((c def c (c (? . 118) q parse-command-line)) q (516545 . 15)) ((c def c (c (? . 0) q struct:exn:fail:contract:arity)) c (? . 105)) ((c def c (c (? . 45) q export-orig-stx)) c (? . 67)) ((c def c (c (? . 4) q display-to-file)) q (477960 . 11)) ((c def c (c (? . 0) q print-syntax-width)) q (393268 . 5)) ((c def c (c (? . 54) q simple-form-path)) q (470883 . 3)) ((c def c (c (? . 0) q make-ephemeron-hasheq)) q (123778 . 4)) ((c form c (c (? . 0) q #%datum)) q (10913 . 2)) ((c def c (c (? . 22) q set=?)) q (174401 . 4)) ((c form c (c (? . 55) q struct/contract)) q (237508 . 6)) ((c def c (c (? . 0) q magnitude)) q (28238 . 3)) ((c def c (c (? . 0) q current-inexact-monotonic-milliseconds)) q (508684 . 2)) ((c def c (c (? . 0) q find-system-path)) q (471299 . 3)) ((c def c (c (? . 0) q hasheq)) q (121879 . 5)) ((c def c (c (? . 0) q >)) q (27047 . 4)) ((c def c (c (? . 22) q set-subtract)) q (173965 . 4)) ((c def c (c (? . 18) q call-with-custodian-shutdown)) c (? . 84)) ((c def c (c (? . 0) q peek-bytes-avail!*)) q (380022 . 14)) ((c def c (c (? . 10) q contract-projection)) q (259363 . 3)) ((c def c (c (? . 0) q make-directory)) q (475285 . 4)) ((c def c (c (? . 36) q arity=?)) q (184579 . 4)) ((c def c (c (? . 7) q unsafe-vector-append)) q (526412 . 3)) ((c def c (c (? . 0) q syntax-tainted?)) q (338866 . 3)) ((c form c (c (? . 56) q splicing-letrec-values)) q (337777 . 2)) ((c def c (c (? . 9) q remw)) q (97283 . 4)) ((c form c (c (? . 3) q all-defined-out)) q (6507 . 2)) ((c def c (c (? . 6) q call-with-break-parameterization)) q (294030 . 5)) ((c form c (c (? . 6) q parameterize)) q (302468 . 5)) ((c def c (c (? . 53) q mutable-treelist?)) q (137230 . 3)) ((c def c (c (? . 71) q async-channel-get)) q (300308 . 3)) ((c def c (c (? . 0) q struct->vector)) q (193128 . 4)) ((c def c (c (? . 15) q fx>)) q (41685 . 4)) ((c def c (c (? . 0) q raise-arity-error)) q (273880 . 9)) ((c def c (c (? . 0) q exn:break?)) c (? . 57)) ((c def c (c (? . 24) q correlated-span)) q (462975 . 3)) ((c def c (c (? . 0) q continuation-mark-key?)) q (293490 . 3)) ((c def c (c (? . 6) q call/cc)) q (287653 . 5)) ((c def c (c (? . 15) q fxlshift)) q (40678 . 4)) ((c def c (c (? . 0) q prop:custom-print-quotable)) q (401346 . 2)) ((c def c (c (? . 22) q set-copy)) q (173245 . 3)) ((c form c (c (? . 27) q invoke-unit/infer)) q (217717 . 5)) ((c def c (c (? . 7) q unsafe-flsin)) q (522586 . 3)) ((c def c (c (? . 0) q pseudo-random-generator->vector)) q (30253 . 4)) ((c def c (c (? . 17) q >=/c)) q (222766 . 3)) ((c def c (c (? . 16) q treelist-for-each)) q (133556 . 4)) ((c def c (c (? . 13) q remf)) q (110717 . 4)) ((c def c (c (? . 0) q prop:impersonator-of)) q (432273 . 2)) ((c def c (c (? . 0) q hash)) q (121603 . 5)) ((c def c (c (? . 18) q get-error-output)) c (? . 81)) ((c def c (c (? . 0) q error-contract->adjusted-string)) q (285059 . 5)) ((c def c (c (? . 3) q with-input-from-file)) q (352175 . 7)) ((c def c (c (? . 0) q vector-cas!)) q (113421 . 6)) ((c form c (c (? . 22) q for*/weak-seteqv)) q (171214 . 2)) ((c form c (c (? . 58) q redirect-generics)) q (191786 . 4)) ((c def c (c (? . 5) q class-unseal)) q (213098 . 5)) ((c form c (c (? . 3) q for*/vector)) q (17127 . 2)) ((c def c (c (? . 11) q extfl->floating-point-bytes)) q (48330 . 10)) ((c def c (c (? . 98) q unit-static-init-dependencies)) q (221317 . 7)) ((c def c (c (? . 17) q procedure-arity-includes/c)) q (227333 . 3)) ((c def c (c (? . 18) q sandbox-input)) q (447528 . 12)) ((c def c (c (? . 3) q exn:fail:syntax:missing-module)) c (? . 104)) ((c def c (c (? . 0) q compile-enforce-module-constants)) q (417038 . 4)) ((c def c (c (? . 0) q read-byte)) q (375319 . 3)) ((c def c (c (? . 3) q make-exn:fail:out-of-memory)) c (? . 102)) ((c def c (c (? . 16) q chaperone-treelist)) q (135023 . 41)) ((c def c (c (? . 31) q dict-empty?)) q (161838 . 3)) ((c def c (c (? . 0) q print-as-expression)) q (393166 . 4)) ((c def c (c (? . 0) q read-syntax-accept-graph)) q (389188 . 4)) ((c def c (c (? . 18) q put-input)) q (453804 . 6)) ((c def c (c (? . 3) q in-hash-keys)) q (145999 . 6)) ((c form c (c (? . 3) q for)) q (14728 . 19)) ((c def c (c (? . 0) q exn:fail:read?)) c (? . 111)) ((c def c (c (? . 0) q syntax-local-make-delta-introducer)) q (331005 . 3)) ((c def c (c (? . 17) q rename-contract)) q (260503 . 4)) ((c def c (c (? . 39) q generate-temporaries)) q (315970 . 3)) ((c def c (c (? . 0) q compiled-expression-add-target-machine)) q (416627 . 6)) ((c def c (c (? . 0) q struct:exn:fail:contract:divide-by-zero)) c (? . 125)) ((c def c (c (? . 16) q treelist-find)) q (133921 . 4)) ((c def c (c (? . 59) q cosh)) q (34904 . 3)) ((c def c (c (? . 100) q syntax-procedure-alias-property)) q (336468 . 8)) ((c def c (c (? . 0) q datum-intern-literal)) q (315784 . 3)) ((c def c (c (? . 7) q unsafe-stencil-vector-update)) q (530713 . 9)) ((c def c (c (? . 49) q collapsible-ho/c)) c (? . 60)) ((c def c (c (? . 0) q current-security-guard)) q (440398 . 4)) ((c def c (c (? . 14) q raise-contract-error)) q (264700 . 13)) ((c form c (c (? . 12) q match-letrec)) q (267620 . 2)) ((c def c (c (? . 0) q set-port-next-location!)) q (347264 . 9)) ((c def c (c (? . 0) q chaperone?)) q (425839 . 3)) ((c form c (c (? . 5) q super-new)) q (202227 . 2)) ((c def c (c (? . 0) q continuation-prompt-available?)) q (288528 . 5)) ((c form c (c (? . 133) q case/equal)) q (13341 . 2)) ((c form c (c (? . 5) q this%)) q (198968 . 2)) ((c def c (c (? . 0) q append)) q (95948 . 6)) ((c def c (c (? . 52) q stream/c)) q (158157 . 3)) ((c def c (c (? . 137) q gethostname)) q (517257 . 2)) ((c def c (c (? . 0) q ceiling)) q (26429 . 3)) ((c def c (c (? . 22) q set-for-each)) q (174854 . 4)) ((c def c (c (? . 0) q unquoted-printing-string)) q (276771 . 3)) ((c def c (c (? . 53) q chaperone-mutable-treelist)) q (141492 . 25)) ((c def c (c (? . 11) q extflacos)) q (45431 . 3)) ((c form c (c (? . 76) q contract-first-order-try-less-hard)) q (260655 . 2)) ((c def c (c (? . 0) q >=)) q (27118 . 4)) ((q form ((lib "racket/block.rkt") block)) q (19943 . 2)) ((c def c (c (? . 7) q unsafe-ephemeron-hash-iterate-pair)) q (539663 . 5)) ((q def ((lib "racket/symbol.rkt") symbol->immutable-string)) q (76559 . 3)) ((c def c (c (? . 16) q treelist-rest)) q (133119 . 3)) ((c def c (c (? . 7) q unsafe-extfltan)) q (542038 . 3)) ((c def c (c (? . 44) q internal-definition-context-apply)) q (343706 . 5)) ((c form c (c (? . 52) q stream)) q (156447 . 5)) ((c form c (c (? . 25) q define-runtime-module-path)) q (476516 . 2)) ((c def c (c (? . 0) q environment-variables-copy)) q (513337 . 3)) ((c def c (c (? . 3) q namespace-anchor?)) q (406351 . 3)) ((c form c (c (? . 0) q #%declare)) q (1857 . 10)) ((c def c (c (? . 13) q split-common-prefix)) q (107387 . 5)) ((c def c (c (? . 4) q display-lines-to-file)) q (478878 . 13)) ((c def c (c (? . 0) q string=?)) q (50668 . 4)) ((c def c (c (? . 59) q tanh)) q (34955 . 3)) ((c form c (c (? . 34) q trace-let)) q (550488 . 2)) ((c def c (c (? . 1) q read-line-evt)) q (373158 . 5)) ((c def c (c (? . 16) q treelist-append*)) q (134269 . 3)) ((c def c (c (? . 22) q set-first)) q (172992 . 3)) ((c def c (c (? . 13) q list-update)) q (103862 . 5)) ((c form c (c (? . 38) q else)) q (13138 . 2)) ((c def c (c (? . 54) q string->some-system-path)) q (471046 . 4)) ((c def c (c (? . 52) q stream-count)) q (157669 . 4)) ((c def c (c (? . 49) q collapsible-ho/c-latest-ctc)) c (? . 60)) ((c def c (c (? . 0) q use-user-specific-search-paths)) q (548872 . 4)) ((c def c (c (? . 46) q path-add-suffix)) q (469075 . 4)) ((q def ((lib "racket/keyword.rkt") keyword->immutable-string)) q (94675 . 3)) ((c def c (c (? . 3) q in-lines)) q (145468 . 5)) ((c def c (c (? . 49) q collapsible-wrapper-property)) c (? . 141)) ((c def c (c (? . 8) q place-channel-put)) q (306020 . 4)) ((c def c (c (? . 15) q fx<=)) q (41762 . 4)) ((c def c (c (? . 22) q set->stream)) q (173180 . 3)) ((c def c (c (? . 41) q julian/scalinger->string)) q (512009 . 3)) ((c form c (c (? . 39) q syntax-case)) q (307282 . 31)) ((c def c (c (? . 7) q unsafe-extflatan)) q (542244 . 3)) ((c def c (c (? . 10) q collapsible-contract-continuation-mark-key)) q (261298 . 3)) ((c def c (c (? . 41) q date-display-format)) q (510326 . 18)) ((c def c (c (? . 0) q syntax-property)) q (338051 . 9)) ((c def c (c (? . 17) q real-in)) q (222902 . 4)) ((c def c (c (? . 1) q merge-input)) q (365840 . 5)) ((c def c (c (? . 61) q ~.a)) q (62243 . 25)) ((c def c (c (? . 54) q shrink-path-wrt)) q (471178 . 4)) ((c def c (c (? . 0) q thread?)) q (294939 . 3)) ((c def c (c (? . 23) q prop:require-transformer)) q (333471 . 2)) ((c def c (c (? . 62) q prop:struct-info)) q (194945 . 2)) ((c form c (c (? . 27) q unit/new-import-export)) q (218479 . 6)) ((c def c (c (? . 0) q regexp-replace)) q (92473 . 15)) ((c form c (c (? . 3) q rename-in)) q (4752 . 2)) ((c def c (c (? . 7) q unsafe-u16vector-set!)) q (529874 . 5)) ((c def c (c (? . 22) q in-weak-set)) q (171462 . 3)) ((c def c (c (? . 16) q sequence->treelist)) q (134819 . 3)) ((c def c (c (? . 0) q cddadr)) q (102387 . 3)) ((c def c (c (? . 22) q set-map)) q (174743 . 4)) ((c def c (c (? . 0) q exp)) q (27455 . 3)) ((c def c (c (? . 0) q string-normalize-nfkc)) q (52140 . 3)) ((c form c (c (? . 26) q flat-rec-contract)) q (228469 . 2)) ((c form c (c (? . 3) q for*/product)) q (17659 . 2)) ((c def c (c (? . 3) q collection-file-path)) q (546908 . 16)) ((c def c (c (? . 22) q proper-subset?)) q (174583 . 4)) ((c def c (c (? . 7) q unsafe-flexp)) q (523002 . 3)) ((c def c (c (? . 0) q subprocess?)) q (499592 . 3)) ((c def c (c (? . 0) q thread-rewind-receive)) q (296439 . 3)) ((c form c (c (? . 31) q gen:dict)) q (159218 . 2)) ((c form c (c (? . 22) q for*/weak-set)) q (171104 . 2)) ((c def c (c (? . 117) q vector-immutable/c)) q (224348 . 3)) ((c def c (c (? . 63) q s-exp->fasl)) q (404524 . 14)) ((c def c (c (? . 0) q subprocess-pid)) q (499496 . 3)) ((c def c (c (? . 22) q list->seteq)) q (169072 . 3)) ((c def c (c (? . 7) q unsafe-flacos)) q (522823 . 3)) ((c def c (c (? . 3) q in-vector)) q (144472 . 6)) ((c def c (c (? . 7) q unsafe-cdr)) q (524593 . 3)) ((c def c (c (? . 0) q module->exports)) q (424973 . 7)) ((c form c (c (? . 3) q rename-out)) q (6572 . 2)) ((c form c (c (? . 5) q augment-final*)) q (200083 . 2)) ((c def c (c (? . 63) q fasl->s-exp)) q (405122 . 9)) ((c def c (c (? . 11) q extflceiling)) q (45055 . 3)) ((c def c (c (? . 0) q port-display-handler)) q (394385 . 6)) ((c def c (c (? . 0) q regexp-match?)) q (82696 . 13)) ((c def c (c (? . 0) q file-stream-buffer-mode)) q (346232 . 6)) ((c def c (c (? . 0) q box?)) q (120440 . 3)) ((c form c (c (? . 52) q stream*)) q (156550 . 2)) ((c form c (c (? . 2) q cupto)) q (290917 . 2)) ((c def c (c (? . 0) q impersonate-vector)) q (427717 . 15)) ((c def c (c (? . 18) q call-with-deep-time-limit)) q (455051 . 4)) ((c def c (c (? . 64) q process/ports)) q (503111 . 11)) ((c def c (c (? . 0) q symbol<?)) q (76461 . 4)) ((c def c (c (? . 0) q bytes->string/latin-1)) q (68708 . 9)) ((c def c (c (? . 0) q prop:liberal-define-context)) q (332984 . 2)) ((c def c (c (? . 3) q make-exn:fail:filesystem:errno)) c (? . 65)) ((c def c (c (? . 28) q udp-send-ready-evt)) q (494721 . 3)) ((c def c (c (? . 0) q symbol-unreadable?)) q (76023 . 3)) ((c def c (c (? . 11) q extfl<)) q (44433 . 4)) ((c form c (c (? . 5) q new)) q (201842 . 2)) ((c def c (c (? . 5) q interface?)) q (210586 . 3)) ((c def c (c (? . 0) q prop:output-port)) q (355240 . 2)) ((c form c (c (? . 3) q for/product)) q (16084 . 2)) ((c def c (c (? . 3) q in-immutable-hash-keys)) q (147791 . 3)) ((c def c (c (? . 18) q kill-evaluator)) q (453033 . 3)) ((c def c (c (? . 5) q externalizable<%>)) q (210371 . 2)) ((c def c (c (? . 0) q subprocess-group-enabled)) q (499827 . 4)) ((c def c (c (? . 0) q fprintf)) q (391810 . 5)) ((c def c (c (? . 37) q pretty-print-.-symbol-without-bars)) q (396827 . 4)) ((c def c (c (? . 15) q fx>=)) q (41840 . 4)) ((c form c (c (? . 39) q ...)) q (311905 . 2)) ((c form c (c (? . 27) q define-compound-unit/infer)) q (217419 . 5)) ((c def c (c (? . 43) q sequence->generator)) q (158650 . 3)) ((c def c (c (? . 22) q set-clear!)) q (173495 . 3)) ((c def c (c (? . 0) q cdaddr)) q (102187 . 3)) ((c def c (c (? . 0) q make-string)) q (48816 . 4)) ((c def c (c (? . 66) q tcp-accept)) q (488971 . 3)) ((c def c (c (? . 0) q mpair?)) q (111941 . 3)) ((c def c (c (? . 7) q unsafe-extflvector-length)) q (542743 . 3)) ((c def c (c (? . 0) q equal-always-hash-code)) q (21671 . 3)) ((c def c (c (? . 31) q dict-update)) q (161206 . 8)) ((c def c (c (? . 7) q unsafe-extfl<=)) q (541255 . 4)) ((c def c (c (? . 46) q rationalize)) q (26740 . 4)) ((c def c (c (? . 30) q string-join)) q (53517 . 11)) ((c def c (c (? . 0) q namespace-base-phase)) q (406778 . 3)) ((c def c (c (? . 121) q chaperone-struct-unsafe-undefined)) q (546087 . 3)) ((c form c (c (? . 2) q set)) q (290879 . 2)) ((c def c (c (? . 5) q make-generic)) q (203858 . 4)) ((c def c (c (? . 0) q current-print)) q (416057 . 4)) ((c def c (c (? . 0) q port-commit-peeked)) q (383526 . 6)) ((c def c (c (? . 24) q instance-data)) q (461216 . 3)) ((c form c (c (? . 3) q struct)) q (184904 . 34)) ((c def c (c (? . 49) q struct:collapsible-count-property)) c (? . 123)) ((c def c (c (? . 45) q export-protect?)) c (? . 67)) ((c def c (c (? . 3) q hash-values)) q (127406 . 4)) ((c def c (c (? . 13) q group-by)) q (110473 . 5)) ((c def c (c (? . 18) q make-module-evaluator)) c (? . 135)) ((c def c (c (? . 0) q expand-once)) q (339746 . 4)) ((c def c (c (? . 30) q string-find)) q (55389 . 4)) ((c def c (c (? . 0) q exn:fail:syntax-exprs)) c (? . 68)) ((c def c (c (? . 9) q remove)) q (97028 . 5)) ((c def c (c (? . 0) q handle-evt?)) q (298107 . 3)) ((c def c (c (? . 13) q dropf)) q (105503 . 7)) ((c def c (c (? . 3) q make-exn:fail:read:eof)) c (? . 95)) ((c def c (c (? . 3) q pregexp-quote)) q (77785 . 7)) ((c def c (c (? . 19) q vector-argmin)) q (116754 . 4)) ((c form c (c (? . 33) q delay/strict)) q (285902 . 2)) ((c def c (c (? . 0) q read-syntax/recursive)) q (387546 . 11)) ((c form c (c (? . 38) q quasiquote)) q (19782 . 2)) ((c def c (c (? . 0) q filesystem-change-evt-cancel)) q (476040 . 3)) ((c def c (c (? . 0) q module-path-index-resolve)) q (420370 . 7)) ((c form c (c (? . 36) q thunk*)) q (183838 . 2)) ((c def c (c (? . 1) q port->string)) q (360368 . 4)) ((c def c (c (? . 0) q make-bytes)) q (66035 . 4)) ((c form c (c (? . 2) q prompt-at)) q (289929 . 2)) ((c def c (c (? . 54) q normalize-path)) q (470535 . 5)) ((c form c (c (? . 12) q match-let)) q (267386 . 2)) ((c def c (c (? . 52) q stream-take)) q (157010 . 4)) ((c form c (c (? . 6) q with-handlers)) q (277212 . 3)) ((c def c (c (? . 7) q unsafe-flrandom)) q (523938 . 3)) ((c def c (c (? . 0) q namespace-attach-module-declaration)) q (409417 . 7)) ((c def c (c (? . 0) q raise-arguments-error*)) q (271579 . 12)) ((c def c (c (? . 0) q raise-mismatch-error)) q (273645 . 8)) ((c form c (c (? . 27) q invoke-unit)) q (215672 . 3)) ((c form c (c (? . 27) q tag)) q (215571 . 3)) ((c def c (c (? . 8) q dynamic-place*)) q (305042 . 14)) ((c def c (c (? . 22) q set-union!)) q (173660 . 4)) ((c def c (c (? . 3) q open-input-file)) q (347746 . 7)) ((c form c (c (? . 69) q class/c)) q (205268 . 28)) ((c def c (c (? . 11) q extflsin)) q (45186 . 3)) ((c def c (c (? . 26) q failure-result/c)) q (260876 . 2)) ((c def c (c (? . 46) q displayln)) q (391524 . 4)) ((c form c (c (? . 46) q define-syntax-rule)) q (311850 . 2)) ((c def c (c (? . 22) q generic-set?)) q (171526 . 3)) ((c def c (c (? . 10) q get/build-late-neg-projection)) q (261031 . 4)) ((c def c (c (? . 7) q unsafe-ephemeron-hash-iterate-key)) q (538261 . 5)) ((c def c (c (? . 23) q import)) c (? . 70)) ((c def c (c (? . 0) q byte-regexp)) q (77202 . 6)) ((c def c (c (? . 71) q async-channel-put-evt)) q (300550 . 4)) ((c form c (c (? . 2) q control-at)) q (289977 . 2)) ((c def c (c (? . 28) q udp-bound?)) q (494571 . 3)) ((c def c (c (? . 1) q transplant-input-port)) q (369304 . 19)) ((c def c (c (? . 3) q arity-at-least)) c (? . 72)) ((c def c (c (? . 3) q exn:fail)) c (? . 126)) ((c form c (c (? . 27) q define-signature)) q (214285 . 25)) ((c def c (c (? . 0) q char-lower-case?)) q (74454 . 3)) ((c form c (c (? . 34) q trace)) q (550256 . 2)) ((c form c (c (? . 3) q for*/list)) q (16970 . 2)) ((c form c (c (? . 27) q define-unit/new-import-export)) q (218660 . 6)) ((c form c (c (? . 3) q for/last)) q (16388 . 2)) ((c form c (c (? . 144) q contract-struct)) q (235436 . 2)) ((c def c (c (? . 0) q prop:custom-write)) q (401105 . 2)) ((c form c (c (? . 5) q class/derived)) q (200997 . 5)) ((c def c (c (? . 0) q special-comment-value)) q (400997 . 3)) ((c def c (c (? . 0) q semaphore-wait/enable-break)) q (299199 . 3)) ((c def c (c (? . 19) q vector-sort!)) q (117927 . 13)) ((c form c (c (? . 38) q let*)) q (12025 . 2)) ((c form c (c (? . 5) q rename-super)) q (199718 . 2)) ((c def c (c (? . 45) q make-export)) c (? . 67)) ((c def c (c (? . 0) q vector-copy!)) q (113964 . 11)) ((c def c (c (? . 13) q inclusive-range)) q (109444 . 5)) ((c def c (c (? . 0) q struct-type?)) q (193279 . 3)) ((c form c (c (? . 27) q define-signature-form)) q (219113 . 4)) ((c def c (c (? . 73) q for-each)) q (96386 . 4)) ((c form c (c (? . 3) q planet)) q (5292 . 5)) ((c def c (c (? . 15) q fx-/wraparound)) q (41188 . 4)) ((c def c (c (? . 9) q compose1)) q (178782 . 3)) ((c def c (c (? . 0) q <)) q (26904 . 4)) ((c def c (c (? . 0) q set-phantom-bytes!)) q (518745 . 4)) ((c form c (c (? . 0) q define-syntaxes)) q (13943 . 2)) ((c def c (c (? . 0) q bitwise-not)) q (28602 . 3)) ((c form c (c (? . 39) q with-syntax)) q (308816 . 3)) ((c def c (c (? . 46) q channel-get)) q (298483 . 3)) ((c def c (c (? . 74) q blame-replace-negative)) q (247328 . 4)) ((c def c (c (? . 28) q udp-multicast-ttl)) q (497600 . 3)) ((c def c (c (? . 3) q in-value)) q (150741 . 3)) ((c def c (c (? . 0) q bytes-utf-8-length)) q (70138 . 7)) ((c def c (c (? . 23) q struct:import)) c (? . 70)) ((c def c (c (? . 11) q extfltruncate)) q (45120 . 3)) ((c def c (c (? . 0) q variable-reference?)) q (410875 . 3)) ((c def c (c (? . 0) q number->string)) q (31473 . 4)) ((c def c (c (? . 15) q fxand)) q (40455 . 3)) ((c def c (c (? . 0) q hash-ref)) q (125057 . 7)) ((c def c (c (? . 18) q call-with-trusted-sandbox-configuration)) q (447208 . 3)) ((c form c (c (? . 75) q define-provide-syntax)) q (14299 . 3)) ((c def c (c (? . 0) q custodian?)) q (440527 . 3)) ((c form c (c (? . 22) q for*/seteq)) q (170261 . 2)) ((c form c (c (? . 148) q lazy-require-syntax)) q (20497 . 5)) ((c def c (c (? . 54) q filename-extension)) q (469823 . 3)) ((c def c (c (? . 0) q syntax-original?)) q (312559 . 3)) ((c form c (c (? . 76) q current-contract-region)) q (238225 . 2)) ((q def ((lib "racket/private/stx.rkt") identifier?)) q (312068 . 3)) ((c form c (c (? . 16) q for*/treelist)) q (134955 . 2)) ((c def c (c (? . 0) q impersonate-hash)) q (429336 . 22)) ((c def c (c (? . 10) q coerce-contract/f)) q (245409 . 3)) ((c def c (c (? . 11) q extfl->exact-integer)) q (45889 . 3)) ((c def c (c (? . 14) q struct-type-property/c)) q (235664 . 3)) ((c def c (c (? . 1) q call-with-input-bytes)) q (362070 . 4)) ((c def c (c (? . 0) q syntax-local-lift-context)) q (329693 . 2)) ((c def c (c (? . 0) q regexp-match-positions/end)) q (88757 . 16)) ((c def c (c (? . 0) q char-title-case?)) q (74590 . 3)) ((c form c (c (? . 3) q define-namespace-anchor)) q (406314 . 2)) ((c def c (c (? . 0) q peek-byte)) q (382170 . 4)) ((c def c (c (? . 0) q identifier-remove-from-definition-context)) q (328305 . 7)) ((c def c (c (? . 0) q exn:fail:filesystem:errno?)) c (? . 65)) ((c def c (c (? . 19) q vector*-extend)) q (119047 . 5)) ((c def c (c (? . 31) q dict-iterate-next)) q (160057 . 4)) ((c def c (c (? . 0) q path->directory-path)) q (467485 . 3)) ((c def c (c (? . 32) q flasin)) q (37241 . 3)) ((c def c (c (? . 26) q mutable-treelist/c)) q (225798 . 3)) ((c def c (c (? . 7) q unsafe-extfl=)) q (540991 . 4)) ((c def c (c (? . 0) q make-reader-graph)) q (111140 . 3)) ((c def c (c (? . 26) q or/c)) q (222226 . 3)) ((c def c (c (? . 0) q bytes-copy!)) q (66905 . 11)) ((c def c (c (? . 52) q stream-andmap)) q (157254 . 4)) ((c def c (c (? . 0) q read-line)) q (375427 . 5)) ((c def c (c (? . 15) q fx=)) q (41531 . 4)) ((c def c (c (? . 0) q string-ci>=?)) q (51529 . 4)) ((c form c (c (? . 56) q splicing-syntax-parameterize)) q (338015 . 2)) ((c def c (c (? . 49) q collapsible-property?)) c (? . 90)) ((q form ((lib "racket/local.rkt") local)) q (12735 . 2)) ((c def c (c (? . 15) q fxlshift/wraparound)) q (41360 . 4)) ((c def c (c (? . 59) q nonnegative-integer?)) q (35677 . 3)) ((c form c (c (? . 26) q contract-in)) q (235763 . 2)) ((c def c (c (? . 0) q print-reader-abbreviations)) q (393050 . 4)) ((c def c (c (? . 41) q date->seconds)) q (510993 . 4)) ((c def c (c (? . 0) q string-ref)) q (49171 . 4)) ((c def c (c (? . 52) q stream-tail)) q (156912 . 4)) ((c def c (c (? . 13) q append-map)) q (109566 . 4)) ((c form c (c (? . 10) q with-contract-continuation-mark)) q (245612 . 3)) ((c def c (c (? . 0) q read-syntax)) q (387107 . 4)) ((c def c (c (? . 64) q system*/exit-code)) q (501438 . 15)) ((c def c (c (? . 0) q hash-iterate-key+value)) q (129045 . 4)) ((c def c (c (? . 0) q syntax-bound-symbols)) q (321581 . 8)) ((c def c (c (? . 0) q continuation-mark-set->context)) q (293626 . 5)) ((c def c (c (? . 3) q random)) q (29262 . 13)) ((c def c (c (? . 3) q in-immutable-hash-values)) q (148022 . 3)) ((c def c (c (? . 0) q namespace-require/copy)) q (408405 . 5)) ((c form c (c (? . 27) q struct/ctc)) q (219283 . 10)) ((c def c (c (? . 45) q expand-export)) q (334931 . 4)) ((c def c (c (? . 0) q current-read-interaction)) q (415890 . 4)) ((c form c (c (? . 26) q recontract-out)) q (236754 . 2)) ((c def c (c (? . 0) q port-closed-evt)) q (345468 . 3)) ((c def c (c (? . 0) q port-writes-special?)) q (386950 . 3)) ((c def c (c (? . 7) q unsafe-immutable-hash-iterate-pair)) q (535647 . 5)) ((c def c (c (? . 0) q primitive-result-arity)) q (183559 . 3)) ((c def c (c (? . 0) q identifier-template-binding)) q (319377 . 12)) ((c def c (c (? . 24) q correlated-column)) q (462766 . 3)) ((c form c (c (? . 0) q module*)) q (1631 . 3)) ((c def c (c (? . 16) q treelist-set)) q (132264 . 5)) ((c def c (c (? . 5) q object-interface)) q (211133 . 3)) ((c def c (c (? . 0) q subprocess-status)) q (499232 . 4)) ((c def c (c (? . 28) q udp-send-to*)) q (491398 . 13)) ((c def c (c (? . 0) q custom-print-quotable-accessor)) q (401460 . 2)) ((c def c (c (? . 4) q character-device-type-bits)) q (487281 . 2)) ((c def c (c (? . 0) q chaperone-of?)) q (425980 . 4)) ((q form ((lib "racket/contract/private/provide.rkt") provide/contract)) q (236787 . 2)) ((c def c (c (? . 0) q newline)) q (384297 . 3)) ((c def c (c (? . 0) q variable-reference->module-declaration-inspector)) q (411885 . 4)) ((c def c (c (? . 13) q in-permutations)) q (110193 . 3)) ((c def c (c (? . 0) q char-whitespace?)) q (74923 . 3)) ((c def c (c (? . 0) q struct-constructor-procedure?)) q (193337 . 3)) ((c def c (c (? . 21) q in-syntax)) q (154371 . 3)) ((c def c (c (? . 23) q import-local-id)) c (? . 70)) ((c def c (c (? . 77) q hash-code-combine-unordered*)) q (22464 . 4)) ((c def c (c (? . 0) q log-level-evt)) q (506717 . 3)) ((c def c (c (? . 7) q unsafe-set-immutable-cdr!)) q (525350 . 4)) ((c form c (c (? . 12) q define-match-expander)) q (267911 . 3)) ((c def c (c (? . 78) q make-chaperone-contract)) q (240925 . 32)) ((c def c (c (? . 59) q nonpositive-integer?)) q (35611 . 3)) ((c def c (c (? . 71) q chaperone-async-channel)) q (301198 . 13)) ((c form c (c (? . 22) q for*/mutable-setalw)) q (170824 . 2)) ((c form c (c (? . 26) q ->i)) q (230197 . 60)) ((c def c (c (? . 0) q environment-variables?)) q (512107 . 3)) ((c def c (c (? . 79) q phase+space-shift?)) q (344649 . 3)) ((c def c (c (? . 32) q fl/)) q (35983 . 4)) ((c def c (c (? . 31) q dict-can-functional-set?)) q (159148 . 3)) ((c form c (c (? . 5) q augment*)) q (200013 . 2)) ((c form c (c (? . 56) q splicing-letrec-syntax)) q (337834 . 2)) ((c def c (c (? . 28) q udp-send*)) q (491851 . 6)) ((c form c (c (? . 12) q match-lambda)) q (267180 . 2)) ((c def c (c (? . 18) q sandbox-make-environment-variables)) q (452665 . 5)) ((c def c (c (? . 3) q in-hash-pairs)) q (146321 . 6)) ((c def c (c (? . 53) q make-mutable-treelist)) q (137369 . 4)) ((c def c (c (? . 0) q procedure-extract-target)) q (182758 . 3)) ((c form c (c (? . 3) q for*/fold/derived)) q (18239 . 4)) ((c def c (c (? . 0) q prop:authentic)) q (432326 . 2)) ((c def c (c (? . 0) q string-copy)) q (49604 . 3)) ((c form c (c (? . 26) q case->)) q (233683 . 9)) ((c def c (c (? . 4) q user-write-bit)) q (487535 . 2)) ((c form c (c (? . 39) q syntax/loc)) q (310028 . 14)) ((c def c (c (? . 5) q field-names)) q (212006 . 3)) ((c def c (c (? . 32) q make-shared-flvector)) q (39859 . 4)) ((c def c (c (? . 0) q procedure-arity?)) q (179811 . 3)) ((c def c (c (? . 0) q date-time-zone-offset)) c (? . 29)) ((c def c (c (? . 0) q path-convention-type)) q (466022 . 3)) ((c def c (c (? . 36) q arity-includes?)) q (184673 . 4)) ((c def c (c (? . 0) q bytes?)) q (65983 . 3)) ((c def c (c (? . 0) q struct:exn:fail:read:non-char)) c (? . 127)) ((c form c (c (? . 53) q for/mutable-treelist)) q (141313 . 2)) ((c form c (c (? . 5) q mixin)) q (203984 . 3)) ((c def c (c (? . 0) q make-hasheq)) q (122579 . 4)) ((c def c (c (? . 59) q infinite?)) q (35430 . 3)) ((c def c (c (? . 0) q struct:exn:fail:contract:non-fixnum-result)) c (? . 80)) ((c form c (c (? . 44) q with-disappeared-uses)) q (343236 . 4)) ((c def c (c (? . 3) q syntax-local-certifier)) q (331103 . 5)) ((c form c (c (? . 5) q define/augment-final)) q (200825 . 3)) ((c def c (c (? . 13) q filter-map)) q (108995 . 4)) ((c def c (c (? . 7) q unsafe-weak-hash-iterate-value)) q (536719 . 4)) ((c def c (c (? . 18) q get-output)) c (? . 81)) ((c def c (c (? . 0) q equal-secondary-hash-code)) q (21601 . 3)) ((c def c (c (? . 37) q pretty-print-remap-stylable)) q (397812 . 5)) ((c def c (c (? . 0) q namespace-call-with-registry-lock)) q (410111 . 5)) ((c form c (c (? . 0) q begin-for-syntax)) q (14553 . 2)) ((c def c (c (? . 15) q fx-)) q (40039 . 4)) ((c def c (c (? . 4) q file->list)) q (477030 . 5)) ((c def c (c (? . 7) q unsafe-extfl/)) q (540833 . 4)) ((c def c (c (? . 0) q exact?)) q (24841 . 3)) ((c def c (c (? . 13) q drop-right)) q (106025 . 7)) ((c def c (c (? . 9) q assq)) q (99799 . 7)) ((c def c (c (? . 41) q date*->seconds)) q (511112 . 4)) ((c def c (c (? . 7) q unsafe-weak-hash-iterate-first)) q (536095 . 3)) ((c def c (c (? . 0) q file-or-directory-identity)) q (473751 . 5)) ((c def c (c (? . 69) q is-a?/c)) q (209824 . 3)) ((c def c (c (? . 6) q hash-update)) q (126037 . 9)) ((c form c (c (? . 6) q log-error)) q (506856 . 3)) ((c def c (c (? . 0) q hash-weak?)) q (121482 . 3)) ((c def c (c (? . 0) q string-locale-upcase)) q (52834 . 3)) ((c def c (c (? . 0) q bytes->path-element)) q (465445 . 8)) ((c def c (c (? . 3) q make-exn:break:hang-up)) c (? . 82)) ((c def c (c (? . 0) q current-memory-use)) q (518397 . 3)) ((c def c (c (? . 62) q struct-info?)) q (194584 . 3)) ((c def c (c (? . 0) q get-output-bytes)) q (354338 . 9)) ((c def c (c (? . 0) q thread-resume)) q (295303 . 4)) ((c def c (c (? . 0) q open-output-string)) q (354227 . 3)) ((c def c (c (? . 0) q min)) q (26077 . 3)) ((c def c (c (? . 0) q port-next-location)) q (347083 . 6)) ((c def c (c (? . 85) q hash-filter-values)) q (131095 . 4)) ((c def c (c (? . 0) q compile-syntax)) q (416445 . 3)) ((c def c (c (? . 83) q deserialize-module-guard)) q (402635 . 7)) ((c def c (c (? . 0) q exn:fail:user?)) c (? . 86)) ((c def c (c (? . 0) q dump-memory-stats)) q (518531 . 3)) ((c def c (c (? . 8) q prop:place-location)) q (306382 . 2)) ((c def c (c (? . 0) q even?)) q (24734 . 3)) ((c def c (c (? . 3) q in-inclusive-range)) q (144134 . 5)) ((c def c (c (? . 3) q regexp-try-match)) q (80088 . 14)) ((c def c (c (? . 64) q process)) q (502118 . 9)) ((c form c (c (? . 5) q public*)) q (199790 . 2)) ((c form c (c (? . 128) q syntax-parameterize)) q (337426 . 2)) ((c def c (c (? . 0) q bytes-append)) q (67439 . 3)) ((c def c (c (? . 0) q vector-immutable)) q (112520 . 4)) ((c form c (c (? . 31) q define-custom-hash-types)) q (162839 . 12)) ((c def c (c (? . 26) q unsupplied-arg?)) q (235168 . 3)) ((c form c (c (? . 3) q #%app)) q (11122 . 2)) ((c def c (c (? . 0) q syntax-binding-set)) q (314069 . 2)) ((c def c (c (? . 7) q unsafe-fx-/wraparound)) q (520300 . 4)) ((c def c (c (? . 20) q false)) q (22778 . 2)) ((c def c (c (? . 0) q hash-iterate-next)) q (128118 . 5)) ((c def c (c (? . 7) q unsafe-vector-length)) q (525880 . 3)) ((c def c (c (? . 11) q extflasin)) q (45369 . 3)) ((c def c (c (? . 3) q exn:fail:network)) c (? . 103)) ((c def c (c (? . 11) q extflsqrt)) q (45677 . 3)) ((c def c (c (? . 24) q instance-variable-value)) q (461384 . 7)) ((c def c (c (? . 18) q call-with-killing-threads)) c (? . 84)) ((c def c (c (? . 0) q make-vector)) q (112354 . 4)) ((c def c (c (? . 0) q bytes-fill!)) q (67329 . 4)) ((c def c (c (? . 7) q unsafe-fx-)) q (518948 . 4)) ((c def c (c (? . 0) q uncaught-exception-handler)) q (277073 . 4)) ((c def c (c (? . 13) q argmax)) q (110366 . 4)) ((c def c (c (? . 13) q indexes-where)) q (104654 . 4)) ((c def c (c (? . 0) q impersonator-property?)) q (439358 . 3)) ((c def c (c (? . 0) q print-box)) q (392660 . 4)) ((c def c (c (? . 9) q assf)) q (99976 . 7)) ((c def c (c (? . 0) q byte?)) q (66285 . 3)) ((c def c (c (? . 7) q unsafe-fxquotient)) q (519093 . 4)) ((c form c (c (? . 12) q failure-cont)) q (267889 . 2)) ((c def c (c (? . 0) q memv)) q (98508 . 7)) ((c def c (c (? . 17) q <=/c)) q (222710 . 3)) ((c def c (c (? . 0) q set!-transformer-procedure)) q (322524 . 4)) ((c def c (c (? . 3) q in-weak-hash-pairs)) q (149145 . 3)) ((c def c (c (? . 0) q exn-message)) c (? . 106)) ((q def ((lib "racket/interaction-info.rkt") current-interaction-info)) q (549297 . 5)) ((c def c (c (? . 3) q in-bytes)) q (144944 . 6)) ((c def c (c (? . 85) q hash-union)) q (129404 . 12)) ((c def c (c (? . 46) q find-executable-path)) q (471609 . 7)) ((c def c (c (? . 0) q namespace-require/constant)) q (408627 . 5)) ((c def c (c (? . 24) q hash->linklet-directory)) q (459886 . 3)) ((c def c (c (? . 18) q sandbox-make-code-inspector)) q (452248 . 4)) ((c def c (c (? . 92) q engine)) q (306814 . 3)) ((c def c (c (? . 26) q *list/c)) q (225515 . 4)) ((c def c (c (? . 14) q make-proj-contract)) q (264118 . 15)) ((c form c (c (? . 48) q trait-exclude)) q (205041 . 2)) ((c def c (c (? . 0) q exact-integer?)) q (24034 . 3)) ((c def c (c (? . 0) q system-library-subpath)) q (514109 . 3)) ((c def c (c (? . 7) q unsafe-weak-hash-iterate-key)) q (536341 . 4)) ((c def c (c (? . 0) q read-square-bracket-as-paren)) q (388318 . 4)) ((c def c (c (? . 0) q call-with-continuation-barrier)) q (288445 . 3)) ((c def c (c (? . 0) q path->complete-path)) q (467265 . 5)) ((c def c (c (? . 52) q stream-ref)) q (156819 . 4)) ((c def c (c (? . 0) q read-string!)) q (376168 . 7)) ((c def c (c (? . 0) q open-output-bytes)) q (354117 . 3)) ((c def c (c (? . 54) q find-relative-path)) q (469941 . 12)) ((c def c (c (? . 35) q futures-enabled?)) q (303677 . 2)) ((c def c (c (? . 0) q shared-bytes)) q (67756 . 3)) ((c def c (c (? . 0) q environment-variables-ref)) q (512568 . 5)) ((c def c (c (? . 54) q path-only)) q (470759 . 3)) ((c def c (c (? . 23) q require-transformer?)) q (333528 . 3)) ((c form c (c (? . 6) q with-handlers*)) q (277284 . 3)) ((c def c (c (? . 9) q remv)) q (97213 . 4)) ((c def c (c (? . 0) q use-compiled-file-paths)) q (414854 . 5)) ((c def c (c (? . 0) q free-template-identifier=?)) q (317643 . 4)) ((c def c (c (? . 0) q char-ci>=?)) q (74290 . 4)) ((c form c (c (? . 5) q define/augride)) q (200745 . 3)) ((c def c (c (? . 0) q banner)) q (514280 . 2)) ((c def c (c (? . 0) q make-thread-cell)) q (301728 . 4)) ((c def c (c (? . 53) q mutable-treelist-for-each)) q (140389 . 4)) ((c form c (c (? . 5) q inherit)) q (199595 . 2)) ((c def c (c (? . 0) q current-module-declare-name)) q (419451 . 5)) ((c def c (c (? . 10) q has-blame?)) q (259185 . 3)) ((c def c (c (? . 0) q prop:checked-procedure)) q (182903 . 2)) ((c def c (c (? . 0) q syntax-column)) q (312277 . 3)) ((c def c (c (? . 36) q const*)) q (183750 . 3)) ((c form c (c (? . 12) q match/derived)) q (268481 . 2)) ((c def c (c (? . 13) q make-list)) q (103770 . 4)) ((c def c (c (? . 3) q make-exn:fail:user)) c (? . 86)) ((c def c (c (? . 0) q vector->pseudo-random-generator)) q (30387 . 4)) ((c def c (c (? . 0) q struct:exn:fail:filesystem:errno)) c (? . 65)) ((c def c (c (? . 0) q make-parameter)) q (302250 . 6)) ((c def c (c (? . 91) q contract-property?)) q (257728 . 3)) ((c def c (c (? . 0) q exn:fail:contract:continuation?)) c (? . 51)) ((c def c (c (? . 3) q in-range)) q (143970 . 7)) ((c def c (c (? . 53) q mutable-treelist-add!)) q (138555 . 4)) ((c def c (c (? . 2) q call/comp)) q (289424 . 5)) ((c def c (c (? . 53) q mutable-treelist-take!)) q (139209 . 4)) ((c def c (c (? . 0) q impersonate-box)) q (428855 . 12)) ((c def c (c (? . 0) q char-ci<=?)) q (74099 . 4)) ((c def c (c (? . 0) q impersonator-ephemeron)) q (426062 . 3)) ((c def c (c (? . 0) q floor)) q (26346 . 3)) ((c def c (c (? . 30) q string-replace)) q (54420 . 6)) ((c def c (c (? . 7) q unsafe-vector-set/copy)) q (526287 . 5)) ((c def c (c (? . 0) q break-thread)) q (295497 . 4)) ((c def c (c (? . 87) q mutable-vector?)) q (23405 . 3)) ((c def c (c (? . 32) q fl<)) q (36188 . 4)) ((c def c (c (? . 3) q hash-set*)) q (124909 . 5)) ((c def c (c (? . 3) q in-port)) q (145180 . 4)) ((c def c (c (? . 0) q equal-hash-code/recur)) q (21476 . 4)) ((c def c (c (? . 0) q write-byte)) q (384180 . 4)) ((c form c (c (? . 56) q splicing-let-syntax)) q (337807 . 2)) ((c def c (c (? . 0) q read-accept-reader)) q (389900 . 4)) ((c def c (c (? . 0) q logger?)) q (504951 . 3)) ((c def c (c (? . 0) q write-string)) q (384386 . 7)) ((c def c (c (? . 0) q tan)) q (27691 . 3)) ((c def c (c (? . 83) q make-deserialize-info)) q (403824 . 4)) ((c def c (c (? . 53) q mutable-treelist-take-right!)) q (139447 . 4)) ((c def c (c (? . 0) q raise-type-error)) q (273360 . 10)) ((c form c (c (? . 10) q contract-pos/neg-doubling)) q (245733 . 2)) ((c def c (c (? . 4) q symbolic-link-type-bits)) q (487115 . 2)) ((c form c (c (? . 48) q trait)) q (204067 . 18)) ((c form c (c (? . 88) q serializable-struct)) q (402917 . 3)) ((c form c (c (? . 5) q define-member-name)) q (201338 . 2)) ((c def c (c (? . 7) q unsafe-fxvector-set!)) q (528926 . 5)) ((c def c (c (? . 0) q bytes->string/locale)) q (68350 . 9)) ((c form c (c (? . 88) q serializable-struct/versions)) q (403181 . 7)) ((c def c (c (? . 0) q caaar)) q (100431 . 3)) ((c def c (c (? . 4) q call-with-atomic-output-file)) q (483231 . 12)) ((c form c (c (? . 5) q member-name-key)) q (201380 . 2)) ((c def c (c (? . 4) q file->string)) q (476605 . 4)) ((c def c (c (? . 7) q unsafe-fx*)) q (519031 . 3)) ((c def c (c (? . 0) q single-flonum-available?)) q (24520 . 2)) ((c def c (c (? . 11) q extfl=)) q (44352 . 4)) ((c def c (c (? . 3) q procedure-rename)) q (178854 . 5)) ((c def c (c (? . 0) q void)) q (184826 . 3)) ((c form c (c (? . 3) q for/foldr/derived)) q (18373 . 4)) ((c form c (c (? . 5) q augride)) q (199462 . 2)) ((c def c (c (? . 0) q eqv-hash-code)) q (22004 . 3)) ((c def c (c (? . 49) q collapsible-leaf/c-contract-list)) c (? . 50)) ((c def c (c (? . 3) q with-output-to-file)) q (352447 . 18)) ((c form c (c (? . 3) q for/hasheq)) q (15702 . 2)) ((c def c (c (? . 3) q in-hash)) q (145850 . 6)) ((c def c (c (? . 1) q dup-input-port)) q (368031 . 4)) ((c def c (c (? . 0) q char->integer)) q (73108 . 3)) ((c form c (c (? . 38) q let)) q (11926 . 3)) ((c def c (c (? . 17) q </c)) q (222600 . 3)) ((c def c (c (? . 0) q plumber-flush-handle?)) q (444175 . 3)) ((c def c (c (? . 119) q with-logging-to-port)) q (508121 . 12)) ((c form c (c (? . 5) q class*)) q (196221 . 59)) ((c def c (c (? . 7) q unsafe-extflround)) q (541617 . 3)) ((c def c (c (? . 3) q in-values-sequence)) q (151195 . 3)) ((c def c (c (? . 0) q vector->values)) q (114396 . 5)) ((c def c (c (? . 0) q char-blank?)) q (74991 . 3)) ((c def c (c (? . 9) q assw)) q (99445 . 7)) ((c def c (c (? . 16) q treelist-last)) q (131790 . 3)) ((c def c (c (? . 0) q current-process-milliseconds)) q (509775 . 3)) ((c def c (c (? . 7) q unsafe-flvector-ref)) q (529106 . 4)) ((c def c (c (? . 31) q dict-remove)) q (159865 . 4)) ((c def c (c (? . 37) q pretty-print-current-style-table)) q (397298 . 4)) ((c def c (c (? . 0) q make-weak-box)) q (517333 . 3)) ((c form c (c (? . 0) q define-values)) q (13828 . 2)) ((c def c (c (? . 0) q hash-copy)) q (129320 . 3)) ((c form c (c (? . 5) q private*)) q (200124 . 2)) ((c def c (c (? . 0) q port-try-file-lock?)) q (353374 . 4)) ((c def c (c (? . 89) q syntax-local-require-introduce)) q (14218 . 3)) ((c def c (c (? . 7) q unsafe-flceiling)) q (522235 . 3)) ((c def c (c (? . 0) q struct:arity-at-least)) c (? . 72)) ((c def c (c (? . 7) q unsafe-fxrshift/logical)) q (519823 . 4)) ((c def c (c (? . 0) q set-box!)) q (120662 . 4)) ((c def c (c (? . 0) q vector->list)) q (113636 . 3)) ((c form c (c (? . 26) q ->*)) q (229431 . 26)) ((c def c (c (? . 7) q unsafe-struct*-cas!)) q (531564 . 6)) ((c def c (c (? . 0) q namespace-require/expansion-time)) q (408857 . 6)) ((c def c (c (? . 35) q future?)) q (303772 . 3)) ((c def c (c (? . 34) q current-trace-notify)) q (550570 . 4)) ((c def c (c (? . 32) q flsingle)) q (36875 . 3)) ((c form c (c (? . 5) q define/public-final)) q (200317 . 3)) ((c form c (c (? . 26) q contract-out)) q (235815 . 23)) ((c def c (c (? . 49) q collapsible-property-neg-party)) c (? . 90)) ((c def c (c (? . 91) q prop:contract)) q (248164 . 2)) ((c def c (c (? . 3) q in-mutable-hash-keys)) q (146745 . 3)) ((c def c (c (? . 11) q extflvector?)) q (46310 . 3)) ((c def c (c (? . 2) q abort/cc)) q (289333 . 4)) ((c def c (c (? . 0) q module-compiled-name)) q (421249 . 9)) ((c def c (c (? . 16) q treelist-length)) q (131537 . 3)) ((c def c (c (? . 0) q list)) q (95161 . 3)) ((c def c (c (? . 0) q bytes-copy)) q (66844 . 3)) ((c def c (c (? . 11) q extflonum?)) q (43856 . 3)) ((c def c (c (? . 3) q in-ephemeron-hash-values)) q (149840 . 3)) ((c def c (c (? . 77) q hash-code-combine)) q (22177 . 3)) ((c def c (c (? . 46) q channel-put)) q (298601 . 4)) ((c def c (c (? . 0) q phantom-bytes?)) q (518594 . 3)) ((c def c (c (? . 17) q flat-contract-predicate)) q (228769 . 3)) ((c form c (c (? . 26) q ->d)) q (232460 . 34)) ((c def c (c (? . 0) q hash-equal-always?)) q (121243 . 3)) ((c def c (c (? . 0) q char-numeric?)) q (74658 . 3)) ((c form c (c (? . 3) q struct/derived)) q (186286 . 5)) ((c def c (c (? . 11) q extfl->exact)) q (46025 . 3)) ((c form c (c (? . 43) q generator)) q (158272 . 6)) ((c def c (c (? . 0) q current-inspector)) q (442687 . 4)) ((c def c (c (? . 0) q make-special-comment)) q (400861 . 3)) ((c form c (c (? . 3) q only-in)) q (4612 . 2)) ((c form c (c (? . 69) q object/c)) q (206600 . 15)) ((c def c (c (? . 0) q exn:fail:contract:non-fixnum-result?)) c (? . 80)) ((c def c (c (? . 0) q thread-group?)) q (442040 . 3)) ((c def c (c (? . 0) q variable-reference->module-source)) q (411512 . 4)) ((c form c (c (? . 25) q runtime-require)) q (476478 . 2)) ((c form c (c (? . 0) q if)) q (12828 . 2)) ((c def c (c (? . 0) q error-module-path->string-handler)) q (279023 . 9)) ((c def c (c (? . 92) q engine-run)) q (306953 . 4)) ((c def c (c (? . 0) q char-punctuation?)) q (74789 . 3)) ((c def c (c (? . 0) q port-file-unlock)) q (353504 . 3)) ((c def c (c (? . 0) q peek-string)) q (377959 . 5)) ((c def c (c (? . 0) q string->keyword)) q (94491 . 3)) ((c def c (c (? . 7) q unsafe-fl<)) q (521605 . 4)) ((c def c (c (? . 1) q combine-output)) q (365727 . 4)) ((c def c (c (? . 0) q poll-guard-evt)) q (297696 . 3)) ((c def c (c (? . 0) q make-rectangular)) q (27952 . 4)) ((c form c (c (? . 27) q extends)) q (215657 . 2)) ((c form c (c (? . 52) q stream-lazy)) q (156310 . 3)) ((c form c (c (? . 6) q log-fatal)) q (506784 . 3)) ((c form c (c (? . 16) q for/treelist)) q (134888 . 2)) ((c def c (c (? . 9) q reverse)) q (96073 . 3)) ((c def c (c (? . 0) q integer?)) q (23980 . 3)) ((c def c (c (? . 24) q linklet-bundle->hash)) q (460400 . 4)) ((c def c (c (? . 13) q add-between)) q (107546 . 13)) ((c def c (c (? . 13) q first)) q (102812 . 3)) ((c def c (c (? . 0) q denominator)) q (26659 . 3)) ((c def c (c (? . 22) q impersonate-hash-set)) q (175020 . 21)) ((c def c (c (? . 0) q file-position*)) q (346641 . 3)) ((c def c (c (? . 0) q symbol->string)) q (76093 . 3)) ((c def c (c (? . 44) q current-recorded-disappeared-uses)) q (343052 . 5)) ((c form c (c (? . 27) q export)) q (215500 . 2)) ((c def c (c (? . 0) q struct:exn:fail:contract:continuation)) c (? . 51)) ((c form c (c (? . 0) q unquote)) q (19809 . 2)) ((c def c (c (? . 0) q void?)) q (184775 . 3)) ((c def c (c (? . 0) q regexp-match)) q (78263 . 17)) ((c def c (c (? . 37) q pretty-print-size-hook)) q (398621 . 9)) ((c def c (c (? . 0) q special-comment?)) q (400935 . 3)) ((c form c (c (? . 93) q parametric->/c)) q (235229 . 2)) ((c def c (c (? . 1) q regexp-match-evt)) q (374697 . 4)) ((c form c (c (? . 5) q augment)) q (199425 . 2)) ((c def c (c (? . 0) q variable-reference->module-base-phase)) q (411772 . 3)) ((c def c (c (? . 3) q in-mutable-hash-values)) q (147018 . 3)) ((c def c (c (? . 24) q linklet-add-target-machine-info)) q (459419 . 5)) ((c def c (c (? . 13) q list-prefix?)) q (106951 . 5)) ((c def c (c (? . 3) q regexp-match-exact?)) q (83284 . 4)) ((c def c (c (? . 19) q vector-memv)) q (117126 . 4)) ((c def c (c (? . 0) q regexp-match-peek-immediate)) q (85064 . 15)) ((c def c (c (? . 0) q exn:fail:filesystem:missing-module?)) c (? . 94)) ((c def c (c (? . 16) q treelist-insert)) q (131852 . 5)) ((c def c (c (? . 45) q prop:provide-transformer)) q (335785 . 2)) ((c def c (c (? . 4) q socket-type-bits)) q (487079 . 2)) ((c def c (c (? . 45) q provide-transformer?)) q (335903 . 3)) ((c def c (c (? . 13) q twelfth)) q (103443 . 3)) ((c def c (c (? . 74) q blame-context)) q (246786 . 3)) ((c def c (c (? . 35) q fsemaphore-try-wait?)) q (304375 . 3)) ((c def c (c (? . 22) q set?)) q (167468 . 3)) ((c def c (c (? . 0) q syntax-local-get-shadower)) q (330810 . 5)) ((c def c (c (? . 3) q procedure->method)) q (179070 . 3)) ((c def c (c (? . 0) q make-struct-type-property)) q (189102 . 19)) ((c def c (c (? . 87) q immutable-box?)) q (23587 . 3)) ((c form c (c (? . 8) q place/context)) q (306718 . 2)) ((c form c (c (? . 3) q struct-out)) q (6717 . 2)) ((c def c (c (? . 0) q port-file-stat)) q (353678 . 3)) ((c def c (c (? . 53) q mutable-treelist-drop!)) q (139328 . 4)) ((c def c (c (? . 16) q treelist-map)) q (133449 . 4)) ((c def c (c (? . 108) q deprecated-alias-target)) q (464614 . 3)) ((c def c (c (? . 0) q expt)) q (27383 . 4)) ((c def c (c (? . 0) q syntax-source)) q (312125 . 3)) ((c form c (c (? . 5) q define-serializable-class*)) q (210106 . 4)) ((c def c (c (? . 0) q string-append-immutable)) q (50285 . 3)) ((c form c (c (? . 3) q :do-in)) q (18915 . 13)) ((c def c (c (? . 32) q flimag-part)) q (38165 . 5)) ((c def c (c (? . 0) q prop:exn:missing-module)) q (284233 . 2)) ((c def c (c (? . 0) q make-pipe)) q (354839 . 7)) ((c def c (c (? . 32) q flceiling)) q (36762 . 3)) ((c def c (c (? . 15) q fx+/wraparound)) q (41106 . 4)) ((c def c (c (? . 69) q mixin-contract)) q (209691 . 2)) ((c def c (c (? . 24) q correlated-property)) q (464111 . 8)) ((c def c (c (? . 3) q syntax-deserialize)) q (340929 . 7)) ((c def c (c (? . 3) q exn:fail:read:eof)) c (? . 95)) ((c def c (c (? . 1) q make-input-port/read-to-peek)) q (362632 . 50)) ((c def c (c (? . 0) q rational?)) q (23925 . 3)) ((c form c (c (? . 38) q cond)) q (12873 . 7)) ((c def c (c (? . 46) q println)) q (391642 . 5)) ((c def c (c (? . 1) q call-with-input-string)) q (361955 . 4)) ((c def c (c (? . 0) q struct:exn:fail:contract:variable)) c (? . 96)) ((c def c (c (? . 0) q expand-syntax)) q (339621 . 4)) ((c def c (c (? . 26) q and/c)) q (222380 . 3)) ((c def c (c (? . 16) q treelist-reverse)) q (133050 . 3)) ((c def c (c (? . 22) q set-count)) q (172910 . 3)) ((c def c (c (? . 0) q prop:object-name)) q (443736 . 2)) ((c def c (c (? . 0) q date-year)) c (? . 29)) ((c def c (c (? . 52) q stream-for-each)) q (157455 . 4)) ((c def c (c (? . 62) q prop:struct-auto-info)) q (194994 . 2)) ((c def c (c (? . 35) q future)) q (303566 . 3)) ((c form c (c (? . 38) q letrec)) q (12074 . 2)) ((c def c (c (? . 0) q file-size)) q (473894 . 3)) ((c def c (c (? . 0) q cadadr)) q (101587 . 3)) ((c def c (c (? . 0) q struct-type-property-accessor-procedure?)) q (189988 . 3)) ((c def c (c (? . 45) q export)) c (? . 67)) ((c def c (c (? . 0) q cdaaar)) q (101887 . 3)) ((c def c (c (? . 0) q module->namespace)) q (410285 . 6)) ((c def c (c (? . 3) q raise-syntax-error)) q (275994 . 18)) ((c def c (c (? . 12) q match-equality-test)) q (268326 . 4)) ((c def c (c (? . 35) q current-future)) q (303720 . 2)) ((c def c (c (? . 7) q unsafe-struct*-ref)) q (531342 . 4)) ((c def c (c (? . 7) q unsafe-vector-copy)) q (526137 . 5)) ((c def c (c (? . 0) q substring)) q (49425 . 5)) ((c def c (c (? . 3) q date*)) c (? . 97)) ((c def c (c (? . 21) q sequence-ormap)) q (153543 . 4)) ((c def c (c (? . 3) q exn:fail:unsupported)) c (? . 139)) ((c form c (c (? . 88) q define-serializable-struct)) q (403038 . 3)) ((c def c (c (? . 8) q place-message-allowed?)) q (306314 . 3)) ((c def c (c (? . 13) q take-common-prefix)) q (107092 . 5)) ((c def c (c (? . 131) q bytes-append*)) q (72859 . 4)) ((c def c (c (? . 19) q vector-set/copy)) q (116123 . 5)) ((c def c (c (? . 0) q set-mcdr!)) q (112229 . 4)) ((c def c (c (? . 0) q impersonator-property-accessor-procedure?)) q (439514 . 3)) ((c def c (c (? . 0) q string-length)) q (49088 . 3)) ((c def c (c (? . 0) q exn:fail:filesystem:exists?)) c (? . 116)) ((c def c (c (? . 7) q unsafe-fxmin)) q (521002 . 4)) ((c def c (c (? . 0) q pseudo-random-generator-vector?)) q (30716 . 3)) ((c def c (c (? . 45) q export-local-id)) c (? . 67)) ((c def c (c (? . 13) q empty)) q (102687 . 2)) ((c def c (c (? . 0) q terminal-file-position)) q (346880 . 2)) ((c def c (c (? . 7) q unsafe-stencil-vector-length)) q (530308 . 4)) ((c def c (c (? . 98) q signature-members)) q (220959 . 8)) ((c def c (c (? . 3) q impersonate-procedure*)) q (426580 . 11)) ((c def c (c (? . 3) q in-string)) q (144708 . 6)) ((c def c (c (? . 147) q running-foldl)) q (96703 . 5)) ((c def c (c (? . 0) q terminal-port?)) q (345925 . 3)) ((c def c (c (? . 1) q reencode-input-port)) q (366670 . 16)) ((c def c (c (? . 32) q flvector-set!)) q (38899 . 5)) ((c def c (c (? . 7) q unsafe-make-srcloc)) q (540121 . 11)) ((c def c (c (? . 7) q unsafe-mutable-hash-iterate-first)) q (531798 . 3)) ((c def c (c (? . 0) q module-cache-clear!)) q (425737 . 2)) ((c def c (c (? . 0) q prop:sealed)) q (189058 . 2)) ((c def c (c (? . 0) q current-get-interaction-input-port)) q (415608 . 4)) ((c def c (c (? . 0) q char-downcase)) q (75607 . 3)) ((c def c (c (? . 0) q current-write-relative-directory)) q (393660 . 11)) ((c def c (c (? . 0) q wrap-evt)) q (297314 . 4)) ((c def c (c (? . 0) q make-impersonator-property)) q (439196 . 6)) ((c def c (c (? . 79) q phase+space-space)) q (344577 . 3)) ((c def c (c (? . 23) q import-req-mode)) c (? . 70)) ((c form c (c (? . 107) q include/reader)) q (341439 . 2)) ((c def c (c (? . 45) q prop:provide-pre-transformer)) q (335842 . 2)) ((c def c (c (? . 7) q unsafe-mcdr)) q (524701 . 3)) ((c def c (c (? . 0) q make-derived-parameter)) q (302654 . 11)) ((c def c (c (? . 59) q nan?)) q (35380 . 3)) ((c def c (c (? . 15) q fxquotient)) q (40170 . 4)) ((c def c (c (? . 22) q set-weak?)) q (167576 . 3)) ((c def c (c (? . 28) q udp-send-to)) q (490719 . 13)) ((c def c (c (? . 32) q flexpt)) q (37557 . 4)) ((c def c (c (? . 18) q default-language-readers)) q (452843 . 3)) ((c def c (c (? . 0) q *)) q (25374 . 3)) ((c form c (c (? . 99) q unsyntax)) q (309971 . 2)) ((c def c (c (? . 19) q vector-filter-not)) q (116538 . 4)) ((c def c (c (? . 0) q directory-exists?)) q (475209 . 3)) ((c def c (c (? . 0) q set!-transformer?)) q (322358 . 3)) ((c def c (c (? . 0) q numerator)) q (26600 . 3)) ((c def c (c (? . 0) q current-directory)) q (474896 . 4)) ((c def c (c (? . 0) q parameterization?)) q (303503 . 3)) ((c def c (c (? . 0) q internal-definition-context-introduce)) q (327870 . 7)) ((c def c (c (? . 0) q /)) q (25427 . 6)) ((c def c (c (? . 13) q flatten)) q (108210 . 3)) ((c form c (c (? . 27) q except)) q (215356 . 2)) ((c def c (c (? . 0) q identifier-prune-lexical-context)) q (316053 . 5)) ((c def c (c (? . 13) q remove-duplicates)) q (108693 . 7)) ((c form c (c (? . 3) q for/sum)) q (16022 . 2)) ((c def c (c (? . 0) q file-or-directory-permissions)) q (473203 . 11)) ((c def c (c (? . 31) q dict-count)) q (161901 . 3)) ((c def c (c (? . 62) q prop:struct-field-info)) q (195242 . 2)) ((c def c (c (? . 0) q pregexp)) q (77039 . 6)) ((c def c (c (? . 0) q exn:fail:network:errno-errno)) c (? . 124)) ((c def c (c (? . 9) q build-string)) q (50527 . 4)) ((c def c (c (? . 87) q immutable-bytes?)) q (23343 . 3)) ((c def c (c (? . 54) q some-system-path->string)) q (470955 . 3)) ((c def c (c (? . 1) q with-output-to-bytes)) q (361881 . 3)) ((c def c (c (? . 13) q partition)) q (109197 . 4)) ((c form c (c (? . 39) q _)) q (311916 . 2)) ((c def c (c (? . 0) q current-milliseconds)) q (509722 . 2)) ((c def c (c (? . 0) q impersonator-of?)) q (425895 . 4)) ((c def c (c (? . 32) q flsin)) q (37085 . 3)) ((c def c (c (? . 0) q struct-info)) q (442794 . 3)) ((c def c (c (? . 13) q dropf-right)) q (106597 . 7)) ((c form c (c (? . 3) q for*/first)) q (17726 . 2)) ((c form c (c (? . 5) q inherit/super)) q (199632 . 2)) ((c def c (c (? . 7) q unsafe-immutable-hash-iterate-next)) q (534090 . 5)) ((c def c (c (? . 3) q call-with-output-file)) q (349961 . 18)) ((c def c (c (? . 53) q mutable-treelist-map!)) q (140269 . 4)) ((c def c (c (? . 44) q record-disappeared-uses)) q (343448 . 4)) ((c def c (c (? . 7) q unsafe-extflfloor)) q (541687 . 3)) ((c def c (c (? . 0) q syntax-arm)) q (338933 . 5)) ((c form c (c (? . 134) q matching-identifiers-out)) q (10788 . 2)) ((c form c (c (? . 39) q ~@)) q (309851 . 2)) ((c def c (c (? . 7) q unsafe-char<?)) q (524141 . 4)) ((c def c (c (? . 23) q import-source-mod-path-stx)) c (? . 40)) ((c def c (c (? . 7) q unsafe-bytes-ref)) q (528037 . 4)) ((c def c (c (? . 24) q instance-unset-variable!)) q (461966 . 4)) ((c def c (c (? . 0) q system-big-endian?)) q (34422 . 2)) ((c def c (c (? . 100) q syntax-procedure-converted-arguments-property)) q (336808 . 8)) ((c def c (c (? . 3) q open-input-output-file)) q (348802 . 16)) ((c form c (c (? . 3) q for/hash)) q (15639 . 2)) ((c def c (c (? . 74) q raise-blame-error)) q (245828 . 14)) ((c def c (c (? . 0) q syntax-local-context)) q (330317 . 3)) ((c def c (c (? . 0) q make-immutable-hasheqv)) q (124225 . 4)) ((c def c (c (? . 0) q error-print-context-length)) q (277778 . 4)) ((c def c (c (? . 8) q dynamic-place)) q (304702 . 9)) ((c def c (c (? . 0) q box)) q (120490 . 3)) ((c form c (c (? . 0) q #%foreign-inline)) q (20640 . 9)) ((c form c (c (? . 22) q for*/mutable-seteq)) q (170705 . 2)) ((c form c (c (? . 5) q override*)) q (199899 . 2)) ((c def c (c (? . 62) q struct-field-info-list)) q (195361 . 3)) ((c def c (c (? . 22) q set-remove)) q (172675 . 4)) ((c def c (c (? . 1) q peek-bytes-evt)) c (? . 101)) ((c def c (c (? . 0) q procedure-result-arity)) q (180922 . 3)) ((c def c (c (? . 0) q file-stream-port?)) q (345862 . 3)) ((c def c (c (? . 53) q mutable-treelist-append!)) q (138918 . 4)) ((c def c (c (? . 0) q sleep)) q (295619 . 3)) ((c def c (c (? . 24) q correlated-e)) q (463078 . 3)) ((c def c (c (? . 1) q call-with-output-string)) q (361615 . 3)) ((c def c (c (? . 69) q instanceof/c)) q (207100 . 3)) ((c def c (c (? . 0) q read-accept-infix-dot)) q (389604 . 4)) ((c form c (c (? . 27) q unit-from-context)) q (218380 . 2)) ((c def c (c (? . 4) q directory-type-bits)) q (487242 . 2)) ((c def c (c (? . 0) q make-immutable-hasheq)) q (124368 . 4)) ((c def c (c (? . 7) q unsafe-mcar)) q (524646 . 3)) ((c def c (c (? . 74) q current-blame-format)) q (247997 . 4)) ((c form c (c (? . 6) q time)) q (510164 . 2)) ((c def c (c (? . 0) q internal-definition-context-add-scopes)) q (326680 . 5)) ((c def c (c (? . 0) q thread-cell?)) q (301670 . 3)) ((c def c (c (? . 11) q extfl->inexact)) q (46220 . 3)) ((c def c (c (? . 3) q double-flonum?)) q (24400 . 3)) ((c def c (c (? . 59) q exact-floor)) q (35073 . 3)) ((c def c (c (? . 10) q coerce-flat-contracts)) q (245293 . 4)) ((c def c (c (? . 54) q file-name-from-path)) q (469421 . 3)) ((c form c (c (? . 5) q init)) q (199014 . 2)) ((c def c (c (? . 8) q place-channel)) q (305958 . 2)) ((c def c (c (? . 19) q vector-copy)) q (115938 . 5)) ((c def c (c (? . 1) q read-bytes-avail!-evt)) q (372805 . 4)) ((c def c (c (? . 0) q current-compile-target-machine)) q (417428 . 5)) ((c def c (c (? . 0) q exn:fail:out-of-memory?)) c (? . 102)) ((c def c (c (? . 0) q struct:exn:fail:network)) c (? . 103)) ((c def c (c (? . 23) q import-orig-mode)) c (? . 70)) ((c def c (c (? . 46) q guard-evt)) q (297523 . 3)) ((c def c (c (? . 0) q symbol?)) q (75902 . 3)) ((c def c (c (? . 0) q plumber-flush-all)) q (444100 . 3)) ((c def c (c (? . 3) q make-exn:fail:contract)) c (? . 47)) ((c def c (c (? . 7) q unsafe-vector-ref)) q (525947 . 4)) ((c def c (c (? . 71) q impersonate-async-channel)) q (300711 . 13)) ((c def c (c (? . 0) q hash-clear!)) q (126595 . 3)) ((c def c (c (? . 17) q printable/c)) q (223434 . 2)) ((c def c (c (? . 0) q module-compiled-realm)) q (423315 . 3)) ((c def c (c (? . 0) q syntax-bound-phases)) q (322259 . 3)) ((c def c (c (? . 5) q class-seal)) q (212546 . 15)) ((c def c (c (? . 0) q bytes<?)) q (67912 . 4)) ((c def c (c (? . 15) q fl->fx)) q (42127 . 3)) ((c form c (c (? . 5) q inspect)) q (198981 . 2)) ((c def c (c (? . 16) q treelist-flatten)) q (134206 . 3)) ((c def c (c (? . 37) q pretty-print-handler)) q (396279 . 3)) ((c def c (c (? . 0) q thread-receive-evt)) q (296398 . 2)) ((c def c (c (? . 16) q treelist?)) q (131188 . 3)) ((c def c (c (? . 22) q list->set)) q (168790 . 3)) ((c def c (c (? . 0) q error-syntax->string-handler)) q (278351 . 9)) ((c def c (c (? . 0) q struct:exn:fail:syntax:missing-module)) c (? . 104)) ((c def c (c (? . 0) q chaperone-struct-type)) q (436545 . 15)) ((c def c (c (? . 13) q argmin)) q (110259 . 4)) ((c def c (c (? . 22) q list->mutable-set)) q (169161 . 4)) ((c def c (c (? . 5) q generate-member-key)) q (201417 . 2)) ((c def c (c (? . 0) q error-print-source-location)) q (277933 . 4)) ((c def c (c (? . 0) q sync/timeout)) q (296887 . 4)) ((c def c (c (? . 41) q find-seconds)) q (511223 . 15)) ((c def c (c (? . 0) q compile-context-preservation-enabled)) q (417292 . 4)) ((c form c (c (? . 5) q overment)) q (199343 . 2)) ((c def c (c (? . 74) q exn:fail:contract:blame)) c (? . 109)) ((c def c (c (? . 0) q raise-arity-error*)) q (274246 . 13)) ((c def c (c (? . 0) q syntax-transforming-with-lifts?)) q (331302 . 2)) ((c def c (c (? . 0) q hash-clear)) q (126681 . 3)) ((c def c (c (? . 0) q chaperone-channel)) q (437398 . 12)) ((c form c (c (? . 0) q let-values)) q (12125 . 2)) ((c def c (c (? . 0) q impersonate-vector*)) q (428274 . 15)) ((c def c (c (? . 22) q in-immutable-set)) q (171328 . 3)) ((c def c (c (? . 37) q pretty-printing)) q (399457 . 4)) ((c def c (c (? . 0) q vector-length)) q (112648 . 3)) ((c def c (c (? . 7) q unsafe-fx>=)) q (520917 . 4)) ((c def c (c (? . 0) q log-max-level)) q (506369 . 4)) ((c def c (c (? . 13) q eighth)) q (103231 . 3)) ((c def c (c (? . 46) q path-string?)) q (464757 . 3)) ((c def c (c (? . 0) q version)) q (514226 . 2)) ((c def c (c (? . 13) q in-combinations)) q (109966 . 6)) ((c def c (c (? . 22) q seteq)) q (167897 . 3)) ((c def c (c (? . 0) q vector?)) q (112301 . 3)) ((c def c (c (? . 9) q remove*)) q (97353 . 5)) ((c def c (c (? . 0) q struct:exn:break)) c (? . 57)) ((c def c (c (? . 3) q exn:fail:contract)) c (? . 47)) ((c form c (c (? . 39) q quote-syntax/prune)) q (311667 . 2)) ((c def c (c (? . 13) q index-where)) q (104341 . 4)) ((c def c (c (? . 79) q phase+space+)) q (344713 . 4)) ((c def c (c (? . 18) q sandbox-run-submodules)) q (451974 . 4)) ((c def c (c (? . 7) q unsafe-char>?)) q (524224 . 4)) ((c def c (c (? . 7) q unsafe-vector*-length)) q (526484 . 3)) ((c def c (c (? . 0) q dynamic-require-for-syntax)) q (423916 . 9)) ((c def c (c (? . 19) q vector*-set/copy)) q (118880 . 5)) ((c def c (c (? . 69) q subclass?/c)) q (210000 . 3)) ((c def c (c (? . 0) q variable-reference->resolved-module-path)) q (411246 . 4)) ((c def c (c (? . 44) q current-syntax-context)) q (342791 . 4)) ((c def c (c (? . 0) q subbytes)) q (66667 . 5)) ((c form c (c (? . 22) q for*/mutable-seteqv)) q (170764 . 2)) ((c def c (c (? . 1) q port->list)) q (360219 . 4)) ((c def c (c (? . 0) q make-weak-hasheqv)) q (123017 . 4)) ((c def c (c (? . 13) q fourteenth)) q (103554 . 3)) ((c def c (c (? . 3) q sequence->stream)) q (152611 . 3)) ((c def c (c (? . 0) q exn:fail:contract:arity?)) c (? . 105)) ((c def c (c (? . 24) q linklet?)) q (455754 . 3)) ((c def c (c (? . 18) q sandbox-error-output)) q (448385 . 14)) ((c def c (c (? . 13) q range)) q (109290 . 7)) ((c def c (c (? . 9) q foldr)) q (96590 . 5)) ((c def c (c (? . 5) q object-method-arity-includes?)) q (211763 . 7)) ((c def c (c (? . 0) q set-mcar!)) q (112157 . 4)) ((c form c (c (? . 5) q define-local-member-name)) q (201295 . 2)) ((c form c (c (? . 22) q for*/seteqv)) q (170312 . 2)) ((c form c (c (? . 5) q override-final*)) q (199971 . 2)) ((c form c (c (? . 58) q define-generics)) q (190282 . 22)) ((c def c (c (? . 3) q regexp-quote)) q (77557 . 7)) ((c def c (c (? . 69) q implementation?/c)) q (209910 . 3)) ((c form c (c (? . 149) q define-inline)) q (20066 . 14)) ((c def c (c (? . 0) q exn:break:hang-up?)) c (? . 82)) ((c def c (c (? . 37) q pretty-print-show-inexactness)) q (396959 . 4)) ((c def c (c (? . 13) q rest)) q (102864 . 3)) ((c def c (c (? . 15) q fxvector-ref)) q (42572 . 4)) ((c def c (c (? . 3) q real->decimal-string)) q (32331 . 4)) ((c def c (c (? . 0) q bytes-open-converter)) q (71149 . 5)) ((c def c (c (? . 0) q =)) q (26829 . 4)) ((c def c (c (? . 0) q assert-unreachable)) q (294654 . 2)) ((c form c (c (? . 27) q define-values-for-export)) q (215231 . 2)) ((c def c (c (? . 23) q make-require-transformer)) q (333232 . 5)) ((c def c (c (? . 0) q string-foldcase)) q (51836 . 3)) ((c def c (c (? . 0) q make-inspector)) q (442276 . 3)) ((c def c (c (? . 22) q set-symmetric-difference!)) q (174289 . 4)) ((c def c (c (? . 53) q mutable-treelist-cons!)) q (138457 . 4)) ((c def c (c (? . 0) q inexact->exact)) q (24951 . 3)) ((c def c (c (? . 0) q prop:exn:srclocs)) q (283580 . 2)) ((c def c (c (? . 21) q sequence-ref)) q (153079 . 4)) ((c form c (c (? . 22) q for/seteqv)) q (170110 . 2)) ((c def c (c (? . 0) q struct:exn)) c (? . 106)) ((c def c (c (? . 0) q real?)) q (23874 . 3)) ((c def c (c (? . 17) q =/c)) q (222545 . 3)) ((c def c (c (? . 18) q gui?)) q (454795 . 2)) ((c def c (c (? . 16) q treelist-cons)) q (132067 . 4)) ((c def c (c (? . 32) q flvector-copy)) q (39030 . 5)) ((c form c (c (? . 33) q delay/name)) q (285799 . 2)) ((c def c (c (? . 0) q filesystem-change-evt)) q (475769 . 5)) ((c form c (c (? . 107) q include-at/relative-to/reader)) q (341487 . 2)) ((c def c (c (? . 39) q syntax-protect)) q (339097 . 3)) ((c form c (c (? . 2) q shift-at)) q (290135 . 2)) ((c def c (c (? . 0) q file-exists?)) q (471874 . 3)) ((c form c (c (? . 5) q class-field-mutator)) q (203639 . 2)) ((c form c (c (? . 56) q splicing-letrec-syntaxes)) q (337893 . 2)) ((c def c (c (? . 59) q exact-truncate)) q (35209 . 3)) ((c def c (c (? . 53) q list->mutable-treelist)) q (140188 . 3)) ((c def c (c (? . 19) q vector-count)) q (116636 . 4)) ((c def c (c (? . 0) q hash-keys-subset?)) q (127646 . 4)) ((c def c (c (? . 52) q in-stream)) q (156594 . 3)) ((c def c (c (? . 41) q current-date)) q (510190 . 2)) ((c def c (c (? . 44) q wrong-syntax)) q (342924 . 5)) ((c def c (c (? . 0) q struct:exn:fail:filesystem)) c (? . 114)) ((c def c (c (? . 108) q deprecated-alias?)) q (464464 . 3)) ((c def c (c (? . 0) q date-month)) c (? . 29)) ((c def c (c (? . 0) q current-force-delete-permissions)) q (474754 . 5)) ((c def c (c (? . 0) q module-compiled-cross-phase-persistent?)) q (423169 . 4)) ((c form c (c (? . 52) q for*/stream)) q (158020 . 2)) ((c def c (c (? . 1) q peek-string-evt)) c (? . 101)) ((c def c (c (? . 46) q path-add-extension)) q (468698 . 5)) ((c def c (c (? . 71) q async-channel/c)) q (300645 . 3)) ((c def c (c (? . 0) q continuation-marks)) q (290961 . 5)) ((c def c (c (? . 0) q lcm)) q (26188 . 3)) ((c form c (c (? . 130) q define-opt/c)) q (260146 . 2)) ((c def c (c (? . 79) q phase+space-shift+)) q (344826 . 4)) ((c def c (c (? . 66) q tcp-connect)) q (488238 . 9)) ((c def c (c (? . 24) q correlated?)) q (462539 . 3)) ((c def c (c (? . 0) q filesystem-change-evt?)) q (475701 . 3)) ((c def c (c (? . 0) q +)) q (25208 . 3)) ((c def c (c (? . 91) q build-contract-property)) q (254576 . 51)) ((c def c (c (? . 0) q thread-suspend-evt)) q (296058 . 3)) ((c def c (c (? . 28) q udp-multicast-loopback?)) q (497409 . 3)) ((c def c (c (? . 7) q unsafe-flvector-length)) q (529035 . 3)) ((c def c (c (? . 74) q blame-update)) q (247489 . 5)) ((c def c (c (? . 0) q subprocess-kill)) q (499391 . 4)) ((c def c (c (? . 0) q stencil-vector-update)) q (120025 . 9)) ((c def c (c (? . 31) q in-dict-values)) q (162460 . 3)) ((c def c (c (? . 7) q unsafe-vector*-append)) q (527295 . 3)) ((c def c (c (? . 0) q print-graph)) q (392486 . 4)) ((c def c (c (? . 7) q unsafe-fl*)) q (521317 . 3)) ((c def c (c (? . 0) q syntax-property-preserved?)) q (338452 . 4)) ((c form c (c (? . 39) q syntax-rules)) q (311699 . 3)) ((c def c (c (? . 39) q check-duplicate-identifier)) q (317870 . 3)) ((c def c (c (? . 59) q pi)) q (34467 . 2)) ((c def c (c (? . 0) q string-grapheme-span)) q (52990 . 5)) ((c def c (c (? . 3) q procedure-realm)) q (178999 . 3)) ((c def c (c (? . 0) q add1)) q (25875 . 3)) ((c def c (c (? . 5) q interface-extension?)) q (211476 . 4)) ((c def c (c (? . 0) q procedure-closure-contents-eq?)) q (179146 . 5)) ((c form c (c (? . 5) q send+)) q (203060 . 5)) ((c def c (c (? . 4) q file->value)) q (476891 . 4)) ((c form c (c (? . 0) q unquote-splicing)) q (19824 . 2)) ((c def c (c (? . 0) q cdar)) q (100303 . 3)) ((c form c (c (? . 22) q for*/set)) q (170212 . 2)) ((c def c (c (? . 28) q udp-multicast-interface)) q (496987 . 3)) ((c def c (c (? . 10) q contract-continuation-mark-key)) q (260189 . 2)) ((c def c (c (? . 4) q group-permission-bits)) q (487605 . 2)) ((c def c (c (? . 0) q print)) q (391242 . 5)) ((c def c (c (? . 0) q char<?)) q (73539 . 4)) ((c form c (c (? . 58) q chaperone-generics)) q (191680 . 4)) ((c def c (c (? . 7) q unsafe-list-tail)) q (525138 . 4)) ((c def c (c (? . 0) q read-accept-bar-quote)) q (388984 . 4)) ((c def c (c (? . 74) q struct:exn:fail:contract:blame)) c (? . 109)) ((c def c (c (? . 7) q unsafe-impersonate-procedure)) q (543036 . 11)) ((c def c (c (? . 0) q make-polar)) q (28032 . 4)) ((c def c (c (? . 11) q extflvector-length)) q (46568 . 3)) ((c def c (c (? . 0) q current-evt-pseudo-random-generator)) q (298208 . 5)) ((c def c (c (? . 0) q cadddr)) q (101787 . 3)) ((c def c (c (? . 7) q unsafe-fl-)) q (521234 . 4)) ((c def c (c (? . 0) q eq?)) q (21053 . 4)) ((c def c (c (? . 22) q set-rest)) q (173083 . 3)) ((c def c (c (? . 10) q chaperone-contract?)) q (258660 . 3)) ((c def c (c (? . 0) q raise-result-error)) q (270407 . 13)) ((c form c (c (? . 3) q for/lists)) q (16150 . 7)) ((c def c (c (? . 0) q compiled-expression?)) q (416972 . 3)) ((c def c (c (? . 0) q sha1-bytes)) q (405512 . 5)) ((c form c (c (? . 3) q #%plain-module-begin)) q (1816 . 2)) ((c def c (c (? . 0) q struct:srcloc)) c (? . 110)) ((c def c (c (? . 5) q object-info)) q (212084 . 3)) ((c def c (c (? . 0) q load/use-compiled)) q (414569 . 3)) ((c def c (c (? . 0) q prefab-key->struct-type)) q (193949 . 4)) ((c def c (c (? . 0) q path-element->bytes)) q (465849 . 3)) ((c def c (c (? . 71) q make-async-channel)) q (300191 . 3)) ((c def c (c (? . 0) q raise-arity-mask-error*)) q (274903 . 9)) ((c def c (c (? . 74) q blame-swap)) q (247150 . 3)) ((c def c (c (? . 7) q unsafe-fx<=)) q (520832 . 4)) ((c form c (c (? . 22) q for/set)) q (170012 . 2)) ((c def c (c (? . 3) q make-exn:fail:read)) c (? . 111)) ((c def c (c (? . 0) q raise-result-error*)) q (270793 . 16)) ((c def c (c (? . 0) q hash-iterate-first)) q (128022 . 3)) ((c def c (c (? . 0) q peek-byte-or-special)) q (382777 . 12)) ((c def c (c (? . 59) q pi.f)) q (34488 . 2)) ((c def c (c (? . 22) q mutable-setalw)) q (168083 . 4)) ((c form c (c (? . 5) q this)) q (198956 . 2)) ((c def c (c (? . 36) q curry)) q (184099 . 6)) ((c def c (c (? . 7) q unsafe-extflsqrt)) q (542449 . 3)) ((c def c (c (? . 21) q sequence-andmap)) q (153438 . 4)) ((c def c (c (? . 0) q expand-user-path)) q (467791 . 3)) ((c def c (c (? . 0) q char<=?)) q (73631 . 4)) ((c def c (c (? . 59) q exact-round)) q (35006 . 3)) ((c form c (c (? . 22) q for/seteq)) q (170060 . 2)) ((c def c (c (? . 22) q in-set)) q (174958 . 3)) ((c def c (c (? . 7) q unsafe-fxvector-ref)) q (528837 . 4)) ((c def c (c (? . 0) q path-for-some-system?)) q (464815 . 3)) ((c def c (c (? . 0) q write-bytes-avail*)) q (385332 . 10)) ((c def c (c (? . 0) q vector->pseudo-random-generator!)) q (30511 . 5)) ((c def c (c (? . 18) q sandbox-eval-handlers)) q (451655 . 7)) ((c def c (c (? . 0) q chaperone-prompt-tag)) q (437906 . 18)) ((c def c (c (? . 0) q hash-strong?)) q (121422 . 3)) ((c def c (c (? . 11) q extfl>)) q (44514 . 4)) ((c form c (c (? . 5) q init-rest)) q (199155 . 3)) ((c def c (c (? . 31) q prop:dict)) q (159234 . 2)) ((c def c (c (? . 0) q progress-evt?)) q (383916 . 6)) ((c form c (c (? . 3) q for*/fold)) q (17855 . 3)) ((c def c (c (? . 0) q regexp-match/end)) q (87829 . 20)) ((c def c (c (? . 0) q sin)) q (27591 . 3)) ((c form c (c (? . 5) q get-field)) q (203248 . 2)) ((c def c (c (? . 0) q char-upper-case?)) q (74522 . 3)) ((c def c (c (? . 0) q exact-positive-integer?)) q (24166 . 3)) ((c def c (c (? . 0) q write-special-avail*)) q (386253 . 4)) ((c form c (c (? . 18) q with-limits)) q (455000 . 2)) ((c def c (c (? . 0) q syntax-source-module)) q (312627 . 5)) ((c def c (c (? . 5) q dynamic-send)) q (202670 . 9)) ((c def c (c (? . 0) q eval-jit-enabled)) q (417838 . 4)) ((c def c (c (? . 12) q syntax-local-match-introduce)) q (268247 . 3)) ((c def c (c (? . 0) q continuation?)) q (288740 . 3)) ((c def c (c (? . 17) q >/c)) q (222655 . 3)) ((c def c (c (? . 0) q pair?)) q (94773 . 3)) ((c def c (c (? . 53) q mutable-treelist-insert!)) q (138313 . 5)) ((c def c (c (? . 0) q struct:exn:break:terminate)) c (? . 112)) ((c def c (c (? . 24) q decompile-linklet)) q (459722 . 3)) ((c def c (c (? . 1) q special-filter-input-port)) q (372072 . 8)) ((c def c (c (? . 0) q hash-ephemeron?)) q (121540 . 3)) ((c def c (c (? . 0) q make-logger)) q (505004 . 10)) ((c def c (c (? . 0) q unbox*)) q (120765 . 3)) ((c def c (c (? . 0) q struct-type-sealed?)) q (443172 . 3)) ((c form c (c (? . 3) q struct-field-index)) q (186086 . 2)) ((c def c (c (? . 31) q dict-can-remove-keys?)) q (159081 . 3)) ((c form c (c (? . 140) q struct/c)) q (225940 . 2)) ((c def c (c (? . 14) q contract-random-generate/choose)) q (265716 . 4)) ((c def c (c (? . 0) q exn:fail:filesystem:version?)) c (? . 113)) ((c def c (c (? . 18) q sandbox-output)) q (447927 . 14)) ((c form c (c (? . 27) q rename)) q (215391 . 2)) ((c def c (c (? . 74) q blame-original?)) q (247205 . 3)) ((c def c (c (? . 7) q unsafe-flexpt)) q (523121 . 4)) ((c def c (c (? . 0) q read-accept-box)) q (388786 . 4)) ((c def c (c (? . 0) q read-decimal-as-inexact)) q (389300 . 4)) ((c def c (c (? . 0) q open-input-bytes)) q (353849 . 4)) ((c def c (c (? . 0) q syntax-local-make-definition-context-introducer)) q (326485 . 4)) ((c def c (c (? . 32) q ->fl)) q (37631 . 3)) ((c form c (c (? . 2) q prompt)) q (289868 . 2)) ((c form c (c (? . 3) q for*/sum)) q (17596 . 2)) ((c def c (c (? . 7) q unsafe-flsingle)) q (522362 . 3)) ((c def c (c (? . 5) q class?)) q (210534 . 3)) ((c def c (c (? . 3) q make-exn:fail:contract:variable)) c (? . 96)) ((c def c (c (? . 22) q list->setalw)) q (168880 . 4)) ((c def c (c (? . 5) q printable<%>)) q (210414 . 2)) ((c def c (c (? . 32) q fl=)) q (36111 . 4)) ((c def c (c (? . 0) q current-inexact-milliseconds)) q (508632 . 2)) ((c def c (c (? . 5) q class-info)) q (212173 . 10)) ((c def c (c (? . 49) q collapsible-property)) c (? . 90)) ((c def c (c (? . 52) q stream-rest)) q (156028 . 3)) ((c def c (c (? . 31) q make-custom-hash)) q (164659 . 14)) ((c def c (c (? . 0) q stencil-vector-length)) q (119641 . 4)) ((c form c (c (? . 22) q define-custom-set-types)) q (176911 . 12)) ((c def c (c (? . 0) q impersonate-continuation-mark-key)) q (431752 . 13)) ((c def c (c (? . 0) q floating-point-bytes->real)) q (33511 . 9)) ((c def c (c (? . 0) q input-port?)) q (345100 . 3)) ((c def c (c (? . 46) q path-replace-suffix)) q (468912 . 4)) ((c def c (c (? . 18) q sandbox-network-guard)) q (450596 . 13)) ((c def c (c (? . 22) q in-mutable-set)) q (171392 . 3)) ((c def c (c (? . 0) q checked-procedure-check-and-extract)) q (182958 . 11)) ((c def c (c (? . 0) q always-evt)) q (297913 . 2)) ((c def c (c (? . 4) q pathlist-closure)) q (480716 . 8)) ((c form c (c (? . 58) q define/generic)) q (191237 . 2)) ((c def c (c (? . 4) q make-directory*)) q (481553 . 3)) ((q def ((lib "racket/syntax-srcloc.rkt") syntax-srcloc)) q (316824 . 3)) ((c def c (c (? . 0) q string-copy!)) q (49666 . 11)) ((c def c (c (? . 3) q exn:fail:contract:arity)) c (? . 105)) ((c def c (c (? . 11) q extfl*)) q (44125 . 4)) ((c def c (c (? . 0) q stencil-vector-mask)) q (119506 . 4)) ((c def c (c (? . 5) q dynamic-get-field)) q (203281 . 4)) ((c def c (c (? . 0) q print-unreadable)) q (392390 . 4)) ((c form c (c (? . 0) q quote)) q (10891 . 2)) ((c def c (c (? . 0) q exn:fail:filesystem?)) c (? . 114)) ((c def c (c (? . 7) q unsafe-mutable-hash-iterate-key)) q (532096 . 4)) ((c def c (c (? . 0) q custodian-limit-memory)) q (441422 . 7)) ((c def c (c (? . 35) q touch)) q (303629 . 3)) ((c def c (c (? . 0) q call-in-nested-thread)) q (295110 . 4)) ((c def c (c (? . 22) q seteqv)) q (167811 . 3)) ((c def c (c (? . 62) q extract-struct-info)) q (194811 . 3)) ((c def c (c (? . 7) q unsafe-mutable-hash-iterate-key+value)) q (533021 . 5)) ((c def c (c (? . 15) q fxxor)) q (40569 . 3)) ((c def c (c (? . 24) q linklet-import-variables)) q (459221 . 3)) ((c def c (c (? . 78) q build-chaperone-contract-property)) q (251284 . 51)) ((c def c (c (? . 15) q in-fxvector)) q (43003 . 6)) ((c def c (c (? . 5) q exn:fail:object?)) c (? . 42)) ((c form c (c (? . 2) q reset-at)) q (290088 . 2)) ((c def c (c (? . 7) q unsafe-weak-hash-iterate-pair)) q (537567 . 4)) ((c def c (c (? . 3) q in-input-port-bytes)) q (145320 . 3)) ((c def c (c (? . 31) q in-dict-pairs)) q (162527 . 3)) ((c def c (c (? . 31) q dict-iterate-first)) q (159990 . 3)) ((c def c (c (? . 0) q split-path)) q (468157 . 5)) ((c def c (c (? . 18) q sandbox-init-hook)) q (447300 . 4)) ((c def c (c (? . 0) q <=)) q (26975 . 4)) ((c form c (c (? . 27) q define-unit)) q (216408 . 7)) ((c def c (c (? . 0) q current-continuation-marks)) q (291185 . 5)) ((c def c (c (? . 58) q exn:fail:support)) c (? . 115)) ((c form c (c (? . 5) q send*)) q (202943 . 5)) ((c def c (c (? . 7) q unsafe-fx<)) q (520664 . 4)) ((c def c (c (? . 0) q display)) q (391126 . 4)) ((c form c (c (? . 122) q filtered-in)) q (10564 . 2)) ((c def c (c (? . 32) q flabs)) q (36059 . 3)) ((c def c (c (? . 19) q vector-set*!)) q (114800 . 5)) ((c def c (c (? . 0) q current-error-port)) q (345751 . 4)) ((c def c (c (? . 0) q make-weak-hashalw)) q (122863 . 4)) ((c def c (c (? . 11) q floating-point-bytes->extfl)) q (47920 . 9)) ((c def c (c (? . 78) q make-flat-contract)) q (242841 . 32)) ((c def c (c (? . 8) q place-channel?)) q (304642 . 3)) ((c def c (c (? . 15) q fxrshift/logical)) q (41447 . 4)) ((c def c (c (? . 23) q import-source-mode)) c (? . 40)) ((c def c (c (? . 0) q syntax-local-lift-require)) q (329904 . 7)) ((c def c (c (? . 7) q unsafe-flimag-part)) q (523621 . 5)) ((c def c (c (? . 22) q weak-seteqv)) q (168600 . 3)) ((c def c (c (? . 3) q memw)) q (98366 . 7)) ((c form c (c (? . 5) q send/keyword-apply)) q (202482 . 4)) ((c def c (c (? . 49) q struct:collapsible-ho/c)) c (? . 60)) ((c def c (c (? . 0) q syntax-local-module-exports)) q (330476 . 5)) ((c form c (c (? . 0) q #%require)) q (7239 . 41)) ((c form c (c (? . 6) q parameterize-break)) q (293904 . 2)) ((c def c (c (? . 0) q custodian-shutdown-all)) q (440731 . 3)) ((c def c (c (? . 87) q immutable-hash?)) q (23706 . 3)) ((c def c (c (? . 11) q extflmax)) q (44844 . 4)) ((c def c (c (? . 1) q peeking-input-port)) q (366252 . 10)) ((c form c (c (? . 5) q define/override)) q (200407 . 3)) ((c def c (c (? . 49) q collapsible-contract?)) q (261497 . 3)) ((c def c (c (? . 0) q write-bytes-avail)) q (384946 . 9)) ((c def c (c (? . 13) q split-at)) q (105147 . 7)) ((c def c (c (? . 43) q yield)) q (158393 . 3)) ((c def c (c (? . 0) q exn:srclocs-accessor)) q (283687 . 4)) ((c def c (c (? . 35) q processor-count)) q (303897 . 2)) ((c def c (c (? . 9) q filter)) q (96945 . 4)) ((c def c (c (? . 7) q unsafe-weak-hash-iterate-next)) q (536207 . 4)) ((c def c (c (? . 58) q raise-support-error)) q (191077 . 4)) ((c def c (c (? . 0) q system-idle-evt)) q (297964 . 2)) ((c def c (c (? . 59) q positive-integer?)) q (35485 . 3)) ((c form c (c (? . 33) q delay/idle)) q (286077 . 8)) ((c def c (c (? . 0) q positive?)) q (24624 . 3)) ((c def c (c (? . 0) q read-single-flonum)) q (389410 . 4)) ((c def c (c (? . 22) q list->seteqv)) q (168981 . 3)) ((c def c (c (? . 16) q empty-treelist)) q (131476 . 2)) ((c def c (c (? . 0) q build-path/convention-type)) q (466499 . 9)) ((c def c (c (? . 23) q convert-relative-module-path)) q (334481 . 6)) ((c def c (c (? . 15) q make-fxvector)) q (42369 . 4)) ((c form c (c (? . 3) q require)) q (2207 . 56)) ((c def c (c (? . 32) q fl>=)) q (36420 . 4)) ((c def c (c (? . 26) q cons/c)) q (225056 . 4)) ((c def c (c (? . 0) q syntax-binding-set->syntax)) q (314125 . 5)) ((c def c (c (? . 3) q make-exn:fail:filesystem:exists)) c (? . 116)) ((c def c (c (? . 0) q integer-sqrt)) q (27241 . 3)) ((c form c (c (? . 0) q begin0)) q (14525 . 2)) ((c form c (c (? . 22) q for*/mutable-set)) q (170648 . 2)) ((c def c (c (? . 0) q load)) q (413121 . 3)) ((c def c (c (? . 0) q arithmetic-shift)) q (29082 . 4)) ((c def c (c (? . 0) q print-vector-length)) q (392742 . 4)) ((c def c (c (? . 0) q make-rename-transformer)) q (322766 . 3)) ((c def c (c (? . 0) q vector)) q (112464 . 3)) ((c def c (c (? . 0) q hash-count)) q (127887 . 3)) ((c def c (c (? . 0) q exn:break-continuation)) c (? . 57)) ((c def c (c (? . 0) q real->double-flonum)) q (25144 . 3)) ((c def c (c (? . 0) q raise-argument-error*)) q (269912 . 16)) ((c def c (c (? . 3) q in-directory)) q (150326 . 5)) ((c def c (c (? . 0) q port-closed?)) q (345404 . 3)) ((c def c (c (? . 0) q internal-definition-context-splice-binding-identifier)) q (326885 . 7)) ((c def c (c (? . 0) q custodian-box-value)) q (441856 . 3)) ((c def c (c (? . 23) q syntax-local-require-certifier)) q (334807 . 4)) ((c form c (c (? . 48) q trait-rename-field)) q (205216 . 2)) ((q form ((lib "racket/shared.rkt") shared)) q (12781 . 2)) ((c def c (c (? . 0) q custodian-box?)) q (441796 . 3)) ((c def c (c (? . 0) q read-accept-quasiquote)) q (389792 . 4)) ((c def c (c (? . 0) q exact-nonnegative-integer?)) q (24094 . 3)) ((c def c (c (? . 20) q xor)) q (23092 . 4)) ((c def c (c (? . 3) q make-keyword-procedure)) q (181021 . 5)) ((c def c (c (? . 0) q resolved-module-path-name)) q (418453 . 8)) ((c def c (c (? . 46) q load-relative)) q (413179 . 3)) ((c def c (c (? . 23) q import-src-sym)) c (? . 70)) ((c def c (c (? . 0) q exact->inexact)) q (25011 . 3)) ((c form c (c (? . 3) q for*)) q (16911 . 2)) ((q def ((lib "racket/undefined.rkt") undefined)) q (184878 . 2)) ((c def c (c (? . 117) q vector-immutableof)) q (223976 . 3)) ((c def c (c (? . 0) q make-will-executor)) q (517859 . 2)) ((c def c (c (? . 19) q vector-map)) q (114964 . 4)) ((c def c (c (? . 32) q fllog)) q (37400 . 3)) ((c form c (c (? . 12) q define/match)) q (266709 . 16)) ((c form c (c (? . 27) q unit/c)) q (219690 . 16)) ((c form c (c (? . 69) q case->m)) q (206391 . 2)) ((c def c (c (? . 46) q channel-try-get)) q (298540 . 3)) ((c def c (c (? . 0) q mcdr)) q (112109 . 3)) ((c def c (c (? . 0) q char>?)) q (73724 . 4)) ((c def c (c (? . 7) q unsafe-ephemeron-hash-iterate-next)) q (538071 . 5)) ((c def c (c (? . 16) q treelist-empty?)) q (131409 . 3)) ((c def c (c (? . 33) q promise/name?)) q (285831 . 3)) ((c def c (c (? . 7) q unsafe-s16vector-ref)) q (529514 . 4)) ((c def c (c (? . 0) q procedure-impersonator*?)) q (426132 . 3)) ((c def c (c (? . 22) q list->weak-seteq)) q (169913 . 3)) ((c def c (c (? . 66) q tcp-listen)) q (487899 . 9)) ((c def c (c (? . 28) q udp-connect!)) q (490476 . 7)) ((c def c (c (? . 46) q path-list-string->path-list)) q (471366 . 6)) ((c def c (c (? . 18) q sandbox-propagate-exceptions)) q (449133 . 4)) ((c def c (c (? . 45) q export?)) c (? . 67)) ((c def c (c (? . 22) q set-remove!)) q (172763 . 4)) ((c form c (c (? . 118) q command-line)) q (514858 . 43)) ((c form c (c (? . 3) q #%top-interaction)) q (19908 . 2)) ((c def c (c (? . 32) q make-flvector)) q (38585 . 4)) ((c def c (c (? . 119) q log-level/c)) q (507378 . 3)) ((c def c (c (? . 0) q procedure-arity)) q (179730 . 3)) ((c def c (c (? . 49) q collapsible-property-ref)) c (? . 90)) ((c def c (c (? . 3) q regexp-match-peek-positions*)) q (86794 . 17)) ((c def c (c (? . 0) q kill-thread)) q (295437 . 3)) ((c def c (c (? . 53) q mutable-treelist-length)) q (137934 . 3)) ((c def c (c (? . 3) q in-values*-sequence)) q (151268 . 3)) ((c def c (c (? . 3) q sequence-generate*)) q (152768 . 5)) ((c def c (c (? . 31) q make-weak-custom-hash)) q (165372 . 14)) ((c form c (c (? . 3) q for/foldr)) q (16622 . 9)) ((c def c (c (? . 66) q tcp-accept-ready?)) q (489174 . 3)) ((c def c (c (? . 13) q filter-not)) q (109659 . 4)) ((c def c (c (? . 0) q shell-execute)) q (500133 . 11)) ((c def c (c (? . 0) q print-hash-table)) q (392844 . 4)) ((c def c (c (? . 0) q make-immutable-hashalw)) q (124073 . 4)) ((c def c (c (? . 13) q tenth)) q (103336 . 3)) ((c def c (c (? . 0) q bytes-utf-8-ref)) q (70417 . 7)) ((c def c (c (? . 0) q pipe-port?)) q (354783 . 3)) ((c def c (c (? . 0) q exn:fail:syntax:missing-module?)) c (? . 104)) ((c def c (c (? . 0) q read-accept-graph)) q (389090 . 4)) ((c def c (c (? . 59) q radians->degrees)) q (34594 . 3)) ((c def c (c (? . 138) q random-ref)) q (30874 . 5)) ((c def c (c (? . 0) q max)) q (26025 . 3)) ((c form c (c (? . 27) q define-unit-from-context)) q (218424 . 2)) ((c def c (c (? . 0) q syntax-local-lift-module-end-declaration)) q (329815 . 3)) ((c def c (c (? . 0) q string-normalize-nfkd)) q (51985 . 3)) ((c def c (c (? . 1) q open-output-nowhere)) q (366028 . 4)) ((c form c (c (? . 5) q define/augment)) q (200665 . 3)) ((c def c (c (? . 3) q make-base-namespace)) q (406266 . 2)) ((c def c (c (? . 0) q string-locale-ci=?)) q (52522 . 4)) ((c def c (c (? . 74) q blame-swapped?)) q (247267 . 3)) ((c def c (c (? . 7) q unsafe-stencil-vector)) q (530004 . 4)) ((c def c (c (? . 4) q regular-file-type-bits)) q (487158 . 2)) ((c def c (c (? . 13) q takef-right)) q (106431 . 7)) ((c def c (c (? . 13) q thirteenth)) q (103497 . 3)) ((c def c (c (? . 13) q permutations)) q (110134 . 3)) ((c def c (c (? . 0) q string-utf-8-length)) q (69924 . 5)) ((c def c (c (? . 24) q instance-variable-names)) q (461290 . 3)) ((c def c (c (? . 7) q unsafe-fl>)) q (521689 . 4)) ((c def c (c (? . 14) q contract-proc)) q (265075 . 6)) ((c def c (c (? . 0) q bytes->list)) q (67507 . 3)) ((c def c (c (? . 0) q current-compile)) q (416176 . 5)) ((c form c (c (? . 3) q for*/foldr)) q (17966 . 4)) ((c form c (c (? . 0) q letrec-values)) q (12250 . 2)) ((c form c (c (? . 32) q for*/flvector)) q (39527 . 9)) ((c form c (c (? . 5) q pubment*)) q (199824 . 2)) ((c def c (c (? . 0) q module->language-info)) q (424498 . 6)) ((c def c (c (? . 3) q in-ephemeron-hash-pairs)) q (150083 . 3)) ((c def c (c (? . 48) q trait->mixin)) q (204902 . 3)) ((c form c (c (? . 17) q any)) q (228604 . 2)) ((c def c (c (? . 120) q box/c)) q (224422 . 9)) ((c def c (c (? . 0) q stencil-vector?)) q (119220 . 3)) ((c def c (c (? . 32) q fl-)) q (35852 . 4)) ((c def c (c (? . 3) q in-immutable-hash)) q (147570 . 3)) ((c def c (c (? . 0) q memory-order-release)) q (307238 . 2)) ((c def c (c (? . 0) q module-predefined?)) q (425592 . 4)) ((c form c (c (? . 3) q except-out)) q (6619 . 2)) ((c def c (c (? . 0) q current-library-collection-paths)) q (547999 . 5)) ((c def c (c (? . 0) q hash-eqv?)) q (121309 . 3)) ((c def c (c (? . 0) q make-security-guard)) q (439730 . 16)) ((c form c (c (? . 5) q override-final)) q (199381 . 2)) ((c def c (c (? . 0) q default-continuation-prompt-tag)) q (287317 . 2)) ((c def c (c (? . 7) q unsafe-fxrshift)) q (519740 . 4)) ((c def c (c (? . 0) q string-titlecase)) q (51763 . 3)) ((c def c (c (? . 13) q index-of)) q (104162 . 5)) ((c def c (c (? . 7) q unsafe-bytes-length)) q (527966 . 3)) ((c def c (c (? . 46) q getenv)) q (513444 . 3)) ((c def c (c (? . 121) q check-not-unsafe-undefined)) q (545892 . 4)) ((c def c (c (? . 0) q syntax->list)) q (312858 . 3)) ((c def c (c (? . 0) q read-bytes-line)) q (375640 . 5)) ((c def c (c (? . 0) q write)) q (391012 . 4)) ((c def c (c (? . 53) q mutable-treelist->list)) q (140024 . 3)) ((c def c (c (? . 0) q custodian-shut-down?)) q (440807 . 3)) ((c def c (c (? . 0) q current-gc-milliseconds)) q (509901 . 2)) ((c def c (c (? . 7) q unsafe-extflcos)) q (541970 . 3)) ((c form c (c (? . 107) q include)) q (341262 . 6)) ((c def c (c (? . 0) q black-box)) q (294602 . 3)) ((c def c (c (? . 0) q read-bytes-avail!)) q (376792 . 7)) ((c def c (c (? . 143) q make-parameter-rename-transformer)) q (337621 . 3)) ((c def c (c (? . 0) q date-dst?)) c (? . 29)) ((c def c (c (? . 0) q syntax-binding-set?)) q (314004 . 3)) ((c def c (c (? . 0) q prop:evt)) q (298167 . 2)) ((c def c (c (? . 22) q mutable-seteq)) q (168298 . 4)) ((c def c (c (? . 36) q disjoin)) q (184015 . 4)) ((c def c (c (? . 19) q vector-split-at)) q (115694 . 4)) ((c def c (c (? . 0) q pregexp?)) q (76708 . 3)) ((c form c (c (? . 52) q for/stream)) q (157955 . 2)) ((c form c (c (? . 76) q contract-first-order-okay-to-give-up?)) q (260608 . 2)) ((c def c (c (? . 0) q make-environment-variables)) q (512406 . 5)) ((c def c (c (? . 0) q build-path)) q (466194 . 6)) ((c form c (c (? . 12) q match)) q (266312 . 10)) ((c def c (c (? . 0) q prop:equal+hash)) q (22129 . 2)) ((c def c (c (? . 3) q procedure-reduce-arity-mask)) q (180439 . 9)) ((c def c (c (? . 0) q subprocess)) q (497677 . 37)) ((c def c (c (? . 0) q namespace-unprotect-module)) q (409746 . 7)) ((c def c (c (? . 0) q open-input-string)) q (353983 . 4)) ((c form c (c (? . 12) q match*)) q (266546 . 4)) ((c form c (c (? . 3) q for/vector)) q (15390 . 8)) ((c def c (c (? . 11) q extfltan)) q (45308 . 3)) ((c form c (c (? . 5) q send/apply)) q (202416 . 2)) ((c form c (c (? . 2) q control)) q (289896 . 2)) ((c def c (c (? . 1) q reencode-output-port)) q (367354 . 16)) ((c def c (c (? . 0) q call-with-immediate-continuation-mark)) q (293058 . 7)) ((c def c (c (? . 46) q read-eval-print-loop)) q (415457 . 2)) ((c def c (c (? . 71) q async-channel-put)) q (300458 . 4)) ((c def c (c (? . 0) q sync)) q (296834 . 3)) ((c def c (c (? . 31) q dict-copy)) q (161981 . 3)) ((c def c (c (? . 7) q unsafe-fl->fx)) q (523878 . 3)) ((c def c (c (? . 0) q port-counts-lines?)) q (347013 . 3)) ((c def c (c (? . 61) q ~v)) q (57034 . 25)) ((c def c (c (? . 13) q cartesian-product)) q (110638 . 3)) ((c def c (c (? . 0) q string<=?)) q (50856 . 4)) ((c def c (c (? . 46) q reroot-path)) q (469234 . 4)) ((c def c (c (? . 3) q exn:break:terminate)) c (? . 112)) ((c def c (c (? . 0) q string-locale<?)) q (52319 . 4)) ((c def c (c (? . 74) q blame-negative)) q (246921 . 3)) ((c def c (c (? . 3) q make-exn)) c (? . 106)) ((c def c (c (? . 13) q fifth)) q (103073 . 3)) ((c form c (c (? . 6) q case)) q (13207 . 5)) ((c def c (c (? . 0) q integer-length)) q (29187 . 3)) ((c def c (c (? . 7) q unsafe-flsqrt)) q (523061 . 3)) ((c def c (c (? . 4) q block-device-type-bits)) q (487200 . 2)) ((c def c (c (? . 13) q remf*)) q (110798 . 4)) ((c form c (c (? . 12) q match/values)) q (266658 . 2)) ((c form c (c (? . 11) q for*/extflvector)) q (47437 . 9)) ((c def c (c (? . 0) q vector-fill!)) q (113854 . 4)) ((c def c (c (? . 0) q bytes)) q (66137 . 3)) ((c def c (c (? . 7) q unsafe-vector*-cas!)) q (526843 . 6)) ((c def c (c (? . 0) q arity-at-least-value)) c (? . 72)) ((c def c (c (? . 3) q exn:fail:user)) c (? . 86)) ((c def c (c (? . 0) q bytes->path)) q (464943 . 4)) ((c def c (c (? . 10) q coerce-contract)) q (244771 . 4)) ((c def c (c (? . 0) q regexp-match-peek-positions/end)) q (89498 . 22)) ((c form c (c (? . 38) q let-syntax)) q (12315 . 2)) ((c def c (c (? . 0) q string-upcase)) q (51627 . 3)) ((c def c (c (? . 2) q new-prompt)) q (290756 . 4)) ((c def c (c (? . 21) q sequence-filter)) q (153975 . 4)) ((c def c (c (? . 0) q make-hasheqv-placeholder)) q (111743 . 3)) ((c def c (c (? . 0) q cadaar)) q (101487 . 3)) ((c def c (c (? . 7) q unsafe-extflsin)) q (541902 . 3)) ((c def c (c (? . 18) q sandbox-make-namespace)) q (449534 . 2)) ((c def c (c (? . 13) q append*)) q (108042 . 7)) ((c def c (c (? . 0) q local-transformer-expand)) q (323729 . 11)) ((c def c (c (? . 10) q coerce-flat-contract)) q (245198 . 4)) ((c def c (c (? . 52) q stream-map)) q (157173 . 4)) ((c def c (c (? . 64) q process*/ports)) q (503623 . 27)) ((c def c (c (? . 11) q extflround)) q (44929 . 3)) ((c def c (c (? . 0) q integer->char)) q (73179 . 5)) ((c def c (c (? . 52) q stream-force)) q (156388 . 3)) ((c def c (c (? . 0) q call-with-values)) q (268754 . 4)) ((c form c (c (? . 32) q for/flvector)) q (39461 . 2)) ((c def c (c (? . 0) q string->list)) q (50385 . 3)) ((c def c (c (? . 27) q unit?)) q (219588 . 3)) ((c def c (c (? . 0) q syntax-e)) q (312801 . 3)) ((c def c (c (? . 7) q unsafe-flvector-set!)) q (529195 . 5)) ((c def c (c (? . 7) q unsafe-impersonate-vector)) q (543845 . 11)) ((c form c (c (? . 12) q match-let*-values)) q (267554 . 2)) ((c def c (c (? . 31) q keyword-apply/dict)) q (166858 . 11)) ((c def c (c (? . 7) q unsafe-extflvector-set!)) q (542918 . 5)) ((c def c (c (? . 73) q map)) q (96127 . 4)) ((c def c (c (? . 0) q prefab-struct-type-key+field-count)) q (193806 . 4)) ((c def c (c (? . 53) q mutable-treelist-reverse!)) q (139859 . 3)) ((c def c (c (? . 3) q in-mutable-hash)) q (146482 . 3)) ((c def c (c (? . 0) q char-graphic?)) q (74858 . 3)) ((c def c (c (? . 0) q handle-evt)) q (297412 . 4)) ((c def c (c (? . 3) q copy-file)) q (473980 . 13)) ((c def c (c (? . 16) q make-treelist)) q (131303 . 4)) ((c def c (c (? . 44) q syntax-local-value/record)) q (343321 . 4)) ((c def c (c (? . 16) q vector->treelist)) q (133315 . 3)) ((c form c (c (? . 122) q path-up)) q (10610 . 2)) ((c def c (c (? . 0) q current-prompt-read)) q (415499 . 4)) ((c def c (c (? . 3) q procedure-keywords)) q (180777 . 4)) ((c def c (c (? . 3) q exn:fail:contract:variable)) c (? . 96)) ((c def c (c (? . 0) q srcloc->string)) q (284150 . 3)) ((c def c (c (? . 61) q ~s)) q (58270 . 25)) ((c def c (c (? . 91) q prop:chaperone-contract)) q (248210 . 2)) ((c def c (c (? . 0) q values)) q (268702 . 3)) ((c def c (c (? . 7) q unsafe-extflacos)) q (542175 . 3)) ((c def c (c (? . 0) q module->imports)) q (424727 . 6)) ((c form c (c (? . 44) q with-syntax*)) q (344152 . 5)) ((c def c (c (? . 74) q blame-add-context)) q (246428 . 9)) ((c def c (c (? . 37) q pretty-print-exact-as-decimal)) q (396689 . 4)) ((c def c (c (? . 7) q unsafe-flmin)) q (521943 . 4)) ((c def c (c (? . 16) q treelist-take)) q (132465 . 4)) ((c def c (c (? . 31) q dict-set*!)) q (160408 . 5)) ((c def c (c (? . 7) q unsafe-extflexp)) q (542381 . 3)) ((c def c (c (? . 0) q bitwise-ior)) q (28371 . 3)) ((c def c (c (? . 10) q contract-equivalent?)) q (258314 . 4)) ((c def c (c (? . 28) q udp-open-socket)) q (489969 . 5)) ((c def c (c (? . 26) q dynamic->*)) q (233869 . 19)) ((c def c (c (? . 0) q make-thread-group)) q (441927 . 3)) ((c def c (c (? . 0) q string->unreadable-symbol)) q (76299 . 3)) ((c def c (c (? . 17) q make-none/c)) q (259573 . 3)) ((c def c (c (? . 64) q bytes-no-nuls?)) q (504891 . 3)) ((c def c (c (? . 0) q date-year-day)) c (? . 29)) ((c def c (c (? . 13) q take-right)) q (105833 . 7)) ((c def c (c (? . 17) q flat-named-contract)) q (221849 . 8)) ((c def c (c (? . 10) q flat-contract?)) q (258793 . 3)) ((c def c (c (? . 0) q char-ci=?)) q (73909 . 4)) ((c def c (c (? . 3) q make-date)) c (? . 29)) ((c def c (c (? . 2) q call/prompt)) q (289076 . 7)) ((c def c (c (? . 0) q identifier-binding)) q (317977 . 20)) ((c def c (c (? . 0) q impersonate-prompt-tag)) q (430933 . 18)) ((c def c (c (? . 22) q set-member?)) q (172426 . 4)) ((c def c (c (? . 3) q exn:fail:filesystem:exists)) c (? . 116)) ((c def c (c (? . 71) q async-channel-try-get)) q (300381 . 3)) ((c def c (c (? . 0) q string-normalize-nfc)) q (52063 . 3)) ((c def c (c (? . 3) q gen:custom-write)) q (401072 . 2)) ((c def c (c (? . 9) q build-vector)) q (114598 . 4)) ((c def c (c (? . 0) q path-element->string)) q (465770 . 3)) ((c def c (c (? . 0) q cons)) q (94875 . 7)) ((c def c (c (? . 6) q break-parameterization?)) q (294221 . 3)) ((c def c (c (? . 1) q peek-string!-evt)) c (? . 101)) ((c def c (c (? . 0) q make-syntax-delta-introducer)) q (332105 . 9)) ((c def c (c (? . 0) q exn:fail:filesystem:errno-errno)) c (? . 65)) ((c def c (c (? . 0) q syntax-local-identifier-as-binding)) q (331482 . 5)) ((c def c (c (? . 7) q unsafe-fxior)) q (519470 . 3)) ((c def c (c (? . 0) q namespace-module-identifier)) q (406897 . 4)) ((c def c (c (? . 0) q odd?)) q (24788 . 3)) ((c form c (c (? . 5) q define/override-final)) q (200571 . 3)) ((c def c (c (? . 0) q semaphore-wait)) q (299055 . 3)) ((c def c (c (? . 0) q bytes-ref)) q (66419 . 4)) ((c def c (c (? . 0) q find-library-collection-paths)) q (546227 . 9)) ((c form c (c (? . 3) q module+)) q (1705 . 2)) ((c def c (c (? . 7) q unsafe-flatan)) q (522883 . 3)) ((c def c (c (? . 0) q call-with-current-continuation)) q (287391 . 6)) ((c def c (c (? . 44) q format-id)) q (341567 . 19)) ((c def c (c (? . 16) q treelist)) q (131243 . 3)) ((c def c (c (? . 10) q value-blame)) q (259113 . 3)) ((c def c (c (? . 92) q engine-kill)) q (307128 . 3)) ((c def c (c (? . 117) q vectorof)) q (223608 . 9)) ((c def c (c (? . 0) q -)) q (25261 . 6)) ((c form c (c (? . 6) q log-debug)) q (507074 . 3)) ((c def c (c (? . 1) q transplant-output-port)) q (370063 . 19)) ((c def c (c (? . 69) q make-mixin-contract)) q (209726 . 3)) ((c def c (c (? . 0) q module-path-index-join)) q (420928 . 5)) ((c form c (c (? . 8) q place)) q (306495 . 2)) ((c def c (c (? . 3) q regexp-replaces)) q (93776 . 8)) ((c def c (c (? . 3) q make-exn:fail:contract:non-fixnum-result)) c (? . 80)) ((c def c (c (? . 7) q unsafe-make-flrectangular)) q (523202 . 7)) ((c def c (c (? . 0) q namespace-mapped-symbols)) q (408067 . 3)) ((c def c (c (? . 0) q read-language)) q (388018 . 5)) ((c def c (c (? . 0) q sqrt)) q (27190 . 3)) ((c def c (c (? . 136) q dynamic-enter!)) q (549680 . 7)) ((c def c (c (? . 0) q environment-variables-set!)) q (512752 . 10)) ((c def c (c (? . 0) q module->indirect-exports)) q (425256 . 5)) ((c def c (c (? . 49) q collapsible-count-property-count)) c (? . 123)) ((c form c (c (? . 0) q letrec-syntaxes+values)) q (12567 . 4)) ((c def c (c (? . 0) q read/recursive)) q (387298 . 6)) ((c def c (c (? . 22) q set-mutable?)) q (167518 . 3)) ((c def c (c (? . 0) q integer->integer-bytes)) q (32938 . 14)) ((c def c (c (? . 4) q file->bytes)) q (476749 . 4)) ((c def c (c (? . 0) q resolved-module-path?)) q (418042 . 3)) ((c def c (c (? . 0) q read-on-demand-source)) q (390465 . 5)) ((c def c (c (? . 0) q prefab-struct-key)) q (193628 . 3)) ((c def c (c (? . 0) q cdr)) q (95043 . 3)) ((c def c (c (? . 0) q custodian-memory-accounting-available?)) q (441099 . 2)) ((c def c (c (? . 13) q seventh)) q (103177 . 3)) ((c form c (c (? . 0) q begin)) q (14479 . 3)) ((c def c (c (? . 0) q caaaar)) q (101087 . 3)) ((c def c (c (? . 9) q remq*)) q (97477 . 4)) ((c form c (c (? . 99) q quasisyntax/loc)) q (310845 . 14)) ((c def c (c (? . 0) q call-with-escape-continuation)) q (288109 . 3)) ((c def c (c (? . 18) q exn:fail:sandbox-terminated?)) c (? . 145)) ((c def c (c (? . 36) q normalized-arity?)) q (184373 . 3)) ((c def c (c (? . 18) q sandbox-propagate-breaks)) q (449007 . 4)) ((c def c (c (? . 0) q primitive-closure?)) q (183495 . 3)) ((c def c (c (? . 3) q sequence?)) q (143915 . 3)) ((q def ((lib "racket/for-clause.rkt") syntax-local-splicing-for-clause-introduce)) q (19463 . 3)) ((c def c (c (? . 3) q exn:fail:network:errno)) c (? . 124)) ((c def c (c (? . 8) q place-channel-put/get)) q (306218 . 4)) ((c def c (c (? . 32) q flsqrt)) q (37504 . 3)) ((c def c (c (? . 22) q list->mutable-seteqv)) q (169385 . 4)) ((c def c (c (? . 0) q string-set!)) q (49270 . 5)) ((c def c (c (? . 66) q port-number?)) q (489896 . 2)) ((c def c (c (? . 10) q prop:contracted)) q (248317 . 2)) ((c def c (c (? . 74) q exn:fail:contract:blame-object)) c (? . 109)) ((c def c (c (? . 0) q placeholder?)) q (111200 . 3)) ((c form c (c (? . 58) q make-struct-type-property/generic)) q (191901 . 29)) ((c def c (c (? . 16) q treelist-append)) q (132392 . 3)) ((c form c (c (? . 12) q match*/derived)) q (268543 . 2)) ((c def c (c (? . 33) q force)) q (285600 . 3)) ((c def c (c (? . 0) q read-char)) q (375211 . 3)) ((c def c (c (? . 53) q mutable-treelist-empty?)) q (137851 . 3)) ((c def c (c (? . 7) q unsafe-fxvector-length)) q (528766 . 3)) ((c def c (c (? . 22) q setalw)) q (167716 . 3)) ((c def c (c (? . 0) q box-immutable)) q (120535 . 3)) ((c def c (c (? . 13) q splitf-at-right)) q (106763 . 7)) ((c def c (c (? . 0) q regexp-match-peek-positions)) q (84065 . 19)) ((c form c (c (? . 6) q let/cc)) q (288383 . 2)) ((c def c (c (? . 59) q exact-ceiling)) q (35140 . 3)) ((c def c (c (? . 3) q syntax-binding-set-extend)) q (314300 . 25)) ((c def c (c (? . 23) q make-import-source)) c (? . 40)) ((c def c (c (? . 53) q vector->mutable-treelist)) q (140103 . 3)) ((c def c (c (? . 3) q namespace-anchor->empty-namespace)) q (406414 . 3)) ((c def c (c (? . 6) q call-with-parameterization)) q (303315 . 5)) ((c def c (c (? . 7) q unsafe-flasin)) q (522763 . 3)) ((c def c (c (? . 0) q inexact-real?)) q (24235 . 3)) ((c def c (c (? . 16) q treelist->vector)) q (133185 . 3)) ((c def c (c (? . 1) q relocate-input-port)) q (368254 . 13)) ((c def c (c (? . 0) q thread-wait)) q (295806 . 4)) ((c def c (c (? . 0) q equal-always?)) q (20898 . 4)) ((c def c (c (? . 37) q tentative-pretty-print-port-cancel)) q (400063 . 3)) ((c def c (c (? . 4) q other-read-bit)) q (487793 . 2)) ((c def c (c (? . 93) q new-∃/c)) q (235351 . 3)) ((c def c (c (? . 0) q struct:exn:fail:syntax)) c (? . 68)) ((c def c (c (? . 0) q syntax-local-introduce)) q (331715 . 3)) ((c form c (c (? . 10) q define/final-prop)) q (257935 . 6)) ((c def c (c (? . 5) q object=?)) q (210696 . 4)) ((c def c (c (? . 17) q complex/c)) q (223103 . 4)) ((c form c (c (? . 27) q unit)) q (213604 . 22)) ((c def c (c (? . 0) q equal-always-hash-code/recur)) q (21738 . 4)) ((c form c (c (? . 5) q super-make-object)) q (202130 . 2)) ((c def c (c (? . 0) q sha224-bytes)) q (405709 . 5)) ((c def c (c (? . 0) q read-char-or-special)) q (381358 . 8)) ((c def c (c (? . 8) q processor-count)) q (306757 . 2)) ((c form c (c (? . 38) q define-values-for-syntax)) q (14068 . 2)) ((c def c (c (? . 53) q mutable-treelist-drop-right!)) q (139572 . 4)) ((c def c (c (? . 0) q continuation-mark-set?)) q (293558 . 3)) ((c def c (c (? . 0) q chaperone-vector)) q (433944 . 14)) ((c def c (c (? . 10) q get/build-val-first-projection)) q (260913 . 4)) ((c def c (c (? . 15) q fxpopcount)) q (40830 . 3)) ((c def c (c (? . 14) q contract-exercise)) q (265451 . 7)) ((c def c (c (? . 3) q gen:equal+hash)) q (22062 . 2)) ((c def c (c (? . 7) q unsafe-string->immutable-string!)) q (527861 . 4)) ((c form c (c (? . 69) q ->dm)) q (206442 . 6)) ((c def c (c (? . 74) q blame-add-missing-party)) q (247659 . 5)) ((c def c (c (? . 0) q current-error-message-adjuster)) q (285252 . 5)) ((c def c (c (? . 28) q udp-receive!-evt)) q (495666 . 9)) ((c def c (c (? . 0) q file-or-directory-type)) q (472016 . 5)) ((c def c (c (? . 30) q string-append*)) q (53410 . 4)) ((c def c (c (? . 7) q unsafe-char>=?)) q (524391 . 4)) ((c def c (c (? . 18) q sandbox-gui-available)) q (449585 . 4)) ((c form c (c (? . 12) q match-λ**)) q (267352 . 2)) ((c def c (c (? . 19) q vector-memq)) q (117228 . 4)) ((c def c (c (? . 0) q portal-syntax?)) q (337162 . 3)) ((c def c (c (? . 3) q procedure-reduce-arity)) q (180118 . 9)) ((c def c (c (? . 23) q import-source)) c (? . 40)) ((c def c (c (? . 24) q correlated-line)) q (462666 . 3)) ((c form c (c (? . 22) q for/mutable-setalw)) q (170589 . 2)) ((c form c (c (? . 69) q ->*m)) q (206321 . 2)) ((c def c (c (? . 66) q listen-port-number?)) q (489929 . 2)) ((c def c (c (? . 0) q module-compiled-submodules)) q (421692 . 13)) ((c form c (c (? . 12) q match-let-values)) q (267489 . 2)) ((c def c (c (? . 0) q explode-path)) q (468386 . 4)) ((c def c (c (? . 10) q list-contract?)) q (258853 . 3)) ((c form c (c (? . 10) q with-collapsible-contract-continuation-mark)) q (261375 . 2)) ((c def c (c (? . 78) q build-flat-contract-property)) q (248527 . 42)) ((c def c (c (? . 7) q unsafe-fllog)) q (522943 . 3)) ((c def c (c (? . 0) q choice-evt)) q (297254 . 3)) ((c form c (c (? . 3) q relative-in)) q (4849 . 2)) ((c def c (c (? . 31) q dict-value-contract)) q (162708 . 3)) ((c def c (c (? . 0) q exn:fail:contract:divide-by-zero?)) c (? . 125)) ((c def c (c (? . 19) q vector-map!)) q (115061 . 4)) ((c def c (c (? . 31) q dict-map/copy)) q (161601 . 4)) ((c def c (c (? . 0) q char-extended-pictographic?)) q (75123 . 3)) ((c def c (c (? . 0) q prop:set!-transformer)) q (322647 . 2)) ((c def c (c (? . 22) q set-subtract!)) q (174071 . 4)) ((c form c (c (? . 5) q override)) q (199305 . 2)) ((c def c (c (? . 0) q object-name)) q (443684 . 3)) ((c def c (c (? . 0) q namespace-attach-module)) q (409095 . 7)) ((c def c (c (? . 35) q fsemaphore-count)) q (304455 . 3)) ((c def c (c (? . 49) q impersonator-prop:collapsible)) q (263367 . 2)) ((c def c (c (? . 66) q tcp-port?)) q (489841 . 3)) ((c def c (c (? . 49) q merge)) q (261564 . 6)) ((c def c (c (? . 10) q contract-name)) q (258913 . 3)) ((c def c (c (? . 37) q pretty-print-newline)) q (397992 . 4)) ((c form c (c (? . 27) q define-values/invoke-unit/infer)) q (217821 . 18)) ((c def c (c (? . 3) q exn)) c (? . 106)) ((c def c (c (? . 3) q exn:fail:syntax)) c (? . 68)) ((c def c (c (? . 0) q module-declared?)) q (424319 . 5)) ((c def c (c (? . 52) q stream-add-between)) q (157871 . 4)) ((c def c (c (? . 32) q shared-flvector)) q (39790 . 3)) ((c def c (c (? . 53) q mutable-treelist-snapshot)) q (137658 . 5)) ((c form c (c (? . 15) q for/fxvector)) q (43243 . 2)) ((c def c (c (? . 0) q stencil-vector-mask-width)) q (119281 . 2)) ((c def c (c (? . 3) q exn:break:hang-up)) c (? . 82)) ((c def c (c (? . 37) q pretty-print-extend-style-table)) q (397479 . 8)) ((c def c (c (? . 3) q make-exn:fail)) c (? . 126)) ((c def c (c (? . 45) q export-out-id)) c (? . 67)) ((c form c (c (? . 26) q struct-guard/c)) q (236854 . 2)) ((c def c (c (? . 7) q unsafe-set-mcar!)) q (524756 . 4)) ((c def c (c (? . 0) q semaphore-peek-evt?)) q (299366 . 3)) ((c def c (c (? . 32) q fl*)) q (35928 . 3)) ((c def c (c (? . 17) q syntax/c)) q (225871 . 3)) ((c def c (c (? . 18) q set-eval-limits)) q (453302 . 5)) ((c form c (c (? . 2) q prompt0)) q (290194 . 2)) ((c def c (c (? . 31) q dict-keys)) q (162158 . 3)) ((c def c (c (? . 0) q expand-syntax-once)) q (339889 . 4)) ((c def c (c (? . 0) q exn:fail:read:non-char?)) c (? . 127)) ((c def c (c (? . 7) q unsafe-vector*-ref)) q (526585 . 4)) ((c def c (c (? . 7) q unsafe-unbox)) q (525437 . 3)) ((c def c (c (? . 66) q tcp-accept/enable-break)) q (489066 . 3)) ((c def c (c (? . 0) q file-or-directory-stat)) q (473589 . 5)) ((c def c (c (? . 0) q modulo)) q (25798 . 4)) ((c def c (c (? . 16) q treelist-member?)) q (133772 . 5)) ((c def c (c (? . 7) q unsafe-s16vector-set!)) q (529629 . 5)) ((c def c (c (? . 28) q udp-send-to-evt)) q (494878 . 13)) ((c def c (c (? . 74) q blame-missing-party?)) q (247592 . 3)) ((c def c (c (? . 45) q provide-pre-transformer?)) q (335969 . 3)) ((c def c (c (? . 91) q flat-contract-property?)) q (257866 . 3)) ((c def c (c (? . 7) q unsafe-extfl<)) q (541079 . 4)) ((c def c (c (? . 0) q current-module-declare-source)) q (419625 . 5)) ((c def c (c (? . 0) q syntax-local-value)) q (328655 . 9)) ((c def c (c (? . 15) q fx->fl)) q (42074 . 3)) ((c def c (c (? . 7) q unsafe-fxpopcount16)) q (520111 . 3)) ((c form c (c (? . 128) q define-syntax-parameter)) q (337383 . 2)) ((c form c (c (? . 3) q for-label)) q (7156 . 2)) ((c def c (c (? . 24) q correlated-position)) q (462871 . 3)) ((c def c (c (? . 19) q vector-take-right)) q (115364 . 4)) ((c def c (c (? . 31) q dict->list)) q (162276 . 3)) ((c def c (c (? . 0) q bytes-convert)) q (71377 . 21)) ((c def c (c (? . 31) q dict-key-contract)) q (162644 . 3)) ((c def c (c (? . 0) q hashalw)) q (121736 . 5)) ((c def c (c (? . 87) q mutable-box?)) q (23529 . 3)) ((c def c (c (? . 10) q coerce-chaperone-contract)) q (244964 . 4)) ((c form c (c (? . 5) q define/private)) q (200917 . 3)) ((c def c (c (? . 0) q gensym)) q (76375 . 3)) ((c def c (c (? . 0) q log-message)) q (505753 . 13)) ((c def c (c (? . 0) q call-in-continuation)) q (288285 . 4)) ((c def c (c (? . 37) q pretty-print-abbreviate-read-macros)) q (397085 . 4)) ((c def c (c (? . 7) q unsafe-fx*/wraparound)) q (520397 . 4)) ((c def c (c (? . 17) q if/c)) q (260702 . 5)) ((c form c (c (? . 5) q define-serializable-class)) q (210287 . 3)) ((c def c (c (? . 0) q read-byte-or-special)) q (381674 . 8)) ((c def c (c (? . 19) q vector-drop)) q (115476 . 4)) ((c def c (c (? . 3) q impersonate-procedure)) q (426202 . 11)) ((c def c (c (? . 66) q tcp-abandon-port)) q (489470 . 3)) ((c form c (c (? . 3) q prefix-in)) q (4708 . 2)) ((c form c (c (? . 3) q protect-out)) q (6781 . 2)) ((c form c (c (? . 27) q link)) q (215538 . 2)) ((c def c (c (? . 0) q string<?)) q (50762 . 4)) ((c def c (c (? . 0) q regexp-match-peek-positions-immediate/end)) q (90630 . 22)) ((c def c (c (? . 5) q class->interface)) q (211060 . 3)) ((c def c (c (? . 22) q set-add)) q (172511 . 4)) ((c def c (c (? . 0) q make-ephemeron-hashalw)) q (123459 . 4)) ((c def c (c (? . 0) q cdddr)) q (101005 . 3)) ((c def c (c (? . 13) q last-pair)) q (103718 . 3)) ((c def c (c (? . 0) q date-day)) c (? . 29)) ((c form c (c (? . 3) q define)) q (13535 . 14)) ((c def c (c (? . 0) q string)) q (48930 . 3)) ((c def c (c (? . 0) q integer-bytes->integer)) q (32474 . 11)) ((c def c (c (? . 0) q free-transformer-identifier=?)) q (317525 . 4)) ((c def c (c (? . 44) q generate-temporary)) q (343614 . 3)) ((c def c (c (? . 31) q make-custom-hash-types)) q (163332 . 24)) ((c def c (c (? . 7) q unsafe-weak-hash-iterate-key+value)) q (537105 . 5)) ((c def c (c (? . 3) q make-exn:fail:network)) c (? . 103)) ((c def c (c (? . 53) q mutable-treelist-set!)) q (138777 . 5)) ((c def c (c (? . 3) q regexp-match-positions*)) q (81659 . 17)) ((c def c (c (? . 36) q identity)) q (183646 . 3)) ((c form c (c (? . 99) q quasisyntax)) q (309940 . 2)) ((c def c (c (? . 22) q mutable-seteqv)) q (168195 . 4)) ((c form c (c (? . 5) q define/overment)) q (200489 . 3)) ((c def c (c (? . 49) q struct:collapsible-property)) c (? . 90)) ((c def c (c (? . 0) q struct:exn:fail:read:eof)) c (? . 95)) ((c def c (c (? . 0) q raise-range-error*)) q (272616 . 19)) ((c def c (c (? . 53) q treelist-copy)) q (137494 . 3)) ((c def c (c (? . 35) q would-be-future)) q (303825 . 3)) ((c def c (c (? . 0) q current-custodian)) q (440884 . 4)) ((c def c (c (? . 0) q struct-type-info)) q (442877 . 11)) ((c def c (c (? . 0) q make-portal-syntax)) q (337222 . 3)) ((c def c (c (? . 0) q global-port-print-handler)) q (394843 . 6)) ((c def c (c (? . 0) q cddar)) q (100923 . 3)) ((c def c (c (? . 11) q extflexp)) q (45616 . 3)) ((c def c (c (? . 5) q interface->method-names)) q (211674 . 3)) ((c def c (c (? . 0) q null?)) q (94824 . 3)) ((c def c (c (? . 0) q list->bytes)) q (67578 . 3)) ((c def c (c (? . 0) q exn:missing-module-accessor)) q (284354 . 4)) ((c def c (c (? . 7) q unsafe-fx->fl)) q (523818 . 3)) ((q def ((lib "racket/unsafe/struct-type-property.rkt") unsafe-make-struct-type-property/guard-calls-no-arguments)) q (544736 . 20)) ((c def c (c (? . 32) q in-flvector)) q (39221 . 6)) ((c form c (c (? . 39) q syntax-id-rules)) q (311777 . 3)) ((c def c (c (? . 20) q true)) q (22754 . 2)) ((c def c (c (? . 59) q sinh)) q (34853 . 3)) ((c form c (c (? . 3) q #%printing-module-begin)) q (1772 . 2)) ((c form c (c (? . 20) q nor)) q (23037 . 2)) ((c def c (c (? . 0) q relative-path?)) q (467053 . 3)) ((c def c (c (? . 0) q exn:fail:read:eof?)) c (? . 95)) ((c form c (c (? . 27) q open)) q (215207 . 2)) ((c form c (c (? . 2) q reset0)) q (290223 . 2)) ((c def c (c (? . 0) q port-count-lines-enabled)) q (347634 . 4)) ((c def c (c (? . 0) q thread-cell-set!)) q (301909 . 4)) ((c def c (c (? . 7) q unsafe-flfloor)) q (522174 . 3)) ((c def c (c (? . 0) q identifier-binding-symbol)) q (321079 . 6)) ((c def c (c (? . 11) q make-extflvector)) q (46439 . 4)) ((c def c (c (? . 0) q hash-remove)) q (126474 . 4)) ((c form c (c (? . 58) q make-generic-struct-type-property)) q (192908 . 5)) ((c def c (c (? . 10) q contract-val-first-projection)) q (259456 . 4)) ((c def c (c (? . 0) q exn:fail:syntax:unbound?)) c (? . 129)) ((c form c (c (? . 39) q ~?)) q (309875 . 2)) ((c form c (c (? . 27) q define-values/invoke-unit)) q (215761 . 9)) ((c form c (c (? . 3) q case-λ)) q (11755 . 6)) ((c form c (c (? . 27) q contracted)) q (215282 . 2)) ((c def c (c (? . 53) q mutable-treelist->vector)) q (139941 . 3)) ((c def c (c (? . 73) q ormap)) q (96300 . 4)) ((c form c (c (? . 43) q infinite-generator)) q (158444 . 2)) ((c form c (c (? . 22) q for/setalw)) q (170161 . 2)) ((c def c (c (? . 22) q weak-set)) q (168399 . 3)) ((c def c (c (? . 7) q unsafe-char<=?)) q (524307 . 4)) ((c def c (c (? . 0) q exn:missing-module?)) q (284289 . 3)) ((c def c (c (? . 0) q compiled-expression-summarize-target-machine)) q (416856 . 3)) ((c def c (c (? . 45) q export-out-sym)) q (336281 . 3)) ((c def c (c (? . 10) q impersonator-prop:blame)) q (248470 . 2)) ((c def c (c (? . 64) q system*)) q (500650 . 13)) ((c form c (c (? . 3) q for*/hasheqv)) q (17337 . 2)) ((c def c (c (? . 0) q make-known-char-range-list)) q (75347 . 5)) ((c def c (c (? . 32) q flexp)) q (37452 . 3)) ((c def c (c (? . 4) q write-to-file)) q (478423 . 11)) ((c def c (c (? . 74) q exn:fail:contract:blame?)) c (? . 109)) ((c def c (c (? . 31) q dict-implements?)) q (158850 . 4)) ((c def c (c (? . 0) q make-input-port)) q (355289 . 50)) ((c def c (c (? . 16) q treelist-add)) q (131983 . 4)) ((c def c (c (? . 3) q parallel-thread-pool?)) q (296507 . 3)) ((c def c (c (? . 0) q string-locale-downcase)) q (52911 . 3)) ((c def c (c (? . 1) q read-bytes-line-evt)) q (373326 . 5)) ((c def c (c (? . 0) q free-label-identifier=?)) q (317758 . 4)) ((c form c (c (? . 55) q with-contract)) q (236898 . 12)) ((c form c (c (? . 0) q #%stratified-body)) q (19977 . 2)) ((c def c (c (? . 0) q caddr)) q (100677 . 3)) ((c def c (c (? . 7) q unsafe-stencil-vector-set!)) q (530567 . 5)) ((c def c (c (? . 0) q regexp-capture-group-count)) q (78136 . 4)) ((c def c (c (? . 79) q phase+space?)) q (344349 . 3)) ((c def c (c (? . 0) q namespace-require)) q (408193 . 5)) ((c def c (c (? . 9) q findf)) q (98956 . 7)) ((c form c (c (? . 0) q module)) q (1587 . 2)) ((c form c (c (? . 27) q define-compound-unit)) q (217289 . 5)) ((c form c (c (? . 33) q delay/sync)) q (285936 . 2)) ((c def c (c (? . 3) q call-with-output-file*)) q (351210 . 18)) ((c def c (c (? . 3) q make-exn:fail:syntax:unbound)) c (? . 129)) ((c def c (c (? . 16) q treelist->list)) q (133252 . 3)) ((c def c (c (? . 0) q hash-set!)) q (124509 . 5)) ((c def c (c (? . 22) q set-eq?)) q (167415 . 3)) ((c def c (c (? . 53) q in-mutable-treelist)) q (141233 . 3)) ((c def c (c (? . 0) q list->string)) q (50456 . 3)) ((c def c (c (? . 0) q break-enabled)) q (293814 . 4)) ((c form c (c (? . 5) q send-generic)) q (203736 . 3)) ((c def c (c (? . 0) q struct:exn:fail:network:errno)) c (? . 124)) ((c def c (c (? . 7) q unsafe-f64vector-ref)) q (529304 . 4)) ((c def c (c (? . 7) q unsafe-set-mcdr!)) q (524835 . 4)) ((c def c (c (? . 22) q chaperone-hash-set)) q (175971 . 21)) ((c def c (c (? . 0) q path<?)) q (465926 . 4)) ((c def c (c (? . 0) q gcd)) q (26129 . 3)) ((c def c (c (? . 32) q fltruncate)) q (36818 . 3)) ((c def c (c (? . 7) q unsafe-f64vector-set!)) q (529399 . 5)) ((c form c (c (? . 5) q public-final*)) q (199859 . 2)) ((c def c (c (? . 66) q tcp-addresses)) q (489547 . 7)) ((c def c (c (? . 18) q exn:fail:resource?)) c (? . 132)) ((c def c (c (? . 18) q sandbox-eval-limits)) q (451280 . 8)) ((c form c (c (? . 130) q opt/c)) q (260052 . 5)) ((c form c (c (? . 3) q file)) q (5270 . 2)) ((c def c (c (? . 0) q exn:fail:network?)) c (? . 103)) ((c def c (c (? . 7) q unsafe-fxlshift)) q (519657 . 4)) ((c def c (c (? . 31) q dict-set!)) q (159480 . 5)) ((c def c (c (? . 3) q chaperone-procedure)) q (432373 . 11)) ((c def c (c (? . 0) q compile)) q (416354 . 3)) ((c def c (c (? . 0) q rename-transformer-target)) q (322858 . 3)) ((c form c (c (? . 0) q #%expression)) q (10939 . 2)) ((c def c (c (? . 28) q udp-set-ttl!)) q (496298 . 4)) ((c def c (c (? . 131) q bytes-join)) q (72962 . 4)) ((c def c (c (? . 1) q copy-port)) q (375115 . 4)) ((c def c (c (? . 19) q vector-filter)) q (116444 . 4)) ((c def c (c (? . 21) q sequence-for-each)) q (153647 . 4)) ((c def c (c (? . 3) q make-exn:fail:contract:arity)) c (? . 105)) ((c def c (c (? . 0) q bitwise-bit-field)) q (28867 . 6)) ((c def c (c (? . 3) q exn:fail:syntax:unbound)) c (? . 129)) ((c def c (c (? . 0) q port-count-lines!)) q (346947 . 3)) ((c def c (c (? . 0) q cdaar)) q (100759 . 3)) ((c form c (c (? . 0) q with-continuation-mark)) q (19717 . 2)) ((c def c (c (? . 0) q list->vector)) q (113697 . 3)) ((c def c (c (? . 52) q stream?)) q (155826 . 3)) ((c def c (c (? . 4) q call-with-file-lock/timeout)) q (486037 . 15)) ((c def c (c (? . 0) q peek-bytes-avail!)) q (379396 . 14)) ((c form c (c (? . 3) q define-splicing-for-clause-syntax)) q (19405 . 2)) ((c def c (c (? . 18) q exn:fail:resource-resource)) c (? . 132)) ((c def c (c (? . 4) q make-handle-get-preference-locked)) q (485270 . 16)) ((c def c (c (? . 0) q module-compiled-indirect-exports)) q (422805 . 4)) ((c def c (c (? . 11) q extflvector)) q (46368 . 3)) ((c def c (c (? . 0) q make-channel)) q (298444 . 2)) ((c def c (c (? . 142) q make-constructor-style-printer)) q (194145 . 6)) ((c def c (c (? . 74) q blame-replaced-negative?)) q (247418 . 3)) ((c def c (c (? . 54) q path-element?)) q (470694 . 3)) ((c def c (c (? . 0) q namespace-syntax-introduce)) q (410524 . 4)) ((c def c (c (? . 49) q collapsible-count-property)) c (? . 123)) ((c form c (c (? . 56) q splicing-local)) q (337964 . 2)) ((c def c (c (? . 16) q treelist-drop)) q (132571 . 4)) ((c def c (c (? . 46) q load-relative-extension)) q (413926 . 3)) ((c def c (c (? . 66) q tcp-accept-evt)) q (489392 . 3)) ((c def c (c (? . 0) q rename-file-or-directory)) q (472258 . 7)) ((c def c (c (? . 19) q vector-split-at-right)) q (115813 . 4)) ((c form c (c (? . 69) q object-contract)) q (207554 . 51)) ((c def c (c (? . 0) q exn:srclocs?)) q (283629 . 3)) ((c def c (c (? . 7) q unsafe-char->integer)) q (524475 . 3)) ((c def c (c (? . 21) q sequence-fold)) q (153746 . 5)) ((c def c (c (? . 24) q variable-reference->instance)) q (462305 . 6)) ((c def c (c (? . 0) q module-compiled-exports)) q (422495 . 7)) ((c def c (c (? . 59) q natural?)) q (35743 . 3)) ((c def c (c (? . 0) q prop:arity-string)) q (182853 . 2)) ((c def c (c (? . 0) q memory-order-acquire)) q (307194 . 2)) ((c def c (c (? . 0) q sync/enable-break)) q (297031 . 3)) ((c form c (c (? . 133) q case/eqv)) q (13489 . 2)) ((c def c (c (? . 0) q peek-bytes!)) q (378901 . 12)) ((c def c (c (? . 0) q regexp-match-peek)) q (83454 . 15)) ((c def c (c (? . 0) q caadar)) q (101287 . 3)) ((c def c (c (? . 0) q current-subprocess-keep-file-descriptors)) q (499939 . 5)) ((c def c (c (? . 7) q unsafe-struct*-type)) q (531729 . 3)) ((c def c (c (? . 0) q current-subprocess-custodian-mode)) q (499649 . 5)) ((c def c (c (? . 18) q sandbox-path-permissions)) q (450054 . 9)) ((c def c (c (? . 53) q mutable-treelist-copy)) q (137568 . 3)) ((c form c (c (? . 27) q define-unit-binding)) q (217571 . 6)) ((c def c (c (? . 15) q fxvector-length)) q (42485 . 3)) ((c def c (c (? . 0) q will-executor?)) q (517910 . 3)) ((c def c (c (? . 0) q make-sibling-inspector)) q (442385 . 3)) ((c def c (c (? . 37) q pretty-print-depth)) q (396522 . 4)) ((c def c (c (? . 17) q between/c)) q (222822 . 4)) ((c form c (c (? . 3) q for*/hasheq)) q (17271 . 2)) ((c def c (c (? . 49) q collapsible-count-property?)) c (? . 123)) ((c def c (c (? . 3) q in-mlist)) q (144410 . 3)) ((c def c (c (? . 3) q in-hash-values)) q (146158 . 6)) ((c form c (c (? . 134) q filtered-out)) q (10844 . 2)) ((c def c (c (? . 0) q expand)) q (339483 . 4)) ((c def c (c (? . 3) q in-cycle)) q (150933 . 3)) ((c def c (c (? . 0) q exn:fail:filesystem:missing-module-path)) c (? . 94)) ((c def c (c (? . 10) q value-contract)) q (258973 . 3)) ((c def c (c (? . 10) q contract-first-order)) q (258522 . 3)) ((c def c (c (? . 59) q sgn)) q (34703 . 3)) ((c form c (c (? . 3) q #%module-begin)) q (1737 . 2)) ((c form c (c (? . 38) q or)) q (13184 . 2)) ((c def c (c (? . 7) q unsafe-extflmax)) q (541525 . 4)) ((c def c (c (? . 0) q make-phantom-bytes)) q (518654 . 3)) ((c def c (c (? . 0) q port-waiting-peer?)) q (345985 . 3)) ((c form c (c (? . 5) q define/pubment)) q (200237 . 3)) ((c def c (c (? . 22) q set-implements?)) q (171584 . 4)) ((c form c (c (? . 12) q match-λ*)) q (267282 . 2)) ((c def c (c (? . 7) q unsafe-fx+/wraparound)) q (520211 . 4)) ((c def c (c (? . 3) q exn:fail:filesystem:version)) c (? . 113)) ((c def c (c (? . 59) q conjugate)) q (34797 . 3)) ((c def c (c (? . 0) q byte-pregexp)) q (77378 . 6)) ((c form c (c (? . 5) q rename-inner)) q (199754 . 2)) ((c def c (c (? . 7) q unsafe-mutable-hash-iterate-value)) q (532532 . 5)) ((c def c (c (? . 0) q identifier-transformer-binding)) q (318760 . 15)) ((c def c (c (? . 7) q unsafe-immutable-hash-iterate-value)) q (534718 . 5)) ((c def c (c (? . 18) q call-in-sandbox-context)) q (454526 . 7)) ((c def c (c (? . 0) q plumber-flush-handle-remove!)) q (444426 . 3)) ((c def c (c (? . 0) q exn:fail:syntax:missing-module-path)) c (? . 104)) ((c form c (c (? . 3) q only-space-in)) q (4956 . 2)) ((c def c (c (? . 7) q unsafe-set-immutable-car!)) q (525263 . 4)) ((c def c (c (? . 0) q make-struct-field-mutator)) q (188458 . 12)) ((c def c (c (? . 31) q in-dict)) q (162335 . 3)) ((c def c (c (? . 0) q unbox)) q (120611 . 3)) ((c def c (c (? . 4) q copy-directory/files)) q (479460 . 11)) ((c def c (c (? . 0) q string-locale>?)) q (52421 . 4)) ((c def c (c (? . 0) q list*)) q (95213 . 7)) ((c form c (c (? . 26) q unconstrained-domain->)) q (235042 . 2)) ((c def c (c (? . 0) q system-type)) q (513751 . 6)) ((c def c (c (? . 0) q syntax-local-submodules)) q (330672 . 2)) ((c def c (c (? . 0) q cdadar)) q (102087 . 3)) ((c def c (c (? . 7) q unsafe-fxand)) q (519406 . 3)) ((c def c (c (? . 46) q call-with-default-reading-parameterization)) q (390237 . 3)) ((c def c (c (? . 16) q treelist-take-right)) q (132677 . 4)) ((c def c (c (? . 18) q make-evaluator)) c (? . 135)) ((c def c (c (? . 85) q hash-filter)) q (130900 . 4)) ((c def c (c (? . 49) q has-impersonator-prop:collapsible?)) q (263430 . 3)) ((c def c (c (? . 4) q make-lock-file-name)) q (486812 . 6)) ((c def c (c (? . 28) q udp-send/enable-break)) q (492612 . 9)) ((c def c (c (? . 24) q instance?)) q (460636 . 3)) ((c def c (c (? . 13) q take)) q (104787 . 7)) ((c form c (c (? . 136) q enter!)) q (549503 . 9)) ((c def c (c (? . 0) q evt?)) q (296784 . 3)) ((c def c (c (? . 7) q unsafe-flbit-field)) q (522424 . 5)) ((c def c (c (? . 52) q prop:stream)) q (158113 . 2)) ((c def c (c (? . 1) q filter-read-input-port)) q (370832 . 27)) ((c def c (c (? . 13) q count)) q (109088 . 4)) ((c def c (c (? . 0) q regexp?)) q (76655 . 3)) ((c def c (c (? . 0) q log-level?)) q (506218 . 5)) ((c form c (c (? . 3) q define-syntax)) q (13868 . 3)) ((c def c (c (? . 0) q cadr)) q (100239 . 3)) ((c def c (c (? . 19) q vector-sort)) q (117330 . 13)) ((c def c (c (? . 8) q place?)) q (304590 . 3)) ((c def c (c (? . 32) q fl+)) q (35797 . 3)) ((c def c (c (? . 37) q make-tentative-pretty-print-output-port)) q (399551 . 8)) ((c def c (c (? . 0) q hash-eq?)) q (121366 . 3)) ((c def c (c (? . 53) q mutable-treelist)) q (137293 . 3)) ((c def c (c (? . 52) q stream-length)) q (156740 . 3)) ((c def c (c (? . 7) q unsafe-ephemeron-hash-iterate-key+value)) q (539177 . 5)) ((c def c (c (? . 117) q vector/c)) q (224045 . 8)) ((c def c (c (? . 36) q curryr)) q (184235 . 6)) ((c def c (c (? . 0) q caar)) q (100175 . 3)) ((c def c (c (? . 0) q make-placeholder)) q (111258 . 3)) ((c def c (c (? . 0) q syntax-track-origin)) q (338658 . 7)) ((c def c (c (? . 0) q string->bytes/latin-1)) q (69563 . 9)) ((c def c (c (? . 0) q peek-string!)) q (378401 . 12)) ((c form c (c (? . 88) q define-serializable-struct/versions)) q (403548 . 4)) ((c def c (c (? . 10) q impersonator-contract?)) q (258725 . 3)) ((c def c (c (? . 0) q current-load-relative-directory)) q (414640 . 5)) ((c def c (c (? . 64) q string-no-nuls?)) q (504830 . 3)) ((c def c (c (? . 3) q call-with-input-file)) q (349673 . 7)) ((c def c (c (? . 3) q hash-copy-clear)) q (126778 . 4)) ((c def c (c (? . 5) q writable<%>)) q (210448 . 2)) ((c def c (c (? . 0) q symbol-interned?)) q (75955 . 3)) ((c def c (c (? . 0) q negative?)) q (24679 . 3)) ((c def c (c (? . 0) q output-port?)) q (345157 . 3)) ((c def c (c (? . 0) q syntax-local-transforming-module-provides?)) q (332488 . 2)) ((c def c (c (? . 59) q negative-integer?)) q (35548 . 3)) ((c def c (c (? . 0) q read-installation-configuration-table)) q (549110 . 3)) ((c def c (c (? . 37) q pretty-print)) q (395383 . 9)) ((c def c (c (? . 0) q read-bytes!)) q (376495 . 7)) ((c form c (c (? . 2) q control0-at)) q (290414 . 2)) ((c def c (c (? . 0) q write-special-evt)) q (386757 . 4)) ((c def c (c (? . 31) q dict-clear!)) q (162098 . 3)) ((c def c (c (? . 137) q getpid)) q (517294 . 2)) ((c def c (c (? . 1) q port->lines)) q (360642 . 8)) ((c def c (c (? . 24) q recompile-linklet)) q (457176 . 28)) ((c def c (c (? . 31) q dict-ref)) q (159276 . 6)) ((c def c (c (? . 52) q stream->list)) q (156683 . 3)) ((c form c (c (? . 34) q trace-define)) q (550280 . 3)) ((c def c (c (? . 45) q struct:export)) c (? . 67)) ((c def c (c (? . 0) q port-file-identity)) q (353581 . 3)) ((c def c (c (? . 13) q last)) q (103667 . 3)) ((c def c (c (? . 0) q struct:exn:fail:filesystem:exists)) c (? . 116)) ((c def c (c (? . 34) q trace-call)) q (550707 . 5)) ((c def c (c (? . 16) q treelist-delete)) q (132152 . 4)) ((c def c (c (? . 24) q instance-set-variable-value!)) q (461632 . 9)) ((c def c (c (? . 138) q crypto-random-bytes)) q (30793 . 3)) ((c def c (c (? . 0) q struct:exn:fail:syntax:unbound)) c (? . 129)) ((c def c (c (? . 0) q date?)) c (? . 29)) ((c def c (c (? . 0) q raise-user-error)) q (269220 . 10)) ((c def c (c (? . 49) q build-collapsible-contract-property)) q (261973 . 15)) ((c def c (c (? . 0) q write-bytes)) q (384666 . 7)) ((c def c (c (? . 0) q thread/suspend-to-kill)) q (295031 . 3)) ((c def c (c (? . 16) q treelist-sort)) q (134358 . 9)) ((c def c (c (? . 62) q make-struct-info)) q (194708 . 3)) ((c def c (c (? . 7) q unsafe-stencil-vector-ref)) q (530441 . 4)) ((c form c (c (? . 3) q all-from-out)) q (6532 . 2)) ((c def c (c (? . 15) q fx*/wraparound)) q (41278 . 4)) ((c def c (c (? . 7) q unsafe-chaperone-procedure)) q (543459 . 11)) ((c def c (c (? . 0) q bitwise-first-bit-set)) q (28785 . 3)) ((c def c (c (? . 7) q unsafe-string-ref)) q (527574 . 5)) ((c def c (c (? . 0) q current-namespace)) q (406594 . 4)) ((c def c (c (? . 17) q flat-contract)) q (228675 . 3)) ((c def c (c (? . 32) q fl>)) q (36265 . 4)) ((c def c (c (? . 0) q thread-cell-values?)) q (302185 . 3)) ((c def c (c (? . 3) q exn:fail:filesystem)) c (? . 114)) ((c def c (c (? . 0) q inspector-superior?)) q (442502 . 5)) ((c def c (c (? . 0) q inexact?)) q (24895 . 3)) ((c def c (c (? . 5) q object=-hash-code)) q (210883 . 3)) ((c def c (c (? . 16) q treelist-index-of)) q (134025 . 6)) ((c def c (c (? . 0) q char-alphabetic?)) q (74386 . 3)) ((c def c (c (? . 3) q in-indexed)) q (150796 . 3)) ((c def c (c (? . 12) q exn:misc:match?)) q (267828 . 3)) ((c def c (c (? . 0) q syntax?)) q (312015 . 3)) ((c def c (c (? . 5) q struct:exn:fail:object)) c (? . 42)) ((c def c (c (? . 7) q unsafe-vector*-set!)) q (526702 . 5)) ((c def c (c (? . 23) q import-mode)) c (? . 70)) ((c def c (c (? . 0) q byte-pregexp?)) q (76820 . 3)) ((c def c (c (? . 28) q udp-send-to/enable-break)) q (492090 . 13)) ((c form c (c (? . 27) q unit/s)) q (218857 . 6)) ((c def c (c (? . 32) q flreal-part)) q (37975 . 5)) ((c def c (c (? . 0) q regexp-match-peek-positions-immediate)) q (85735 . 19)) ((c def c (c (? . 0) q box-cas!)) q (120976 . 5)) ((c def c (c (? . 32) q flrandom)) q (38355 . 3)) ((c def c (c (? . 8) q place-enabled?)) q (304549 . 2)) ((c def c (c (? . 24) q instance-name)) q (461142 . 3)) ((c def c (c (? . 49) q collapsible-guard)) q (261761 . 5)) ((c def c (c (? . 0) q impersonator?)) q (425780 . 3)) ((c def c (c (? . 0) q port-provides-progress-evts?)) q (383445 . 3)) ((c def c (c (? . 3) q prop:procedure)) q (182630 . 2)) ((c def c (c (? . 28) q udp-close)) q (494452 . 3)) ((c def c (c (? . 0) q vector-set!)) q (112834 . 5)) ((c def c (c (? . 21) q empty-sequence)) q (152900 . 2)) ((c def c (c (? . 0) q exn:fail:unsupported?)) c (? . 139)) ((c def c (c (? . 0) q load-on-demand-enabled)) q (417934 . 4)) ((c def c (c (? . 77) q hash-code-combine*)) q (22343 . 4)) ((c form c (c (? . 76) q invariant-assertion)) q (238174 . 2)) ((c def c (c (? . 22) q set-equal-always?)) q (167298 . 3)) ((c def c (c (? . 18) q sandbox-memory-limit)) q (451143 . 4)) ((c def c (c (? . 0) q current-load/use-compiled)) q (414003 . 13)) ((c def c (c (? . 14) q contract-random-generate-stash)) q (266076 . 5)) ((c def c (c (? . 83) q serializable?)) q (401523 . 3)) ((c def c (c (? . 121) q prop:chaperone-unsafe-undefined)) q (546163 . 2)) ((c form c (c (? . 3) q for*/and)) q (17471 . 2)) ((c def c (c (? . 43) q generator-state)) q (158585 . 3)) ((c def c (c (? . 0) q syntax-local-module-interned-scope-symbols)) q (330731 . 3)) ((c def c (c (? . 64) q system/exit-code)) q (501198 . 5)) ((c def c (c (? . 0) q bytes->string/utf-8)) q (68102 . 6)) ((c form c (c (? . 33) q for*/list/concurrent)) q (286505 . 3)) ((c form c (c (? . 3) q for/list)) q (15327 . 2)) ((c def c (c (? . 15) q fx*)) q (40115 . 3)) ((c form c (c (? . 5) q private)) q (199542 . 2)) ((c def c (c (? . 26) q the-unsupplied-arg)) q (235123 . 2)) ((c form c (c (? . 10) q define/subexpression-pos-prop)) q (258071 . 6)) ((c form c (c (? . 5) q with-method)) q (203176 . 3)) ((c def c (c (? . 0) q struct-type-property-predicate-procedure?)) q (190074 . 5)) ((c form c (c (? . 5) q abstract)) q (199568 . 2)) ((c def c (c (? . 15) q fxmax)) q (41996 . 4)) ((c def c (c (? . 83) q serialize)) q (401582 . 16)) ((c def c (c (? . 31) q in-dict-keys)) q (162395 . 3)) ((c def c (c (? . 53) q mutable-treelist-sort!)) q (140796 . 9)) ((c def c (c (? . 0) q real->floating-point-bytes)) q (33914 . 12)) ((c def c (c (? . 3) q make-exn:fail:read:non-char)) c (? . 127)) ((c form c (c (? . 128) q define-rename-transformer-parameter)) q (337491 . 2)) ((c def c (c (? . 3) q make-do-sequence)) q (151553 . 15)) ((c def c (c (? . 7) q unsafe-flabs)) q (521462 . 3)) ((c def c (c (? . 0) q make-plumber)) q (443956 . 2)) ((c def c (c (? . 13) q split-at-right)) q (106217 . 7)) ((c def c (c (? . 1) q port->bytes-lines)) q (360986 . 8)) ((c def c (c (? . 138) q random-sample)) q (31040 . 10)) ((c def c (c (? . 22) q set)) q (167631 . 3)) ((c def c (c (? . 0) q srcloc-position)) c (? . 110)) ((c def c (c (? . 28) q udp-receive!)) q (492970 . 11)) ((c def c (c (? . 0) q make-hash)) q (122145 . 4)) ((c def c (c (? . 3) q make-exn:fail:syntax)) c (? . 68)) ((c form c (c (? . 5) q set-field!)) q (203386 . 2)) ((c def c (c (? . 3) q regexp-match*)) q (79071 . 20)) ((c def c (c (? . 0) q custom-print-quotable?)) q (401405 . 2)) ((c def c (c (? . 0) q parameter?)) q (303103 . 3)) ((c def c (c (? . 0) q channel-put-evt)) q (298679 . 4)) ((c def c (c (? . 87) q mutable-hash?)) q (23647 . 3)) ((c def c (c (? . 3) q make-exn:fail:network:errno)) c (? . 124)) ((c def c (c (? . 0) q struct:exn:fail:user)) c (? . 86)) ((c def c (c (? . 30) q string-split)) q (54594 . 9)) ((c def c (c (? . 0) q peek-bytes-avail!/enable-break)) q (380654 . 14)) ((c def c (c (? . 0) q syntax-local-module-defined-identifiers)) q (332557 . 3)) ((c form c (c (? . 17) q prompt-tag/c)) q (228089 . 8)) ((c def c (c (? . 53) q mutable-treelist-first)) q (138156 . 3)) ((c def c (c (? . 0) q caadr)) q (100513 . 3)) ((c def c (c (? . 16) q treelist-drop-right)) q (132789 . 4)) ((c def c (c (? . 0) q cdadr)) q (100841 . 3)) ((c def c (c (? . 7) q unsafe-fx->extfl)) q (542611 . 3)) ((c def c (c (? . 1) q read-string!-evt)) q (373037 . 4)) ((c def c (c (? . 7) q unsafe-extfl>)) q (541167 . 4)) ((c def c (c (? . 7) q unsafe-mutable-hash-iterate-pair)) q (533533 . 4)) ((c def c (c (? . 10) q build-compound-type-name)) q (244697 . 3)) ((c def c (c (? . 13) q shuffle)) q (109758 . 3)) ((c def c (c (? . 0) q bytes-convert-end)) q (72219 . 13)) ((c form c (c (? . 3) q for/and)) q (15899 . 2)) ((c form c (c (? . 58) q generic-instance/c)) q (191282 . 4)) ((c form c (c (? . 22) q gen:set)) q (172411 . 2)) ((c def c (c (? . 0) q syntax-shift-phase-level)) q (315847 . 4)) ((c def c (c (? . 3) q call-with-input-file*)) q (350919 . 7)) ((c def c (c (? . 17) q promise/c)) q (228615 . 3)) ((c def c (c (? . 3) q directory-list)) q (475495 . 4)) ((c def c (c (? . 32) q flvector-length)) q (38703 . 3)) ((c def c (c (? . 52) q stream-append)) q (157108 . 3)) ((c def c (c (? . 23) q expand-import)) q (333113 . 4)) ((c def c (c (? . 26) q first-or/c)) q (222300 . 3)) ((c def c (c (? . 34) q current-trace-print-results)) q (551412 . 10)) ((c def c (c (? . 0) q plumber?)) q (443902 . 3)) ((c def c (c (? . 0) q string>=?)) q (51045 . 4)) ((c def c (c (? . 12) q legacy-match-expander?)) q (268179 . 3)) ((c def c (c (? . 24) q correlated->datum)) q (463143 . 3)) ((c form c (c (? . 5) q interface*)) q (195792 . 11)) ((c def c (c (? . 0) q readtable?)) q (400171 . 3)) ((c def c (c (? . 0) q read-accept-compiled)) q (388880 . 4)) ((c form c (c (? . 133) q case/equal-always)) q (13389 . 2)) ((c def c (c (? . 13) q second)) q (102915 . 3)) ((c form c (c (? . 12) q struct*)) q (268653 . 2)) ((c def c (c (? . 3) q exn:fail:read:non-char)) c (? . 127)) ((c form c (c (? . 25) q define-runtime-module-path-index)) q (476395 . 2)) ((c def c (c (? . 0) q equal?/recur)) q (21125 . 5)) ((c def c (c (? . 0) q equal?)) q (20823 . 4)) ((c def c (c (? . 61) q ~a)) q (55802 . 25)) ((c def c (c (? . 43) q generator?)) q (158216 . 3)) ((c def c (c (? . 0) q channel?)) q (298390 . 3)) ((c def c (c (? . 1) q read-bytes-evt)) q (372580 . 4)) ((c def c (c (? . 0) q string-normalize-nfd)) q (51908 . 3)) ((c def c (c (? . 7) q unsafe-fx+)) q (518886 . 3)) ((c form c (c (? . 3) q for/first)) q (16324 . 2)) ((c def c (c (? . 0) q cddaar)) q (102287 . 3)) ((c def c (c (? . 31) q dict-implements/c)) q (158942 . 3)) ((c def c (c (? . 23) q make-import)) c (? . 70)) ((c form c (c (? . 3) q for/hasheqv)) q (15767 . 2)) ((c def c (c (? . 10) q get/build-collapsible-late-neg-projection)) q (261142 . 4)) ((c def c (c (? . 32) q flvector?)) q (38468 . 3)) ((c def c (c (? . 3) q make-exn:fail:unsupported)) c (? . 139)) ((c form c (c (? . 140) q struct/dc)) q (225989 . 27)) ((c def c (c (? . 0) q sub1)) q (25926 . 3)) ((c def c (c (? . 5) q object%)) q (196196 . 2)) ((c form c (c (? . 3) q for/hashalw)) q (15833 . 2)) ((c form c (c (? . 5) q super)) q (201131 . 3)) ((q form ((lib "racket/surrogate.rkt") surrogate)) q (213245 . 11)) ((c def c (c (? . 19) q vector*-copy)) q (118558 . 5)) ((c def c (c (? . 0) q print-pair-curly-braces)) q (392168 . 4)) ((c def c (c (? . 0) q make-hasheqv)) q (122437 . 4)) ((c def c (c (? . 0) q will-register)) q (517970 . 5)) ((c def c (c (? . 0) q current-directory-for-user)) q (475025 . 4)) ((c form c (c (? . 12) q match-lambda**)) q (267314 . 2)) ((c def c (c (? . 0) q exit-handler)) q (294344 . 4)) ((c def c (c (? . 0) q make-continuation-mark-key)) q (293341 . 4)) ((c def c (c (? . 16) q in-treelist)) q (134755 . 3)) ((c def c (c (? . 0) q string->number)) q (31585 . 19)) ((c def c (c (? . 0) q current-seconds)) q (508584 . 2)) ((c def c (c (? . 0) q char-symbolic?)) q (74723 . 3)) ((c form c (c (? . 107) q include-at/relative-to)) q (341379 . 2)) ((c def c (c (? . 22) q set-clear)) q (173406 . 3)) ((c def c (c (? . 8) q place-break)) q (305842 . 4)) ((c def c (c (? . 0) q struct:exn:fail)) c (? . 126)) ((c def c (c (? . 28) q udp-receive-ready-evt)) q (494798 . 3)) ((c def c (c (? . 0) q chaperone-vector*)) q (434488 . 14)) ((c def c (c (? . 3) q make-exn:fail:contract:divide-by-zero)) c (? . 125)) ((c def c (c (? . 0) q real->single-flonum)) q (25073 . 3)) ((c def c (c (? . 0) q expand-syntax-to-top-form)) q (340169 . 4)) ((c def c (c (? . 9) q sort)) q (97714 . 9)) ((c def c (c (? . 3) q make-arity-at-least)) c (? . 72)) ((c def c (c (? . 3) q exn:fail:out-of-memory)) c (? . 102)) ((c form c (c (? . 56) q splicing-let-values)) q (337750 . 2)) ((c def c (c (? . 3) q print-value-columns)) q (393464 . 5)) ((c def c (c (? . 3) q in-ephemeron-hash)) q (149368 . 3)) ((c def c (c (? . 0) q log-all-levels)) q (506505 . 5)) ((c form c (c (? . 38) q and)) q (13160 . 2)) ((c def c (c (? . 0) q date-week-day)) c (? . 29)) ((c def c (c (? . 3) q make-date*)) c (? . 97)) ((c def c (c (? . 0) q port-write-handler)) q (394168 . 6)) ((c def c (c (? . 0) q make-log-receiver)) q (507205 . 5)) ((c def c (c (? . 0) q variable-reference-constant?)) q (410940 . 3)) ((c def c (c (? . 8) q place-channel-get)) q (306128 . 3)) ((c def c (c (? . 52) q stream-filter)) q (157771 . 4)) ((c def c (c (? . 13) q ninth)) q (103284 . 3)) ((c def c (c (? . 15) q fxvector)) q (42307 . 3)) ((c def c (c (? . 22) q weak-seteq)) q (168696 . 3)) ((c def c (c (? . 0) q exn:fail:network:errno?)) c (? . 124)) ((c def c (c (? . 0) q hash-ref-key)) q (125288 . 7)) ((c def c (c (? . 0) q current-module-name-resolver)) q (418850 . 19)) ((c def c (c (? . 0) q thread-try-receive)) q (296356 . 2)) ((c def c (c (? . 0) q module-compiled-language-info)) q (422989 . 4)) ((c def c (c (? . 0) q syntax-span)) q (312466 . 3)) ((c def c (c (? . 7) q unsafe-ephemeron-hash-iterate-first)) q (537949 . 3)) ((c def c (c (? . 22) q set-add!)) q (172596 . 4)) ((c def c (c (? . 11) q in-extflvector)) q (47122 . 6)) ((c def c (c (? . 0) q char>=?)) q (73816 . 4)) ((c def c (c (? . 7) q unsafe-fxxor)) q (519534 . 3)) ((c def c (c (? . 31) q dict-set)) q (159610 . 5)) ((c form c (c (? . 22) q for*/weak-setalw)) q (171271 . 2)) ((c def c (c (? . 0) q primitive?)) q (183439 . 3)) ((c def c (c (? . 3) q exn:fail:read)) c (? . 111)) ((c def c (c (? . 18) q sandbox-make-plumber)) q (452504 . 4)) ((c def c (c (? . 7) q unsafe-bytes-set!)) q (528124 . 5)) ((c def c (c (? . 0) q seconds->date)) q (508746 . 4)) ((c def c (c (? . 0) q make-immutable-hash)) q (123931 . 4)) ((c def c (c (? . 0) q chaperone-evt)) q (437159 . 7)) ((c def c (c (? . 52) q empty-stream)) q (156652 . 2)) ((c def c (c (? . 22) q set-implements/c)) q (171684 . 3)) ((c def c (c (? . 15) q fxvector-copy)) q (42812 . 5)) ((c def c (c (? . 0) q variable-reference->namespace)) q (411145 . 3)) ((c def c (c (? . 0) q syntax-local-bind-syntaxes)) q (327188 . 12)) ((c def c (c (? . 92) q engine?)) q (306905 . 3)) ((c def c (c (? . 0) q integer-sqrt/remainder)) q (27302 . 3)) ((c def c (c (? . 0) q impersonator-prop:application-mark)) q (439601 . 2)) ((c form c (c (? . 3) q for/fold/derived)) q (18106 . 4)) ((c def c (c (? . 0) q thread-dead?)) q (295747 . 3)) ((c form c (c (? . 38) q =>)) q (13150 . 2)) ((q form ((lib "racket/deprecation.rkt") define-deprecated-alias)) q (464410 . 2)) ((c def c (c (? . 0) q current-eval)) q (412107 . 4)) ((c def c (c (? . 74) q blame-value)) q (247037 . 3)) ((c def c (c (? . 0) q error-display-handler)) q (277468 . 4)) ((c def c (c (? . 45) q export-mode)) c (? . 67)) ((c def c (c (? . 0) q srcloc-span)) c (? . 110)) ((c def c (c (? . 0) q time-apply)) q (509957 . 7)) ((c def c (c (? . 0) q system-path-convention-type)) q (466125 . 2)) ((c def c (c (? . 1) q call-with-output-bytes)) q (361711 . 3)) ((c def c (c (? . 0) q thread-suspend)) q (295240 . 3)) ((c def c (c (? . 3) q make-exn:fail:filesystem:missing-module)) c (? . 94)) ((c def c (c (? . 46) q load/cd)) q (413246 . 3)) ((c def c (c (? . 0) q syntax-local-value/immediate)) q (329049 . 9)) ((c def c (c (? . 0) q syntax-local-make-definition-context)) q (326230 . 6)) ((c def c (c (? . 11) q extfllog)) q (45555 . 3)) ((c def c (c (? . 21) q sequence-append)) q (153280 . 3)) ((c def c (c (? . 5) q object-or-false=?)) q (210773 . 4)) ((c def c (c (? . 49) q struct:collapsible-wrapper-property)) c (? . 141)) ((c def c (c (? . 0) q srcloc-column)) c (? . 110)) ((c def c (c (? . 62) q struct-field-info?)) q (195297 . 3)) ((c def c (c (? . 18) q call-with-limits)) q (454819 . 5)) ((c def c (c (? . 0) q syntax-debug-info)) q (316627 . 5)) ((c def c (c (? . 31) q dict-map)) q (161485 . 4)) ((c def c (c (? . 0) q replace-evt)) q (297794 . 4)) ((c def c (c (? . 0) q struct-type-property?)) q (189921 . 3)) ((c def c (c (? . 7) q unsafe-vector*-copy)) q (527026 . 5)) ((c def c (c (? . 0) q string->bytes/utf-8)) q (69070 . 6)) ((c form c (c (? . 2) q %)) q (289665 . 4)) ((c def c (c (? . 7) q unsafe-set-box!)) q (525491 . 4)) ((c def c (c (? . 85) q hash-filter-keys)) q (131004 . 4)) ((c form c (c (? . 3) q define-struct)) q (186124 . 6)) ((c def c (c (? . 98) q unit-static-signatures)) q (220613 . 9)) ((c def c (c (? . 0) q raise-result-arity-error*)) q (275564 . 11)) ((c def c (c (? . 3) q make-exn:fail:filesystem:version)) c (? . 113)) ((c def c (c (? . 32) q flatan)) q (37347 . 3)) ((c def c (c (? . 24) q correlated-source)) q (462596 . 3)) ((c def c (c (? . 0) q syntax-local-lift-values-expression)) q (329552 . 5)) ((c def c (c (? . 0) q use-collection-link-paths)) q (548996 . 4)) ((c form c (c (? . 3) q lambda)) q (11248 . 2)) ((c def c (c (? . 0) q struct:exn:fail:read)) c (? . 111)) ((c def c (c (? . 0) q module-path-index-split)) q (420645 . 5)) ((c def c (c (? . 0) q cdddar)) q (102487 . 3)) ((c def c (c (? . 17) q any/c)) q (222163 . 2)) ((c def c (c (? . 0) q char-ready?)) q (383824 . 3)) ((c form c (c (? . 48) q trait-rename)) q (205170 . 2)) ((c def c (c (? . 5) q member-name-key?)) q (201471 . 3)) ((c def c (c (? . 74) q blame?)) q (245776 . 3)) ((c def c (c (? . 79) q space?)) q (344297 . 3)) ((c def c (c (? . 15) q make-shared-fxvector)) q (43641 . 4)) ((c def c (c (? . 15) q fxvector?)) q (42252 . 3)) ((c def c (c (? . 9) q foldl)) q (96477 . 5)) ((c def c (c (? . 74) q blame-source)) q (247092 . 3)) ((c def c (c (? . 7) q unsafe-unbox*)) q (525567 . 3)) ((c def c (c (? . 0) q compile-allow-set!-undefined)) q (417166 . 4)) ((c form c (c (? . 56) q splicing-let)) q (337707 . 2)) ((c def c (c (? . 0) q char-grapheme-step)) q (75794 . 4)) ((c def c (c (? . 0) q struct-predicate-procedure?)) q (193412 . 3)) ((c def c (c (? . 22) q weak-setalw)) q (168494 . 4)) ((c def c (c (? . 3) q for-clause-syntax-protect)) q (19329 . 3)) ((c def c (c (? . 0) q path->string)) q (465083 . 3)) ((c def c (c (? . 7) q unsafe-immutable-hash-iterate-first)) q (533973 . 3)) ((c form c (c (? . 22) q for/weak-seteqv)) q (170992 . 2)) ((c def c (c (? . 16) q treelist-ref)) q (131622 . 4)) ((c def c (c (? . 3) q member)) q (98076 . 9)) ((c def c (c (? . 0) q local-expand/capture-lifts)) q (324241 . 13)) ((c def c (c (? . 3) q in-sequences)) q (150861 . 3)) ((c def c (c (? . 2) q abort)) q (289614 . 3)) ((c def c (c (? . 49) q collapsible-leaf/c-blame-list)) c (? . 50)) ((c form c (c (? . 69) q ->m)) q (206291 . 2)) ((c def c (c (? . 26) q non-empty-listof)) q (224873 . 3)) ((c def c (c (? . 0) q bytes-converter?)) q (72753 . 3)) ((c def c (c (? . 17) q suggest/c)) q (229041 . 5)) ((c def c (c (? . 0) q current-drive)) q (475172 . 2)) ((c def c (c (? . 18) q sandbox-coverage-enabled)) q (448885 . 4)) ((c def c (c (? . 0) q syntax-line)) q (312187 . 3)) ((c def c (c (? . 142) q struct->list)) q (194425 . 4)) ((c def c (c (? . 7) q unsafe-ephemeron-hash-iterate-value)) q (538714 . 5)) ((c def c (c (? . 0) q syntax-property-remove)) q (338356 . 4)) ((c def c (c (? . 0) q internal-definition-context-binding-identifiers)) q (327722 . 4)) ((c def c (c (? . 0) q read-curly-brace-with-tag)) q (388672 . 4)) ((c def c (c (? . 41) q date->julian/scalinger)) q (511929 . 3)) ((c def c (c (? . 0) q logger-name)) q (505429 . 3)) ((c def c (c (? . 0) q quotient/remainder)) q (25699 . 4)) ((c def c (c (? . 21) q sequence-map)) q (153351 . 4)) ((c def c (c (? . 0) q regexp-match-positions)) q (80680 . 19)) ((c def c (c (? . 0) q get-output-string)) q (354687 . 3)) ((c def c (c (? . 3) q hash->list)) q (127518 . 4)) ((c def c (c (? . 0) q make-ephemeron)) q (517561 . 4)) ((c def c (c (? . 10) q coerce-contracts)) q (244856 . 4)) ((c def c (c (? . 0) q current-load)) q (412542 . 15)) ((c def c (c (? . 0) q byte-regexp?)) q (76762 . 3)) ((c def c (c (? . 17) q parameter/c)) q (227061 . 7)) ((c def c (c (? . 0) q vector-set-performance-stats!)) q (514671 . 5)) ((c def c (c (? . 28) q udp-receive!/enable-break)) q (493842 . 12)) ((c def c (c (? . 37) q pretty-write)) q (395727 . 5)) ((c def c (c (? . 0) q exit)) q (294290 . 3)) ((c form c (c (? . 3) q for*/last)) q (17791 . 2)) ((c def c (c (? . 0) q parameter-procedure=?)) q (303159 . 4)) ((c def c (c (? . 0) q executable-yield-handler)) q (294461 . 4)) ((c def c (c (? . 8) q place-location?)) q (306434 . 3)) ((c def c (c (? . 3) q stop-before)) q (151342 . 4)) ((c form c (c (? . 122) q multi-in)) q (10644 . 8)) ((c def c (c (? . 15) q fxremainder)) q (40248 . 4)) ((c def c (c (? . 28) q udp-connected?)) q (494644 . 3)) ((c def c (c (? . 0) q stencil-vector)) q (119351 . 4)) ((c def c (c (? . 7) q unsafe-bytes-copy!)) q (528261 . 11)) ((c def c (c (? . 0) q custom-write-accessor)) q (401214 . 4)) ((c def c (c (? . 0) q string-ci<=?)) q (51334 . 4)) ((c def c (c (? . 59) q order-of-magnitude)) q (35279 . 3)) ((c def c (c (? . 7) q unsafe-extfl-)) q (540653 . 4)) ((q def ((lib "racket/rerequire.rkt") dynamic-rerequire)) q (550032 . 5)) ((c def c (c (? . 9) q assoc)) q (99122 . 9)) ((c def c (c (? . 0) q date*-time-zone-name)) c (? . 97)) ((c def c (c (? . 53) q impersonate-mutable-treelist)) q (142693 . 25)) ((c def c (c (? . 0) q struct-type-make-constructor)) q (443359 . 6)) ((c def c (c (? . 0) q print-struct)) q (392572 . 4)) ((c def c (c (? . 0) q will-execute)) q (518108 . 3)) ((c def c (c (? . 3) q syntax-recertify)) q (316363 . 9)) ((c def c (c (? . 0) q identifier-binding-portal-syntax)) q (321319 . 7)) ((c def c (c (? . 66) q tcp-listener?)) q (489333 . 3)) ((c def c (c (? . 0) q hash-placeholder?)) q (111486 . 3)) ((c def c (c (? . 0) q bytes->immutable-bytes)) q (66191 . 3)) ((c def c (c (? . 0) q string?)) q (48763 . 3)) ((c def c (c (? . 4) q set-user-id-bit)) q (487361 . 2)) ((c def c (c (? . 0) q vector*-set!)) q (113241 . 5)) ((c def c (c (? . 32) q flvector)) q (38523 . 3)) ((c def c (c (? . 0) q struct:exn:fail:unsupported)) c (? . 139)) ((c def c (c (? . 7) q unsafe-extflmin)) q (541433 . 4)) ((c def c (c (? . 3) q exn:fail:contract:divide-by-zero)) c (? . 125)) ((c def c (c (? . 143) q syntax-parameter-value)) q (337546 . 3)) ((c def c (c (? . 0) q sync/timeout/enable-break)) q (297097 . 4)) ((c def c (c (? . 11) q extfl+)) q (43959 . 4)) ((c def c (c (? . 0) q cleanse-path)) q (467676 . 3)) ((c def c (c (? . 0) q date*-nanosecond)) c (? . 97)) ((c def c (c (? . 2) q fcontrol)) q (289747 . 4)) ((c def c (c (? . 0) q syntax-local-expand-expression)) q (323517 . 6)) ((c def c (c (? . 49) q collapsible-contract-property?)) q (261897 . 3)) ((c def c (c (? . 34) q current-prefix-in)) q (551830 . 4)) ((c def c (c (? . 62) q checked-struct-info?)) q (194642 . 3)) ((c def c (c (? . 3) q chaperone-procedure*)) q (432738 . 11)) ((c form c (c (? . 33) q for/list/concurrent)) q (286308 . 8)) ((c def c (c (? . 0) q immutable?)) q (22698 . 3)) ((c def c (c (? . 28) q udp-multicast-join-group!)) q (496460 . 7)) ((c def c (c (? . 0) q current-command-line-arguments)) q (514333 . 5)) ((c def c (c (? . 33) q promise-running?)) q (285722 . 3)) ((c def c (c (? . 31) q dict-for-each)) q (161729 . 4)) ((c def c (c (? . 4) q make-temporary-file*)) q (482542 . 10)) ((c def c (c (? . 0) q close-input-port)) q (345266 . 3)) ((c def c (c (? . 0) q eof)) q (346055 . 2)) ((c def c (c (? . 0) q make-struct-type)) q (186552 . 31)) ((c def c (c (? . 7) q unsafe-fxmax)) q (521087 . 4)) ((c form c (c (? . 3) q for-syntax)) q (7076 . 2)) ((c def c (c (? . 15) q fxpopcount32)) q (40916 . 3)) ((c def c (c (? . 0) q error)) q (268957 . 10)) ((c def c (c (? . 28) q udp-multicast-set-interface!)) q (497072 . 5)) ((c def c (c (? . 24) q eval-linklet)) q (458459 . 3)) ((c def c (c (? . 4) q find-files)) q (480166 . 11)) ((c def c (c (? . 17) q natural-number/c)) q (223291 . 2)) ((c def c (c (? . 79) q phase+space)) q (344407 . 4)) ((c def c (c (? . 0) q not)) q (22649 . 3)) ((c def c (c (? . 31) q dict-has-key?)) q (160320 . 4)) ((c def c (c (? . 7) q unsafe-extflasin)) q (542106 . 3)) ((c def c (c (? . 7) q unsafe-fl/)) q (521379 . 4)) ((c def c (c (? . 1) q with-output-to-string)) q (361805 . 3)) ((c form c (c (? . 76) q contract)) q (238704 . 9)) ((c def c (c (? . 0) q resolve-path)) q (467608 . 3)) ((c def c (c (? . 9) q remq)) q (97143 . 4)) ((c def c (c (? . 0) q syntax-local-compiling-module?)) q (331425 . 2)) ((c def c (c (? . 0) q locale-string-encoding)) q (72815 . 2)) ((c def c (c (? . 26) q integer-in)) q (222980 . 4)) ((c def c (c (? . 7) q unsafe-extflabs)) q (540923 . 3)) ((c def c (c (? . 0) q current-thread-group)) q (442099 . 4)) ((c form c (c (? . 5) q instantiate)) q (201892 . 2)) ((c def c (c (? . 18) q break-evaluator)) q (453121 . 3)) ((c def c (c (? . 83) q make-serialize-info)) q (404012 . 13)) ((c def c (c (? . 0) q print-mpair-curly-braces)) q (392278 . 4)) ((c def c (c (? . 0) q boolean?)) q (22595 . 3)) ((c def c (c (? . 121) q check-not-unsafe-undefined/assign)) q (545986 . 4)) ((c def c (c (? . 49) q collapsible-ho/c?)) c (? . 60)) ((c def c (c (? . 52) q stream-first)) q (155940 . 3)) ((c def c (c (? . 0) q datum->syntax)) q (312993 . 20)) ((c def c (c (? . 0) q srcloc-line)) c (? . 110)) ((c form c (c (? . 5) q field-bound?)) q (203551 . 2)) ((c def c (c (? . 0) q current-logger)) q (505509 . 4)) ((c def c (c (? . 24) q datum->correlated)) q (463228 . 16)) ((c def c (c (? . 3) q open-output-file)) q (348048 . 15)) ((c def c (c (? . 0) q collect-garbage)) q (518283 . 3)) ((c def c (c (? . 31) q dict-iterate-value)) q (160232 . 4)) ((c def c (c (? . 0) q make-pseudo-random-generator)) q (29941 . 2)) ((c def c (c (? . 0) q string-ci<?)) q (51237 . 4)) ((c def c (c (? . 0) q make-semaphore)) q (298890 . 3)) ((c def c (c (? . 87) q mutable-string?)) q (23159 . 3)) ((c form c (c (? . 0) q #%provide)) q (9155 . 31)) ((c def c (c (? . 0) q compiled-expression-recompile)) q (416523 . 3)) ((c def c (c (? . 0) q path?)) q (464706 . 3)) ((c def c (c (? . 13) q empty?)) q (102760 . 3)) ((c def c (c (? . 0) q exn:break:terminate?)) c (? . 112)) ((c def c (c (? . 146) q slice-by)) q (111030 . 4)) ((c def c (c (? . 4) q group-read-bit)) q (487646 . 2)) ((c def c (c (? . 11) q extflfloor)) q (44992 . 3)) ((c def c (c (? . 1) q read-bytes!-evt)) q (372684 . 4)) ((c def c (c (? . 32) q flmin)) q (36498 . 4)) ((c def c (c (? . 11) q extflatan)) q (45493 . 3)) ((c def c (c (? . 0) q exn-continuation-marks)) c (? . 106)) ((c def c (c (? . 5) q dynamic-instantiate)) q (201970 . 5)) ((c def c (c (? . 85) q hash-union!)) q (129893 . 11)) ((c def c (c (? . 0) q raise)) q (268869 . 4)) ((c def c (c (? . 0) q internal-definition-context?)) q (326156 . 3)) ((c def c (c (? . 0) q chaperone-box)) q (435056 . 12)) ((c def c (c (? . 0) q call-with-semaphore)) q (299431 . 9)) ((c def c (c (? . 0) q chaperone-struct)) q (433108 . 19)) ((c def c (c (? . 0) q vector-ref)) q (112731 . 4)) ((c def c (c (? . 16) q list->treelist)) q (133384 . 3)) ((c def c (c (? . 11) q extflmin)) q (44759 . 4)) ((c def c (c (? . 3) q make-exn:fail:filesystem)) c (? . 114)) ((c form c (c (? . 3) q for-template)) q (7115 . 2)) ((c form c (c (? . 53) q for*/mutable-treelist)) q (141402 . 2)) ((c def c (c (? . 0) q char-utf-8-length)) q (73368 . 3)) ((c def c (c (? . 0) q string->path)) q (464882 . 3)) ((c def c (c (? . 0) q write-bytes-avail-evt)) q (386377 . 9)) ((c def c (c (? . 52) q stream-fold)) q (157550 . 5)) ((c form c (c (? . 25) q runtime-paths)) q (476569 . 2)) ((c form c (c (? . 58) q impersonate-generics)) q (191380 . 10)) ((c def c (c (? . 5) q subclass?)) q (211306 . 4)) ((c def c (c (? . 0) q bitwise-bit-set?)) q (28674 . 4)) ((c form c (c (? . 26) q cons/dc)) q (225152 . 8)) ((c def c (c (? . 0) q placeholder-get)) q (111419 . 3)) ((c form c (c (? . 144) q define-contract-struct)) q (235611 . 2)) ((c def c (c (? . 0) q namespace-set-variable-value!)) q (407425 . 11)) ((c def c (c (? . 31) q dict-mutable?)) q (159022 . 3)) ((c def c (c (? . 0) q syntax->datum)) q (312931 . 3)) ((c def c (c (? . 32) q flcos)) q (37137 . 3)) ((c def c (c (? . 0) q subprocess-wait)) q (499156 . 3)) ((c def c (c (? . 49) q collapsible-ho/c-missing-party)) c (? . 60)) ((c def c (c (? . 0) q make-hasheq-placeholder)) q (111645 . 3)) ((c def c (c (? . 22) q list->mutable-seteq)) q (169493 . 4)) ((c def c (c (? . 0) q impersonate-channel)) q (430442 . 13)) ((c def c (c (? . 4) q make-temporary-directory)) q (482300 . 6)) ((c def c (c (? . 21) q sequence/c)) q (154171 . 5)) ((c def c (c (? . 3) q regexp-replace-quote)) q (94230 . 5)) ((c def c (c (? . 0) q variable-reference->empty-namespace)) q (411038 . 3)) ((c def c (c (? . 3) q in-immutable-hash-pairs)) q (148257 . 3)) ((c def c (c (? . 3) q collection-path)) q (547699 . 8)) ((c def c (c (? . 0) q never-evt)) q (297939 . 2)) ((c def c (c (? . 3) q make-srcloc)) c (? . 110)) ((c def c (c (? . 83) q prop:serializable)) q (403962 . 2)) ((c def c (c (? . 0) q char-titlecase)) q (75669 . 3)) ((c def c (c (? . 28) q udp-multicast-set-loopback!)) q (497248 . 5)) ((c form c (c (? . 56) q splicing-parameterize)) q (337986 . 2)) ((c def c (c (? . 3) q in-list)) q (144354 . 3)) ((c def c (c (? . 18) q exn:fail:sandbox-terminated-reason)) c (? . 145)) ((c form c (c (? . 20) q nand)) q (23012 . 2)) ((c def c (c (? . 146) q windows)) q (110880 . 5)) ((c def c (c (? . 0) q read-string)) q (375858 . 4)) ((c def c (c (? . 0) q semaphore-try-wait?)) q (299123 . 3)) ((c def c (c (? . 0) q portal-syntax-content)) q (337298 . 3)) ((c def c (c (? . 0) q syntax-local-lift-provide)) q (330168 . 3)) ((c def c (c (? . 0) q string-ci=?)) q (51140 . 4)) ((c def c (c (? . 18) q sandbox-reader)) q (447407 . 4)) ((c def c (c (? . 5) q object->vector)) q (210947 . 4)) ((c def c (c (? . 0) q identifier-distinct-binding)) q (320256 . 20)) ((c def c (c (? . 0) q procedure-struct-type?)) q (182677 . 3)) ((c def c (c (? . 0) q equal-always-secondary-hash-code)) q (21870 . 3)) ((c def c (c (? . 119) q with-intercepted-logging)) q (507435 . 17)) ((c def c (c (? . 46) q path-replace-extension)) q (468532 . 4)) ((c def c (c (? . 3) q regexp-split)) q (91832 . 15)) ((c def c (c (? . 64) q process*)) q (502494 . 15)) ((c def c (c (? . 18) q get-user-custodian)) q (453210 . 3)) ((c def c (c (? . 3) q in-parallel-values)) q (151072 . 4)) ((c def c (c (? . 0) q error-escape-handler)) q (277357 . 4)) ((c def c (c (? . 0) q call-with-semaphore/enable-break)) q (299755 . 9)) ((c def c (c (? . 15) q fxabs)) q (40403 . 3)) ((c form c (c (? . 27) q compound-unit)) q (216052 . 12)) ((c def c (c (? . 46) q putenv)) q (513549 . 4)) ((c form c (c (? . 55) q define/contract)) q (237358 . 3)) ((c def c (c (? . 0) q current-get-interaction-evt)) q (415763 . 4)) ((c def c (c (? . 17) q not/c)) q (222455 . 3)) ((c def c (c (? . 22) q make-custom-set-types)) q (177398 . 25)) ((c def c (c (? . 7) q unsafe-vector*->immutable-vector!)) q (527368 . 4)) ((c def c (c (? . 0) q make-custodian)) q (440583 . 4)) ((c def c (c (? . 3) q hash-empty?)) q (127963 . 3)) ((c def c (c (? . 36) q const)) q (183697 . 3)) ((c form c (c (? . 5) q class)) q (198905 . 2)) ((c def c (c (? . 7) q unsafe-fxnot)) q (519598 . 3)) ((c def c (c (? . 17) q flat-contract-with-explanation)) q (221585 . 6)) ((c def c (c (? . 49) q collapsible-ho/c-latest-blame)) c (? . 60)) ((c def c (c (? . 7) q unsafe-immutable-hash-iterate-key+value)) q (535171 . 5)) ((c def c (c (? . 0) q regexp)) q (76879 . 6)) ((c def c (c (? . 15) q most-negative-fixnum)) q (43810 . 2)) ((c def c (c (? . 0) q thread-cell-ref)) q (301840 . 3)) ((c def c (c (? . 31) q dict-iter-contract)) q (162774 . 3)) ((c def c (c (? . 0) q compiled-module-expression?)) q (421176 . 3)) ((c def c (c (? . 18) q sandbox-make-logger)) q (452387 . 4)) ((c def c (c (? . 0) q syntax-transforming-module-expression?)) q (331360 . 2)) ((c def c (c (? . 0) q string->uninterned-symbol)) q (76223 . 3)) ((c def c (c (? . 0) q equal-always?/recur)) q (21267 . 5)) ((c def c (c (? . 66) q tcp-close)) q (489259 . 3)) ((c def c (c (? . 37) q pretty-print-style-table?)) q (397227 . 3)) ((c def c (c (? . 0) q module-path-index?)) q (420306 . 3)) ((c def c (c (? . 0) q eof-object?)) q (346081 . 3)) ((c def c (c (? . 147) q running-foldr)) q (96824 . 5)) ((c def c (c (? . 33) q promise?)) q (285493 . 3)) ((c def c (c (? . 0) q read-cdot)) q (389710 . 4)) ((c def c (c (? . 0) q cos)) q (27641 . 3)) ((c def c (c (? . 32) q flacos)) q (37294 . 3)) ((c def c (c (? . 3) q parallel-thread-pool-close)) q (296699 . 3)) ((c def c (c (? . 12) q match-expander?)) q (268118 . 3)) ((c def c (c (? . 108) q deprecated-alias)) q (464527 . 3)) ((c def c (c (? . 23) q import-src-mod-path)) c (? . 70)) ((c def c (c (? . 49) q collapsible-wrapper-property?)) c (? . 141)) ((c def c (c (? . 0) q procedure?)) q (178509 . 3)) ((c def c (c (? . 0) q variable-reference->module-path-index)) q (411382 . 4)) ((c def c (c (? . 0) q struct:date*)) c (? . 97)) ((c form c (c (? . 5) q define/public)) q (200159 . 3)) ((c def c (c (? . 0) q port-writes-atomic?)) q (386874 . 3)) ((c def c (c (? . 0) q write-special)) q (386136 . 4)) ((c def c (c (? . 3) q in-naturals)) q (144261 . 3)) ((c def c (c (? . 7) q unsafe-extflexpt)) q (542518 . 4)) ((c form c (c (? . 0) q quote-syntax)) q (19848 . 3)) ((c def c (c (? . 31) q dict-set*)) q (160549 . 5)) ((c def c (c (? . 121) q unsafe-undefined)) q (545859 . 2)) ((c def c (c (? . 0) q string->symbol)) q (76158 . 3)) ((c def c (c (? . 0) q exn:fail:read-srclocs)) c (? . 111)) ((c form c (c (? . 3) q combine-out)) q (6741 . 2)) ((c def c (c (? . 13) q list-set)) q (104022 . 5)) ((c form c (c (? . 22) q for/weak-seteq)) q (170937 . 2)) ((c def c (c (? . 0) q absolute-path?)) q (466947 . 3)) ((c def c (c (? . 0) q read-case-sensitive)) q (388216 . 4)) ((c def c (c (? . 0) q current-locale)) q (344977 . 4)) ((c def c (c (? . 37) q pretty-print-pre-print-hook)) q (399099 . 5)) ((c def c (c (? . 74) q blame-positive)) q (246863 . 3)) ((c def c (c (? . 0) q list-ref)) q (95570 . 7)) ((c form c (c (? . 27) q only)) q (215323 . 2)) ((c def c (c (? . 7) q unsafe-mutable-hash-iterate-next)) q (531936 . 4)) ((c def c (c (? . 23) q syntax-local-lift-require-top-level-form)) q (334697 . 4)) ((c form c (c (? . 56) q splicing-let-syntaxes)) q (337864 . 2)) ((c def c (c (? . 0) q bytes-set!)) q (66518 . 5)) ((c def c (c (? . 0) q atan)) q (27843 . 6)) ((c def c (c (? . 9) q memf)) q (98792 . 7)) ((c def c (c (? . 7) q unsafe-u16vector-ref)) q (529764 . 4)) ((c def c (c (? . 41) q date->string)) q (510227 . 4)) ((c def c (c (? . 0) q exn:fail:contract:variable?)) c (? . 96)) ((c def c (c (? . 54) q path-get-extension)) q (469555 . 3)) ((c def c (c (? . 0) q current-preserved-thread-cell-values)) q (301998 . 4)) ((c def c (c (? . 10) q prop:blame)) q (248427 . 2)) ((c form c (c (? . 5) q inherit/inner)) q (199675 . 2)) ((c def c (c (? . 0) q current-code-inspector)) q (443785 . 4)) ((c def c (c (? . 0) q eval-syntax)) q (412396 . 6)) ((c form c (c (? . 3) q for/or)) q (15961 . 2)) ((c def c (c (? . 5) q member-name-key-hash-code)) q (201653 . 3)) ((c form c (c (? . 56) q splicing-letrec-syntaxes+values)) q (337925 . 2)) ((c def c (c (? . 31) q dict-remove!)) q (159751 . 4)) ((c form c (c (? . 12) q match-define-values)) q (267775 . 2)) ((c form c (c (? . 27) q compound-unit/infer)) q (216565 . 18)) ((q def ((lib "racket/exn.rkt") exn->string)) q (284626 . 3)) ((c def c (c (? . 0) q current-environment-variables)) q (512175 . 4)) ((c def c (c (? . 24) q hash->linklet-bundle)) q (460260 . 3)) ((c def c (c (? . 49) q collapsible-leaf/c)) c (? . 50)) ((c form c (c (? . 148) q lazy-require)) q (20373 . 5)) ((c def c (c (? . 0) q char-iso-control?)) q (75054 . 3)) ((c form c (c (? . 5) q init-field)) q (199044 . 2)) ((c def c (c (? . 13) q fifteenth)) q (103611 . 3)) ((c def c (c (? . 0) q filesystem-change-evt-ready?)) q (475945 . 3)) ((c def c (c (? . 0) q current-reader-guard)) q (390332 . 4)) ((c def c (c (? . 61) q ~e)) q (59506 . 25)) ((c def c (c (? . 0) q continuation-mark-set->list)) q (291364 . 8)) ((c form c (c (? . 3) q only-meta-in)) q (4902 . 2)) ((c def c (c (? . 0) q string-downcase)) q (51691 . 3)) ((c def c (c (? . 21) q initiate-sequence)) q (154543 . 24)) ((c def c (c (? . 0) q date-hour)) c (? . 29)) ((c def c (c (? . 7) q unsafe-stencil-vector-mask)) q (530166 . 4)) ((c def c (c (? . 18) q sandbox-security-guard)) q (449862 . 5)) ((c form c (c (? . 2) q shift0)) q (290285 . 2)) ((c def c (c (? . 0) q struct:exn:fail:out-of-memory)) c (? . 102)) ((c def c (c (? . 0) q weak-box-value)) q (517393 . 4)) ((c def c (c (? . 0) q filesystem-root-list)) q (475647 . 2)) ((c def c (c (? . 19) q vector-member)) q (116954 . 5)) ((c def c (c (? . 20) q boolean=?)) q (22880 . 4)) ((c def c (c (? . 4) q make-temporary-file)) q (481702 . 13)) ((c def c (c (? . 11) q extflvector-set!)) q (46779 . 5)) ((c def c (c (? . 7) q unsafe-extfl*)) q (540743 . 4)) ((c form c (c (? . 5) q interface)) q (195455 . 9)) ((c def c (c (? . 0) q placeholder-set!)) q (111324 . 4)) ((c form c (c (? . 122) q subtract-in)) q (10507 . 2)) ((c def c (c (? . 7) q unsafe-fl+)) q (521172 . 3)) ((c form c (c (? . 3) q define-for-syntax)) q (13985 . 3)) ((c form c (c (? . 38) q unless)) q (14627 . 2)) ((c def c (c (? . 3) q exn:break)) c (? . 57)) ((c def c (c (? . 7) q unsafe-vector*-set/copy)) q (527177 . 5)) ((c form c (c (? . 3) q combine-in)) q (4810 . 2)) ((c def c (c (? . 0) q string-append)) q (50216 . 3)) ((c def c (c (? . 28) q udp-send-evt)) q (495345 . 9)) ((c form c (c (? . 3) q local-require)) q (5556 . 2)) ((c def c (c (? . 0) q null)) q (95089 . 2)) ((c def c (c (? . 87) q mutable-bytes?)) q (23283 . 3)) ((c def c (c (? . 0) q string-locale-ci>?)) q (52730 . 4)) ((c def c (c (? . 10) q coerce-chaperone-contracts)) q (245069 . 5)) ((c def c (c (? . 30) q string-contains?)) q (55515 . 4)) ((c def c (c (? . 0) q weak-box?)) q (517506 . 3)) ((c def c (c (? . 0) q make-resolved-module-path)) q (418109 . 7)) ((c def c (c (? . 8) q place-kill)) q (305788 . 3)) ((c form c (c (? . 22) q for/mutable-seteqv)) q (170530 . 2)) ((c form c (c (? . 3) q struct-copy)) q (192996 . 5)) ((c def c (c (? . 7) q unsafe-struct-set!)) q (531237 . 5)) ((c def c (c (? . 0) q variable-reference-from-unsafe?)) q (412006 . 3)) ((c form c (c (? . 6) q log-warning)) q (506928 . 3)) ((c def c (c (? . 3) q in-weak-hash-values)) q (148922 . 3)) ((c def c (c (? . 0) q syntax-local-name)) q (330276 . 2)) ((c def c (c (? . 46) q normal-case-path)) q (468038 . 3)) ((c def c (c (? . 0) q truncate)) q (26514 . 3)) ((c form c (c (? . 36) q thunk)) q (183809 . 2)) ((c def c (c (? . 20) q symbol=?)) q (22803 . 4)) ((c def c (c (? . 9) q remw*)) q (97635 . 4)) ((c def c (c (? . 4) q fold-files)) q (481052 . 12)) ((c def c (c (? . 7) q unsafe-fl>=)) q (521858 . 4)) ((c def c (c (? . 0) q read-accept-dot)) q (389510 . 4)) ((c def c (c (? . 0) q raise-arguments-error)) q (271276 . 10)) ((c def c (c (? . 0) q list-tail)) q (95758 . 7)) ((c def c (c (? . 4) q get-preference)) q (483892 . 18)) ((c def c (c (? . 24) q linklet-directory->hash)) q (460032 . 4)) ((c def c (c (? . 91) q chaperone-contract-property?)) q (257792 . 3)) ((c def c (c (? . 21) q sequence->list)) q (152935 . 3)) ((c def c (c (? . 48) q trait?)) q (204850 . 3)) ((c def c (c (? . 3) q hash-map/copy)) q (127084 . 5)) ((c form c (c (? . 122) q matching-identifiers-in)) q (10452 . 2)) ((c def c (c (? . 32) q make-flrectangular)) q (37760 . 7)) ((c def c (c (? . 3) q sequence-generate)) q (152680 . 3)) ((c form c (c (? . 2) q reset0-at)) q (290366 . 2)) ((c def c (c (? . 0) q channel-put-evt?)) q (298772 . 3)) ((c def c (c (? . 15) q fxmodulo)) q (40327 . 4)) ((c def c (c (? . 32) q flbit-field)) q (36930 . 5)) ((c form c (c (? . 3) q λ)) q (11288 . 11)) ((c def c (c (? . 0) q continuation-prompt-tag?)) q (288799 . 3)) ((c def c (c (? . 7) q unsafe-fxlshift/wraparound)) q (520486 . 4)) ((q form ((lib "racket/help.rkt") help)) q (549193 . 6)) ((c def c (c (? . 3) q gen:equal-mode+hash)) q (22093 . 2)) ((c def c (c (? . 79) q phase?)) q (344245 . 3)) ((c def c (c (? . 0) q log-receiver?)) q (507146 . 3)) ((c def c (c (? . 0) q hash-iterate-value)) q (128507 . 4)) ((c def c (c (? . 0) q thread-receive)) q (296318 . 2)) ((c def c (c (? . 0) q fixnum?)) q (24294 . 3)) ((c def c (c (? . 7) q unsafe-immutable-hash-iterate-key)) q (534275 . 5)) ((c def c (c (? . 7) q unsafe-fx>)) q (520748 . 4)) ((c def c (c (? . 7) q unsafe-chaperone-vector)) q (544272 . 11)) ((c def c (c (? . 0) q byte-ready?)) q (383732 . 3)) ((c def c (c (? . 0) q prop:expansion-contexts)) q (328599 . 2)) ((c form c (c (? . 8) q place*)) q (306526 . 9)) ((c def c (c (? . 22) q set-equal?)) q (167242 . 3)) ((c def c (c (? . 0) q printf)) q (391922 . 4)) ((c def c (c (? . 0) q struct-mutator-procedure?)) q (193557 . 3)) ((c def c (c (? . 0) q custodian-require-memory)) q (441164 . 7)) ((c form c (c (? . 12) q match-λ)) q (267215 . 2)) ((c def c (c (? . 35) q make-fsemaphore)) q (304083 . 3)) ((c def c (c (? . 61) q ~r)) q (60742 . 31)) ((c form c (c (? . 0) q case-lambda)) q (11706 . 2)) ((c def c (c (? . 30) q non-empty-string?)) q (55326 . 3)) ((c def c (c (? . 37) q pretty-print-print-line)) q (398116 . 15)) ((c form c (c (? . 22) q for/mutable-set)) q (170416 . 2)) ((c def c (c (? . 5) q implementation?)) q (211385 . 4)) ((c def c (c (? . 61) q ~.v)) q (63487 . 25)) ((c form c (c (? . 3) q except-in)) q (4666 . 2)) ((c form c (c (? . 3) q #%plain-lambda)) q (11881 . 2)) ((c def c (c (? . 23) q import-orig-stx)) c (? . 70)) ((c form c (c (? . 5) q generic)) q (203690 . 2)) ((c form c (c (? . 48) q trait-alias)) q (205125 . 2)) ((c def c (c (? . 7) q unsafe-flmax)) q (522028 . 4)) ((c def c (c (? . 0) q string->path-element)) q (465223 . 6)) ((c def c (c (? . 0) q abort-current-continuation)) q (287007 . 5)) ((c def c (c (? . 0) q current-thread-initial-stack-size)) q (514506 . 4)) ((c def c (c (? . 37) q pretty-print-post-print-hook)) q (399277 . 5)) ((c def c (c (? . 22) q set-symmetric-difference)) q (174171 . 4)) ((c def c (c (? . 46) q string-environment-variable-name?)) q (513672 . 3)) ((c def c (c (? . 4) q file->bytes-lines)) q (477590 . 8)) ((c def c (c (? . 37) q pretty-print-print-hook)) q (398907 . 5)) ((c def c (c (? . 3) q exn:fail:filesystem:missing-module)) c (? . 94)) ((c def c (c (? . 28) q udp-multicast-leave-group!)) q (496722 . 7)) ((c def c (c (? . 1) q open-input-nowhere)) q (366164 . 3)) ((c def c (c (? . 0) q chaperone-hash)) q (435492 . 22)) ((c def c (c (? . 28) q udp-set-receive-buffer-size!)) q (494276 . 5)) ((c def c (c (? . 24) q correlated-property-symbol-keys)) q (464324 . 3)) ((c def c (c (? . 53) q mutable-treelist-member?)) q (140511 . 5)) ((c def c (c (? . 3) q in-producer)) q (150544 . 7)) ((c def c (c (? . 24) q linklet-bundle?)) q (460199 . 3)) ((c def c (c (? . 31) q dict?)) q (158799 . 3)) ((c def c (c (? . 0) q write-char)) q (384063 . 4)) ((c def c (c (? . 87) q immutable-vector?)) q (23466 . 3)) ((c def c (c (? . 4) q fifo-type-bits)) q (487327 . 2)) ((c def c (c (? . 71) q async-channel?)) q (300131 . 3)) ((c def c (c (? . 32) q flvector-ref)) q (38790 . 4)) ((c def c (c (? . 0) q struct-type-authentic?)) q (443264 . 3)) ((c def c (c (? . 0) q char-foldcase)) q (75732 . 3)) ((c def c (c (? . 0) q char-ci<?)) q (74004 . 4)) ((c def c (c (? . 0) q compile-target-machine?)) q (417652 . 3)) ((c def c (c (? . 53) q mutable-treelist-ref)) q (138035 . 4)) ((c def c (c (? . 11) q extfl->fx)) q (46102 . 3)) ((c form c (c (? . 5) q pubment)) q (199226 . 2)) ((c def c (c (? . 6) q call-with-exception-handler)) q (276959 . 4)) ((c def c (c (? . 1) q relocate-output-port)) q (368774 . 13)) ((c def c (c (? . 22) q set/c)) q (171763 . 14)) ((c def c (c (? . 24) q instantiate-linklet)) q (458532 . 17)) ((c def c (c (? . 0) q make-weak-hash)) q (122719 . 4)) ((c def c (c (? . 7) q unsafe-set-box*!)) q (525655 . 4)) ((c def c (c (? . 7) q unsafe-extfllog)) q (542313 . 3)) ((c def c (c (? . 0) q string-locale=?)) q (52218 . 4)) ((c def c (c (? . 10) q contract?)) q (258605 . 3)) ((c def c (c (? . 7) q unsafe-fl=)) q (521521 . 4)) ((c def c (c (? . 0) q syntax-local-module-required-identifiers)) q (332642 . 8)) ((c def c (c (? . 15) q shared-fxvector)) q (43572 . 3)) ((c def c (c (? . 26) q list*of)) q (224945 . 4)) ((c form c (c (? . 39) q syntax-case*)) q (308732 . 3)) ((c def c (c (? . 0) q custodian-managed-list)) q (440991 . 4)) ((c def c (c (? . 59) q degrees->radians)) q (34535 . 3)) ((c def c (c (? . 11) q extfl>=)) q (44677 . 4)) ((c def c (c (? . 4) q delete-directory/files)) q (479967 . 5)) ((c def c (c (? . 3) q in-weak-hash)) q (148490 . 3)) ((c def c (c (? . 0) q make-hash-placeholder)) q (111549 . 3)) ((c def c (c (? . 36) q conjoin)) q (183931 . 4)) ((c def c (c (? . 4) q user-read-bit)) q (487502 . 2)) ((c form c (c (? . 35) q for*/async)) q (304018 . 2)) ((c def c (c (? . 0) q continuation-mark-set-first)) q (292636 . 10)) ((c def c (c (? . 46) q writeln)) q (391408 . 4)) ((c def c (c (? . 92) q engine-result)) q (307062 . 3)) ((c def c (c (? . 3) q date)) c (? . 29)) ((c form c (c (? . 11) q for/extflvector)) q (47368 . 2)) ((c def c (c (? . 13) q drop-common-prefix)) q (107236 . 5)) ((c def c (c (? . 0) q pseudo-random-generator?)) q (30012 . 3)) ((c def c (c (? . 11) q pi.t)) q (46284 . 2)) ((c def c (c (? . 11) q shared-extflvector)) q (47706 . 3)) ((c def c (c (? . 91) q make-contract)) q (239129 . 32)) ((c def c (c (? . 0) q ephemeron?)) q (517803 . 3)) ((c def c (c (? . 0) q current-output-port)) q (345638 . 4)) ((c form c (c (? . 149) q begin-encourage-inline)) q (20023 . 2)) ((c def c (c (? . 0) q raise-argument-error)) q (269516 . 13)) ((c def c (c (? . 0) q module-provide-protected?)) q (410667 . 5)) ((c def c (c (? . 0) q current-pseudo-random-generator)) q (30082 . 4)) ((c def c (c (? . 18) q sandbox-override-collection-paths)) q (449697 . 4)) ((c def c (c (? . 52) q stream-ormap)) q (157355 . 4)) ((c def c (c (? . 4) q group-write-bit)) q (487680 . 2)) ((c def c (c (? . 0) q read-bytes)) q (376014 . 4)) ((c def c (c (? . 0) q exn?)) c (? . 106)) ((c def c (c (? . 45) q syntax-local-provide-certifier)) q (336344 . 4)) ((c form c (c (? . 5) q augride*)) q (200048 . 2)) ((c def c (c (? . 11) q real->extfl)) q (45966 . 3)) ((c def c (c (? . 28) q udp-multicast-set-ttl!)) q (497495 . 4)) ((c def c (c (? . 0) q thread-resume-evt)) q (295993 . 3)) ((c def c (c (? . 31) q make-immutable-custom-hash)) q (166105 . 14)) ((c def c (c (? . 0) q error-syntax->name-handler)) q (278659 . 5)) ((c def c (c (? . 15) q fx<)) q (41608 . 4)) ((c def c (c (? . 0) q namespace-module-registry)) q (410024 . 3)) ((c def c (c (? . 2) q spawn)) q (290520 . 3)) ((c def c (c (? . 0) q current-plumber)) q (443995 . 4)) ((c def c (c (? . 0) q mcons)) q (111993 . 4)) ((c def c (c (? . 13) q combinations)) q (109812 . 6)) ((c form c (c (? . 26) q define-module-boundary-contract)) q (238256 . 13)) ((c def c (c (? . 0) q char=?)) q (73447 . 4)) ((c def c (c (? . 7) q unsafe-fxabs)) q (519347 . 3)) ((c def c (c (? . 0) q flush-output)) q (346138 . 3)) ((c def c (c (? . 0) q namespace-undefine-variable!)) q (407875 . 5)) ((c def c (c (? . 0) q string-port?)) q (353791 . 3)) ((c def c (c (? . 7) q unsafe-struct-ref)) q (531156 . 4)) ((c def c (c (? . 19) q vector-empty?)) q (114739 . 3)) ((c def c (c (? . 0) q bitwise-xor)) q (28525 . 3)) ((c form c (c (? . 5) q field)) q (199080 . 2)) ((c def c (c (? . 3) q make-exn:fail:syntax:missing-module)) c (? . 104)) ((c def c (c (? . 49) q struct:collapsible-leaf/c)) c (? . 50)) ((c def c (c (? . 0) q make-prefab-struct)) q (193709 . 4)) ((c def c (c (? . 4) q other-write-bit)) q (487827 . 2)) ((c def c (c (? . 4) q sticky-bit)) q (487432 . 2)) ((c def c (c (? . 0) q raise-result-arity-error)) q (275212 . 9)) ((c def c (c (? . 0) q module->realm)) q (425453 . 4)) ((c def c (c (? . 13) q fourth)) q (103020 . 3)) ((c def c (c (? . 26) q one-of/c)) q (223471 . 3)) ((c def c (c (? . 11) q extflvector-copy)) q (46922 . 5)) ((c def c (c (? . 10) q contract-stronger?)) q (258219 . 4)) ((c def c (c (? . 49) q collapsible-count-property-prev)) c (? . 123)) ((c def c (c (? . 34) q current-prefix-out)) q (551935 . 4)) ((c def c (c (? . 31) q dict-clear)) q (162039 . 3)) ((c def c (c (? . 0) q prop:input-port)) q (355192 . 2)) ((c def c (c (? . 85) q hash-intersect)) q (130392 . 12)) ((c def c (c (? . 0) q char-general-category)) q (75202 . 3)) ((c def c (c (? . 0) q format)) q (392085 . 4)) ((c def c (c (? . 5) q make-object)) q (201743 . 4)) ((c def c (c (? . 35) q fsemaphore-wait)) q (304303 . 3)) ((c def c (c (? . 62) q struct-auto-info-lists)) q (195111 . 4)) ((c form c (c (? . 5) q overment*)) q (199935 . 2)) ((c def c (c (? . 17) q channel/c)) q (228025 . 3)) ((c def c (c (? . 53) q mutable-treelist-last)) q (138235 . 3)) ((c def c (c (? . 0) q plumber-add-flush!)) q (444242 . 5)) ((c def c (c (? . 0) q find-library-collection-links)) q (546681 . 5)) ((c form c (c (? . 5) q public-final)) q (199263 . 2)) ((c def c (c (? . 0) q simplify-path)) q (467863 . 4)) ((c def c (c (? . 0) q module-compiled-imports)) q (422262 . 5)) ((c def c (c (? . 1) q read-string-evt)) q (372932 . 4)) ((c form c (c (? . 2) q prompt0-at)) q (290317 . 2)) ((c def c (c (? . 7) q unsafe-fxremainder)) q (519178 . 4)) ((c def c (c (? . 24) q compile-linklet)) q (455808 . 29)) ((c def c (c (? . 0) q impersonator-property-predicate-procedure?)) q (439426 . 3)) ((c def c (c (? . 0) q file-truncate)) q (346737 . 4)) ((c def c (c (? . 0) q local-transformer-expand/capture-lifts)) q (324872 . 13)) ((c def c (c (? . 11) q make-shared-extflvector)) q (47784 . 4)) ((c form c (c (? . 133) q case/eq)) q (13444 . 2)) ((c def c (c (? . 0) q custom-write?)) q (401155 . 3)) ((c def c (c (? . 3) q srcloc)) c (? . 110)) ((c form c (c (? . 35) q for/async)) q (303954 . 2)) ((c def c (c (? . 1) q peek-bytes!-evt)) c (? . 101)) ((c def c (c (? . 1) q with-input-from-bytes)) q (362283 . 4)) ((c form c (c (? . 3) q prefix-out)) q (6672 . 2)) ((c def c (c (? . 0) q struct?)) q (193231 . 3)) ((c def c (c (? . 5) q generic?)) q (210642 . 3)) ((c def c (c (? . 19) q vector-take)) q (115258 . 4)) ((c def c (c (? . 0) q eprintf)) q (392003 . 4)) ((c def c (c (? . 0) q read-square-bracket-with-tag)) q (388552 . 4)) ((c def c (c (? . 0) q thread-dead-evt)) q (295930 . 3)) ((c def c (c (? . 21) q sequence-count)) q (153869 . 4)) ((c def c (c (? . 7) q unsafe-struct*-set!)) q (531441 . 5)) ((c def c (c (? . 7) q unsafe-car)) q (524540 . 3)) ((c def c (c (? . 13) q splitf-at)) q (105657 . 7)) ((c def c (c (? . 5) q equal<%>)) q (210072 . 2)) ((c def c (c (? . 0) q hash-map)) q (126926 . 5)) ((c def c (c (? . 62) q struct:struct-info)) q (194903 . 2)) ((c def c (c (? . 2) q splitter)) q (290602 . 5)) ((c def c (c (? . 49) q collapsible-leaf/c-missing-party-list)) c (? . 50)) ((c def c (c (? . 0) q srcloc-source)) c (? . 110)) ((c def c (c (? . 24) q linklet-export-variables)) q (459325 . 3)) ((c form c (c (? . 76) q recursive-contract)) q (259647 . 10)) ((c def c (c (? . 3) q in-bytes-lines)) q (145656 . 5)) ((c def c (c (? . 49) q collapsible-wrapper-property-checking-wrapper)) c (? . 141)) ((c form c (c (? . 38) q letrec-syntaxes)) q (12498 . 2)) ((c form c (c (? . 5) q augment-final)) q (199499 . 2)) ((c def c (c (? . 0) q alarm-evt)) q (298002 . 4)) ((c def c (c (? . 0) q make-syntax-introducer)) q (331788 . 4)) ((c def c (c (? . 0) q error-value->string-handler)) q (278061 . 9)) ((c def c (c (? . 16) q treelist-chaperone-state)) q (136969 . 7)) ((c def c (c (? . 3) q keyword-apply)) q (179310 . 13)) ((c def c (c (? . 22) q set-copy-clear)) q (173312 . 3)) ((c def c (c (? . 0) q semaphore-post)) q (298987 . 3)) ((c def c (c (? . 52) q gen:stream)) q (158086 . 2)) ((c def c (c (? . 91) q prop:flat-contract)) q (248266 . 2)) ((c def c (c (? . 0) q internal-definition-context-seal)) q (328189 . 3)) ((c def c (c (? . 53) q mutable-treelist-sublist!)) q (139697 . 5)) ((c def c (c (? . 49) q get-impersonator-prop:collapsible)) q (263510 . 3)) ((c def c (c (? . 3) q hash-set*!)) q (124635 . 5)) ((c form c (c (? . 22) q for/weak-set)) q (170884 . 2)) ((c def c (c (? . 0) q number?)) q (23767 . 3)) ((c def c (c (? . 31) q prop:dict/contract)) q (162593 . 2)) ((c def c (c (? . 0) q prop:rename-transformer)) q (322966 . 2)) ((c form c (c (? . 27) q define-unit/s)) q (218977 . 6)) ((c form c (c (? . 5) q inherit-field)) q (199112 . 2)) ((c def c (c (? . 74) q make-exn:fail:contract:blame)) c (? . 109)) ((c def c (c (? . 28) q udp?)) q (494521 . 3)) ((c form c (c (? . 3) q for*/foldr/derived)) q (18512 . 4)) ((c def c (c (? . 53) q mutable-treelist-find)) q (140676 . 4)) ((c def c (c (? . 32) q flmax)) q (36576 . 4)) ((c form c (c (? . 27) q import)) q (215462 . 2)) ((c def c (c (? . 0) q raise-range-error)) q (271952 . 17)) ((c def c (c (? . 7) q unsafe-vector-set!)) q (526030 . 5)) ((c def c (c (? . 0) q asin)) q (27741 . 3)) ((c def c (c (? . 22) q mutable-set)) q (167981 . 4)) ((c def c (c (? . 0) q sha256-bytes)) q (405908 . 5)) ((c def c (c (? . 0) q caaddr)) q (101387 . 3)) ((c form c (c (? . 3) q for*/hashalw)) q (17404 . 2)) ((q form ((lib "racket/unreachable.rkt") with-assert-unreachable)) q (294697 . 3)) ((c def c (c (? . 0) q bitwise-and)) q (28448 . 3)) ((c def c (c (? . 83) q deserialize)) q (402502 . 3)) ((c def c (c (? . 0) q default-global-port-print-handler)) q (395109 . 7)) ((c def c (c (? . 0) q hash-equal?)) q (121184 . 3)) ((c form c (c (? . 34) q trace-lambda)) q (550440 . 2)) ((c def c (c (? . 0) q hash-iterate-key)) q (128258 . 4)) ((c def c (c (? . 3) q in-ephemeron-hash-keys)) q (149599 . 3)) ((c def c (c (? . 10) q impersonator-prop:contracted)) q (248365 . 2)) ((c def c (c (? . 0) q file-or-directory-modify-seconds)) q (472504 . 16)) ((c form c (c (? . 3) q for/fold)) q (16451 . 6)) ((c form c (c (? . 6) q set!-values)) q (14690 . 2)) ((c def c (c (? . 150) q hash/c)) q (227432 . 9)) ((c def c (c (? . 3) q namespace-anchor->namespace)) q (406507 . 3)) ((c def c (c (? . 45) q make-provide-transformer)) q (335197 . 10)) ((c def c (c (? . 0) q thread-running?)) q (295685 . 3)) ((c def c (c (? . 31) q dict-update!)) q (160809 . 10)) ((c def c (c (? . 7) q unsafe-extfl+)) q (540563 . 4)) ((c def c (c (? . 0) q bytes-close-converter)) q (71287 . 3)) ((c def c (c (? . 11) q extflexpt)) q (45739 . 4)) ((c def c (c (? . 18) q sandbox-exit-handler)) q (451004 . 4)) ((c def c (c (? . 49) q collapsible-property-c-c)) c (? . 90)) ((c def c (c (? . 7) q unsafe-fx=)) q (520580 . 4)) ((c def c (c (? . 0) q log)) q (27505 . 4)) ((c def c (c (? . 0) q make-ephemeron-hasheqv)) q (123623 . 4)) ((c def c (c (? . 17) q evt/c)) q (228374 . 3)) ((c def c (c (? . 49) q prop:collapsible-contract)) q (261439 . 2)) ((c def c (c (? . 0) q date-second)) c (? . 29)) ((c def c (c (? . 3) q thread)) q (294745 . 5)) ((c form c (c (? . 12) q match-let*)) q (267437 . 2)) ((c form c (c (? . 34) q trace-define-syntax)) q (550353 . 3)) ((c def c (c (? . 0) q exn:fail?)) c (? . 126)) ((c def c (c (? . 0) q zero?)) q (24571 . 3)) ((c form c (c (? . 22) q for/weak-setalw)) q (171048 . 2)) ((c def c (c (? . 0) q liberal-define-context?)) q (333044 . 3)) ((c def c (c (? . 58) q exn:fail:support?)) c (? . 115)) ((c def c (c (? . 28) q udp-ttl)) q (496393 . 3)) ((c def c (c (? . 37) q pretty-format)) q (396069 . 5)) ((c def c (c (? . 0) q complete-path?)) q (467159 . 3)) ((c def c (c (? . 7) q unsafe-flcos)) q (522645 . 3)) ((c def c (c (? . 19) q vector-drop-right)) q (115582 . 4))))
syntax
(if test-expr then-expr else-expr)
syntax
(lambda formals body ...+)
 
formals = id
        | (id ...)
        | (id ...+ . rest-id)
syntax
(init-rest id)
(init-rest)
syntax
(parameterize ([parameter-expr value-expr] ...)
  body ...+)
 
  parameter-expr : parameter?
procedure
(char->integer char) -> exact-integer?
  char : char?
procedure
(argmax proc lst) -> any
  proc : (-> any/c real?)
  lst : (and/c pair? list?)
procedure
(read [in]) -> any
  in : input-port? = (current-input-port)
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
struct
(struct color (red green blue alpha))
  red : (and/c natural-number/c (<=/c 255))
  green : (and/c natural-number/c (<=/c 255))
  blue : (and/c natural-number/c (<=/c 255))
  alpha : (and/c natural-number/c (<=/c 255))
struct
(struct data-source (connector args extensions)
    #:mutable)
  connector : (or/c 'postgresql 'mysql 'sqlite3 'odbc)
  args : list?
  extensions : (listof (list/c symbol? any/c))
parameter
(current-command-line-arguments) -> (vectorof string?)
(current-command-line-arguments argv) -> void?
  argv : (vectorof (and/c string? immutable?))
value
object% : class?
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
(#%printing-module-begin form ...)
syntax
(#%plain-module-begin form ...)
syntax
(#%declare declaration-keyword ...)
 
declaration-keyword = #:cross-phase-persistent
                    | #:empty-namespace
                    | #:require=define
                    | #:flatten-requires
                    | #:unlimited-compile
                    | #:unsafe
                    | #:realm identifier
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 ...)
                    | (only-space-in space require-spec ...)
                    | (for-syntax require-spec ...)
                    | (for-template require-spec ...)
                    | (for-label require-spec ...)
                    | (for-meta phase-level require-spec ...)
                    | (for-space space 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
                       
              space = id
                    | #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 ...)
syntax
(only-space-in space require-spec ...)

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

(for-syntax require-spec ...)

(for-template require-spec ...)

(for-label require-spec ...)

(for-space space 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-path 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 ...)
             | (for-space space provide-spec ...)
             | derived-provide-spec
                
 phase-level = exact-integer
             | #f
                
       space = id
             | #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 ...)

(for-space space 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
(for-space space require-spec ...)
syntax
(#%require raw-require-spec ...)
 
    raw-require-spec = phaseless-spec
                     | (for-meta phase-level raw-require-spec ...)
                     | (for-syntax raw-require-spec ...)
                     | (for-template raw-require-spec ...)
                     | (for-label raw-require-spec ...)
                     | (just-meta phase-level raw-require-spec ...)
                     | (portal portal-id content)
                        
         phase-level = exact-integer
                     | #f
                        
      phaseless-spec = spaceless-spec
                     | (for-space space phaseless-spec ...)
                     | (just-space space spaceless-spec ...)
                        
               space = id
                     | #f
                        
      spaceless-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 = spaceless-spec
                 | (for-space space spaceless-spec ...)
                 | (protect phaseless-spec ...)
                    
           space = id
                 | #f
                    
  spaceless-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 spaceless-spec ...)
                 | (expand (id . datum))
                 | (expand (id . datum) orig-form)
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 ...+] ...)
syntax
(case-λ [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
(case/equal val-expr case-clause ...)
syntax
(case/equal-always val-expr case-clause ...)
syntax
(case/eq val-expr case-clause ...)
syntax
(case/eqv val-expr case-clause ...)
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 ...+)
procedure
(syntax-local-require-introduce stx) -> syntax?
  stx : syntax?
syntax
(define-provide-syntax id proc-expr)
(define-provide-syntax (id args ...) body ...+)
procedure
(syntax-local-provide-introduce stx) -> syntax?
  stx : syntax?
syntax
(begin form ...)
(begin expr ...+)
syntax
(begin0 expr ...+)
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
              | #:do [do-body ...]
              | break-clause
              | #:splice (splicing-id . form)
              | #:on-length-mismatch mismatch-expr
                 
 break-clause = #:break guard-expr
              | #:final guard-expr
                 
body-or-break = body
              | break-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/hashalw (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 ... maybe-result)
           (for-clause ...)
  body-or-break ... body)
 
maybe-result = 
             | #:result result-expr
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] ... maybe-result) (for-clause ...)
  body-or-break ... body)
 
maybe-result = 
             | #:result result-expr
syntax
(for/foldr ([accum-id init-expr] ... accum-option ...)
           (for-clause ...)
  body-or-break ... body)
 
accum-option = #:result result-expr
             | #:delay
             | #:delay-as delayed-id
             | #:delay-with delayer-id
syntax
(for* (for-clause ...) body-or-break ... body)
syntax
(for*/list (for-clause ...) body-or-break ... body)
syntax
(for*/lists (id ... maybe-result) (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*/hashalw (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] ... maybe-result) (for-clause ...)
  body-or-break ... body)
syntax
(for*/foldr ([accum-id init-expr] ... accum-option ...)
            (for-clause ...)
  body-or-break ... body)
syntax
(for/fold/derived orig-datum
  ([accum-id init-expr] ... maybe-result) (for-clause ...)
  body-or-break ... body)
syntax
(for*/fold/derived orig-datum
  ([accum-id init-expr] ... maybe-result) (for-clause ...)
  body-or-break ... body)
syntax
(for/foldr/derived orig-datum
  ([accum-id init-expr] ... accum-option ...) (for-clause ...)
  body-or-break ... body)
syntax
(for*/foldr/derived orig-datum
  ([accum-id init-expr] ... accum-option ...) (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-defn-or-expr
        ([loop-id loop-expr] ...)
        pos-guard
        ([(inner-id ...) inner-expr] ...)
        maybe-inner-defn-or-expr
        pre-guard
        post-guard
        (loop-arg ...))
 
maybe-inner-defn/expr = 
                      | inner-defn-or-expr
procedure
(for-clause-syntax-protect stx) -> syntax?
  stx : syntax?
syntax
(define-splicing-for-clause-syntax id proc-expr)
procedure
(syntax-local-splicing-for-clause-introduce 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)
(quote-syntax datum #:local)
syntax
(#%top-interaction . form)
syntax
(block defn-or-expr ...)
syntax
(#%stratified-body defn-or-expr ...)
syntax
(begin-encourage-inline form ...)
syntax
(define-inline id expr)
(define-inline (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
(lazy-require [module-path (fun-import ...)] ...)
 
fun-import = fun-id
           | (orig-fun-id fun-id)
syntax
(lazy-require-syntax [module-path (macro-import ...)] ...)
 
macro-import = macro-id
             | (orig-macro-id macro-id)
syntax
(#%foreign-inline datum maybe-mode)
 
maybe-mode = 
           | #:effect
           | #:pure
           | #:pure*
           | #:copy
           | #:copy*
procedure
(equal? v1 v2) -> boolean?
  v1 : any/c
  v2 : any/c
procedure
(equal-always? 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
(equal-always?/recur v1 v2 recur-proc) -> boolean?
  v1 : any/c
  v2 : any/c
  recur-proc : (any/c any/c . -> . any/c)
procedure
(equal-hash-code v) -> fixnum?
  v : any/c
procedure
(equal-hash-code/recur v recur-proc) -> fixnum?
  v : any/c
  recur-proc : (-> any/c exact-integer?)
procedure
(equal-secondary-hash-code v) -> fixnum?
  v : any/c
procedure
(equal-always-hash-code v) -> fixnum?
  v : any/c
procedure
(equal-always-hash-code/recur v recur-proc) -> fixnum?
  v : any/c
  recur-proc : (-> any/c exact-integer?)
procedure
(equal-always-secondary-hash-code v) -> fixnum?
  v : any/c
procedure
(eq-hash-code v) -> fixnum?
  v : any/c
procedure
(eqv-hash-code v) -> fixnum?
  v : any/c
value
gen:equal+hash : any/c
value
gen:equal-mode+hash : any/c
value
prop:equal+hash : struct-type-property?
procedure
(hash-code-combine hc ...) -> fixnum?
  hc : exact-integer?
procedure
(hash-code-combine-unordered hc ...) -> fixnum?
  hc : exact-integer?
procedure
(hash-code-combine* hc ... hcs) -> fixnum?
  hc : exact-integer?
  hcs : (listof exact-integer?)
procedure
(hash-code-combine-unordered* hc ... hcs) -> fixnum?
  hc : exact-integer?
  hcs : (listof exact-integer?)
procedure
(boolean? v) -> boolean?
  v : any/c
procedure
(not v) -> boolean?
  v : any/c
procedure
(immutable? v) -> boolean?
  v : any/c
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
(mutable-string? v) -> boolean?
  v : any/c
procedure
(immutable-string? v) -> boolean?
  v : any/c
procedure
(mutable-bytes? v) -> boolean?
  v : any/c
procedure
(immutable-bytes? v) -> boolean?
  v : any/c
procedure
(mutable-vector? v) -> boolean?
  v : any/c
procedure
(immutable-vector? v) -> boolean?
  v : any/c
procedure
(mutable-box? v) -> boolean?
  v : any/c
procedure
(immutable-box? v) -> boolean?
  v : any/c
procedure
(mutable-hash? v) -> boolean?
  v : any/c
procedure
(immutable-hash? v) -> boolean?
  v : 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
(single-flonum-available?) -> boolean?
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 ...) -> (or/c rational? +inf.0)
  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) -> (and/c integer? positive?)
  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 [b]) -> number?
  z : number?
  b : number? = (exp 1)
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-first-bit-set n) -> exact-integer?
  n : exact-integer?
procedure
(bitwise-bit-field n start end) -> exact-integer?
  n : exact-integer?
  start : exact-nonnegative-integer?
  end : (and/c exact-nonnegative-integer?
               (>=/c start))
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 [rand-gen]) -> exact-nonnegative-integer?
  k : (integer-in 1 4294967087)
  rand-gen : pseudo-random-generator?
           = (current-pseudo-random-generator)
(random min max [rand-gen]) -> exact-integer?
  min : exact-integer?
  max : (integer-in (+ 1 min) (+ 4294967087 min))
  rand-gen : pseudo-random-generator?
           = (current-pseudo-random-generator)
(random [rand-gen]) -> (and/c real? inexact? (>/c 0) (</c 1))
  rand-gen : pseudo-random-generator?
           = (current-pseudo-random-generator)
procedure
(random-seed k) -> void?
  k : (integer-in 0 (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 rand-gen) -> void?
  rand-gen : pseudo-random-generator?
procedure
(pseudo-random-generator->vector rand-gen)
 -> pseudo-random-generator-vector?
  rand-gen : pseudo-random-generator?
procedure
(vector->pseudo-random-generator vec)
 -> pseudo-random-generator?
  vec : pseudo-random-generator-vector?
procedure
(vector->pseudo-random-generator! rand-gen     
                                  vec)     -> void?
  rand-gen : pseudo-random-generator?
  vec : pseudo-random-generator-vector?
procedure
(pseudo-random-generator-vector? v) -> boolean?
  v : any/c
procedure
(crypto-random-bytes n) -> bytes?
  n : exact-positive-integer?
procedure
(random-ref seq [rand-gen]) -> any/c
  seq : sequence?
  rand-gen : pseudo-random-generator?
           = (current-pseudo-random-generator)
procedure
(random-sample  seq                               
                n                                 
               [rand-gen                          
                #:replacement? replacement?]) -> (listof any/c)
  seq : sequence?
  n : exact-positive-integer?
  rand-gen : pseudo-random-generator?
           = (current-pseudo-random-generator)
  replacement? : any/c = #t
procedure
(number->string z [radix]) -> string?
  z : number?
  radix : (or/c 2 8 10 16) = 10
procedure
(string->number  s             
                [radix         
                 convert-mode  
                 decimal-mode  
                 single-mode]) 
 -> (or/c number? #f string? extflonum?)
  s : string?
  radix : (integer-in 2 16) = 10
  convert-mode : (or/c 'number-or-false 'read)
               = 'number-or-false
  decimal-mode : (or/c 'decimal-as-inexact 'decimal-as-exact)
               = (if (read-decimal-as-inexact)
                     'decimal-as-inexact
                     'decimal-as-exact)
  single-mode : (or/c 'single 'double)
              = (if (read-single-flonum)
                    'single
                    'double)
procedure
(real->decimal-string n [decimal-digits]) -> string?
  n : rational?
  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 1 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 : (or/c single-flonum? 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 (=/c -1) (=/c 0) (=/c 1) +nan.0 +nan.f)
  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
(positive-integer? x) -> boolean?
  x : any/c
procedure
(negative-integer? x) -> boolean?
  x : any/c
procedure
(nonpositive-integer? x) -> boolean?
  x : any/c
procedure
(nonnegative-integer? x) -> boolean?
  x : any/c
procedure
(natural? x) -> boolean?
  x : any/c
procedure
(fl+ a ...) -> flonum?
  a : flonum?
procedure
(fl- a b ...) -> flonum?
  a : flonum?
  b : flonum?
procedure
(fl* a ...) -> flonum?
  a : 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
(flsingle a) -> flonum?
  a : flonum?
procedure
(flbit-field a start end) -> exact-nonnegative-integer?
  a : flonum?
  start : (integer-in 0 64)
  end : (integer-in 0 64)
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?
           (lambda (c) (flonum? (real-part c)))
           (lambda (c) (flonum? (imag-part c))))
  a : flonum?
  b : flonum?
procedure
(flreal-part a) -> flonum?
  a : (and/c complex?
             (lambda (c) (flonum? (real-part c)))
             (lambda (c) (flonum? (imag-part c))))
procedure
(flimag-part a) -> flonum?
  a : (and/c complex?
             (lambda (c) (flonum? (real-part c)))
             (lambda (c) (flonum? (imag-part c))))
procedure
(flrandom rand-gen) -> (and flonum? (>/c 0) (</c 1))
  rand-gen : pseudo-random-generator?
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 ...) -> fixnum?
  a : fixnum?
procedure
(fx- a b ...) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fx* a ...) -> fixnum?
  a : 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 ...) -> fixnum?
  a : fixnum?
procedure
(fxior a ...) -> fixnum?
  a : fixnum?
procedure
(fxxor a ...) -> fixnum?
  a : 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
(fxpopcount a) -> fixnum?
  a : (and/c fixnum? (not/c negative?))
procedure
(fxpopcount32 a) -> fixnum?
  a : (and/c fixnum? (integer-in 0 #xFFFFFFFF))
procedure
(fxpopcount16 a) -> fixnum?
  a : (and/c fixnum? (integer-in 0 #xFFFF))
procedure
(fx+/wraparound a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fx-/wraparound [a] b) -> fixnum?
  a : fixnum? = 0
  b : fixnum?
procedure
(fx*/wraparound a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fxlshift/wraparound a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(fxrshift/logical 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 fl) -> fixnum?
  fl : flonum?
procedure
(fixnum-for-every-system? v) -> boolean?
  v : any/c
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
(most-positive-fixnum) -> fixnum?
procedure
(most-negative-fixnum) -> fixnum?
procedure
(extflonum? v) -> boolean?
  v : any/c
procedure
(extflonum-available?) -> boolean?
procedure
(extfl+ a b) -> extflonum?
  a : extflonum?
  b : extflonum?
procedure
(extfl- a b) -> extflonum?
  a : extflonum?
  b : extflonum?
procedure
(extfl* a b) -> extflonum?
  a : extflonum?
  b : extflonum?
procedure
(extfl/ a b) -> extflonum?
  a : extflonum?
  b : extflonum?
procedure
(extflabs a) -> extflonum?
  a : extflonum?
procedure
(extfl= a b) -> boolean?
  a : extflonum?
  b : extflonum?
procedure
(extfl< a b) -> boolean?
  a : extflonum?
  b : extflonum?
procedure
(extfl> a b) -> boolean?
  a : extflonum?
  b : extflonum?
procedure
(extfl<= a b) -> boolean?
  a : extflonum?
  b : extflonum?
procedure
(extfl>= a b) -> boolean?
  a : extflonum?
  b : extflonum?
procedure
(extflmin a b) -> extflonum?
  a : extflonum?
  b : extflonum?
procedure
(extflmax a b) -> extflonum?
  a : extflonum?
  b : extflonum?
procedure
(extflround a) -> extflonum?
  a : extflonum?
procedure
(extflfloor a) -> extflonum?
  a : extflonum?
procedure
(extflceiling a) -> extflonum?
  a : extflonum?
procedure
(extfltruncate a) -> extflonum?
  a : extflonum?
procedure
(extflsin a) -> extflonum?
  a : extflonum?
procedure
(extflcos a) -> extflonum?
  a : extflonum?
procedure
(extfltan a) -> extflonum?
  a : extflonum?
procedure
(extflasin a) -> extflonum?
  a : extflonum?
procedure
(extflacos a) -> extflonum?
  a : extflonum?
procedure
(extflatan a) -> extflonum?
  a : extflonum?
procedure
(extfllog a) -> extflonum?
  a : extflonum?
procedure
(extflexp a) -> extflonum?
  a : extflonum?
procedure
(extflsqrt a) -> extflonum?
  a : extflonum?
procedure
(extflexpt a b) -> extflonum?
  a : extflonum?
  b : extflonum?
procedure
(->extfl a) -> extflonum?
  a : exact-integer?
procedure
(extfl->exact-integer a) -> exact-integer?
  a : extflonum?
procedure
(real->extfl a) -> extflonum?
  a : real?
procedure
(extfl->exact a) -> (and/c real? exact?)
  a : extflonum?
procedure
(extfl->fx a) -> fixnum?
  a : extflonum?
procedure
(fx->extfl a) -> extflonum?
  a : fixnum?
procedure
(extfl->inexact a) -> flonum?
  a : extflonum?
value
pi.t : extflonum?
procedure
(extflvector? v) -> boolean?
  v : any/c
procedure
(extflvector x ...) -> extflvector?
  x : extflonum?
procedure
(make-extflvector size [x]) -> extflvector?
  size : exact-nonnegative-integer?
  x : extflonum? = 0.0t0
procedure
(extflvector-length vec) -> exact-nonnegative-integer?
  vec : extflvector?
procedure
(extflvector-ref vec pos) -> extflonum?
  vec : extflvector?
  pos : exact-nonnegative-integer?
procedure
(extflvector-set! vec pos x) -> extflonum?
  vec : extflvector?
  pos : exact-nonnegative-integer?
  x : extflonum?
procedure
(extflvector-copy vec [start end]) -> extflvector?
  vec : extflvector?
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (vector-length v)
procedure
(in-extflvector vec [start stop step]) -> sequence?
  vec : extflvector?
  start : exact-nonnegative-integer? = 0
  stop : (or/c exact-integer? #f) = #f
  step : (and/c exact-integer? (not/c zero?)) = 1
syntax
(for/extflvector maybe-length (for-clause ...) body ...)
syntax
(for*/extflvector maybe-length (for-clause ...) body ...)
 
maybe-length = 
             | #:length length-expr
             | #:length length-expr #:fill fill-expr
 
  length-expr : exact-nonnegative-integer?
  fill-expr : extflonum?
procedure
(shared-extflvector x ...) -> extflvector?
  x : extflonum?
procedure
(make-shared-extflvector size [x]) -> extflvector?
  size : exact-nonnegative-integer?
  x : extflonum? = 0.0t0
procedure
(floating-point-bytes->extfl  bstr            
                             [big-endian?     
                              start           
                              end])       -> extflonum?
  bstr : bytes?
  big-endian? : any/c = (system-big-endian?)
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (bytes-length bstr)
procedure
(extfl->floating-point-bytes  x               
                             [big-endian?     
                              dest-bstr       
                              start])     -> bytes?
  x : extflonum?
  big-endian? : any/c = (system-big-endian?)
  dest-bstr : (and/c bytes? (not/c immutable?))
            = (make-bytes 10)
  start : exact-nonnegative-integer? = 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-append-immutable str ...) -> (and/c string? immutable?)
  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-grapheme-span str start [end]) -> exact-nonnegative-integer?
  str : string?
  start : exact-nonnegative-integer?
  end : exact-nonnegative-integer? = (string-length str)
procedure
(string-grapheme-count str start [end])
 -> exact-nonnegative-integer?
  str : string?
  start : exact-nonnegative-integer?
  end : exact-nonnegative-integer? = (string-length str)
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
(non-empty-string? x) -> boolean?
  x : any/c
procedure
(string-find s contained) -> (or/c exact-nonnegative-integer? #f)
  s : string?
  contained : string?
procedure
(string-contains? s contained) -> boolean?
  s : string?
  contained : string?
procedure
(string-prefix? s prefix) -> boolean?
  s : string?
  prefix : string?
procedure
(string-suffix? s suffix) -> boolean?
  s : string?
  suffix : string?
procedure
(~a  v                                         
     ...                                       
    [#:separator separator                     
     #:width width                             
     #:max-width max-width                     
     #:min-width min-width                     
     #:limit-marker limit-marker               
     #:limit-prefix? limit-prefix?             
     #: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? = ""
  limit-prefix? : boolean? = #f
  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               
     #:limit-prefix? limit-prefix?             
     #: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? = "..."
  limit-prefix? : boolean? = #f
  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               
     #:limit-prefix? limit-prefix?             
     #: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? = "..."
  limit-prefix? : boolean? = #f
  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               
     #:limit-prefix? limit-prefix?             
     #: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? = "..."
  limit-prefix? : boolean? = #f
  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               
     #:groups groups                       
     #:group-sep group-sep                 
     #:decimal-sep decimal-sep])       -> 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?              = 6
                    (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? = " "
  groups : (non-empty-listof exact-positive-integer?) = '(3)
  group-sep : string? = ""
  decimal-sep : string? = "."
procedure
(~.a  v                                         
      ...                                       
     [#:separator separator                     
      #:width width                             
      #:max-width max-width                     
      #:min-width min-width                     
      #:limit-marker limit-marker               
      #:limit-prefix? limit-prefix?             
      #: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? = ""
  limit-prefix? : boolean? = #f
  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               
      #:limit-prefix? limit-prefix?             
      #: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? = "..."
  limit-prefix? : boolean? = #f
  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               
      #:limit-prefix? limit-prefix?             
      #: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? = "..."
  limit-prefix? : boolean? = #f
  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])
 -> (or/c exact-nonnegative-integer? #f)
  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]) -> (or/c char? #f)
  bstr : bytes?
  skip : exact-nonnegative-integer?
  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])    
 -> (or/c exact-nonnegative-integer? #f)
  bstr : bytes?
  skip : exact-nonnegative-integer?
  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)
 -> (or/c bytes-converter? #f)
  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 #xD7FF)
                   (integer-in #xE000 #x10FFFF)))
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-extended-pictographic? char) -> boolean?
  char : char?
procedure
(char-general-category char) -> symbol?
  char : char?
procedure
(char-grapheme-break-property char) -> ?
  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
(char-grapheme-step char state) -> boolean? fixnum?
  char : char?
  state : fixnum?
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
(symbol<? a-sym b-sym ...) -> boolean?
  a-sym : symbol?
  b-sym : symbol?
procedure
(symbol->immutable-string sym) -> (and/c string? immutable?)
  sym : symbol?
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?
(regexp str handler) -> any
  str : string?
  handler : (or/c #f (string? . -> . any))
procedure
(pregexp str) -> pregexp?
  str : string?
(pregexp str handler) -> any
  str : string?
  handler : (or/c #f (string? . -> . any))
procedure
(byte-regexp bstr) -> byte-regexp?
  bstr : bytes?
(byte-regexp bstr handler) -> any
  bstr : bytes?
  handler : (or/c #f (bytes? . -> . any))
procedure
(byte-pregexp bstr) -> byte-pregexp?
  bstr : bytes?
(byte-pregexp bstr handler) -> any
  bstr : bytes?
  handler : (or/c #f (bytes? . -> . any))
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
(pregexp-quote str [case-sensitive?]) -> string?
  str : string?
  case-sensitive? : any/c = #t
(pregexp-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-capture-group-count 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 regexp? byte-regexp? string? bytes?)
  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 regexp? byte-regexp? string? bytes?)
  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]) 
 -> (or/c #f (cons/c bytes? (listof (or/c bytes? #f))))
  pattern : (or/c regexp? byte-regexp? string? bytes?)
  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-integer?
                                        exact-integer?)
                                #f)))
          #f)
  pattern : (or/c regexp? byte-regexp? string? bytes?)
  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 regexp? byte-regexp? string? bytes?)
  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 regexp? byte-regexp? string? bytes?)
  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 regexp? byte-regexp? string? bytes?)
  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 regexp? byte-regexp? string? bytes?)
  input : input-port?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  progress : (or/c progress-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 regexp? byte-regexp? string? bytes?)
  input : input-port?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  progress : (or/c progress-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 regexp? byte-regexp? string? bytes?)
  input : input-port?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  progress : (or/c progress-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 regexp? byte-regexp? string? bytes?)
  input : input-port?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  progress : (or/c progress-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 regexp? byte-regexp? string? bytes?)
  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 regexp? byte-regexp? string? bytes?)
  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 : exact-nonnegative-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 regexp? byte-regexp? string? bytes?)
  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 regexp? byte-regexp? string? bytes?)
  input : input-port?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  progress : (or/c progress-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 regexp? byte-regexp? string? bytes?)
  input : input-port?
  start-pos : exact-nonnegative-integer? = 0
  end-pos : (or/c exact-nonnegative-integer? #f) = #f
  progress : (or/c progress-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 regexp? byte-regexp? string? bytes?)
  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 regexp? byte-regexp? string? bytes?)
  input : (or/c string? bytes?)
  insert : (or/c string? bytes?
                 (string? string? ... . -> . string?)
                 (bytes? bytes? ... . -> . bytes?))
  input-prefix : bytes? = #""
procedure
(regexp-replace*  pattern            
                  input              
                  insert             
                 [start-pos          
                  end-pos            
                  input-prefix]) -> (or/c string? bytes?)
  pattern : (or/c regexp? byte-regexp? string? bytes?)
  input : (or/c string? bytes?)
  insert : (or/c string? bytes?
                 (string? string? ... . -> . string?)
                 (bytes? 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 regexp? byte-regexp? string? bytes?)
                          (or/c string? bytes?
                                (string? string? ... . -> . string?)
                                (bytes? 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
(keyword->immutable-string sym) -> (and/c string? immutable?)
  sym : keyword?
procedure
(pair? v) -> boolean?
  v : any/c
procedure
(null? v) -> boolean?
  v : any/c
procedure
(cons a d) -> list?
  a : any/c
  d : list?
(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) -> list?
  v : any/c
  tail : list?
(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/c)
procedure
(length lst) -> exact-nonnegative-integer?
  lst : list?
procedure
(list-ref lst pos) -> any/c
  lst : list?
  pos : exact-nonnegative-integer?
(list-ref lst pos) -> any/c
  lst : pair?
  pos : exact-nonnegative-integer?
procedure
(list-tail lst pos) -> list?
  lst : list?
  pos : exact-nonnegative-integer?
(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
(running-foldl proc init lst ...+) -> list?
  proc : procedure?
  init : any/c
  lst : list?
procedure
(running-foldr proc init lst ...+) -> list?
  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
(remw 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
(remw* 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 : (or/c #f (any/c . -> . any/c)) = #f
  cache-keys? : boolean? = #f
procedure
(member v lst [is-equal?]) -> (or/c #f list?)
  v : any/c
  lst : list?
  is-equal? : (any/c any/c . -> . any/c) = equal?
(member v lst [is-equal?]) -> any/c
  v : any/c
  lst : any/c
  is-equal? : (any/c any/c . -> . any/c) = equal?
procedure
(memw v lst) -> (or/c #f list?)
  v : any/c
  lst : list?
(memw v lst) -> any/c
  v : any/c
  lst : any/c
procedure
(memv v lst) -> (or/c #f list?)
  v : any/c
  lst : list?
(memv v lst) -> any/c
  v : any/c
  lst : any/c
procedure
(memq v lst) -> (or/c #f list?)
  v : any/c
  lst : list?
(memq v lst) -> any/c
  v : any/c
  lst : any/c
procedure
(memf proc lst) -> (or/c #f list?)
  proc : procedure?
  lst : list?
(memf proc lst) -> any/c
  proc : procedure?
  lst : any/c
procedure
(findf proc lst) -> (or/c #f any/c)
  proc : procedure?
  lst : list?
(findf proc lst) -> any/c
  proc : procedure?
  lst : any/c
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?
(assoc v lst [is-equal?]) -> pair?
  v : any/c
  lst : (list*of pair? (not/c '()))
  is-equal? : (any/c any/c . -> . any/c) = equal?
procedure
(assw v lst) -> (or/c pair? #f)
  v : any/c
  lst : (listof pair?)
(assw v lst) -> pair?
  v : any/c
  lst : (list*of pair? (not/c '()))
procedure
(assv v lst) -> (or/c pair? #f)
  v : any/c
  lst : (listof pair?)
(assv v lst) -> pair?
  v : any/c
  lst : (list*of pair? (not/c '()))
procedure
(assq v lst) -> (or/c pair? #f)
  v : any/c
  lst : (listof pair?)
(assq v lst) -> pair?
  v : any/c
  lst : (list*of pair? (not/c '()))
procedure
(assf proc lst) -> (or/c pair? #f)
  proc : procedure?
  lst : (listof pair?)
(assf proc lst) -> pair?
  proc : procedure?
  lst : (list*of pair? (not/c '()))
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/c
  lst : list?
procedure
(third lst) -> any/c
  lst : list?
procedure
(fourth lst) -> any/c
  lst : list?
procedure
(fifth lst) -> any/c
  lst : list?
procedure
(sixth lst) -> any/c
  lst : list?
procedure
(seventh lst) -> any/c
  lst : list?
procedure
(eighth lst) -> any/c
  lst : list?
procedure
(ninth lst) -> any/c
  lst : list?
procedure
(tenth lst) -> any/c
  lst : list?
procedure
(eleventh lst) -> any/c
  lst : list?
procedure
(twelfth lst) -> any/c
  lst : list?
procedure
(thirteenth lst) -> any/c
  lst : list?
procedure
(fourteenth lst) -> any/c
  lst : list?
procedure
(fifteenth lst) -> any/c
  lst : list?
procedure
(last lst) -> any/c
  lst : list?
procedure
(last-pair p) -> pair?
  p : pair?
procedure
(make-list k v) -> list?
  k : exact-nonnegative-integer?
  v : any/c
procedure
(list-update lst pos updater) -> list?
  lst : list?
  pos : (and/c (>=/c 0) (</c (length lst)))
  updater : (-> any/c any/c)
procedure
(list-set lst pos value) -> list?
  lst : list?
  pos : (and/c (>=/c 0) (</c (length lst)))
  value : any/c
procedure
(index-of lst v [is-equal?]) -> (or/c exact-nonnegative-integer? #f)
  lst : list?
  v : any/c
  is-equal? : (any/c any/c . -> . any/c) = equal?
procedure
(index-where lst proc) -> (or/c exact-nonnegative-integer? #f)
  lst : list?
  proc : (any/c . -> . any/c)
procedure
(indexes-of lst v [is-equal?])
 -> (listof exact-nonnegative-integer?)
  lst : list?
  v : any/c
  is-equal? : (any/c any/c . -> . any/c) = equal?
procedure
(indexes-where lst proc) -> (listof exact-nonnegative-integer?)
  lst : list?
  proc : (any/c . -> . any/c)
procedure
(take lst pos) -> list?
  lst : list?
  pos : exact-nonnegative-integer?
(take lst pos) -> list?
  lst : any/c
  pos : exact-nonnegative-integer?
procedure
(drop lst pos) -> list?
  lst : list?
  pos : exact-nonnegative-integer?
(drop lst pos) -> any/c
  lst : any/c
  pos : exact-nonnegative-integer?
procedure
(split-at lst pos) -> list? list?
  lst : list?
  pos : exact-nonnegative-integer?
(split-at lst pos) -> list? any/c
  lst : any/c
  pos : exact-nonnegative-integer?
procedure
(takef lst pred) -> list?
  lst : list?
  pred : procedure?
(takef lst pred) -> list?
  lst : any/c
  pred : procedure?
procedure
(dropf lst pred) -> list?
  lst : list?
  pred : procedure?
(dropf lst pred) -> any/c
  lst : any/c
  pred : procedure?
procedure
(splitf-at lst pred) -> list? list?
  lst : list?
  pred : procedure?
(splitf-at lst pred) -> list? any/c
  lst : any/c
  pred : procedure?
procedure
(take-right lst pos) -> list?
  lst : list?
  pos : exact-nonnegative-integer?
(take-right lst pos) -> any/c
  lst : any/c
  pos : exact-nonnegative-integer?
procedure
(drop-right lst pos) -> list?
  lst : list?
  pos : exact-nonnegative-integer?
(drop-right lst pos) -> list?
  lst : any/c
  pos : exact-nonnegative-integer?
procedure
(split-at-right lst pos) -> list? list?
  lst : list?
  pos : exact-nonnegative-integer?
(split-at-right lst pos) -> list? any/c
  lst : any/c
  pos : exact-nonnegative-integer?
procedure
(takef-right lst pred) -> list?
  lst : list?
  pred : procedure?
(takef-right lst pred) -> any/c
  lst : any/c
  pred : procedure?
procedure
(dropf-right lst pred) -> list?
  lst : list?
  pred : procedure?
(dropf-right lst pred) -> list?
  lst : any/c
  pred : procedure?
procedure
(splitf-at-right lst pred) -> list? list?
  lst : list?
  pred : procedure?
(splitf-at-right lst pred) -> list? any/c
  lst : any/c
  pred : procedure?
procedure
(list-prefix? l r [same?]) -> boolean?
  l : list?
  r : list?
  same? : (any/c any/c . -> . any/c) = equal?
procedure
(take-common-prefix l r [same?]) -> list?
  l : list?
  r : list?
  same? : (any/c any/c . -> . any/c) = equal?
procedure
(drop-common-prefix l r [same?]) -> list? list?
  l : list?
  r : list?
  same? : (any/c any/c . -> . any/c) = equal?
procedure
(split-common-prefix l r [same?]) -> list? list? list?
  l : list?
  r : list?
  same? : (any/c any/c . -> . any/c) = equal?
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
(check-duplicates  lst                            
                  [same?                          
                   #:key extract-key              
                   #:default failure-result]) -> any
  lst : list?
  same? : (any/c any/c . -> . any/c) = equal?
  extract-key : (-> any/c any/c) = (lambda (x) x)
  failure-result : failure-result/c = (lambda () #f)
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
(range end) -> list?
  end : real?
(range start end [step]) -> list?
  start : real?
  end : real?
  step : real? = 1
procedure
(inclusive-range start end [step]) -> list?
  start : real?
  end : real?
  step : real? = 1
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
(combinations lst) -> list?
  lst : list?
(combinations lst size) -> list?
  lst : list?
  size : exact-nonnegative-integer?
procedure
(in-combinations lst) -> sequence?
  lst : list?
(in-combinations lst size) -> sequence?
  lst : list?
  size : exact-nonnegative-integer?
procedure
(permutations lst) -> list?
  lst : list?
procedure
(in-permutations lst) -> sequence?
  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
(group-by key lst [same?]) -> (listof list?)
  key : (-> any/c any/c)
  lst : list?
  same? : (any/c any/c . -> . any/c) = equal?
procedure
(cartesian-product lst ...) -> (listof list?)
  lst : list?
procedure
(remf pred lst) -> list?
  pred : procedure?
  lst : list?
procedure
(remf* pred lst) -> list?
  pred : procedure?
  lst : list?
procedure
(windows size step lst) -> (listof list?)
  size : exact-positive-integer?
  step : exact-positive-integer?
  lst : list?
procedure
(slice-by proc lst) -> (listof list?)
  proc : (-> any/c any/c any/c)
  lst : list?
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
(make-hashalw-placeholder assocs) -> hash-placeholder?
  assocs : (listof pair?)
procedure
(mpair? v) -> boolean?
  v : any/c
procedure
(mcons a d) -> mpair?
  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/c
procedure
(set-mcdr! p v) -> void?
  p : mpair?
  v : any/c
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*-length vec) -> exact-nonnegative-integer?
  vec : (and/c vector? (not/c impersonator?))
procedure
(vector*-ref vec pos) -> any/c
  vec : (and/c vector? (not/c impersonator?))
  pos : exact-nonnegative-integer?
procedure
(vector*-set! vec pos v) -> void?
  vec : (and/c vector? (not/c immutable?)  (not/c impersonator?))
  pos : exact-nonnegative-integer?
  v : any/c
procedure
(vector-cas! vec pos old-v new-v) -> boolean?
  vec : (and/c vector? (not/c immutable?) (not/c impersonator?))
  pos : exact-nonnegative-integer?
  old-v : any/c
  new-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-empty? v) -> boolean?
  v : vector?
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 : (and/c vector? (not/c immutable?))
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-set/copy vec pos val) -> vector?
  vec : vector?
  pos : exact-nonnegative-integer?
  val : any/c
procedure
(vector-extend vec new-size [val]) -> vector?
  vec : vector?
  new-size : (and/c exact-nonnegative-integer? (>=/c (vector-length vec)))
  val : any/c = 0
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 vec [is-equal?]) -> (or/c natural-number/c #f)
  v : any/c
  vec : vector?
  is-equal? : (-> any/c any/c any/c) = equal?
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
(vector-sort  vec                             
              less-than?                      
             [start                           
              end                             
              #:key key                       
              #:cache-keys? cache-keys?]) -> vector?
  vec : vector?
  less-than? : (any/c any/c . -> . any/c)
  start : exact-nonnegative-integer? = 0
  end : (or/c #f exact-nonnegative-integer?) = #f
  key : (or/c #f (any/c . -> . any/c)) = #f
  cache-keys? : boolean? = #f
procedure
(vector-sort!  vec                             
               less-than?                      
              [start                           
               end                             
               #:key key                       
               #:cache-keys? cache-keys?]) -> void?
  vec : (and/c vector? (not/c immutable?))
  less-than? : (any/c any/c . -> . any/c)
  start : exact-nonnegative-integer? = 0
  end : (or/c #f exact-nonnegative-integer?) = #f
  key : (or/c #f (any/c . -> . any/c)) = #f
  cache-keys? : boolean? = #f
procedure
(vector*-copy vec [start end]) -> vector?
  vec : (and/c vector? (not/c impersonator?))
  start : exact-nonnegative-integer? = 0
  end : exact-nonnegative-integer? = (vector-length v)
procedure
(vector*-append vec ...) -> vector?
  vec : (and/c vector? (not/c impersonator?))
procedure
(vector*-set/copy vec pos val) -> vector?
  vec : (and/c vector? (not/c impersonator?))
  pos : exact-nonnegative-integer?
  val : any/c
procedure
(vector*-extend vec pos [val]) -> vector?
  vec : (and/c vector? (not/c impersonator?))
  pos : exact-nonnegative-integer?
  val : any/c = 0
procedure
(stencil-vector? v) -> boolean?
  v : any/c
procedure
(stencil-vector-mask-width) -> exact-nonnegative-integer?
procedure
(stencil-vector mask v ...) -> stencil-vector?
  mask : (integer-in 0 (sub1 (expt 2 (stencil-vector-mask-width))))
  v : any/c
procedure
(stencil-vector-mask vec)
 -> (integer-in 0 (sub1 (expt 2 (stencil-vector-mask-width))))
  vec : stencil-vector?
procedure
(stencil-vector-length vec)
 -> (integer-in 0 (sub1 (stencil-vector-mask-width)))
  vec : stencil-vector?
procedure
(stencil-vector-ref vec pos) -> any/c
  vec : stencil-vector?
  pos : exact-nonnegative-integer?
procedure
(stencil-vector-set! vec pos v) -> void?
  vec : stencil-vector?
  pos : exact-nonnegative-integer?
  v : any/c
procedure
(stencil-vector-update vec             
                       remove-mask     
                       add-mask        
                       v ...)      -> stencil-vector?
  vec : stencil-vector?
  remove-mask : (integer-in 0 (sub1 (expt 2 (stencil-vector-mask-width))))
  add-mask : (integer-in 0 (sub1 (expt 2 (stencil-vector-mask-width))))
  v : any/c
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
(unbox* box) -> any/c
  box : (and box? (not/c impersonator?))
procedure
(set-box*! box v) -> void?
  box : (and/c box? (not/c immutable?) (not/c impersonator?))
  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? ht) -> boolean?
  ht : hash?
procedure
(hash-equal-always? ht) -> boolean?
  ht : hash?
procedure
(hash-eqv? ht) -> boolean?
  ht : hash?
procedure
(hash-eq? ht) -> boolean?
  ht : hash?
procedure
(hash-strong? ht) -> boolean?
  ht : hash?
procedure
(hash-weak? ht) -> boolean?
  ht : hash?
procedure
(hash-ephemeron? ht) -> boolean?
  ht : hash?
procedure
(hash key val ... ...)
 -> (and/c hash? hash-equal? immutable? hash-strong?)
  key : any/c
  val : any/c
procedure
(hashalw key val ... ...)
 -> (and/c hash? hash-equal-always? immutable? hash-strong?)
  key : any/c
  val : any/c
procedure
(hasheq key val ... ...)
 -> (and/c hash? hash-eq? immutable? hash-strong?)
  key : any/c
  val : any/c
procedure
(hasheqv key val ... ...)
 -> (and/c hash? hash-eqv? immutable? hash-strong?)
  key : any/c
  val : any/c
procedure
(make-hash [assocs])
 -> (and/c hash? hash-equal? (not/c immutable?) hash-strong?)
  assocs : (listof pair?) = null
procedure
(make-hashalw [assocs])
 -> (and/c hash? hash-equal-always? (not/c immutable?) hash-strong?)
  assocs : (listof pair?) = null
procedure
(make-hasheqv [assocs])
 -> (and/c hash? hash-eqv? (not/c immutable?) hash-strong?)
  assocs : (listof pair?) = null
procedure
(make-hasheq [assocs])
 -> (and/c hash? hash-eq? (not/c immutable?) hash-strong?)
  assocs : (listof pair?) = null
procedure
(make-weak-hash [assocs])
 -> (and/c hash? hash-equal? (not/c immutable?) hash-weak?)
  assocs : (listof pair?) = null
procedure
(make-weak-hashalw [assocs])
 -> (and/c hash? hash-equal-always? (not/c immutable?) hash-weak?)
  assocs : (listof pair?) = null
procedure
(make-weak-hasheqv [assocs])
 -> (and/c hash? hash-eqv? (not/c immutable?) hash-weak?)
  assocs : (listof pair?) = null
procedure
(make-weak-hasheq [assocs])
 -> (and/c hash? hash-eq? (not/c immutable?) hash-weak?)
  assocs : (listof pair?) = null
procedure
(make-ephemeron-hash [assocs])
 -> (and/c hash? hash-equal? (not/c immutable?) hash-ephemeron?)
  assocs : (listof pair?) = null
procedure
(make-ephemeron-hashalw [assocs])
 -> (and/c hash? hash-equal-always? (not/c immutable?) hash-ephemeron?)
  assocs : (listof pair?) = null
procedure
(make-ephemeron-hasheqv [assocs])
 -> (and/c hash? hash-eqv? (not/c immutable?) hash-ephemeron?)
  assocs : (listof pair?) = null
procedure
(make-ephemeron-hasheq [assocs])
 -> (and/c hash? hash-eq? (not/c immutable?) hash-ephemeron?)
  assocs : (listof pair?) = null
procedure
(make-immutable-hash [assocs])
 -> (and/c hash? hash-equal? immutable? hash-strong?)
  assocs : (listof pair?) = null
procedure
(make-immutable-hashalw [assocs])
 -> (and/c hash? hash-equal-always? immutable? hash-strong?)
  assocs : (listof pair?) = null
procedure
(make-immutable-hasheqv [assocs])
 -> (and/c hash? hash-eqv? immutable? hash-strong?)
  assocs : (listof pair?) = null
procedure
(make-immutable-hasheq [assocs])
 -> (and/c hash? hash-eq? immutable? hash-strong?)
  assocs : (listof pair?) = null
procedure
(hash-set! ht key v) -> void?
  ht : (and/c hash? (not/c immutable?))
  key : any/c
  v : any/c
procedure
(hash-set*! ht key v ... ...) -> void?
  ht : (and/c hash? (not/c immutable?))
  key : any/c
  v : any/c
procedure
(hash-set ht key v) -> (and/c hash? immutable?)
  ht : (and/c hash? immutable?)
  key : any/c
  v : any/c
procedure
(hash-set* ht key v ... ...) -> (and/c hash? immutable?)
  ht : (and/c hash? immutable?)
  key : any/c
  v : any/c
procedure
(hash-ref ht key [failure-result]) -> any
  ht : hash?
  key : any/c
  failure-result : failure-result/c
                 = (lambda ()
                     (raise (make-exn:fail:contract ....)))
procedure
(hash-ref-key ht key [failure-result]) -> any
  ht : hash?
  key : any/c
  failure-result : failure-result/c
                 = (lambda ()
                     (raise (make-exn:fail:contract ....)))
procedure
(hash-ref! ht key to-set) -> any
  ht : hash?
  key : any/c
  to-set : failure-result/c
procedure
(hash-has-key? ht key) -> boolean?
  ht : hash?
  key : any/c
procedure
(hash-update! ht key updater [failure-result]) -> void?
  ht : (and/c hash? (not/c immutable?))
  key : any/c
  updater : (any/c . -> . any/c)
  failure-result : failure-result/c
                 = (lambda ()
                     (raise (make-exn:fail:contract ....)))
procedure
(hash-update ht key updater [failure-result])
 -> (and/c hash? immutable?)
  ht : (and/c hash? immutable?)
  key : any/c
  updater : (any/c . -> . any/c)
  failure-result : failure-result/c
                 = (lambda ()
                     (raise (make-exn:fail:contract ....)))
procedure
(hash-remove! ht key) -> void?
  ht : (and/c hash? (not/c immutable?))
  key : any/c
procedure
(hash-remove ht key) -> (and/c hash? immutable?)
  ht : (and/c hash? immutable?)
  key : any/c
procedure
(hash-clear! ht) -> void?
  ht : (and/c hash? (not/c immutable?))
procedure
(hash-clear ht) -> (and/c hash? immutable?)
  ht : (and/c hash? immutable?)
procedure
(hash-copy-clear ht [#:kind kind]) -> hash?
  ht : hash?
  kind : (or/c #f 'immutable 'mutable 'weak 'ephemeron) = #f
procedure
(hash-map ht proc [try-order?]) -> (listof any/c)
  ht : hash?
  proc : (any/c any/c . -> . any/c)
  try-order? : any/c = #f
procedure
(hash-map/copy ht proc [#:kind kind]) -> hash?
  ht : hash?
  proc : (any/c any/c . -> . (values any/c any/c))
  kind : (or/c #f 'immutable 'mutable 'weak 'ephemeron) = #f
procedure
(hash-keys ht [try-order?]) -> (listof any/c)
  ht : hash?
  try-order? : any/c = #f
procedure
(hash-values ht [try-order?]) -> (listof any/c)
  ht : hash?
  try-order? : any/c = #f
procedure
(hash->list ht [try-order?]) -> (listof (cons/c any/c any/c))
  ht : hash?
  try-order? : any/c = #f
procedure
(hash-keys-subset? ht1 ht2) -> boolean?
  ht1 : hash?
  ht2 : hash?
procedure
(hash-for-each ht proc [try-order?]) -> void?
  ht : hash?
  proc : (any/c any/c . -> . any)
  try-order? : any/c = #f
procedure
(hash-count ht) -> exact-nonnegative-integer?
  ht : hash?
procedure
(hash-empty? ht) -> boolean?
  ht : hash?
procedure
(hash-iterate-first ht) -> (or/c #f exact-nonnegative-integer?)
  ht : hash?
procedure
(hash-iterate-next ht pos)
 -> (or/c #f exact-nonnegative-integer?)
  ht : hash?
  pos : exact-nonnegative-integer?
procedure
(hash-iterate-key ht pos) -> any/c
  ht : hash?
  pos : exact-nonnegative-integer?
procedure
(hash-iterate-key ht pos bad-index-v) -> any/c
  ht : hash?
  pos : exact-nonnegative-integer?
  bad-index-v : any/c
procedure
(hash-iterate-value ht pos) -> any/c
  ht : hash?
  pos : exact-nonnegative-integer?
procedure
(hash-iterate-value ht pos bad-index-v) -> any/c
  ht : hash?
  pos : exact-nonnegative-integer?
  bad-index-v : any/c
procedure
(hash-iterate-pair ht pos) -> (cons/c any/c any/c)
  ht : hash?
  pos : exact-nonnegative-integer?
procedure
(hash-iterate-pair ht pos bad-index-v) -> (cons/c any/c any/c)
  ht : hash?
  pos : exact-nonnegative-integer?
  bad-index-v : any/c
procedure
(hash-iterate-key+value ht pos) -> any/c any/c
  ht : hash?
  pos : exact-nonnegative-integer?
procedure
(hash-iterate-key+value ht pos bad-index-v) -> any/c any/c
  ht : hash?
  pos : exact-nonnegative-integer?
  bad-index-v : any/c
procedure
(hash-copy ht) -> (and/c hash? (not/c immutable?))
  ht : hash?
procedure
(hash-union  ht0                         
             ht ...                      
            [#:combine combine           
             #:combine/key combine/key]) 
 -> (and/c hash? immutable?)
  ht0 : (and/c hash? immutable?)
  ht : hash?
  combine : (-> any/c any/c any/c)
          = (lambda _ (error 'hash-union ....))
  combine/key : (-> any/c any/c any/c any/c)
              = (lambda (k a b) (combine a b))
procedure
(hash-union!  ht0                             
              ht ...                          
             [#:combine combine               
              #:combine/key combine/key]) -> void?
  ht0 : (and/c hash? (not/c immutable?))
  ht : hash?
  combine : (-> any/c any/c any/c)
          = (lambda _ (error 'hash-union ....))
  combine/key : (-> any/c any/c any/c any/c)
              = (lambda (k a b) (combine a b))
procedure
(hash-intersect  ht0                         
                 ht ...                      
                [#:combine combine           
                 #:combine/key combine/key]) 
 -> (and/c hash? immutable?)
  ht0 : (and/c hash? immutable?)
  ht : hash?
  combine : (-> any/c any/c any/c)
          = (lambda _ (error 'hash-intersect ...))
  combine/key : (-> any/c any/c any/c any/c)
              = (lambda (k a b) (combine a b))
procedure
(hash-filter ht pred) -> hash?
  ht : hash?
  pred : (-> any/c any/c boolean?)
procedure
(hash-filter-keys ht pred) -> hash?
  ht : hash?
  pred : procedure?
procedure
(hash-filter-values ht pred) -> hash?
  ht : hash?
  pred : procedure?
procedure
(treelist? v) -> boolean?
  v : any/c
procedure
(treelist v ...) -> treelist?
  v : any/c
procedure
(make-treelist size v) -> treelist?
  size : exact-nonnegative-integer?
  v : any/c
procedure
(treelist-empty? tl) -> boolean?
  tl : treelist?
value
empty-treelist : (and/c treelist? treelist-empty?)
procedure
(treelist-length tl) -> exact-nonnegative-integer?
  tl : treelist?
procedure
(treelist-ref tl pos) -> any/c
  tl : treelist?
  pos : exact-nonnegative-integer?
procedure
(treelist-first tl) -> any/c
  tl : treelist?
procedure
(treelist-last tl) -> any/c
  tl : treelist?
procedure
(treelist-insert tl pos v) -> treelist?
  tl : treelist?
  pos : exact-nonnegative-integer?
  v : any/c
procedure
(treelist-add tl v) -> treelist?
  tl : treelist?
  v : any/c
procedure
(treelist-cons tl v) -> treelist?
  tl : treelist?
  v : any/c
procedure
(treelist-delete tl pos) -> treelist?
  tl : treelist?
  pos : exact-nonnegative-integer?
procedure
(treelist-set tl pos v) -> treelist?
  tl : treelist?
  pos : exact-nonnegative-integer?
  v : any/c
procedure
(treelist-append tl ...) -> treelist?
  tl : treelist?
procedure
(treelist-take tl n) -> treelist?
  tl : treelist?
  n : exact-nonnegative-integer?
procedure
(treelist-drop tl n) -> treelist?
  tl : treelist?
  n : exact-nonnegative-integer?
procedure
(treelist-take-right tl n) -> treelist?
  tl : treelist?
  n : exact-nonnegative-integer?
procedure
(treelist-drop-right tl n) -> treelist?
  tl : treelist?
  n : exact-nonnegative-integer?
procedure
(treelist-sublist tl n m) -> treelist?
  tl : treelist?
  n : exact-nonnegative-integer?
  m : exact-nonnegative-integer?
procedure
(treelist-reverse tl) -> treelist?
  tl : treelist?
procedure
(treelist-rest tl) -> treelist?
  tl : treelist?
procedure
(treelist->vector tl) -> vector?
  tl : treelist?
procedure
(treelist->list tl) -> list?
  tl : treelist?
procedure
(vector->treelist vec) -> treelist?
  vec : vector?
procedure
(list->treelist lst) -> treelist?
  lst : list?
procedure
(treelist-map tl proc) -> treelist?
  tl : treelist?
  proc : (any/c . -> . any/c)
procedure
(treelist-for-each tl proc) -> void?
  tl : treelist?
  proc : (any/c . -> . any)
procedure
(treelist-filter keep tl) -> treelist?
  keep : (any/c . -> . any/c)
  tl : treelist?
procedure
(treelist-member? tl v [eql?]) -> boolean?
  tl : treelist?
  v : any/c
  eql? : (any/c any/c . -> . any/c) = equal?
procedure
(treelist-find tl pred) -> any/c
  tl : treelist?
  pred : (any/c . -> . any/c)
procedure
(treelist-index-of tl v [eql?])
 -> (or/c exact-nonnegative-integer? #f)
  tl : treelist?
  v : any/c
  eql? : (any/c any/c . -> . any/c) = equal?
procedure
(treelist-flatten v) -> treelist?
  v : any/c
procedure
(treelist-append* tlotl) -> treelist?
  tlotl : (treelist/c treelist?)
procedure
(treelist-sort  tl                              
                less-than?                      
               [#:key key                       
                #:cache-keys? cache-keys?]) -> treelist?
  tl : treelist?
  less-than? : (any/c any/c . -> . any/c)
  key : (or/c #f (any/c . -> . any/c)) = #f
  cache-keys? : boolean? = #f
procedure
(in-treelist tl) -> sequence?
  tl : treelist?
procedure
(sequence->treelist s) -> treelist?
  s : sequence?
syntax
(for/treelist (for-clause ...) body-or-break ... body)
syntax
(for*/treelist (for-clause ...) body-or-break ... body)
procedure
(chaperone-treelist  tl                      
                     #:state state           
                    [#:state-key state-key]  
                     #:ref ref-proc          
                     #:set set-proc          
                     #:insert insert-proc    
                     #:delete delete-proc    
                     #:take take-proc        
                     #:drop drop-proc        
                     #:append append-proc    
                     #:prepend prepend-proc  
                    [#:append2 append2-proc] 
                     prop                    
                     prop-val ...            
                     ...)                    
 -> (and/c treelist? chaperone?)
  tl : treelist?
  state : any/c
  state-key : any/c = (list 'fresh)
  ref-proc : (treelist? exact-nonnegative-integer? any/c any/c
              . -> . any/c)
  set-proc : (treelist? exact-nonnegative-integer? any/c any/c
              . -> . (values any/c any/c))
  insert-proc : (treelist? exact-nonnegative-integer? any/c any/c
                 . -> . (values any/c any/c))
  delete-proc : (treelist? exact-nonnegative-integer? any/c
                 . -> . any/c)
  take-proc : (treelist? exact-nonnegative-integer? any/c
               . -> . any/c)
  drop-proc : (treelist? exact-nonnegative-integer? any/c
               . -> . any/c)
  append-proc : (treelist? treelist? any/c
                 . -> . (values treelist? any/c))
  prepend-proc : (treelist? treelist? any/c
                  . -> . (values treelist? any/c))
  append2-proc : (or/c #f (treelist? treelist? any/c any/c
                           . -> . (values treelist? any/c any/c)))
               = #f
  prop : impersonator-property?
  prop-val : any/c
procedure
(treelist-chaperone-state  tl            
                           state-key     
                          [fail-k])  -> any/c
  tl : treelist?
  state-key : any/c
  fail-k : (procedure-arity-includes/c 0) = key-error
procedure
(mutable-treelist? v) -> boolean?
  v : any/c
procedure
(mutable-treelist v ...) -> mutable-treelist?
  v : any/c
procedure
(make-mutable-treelist n [v]) -> mutable-treelist?
  n : exact-nonnegative-integer?
  v : any/c = #f
procedure
(treelist-copy tl) -> mutable-treelist?
  tl : treelist?
procedure
(mutable-treelist-copy tl) -> mutable-treelist?
  tl : mutable-treelist?
procedure
(mutable-treelist-snapshot tl [n m]) -> treelist?
  tl : mutable-treelist?
  n : exact-nonnegative-integer? = 0
  m : (or/c #f exact-nonnegative-integer?) = #f
procedure
(mutable-treelist-empty? tl) -> boolean?
  tl : mutable-treelist?
procedure
(mutable-treelist-length tl) -> exact-nonnegative-integer?
  tl : mutable-treelist?
procedure
(mutable-treelist-ref tl pos) -> any/c
  tl : mutable-treelist?
  pos : exact-nonnegative-integer?
procedure
(mutable-treelist-first tl) -> any/c
  tl : mutable-treelist?
procedure
(mutable-treelist-last tl) -> any/c
  tl : mutable-treelist?
procedure
(mutable-treelist-insert! tl pos v) -> void?
  tl : mutable-treelist?
  pos : exact-nonnegative-integer?
  v : any/c
procedure
(mutable-treelist-cons! tl v) -> void?
  tl : mutable-treelist?
  v : any/c
procedure
(mutable-treelist-add! tl v) -> void?
  tl : mutable-treelist?
  v : any/c
procedure
(mutable-treelist-delete! tl pos) -> void?
  tl : mutable-treelist?
  pos : exact-nonnegative-integer?
procedure
(mutable-treelist-set! tl pos v) -> void?
  tl : mutable-treelist?
  pos : exact-nonnegative-integer?
  v : any/c
procedure
(mutable-treelist-append! tl other-tl) -> void?
  tl : mutable-treelist?
  other-tl : (or/c treelist? mutable-treelist?)
procedure
(mutable-treelist-prepend! tl other-tl) -> void?
  tl : mutable-treelist?
  other-tl : (or/c treelist? mutable-treelist?)
procedure
(mutable-treelist-take! tl n) -> void?
  tl : mutable-treelist?
  n : exact-nonnegative-integer?
procedure
(mutable-treelist-drop! tl n) -> void?
  tl : mutable-treelist?
  n : exact-nonnegative-integer?
procedure
(mutable-treelist-take-right! tl n) -> void?
  tl : mutable-treelist?
  n : exact-nonnegative-integer?
procedure
(mutable-treelist-drop-right! tl n) -> void?
  tl : mutable-treelist?
  n : exact-nonnegative-integer?
procedure
(mutable-treelist-sublist! tl n m) -> void?
  tl : mutable-treelist?
  n : exact-nonnegative-integer?
  m : exact-nonnegative-integer?
procedure
(mutable-treelist-reverse! tl) -> void?
  tl : mutable-treelist?
procedure
(mutable-treelist->vector tl) -> vector?
  tl : mutable-treelist?
procedure
(mutable-treelist->list tl) -> list?
  tl : mutable-treelist?
procedure
(vector->mutable-treelist vec) -> mutable-treelist?
  vec : vector?
procedure
(list->mutable-treelist lst) -> mutable-treelist?
  lst : list?
procedure
(mutable-treelist-map! tl proc) -> void?
  tl : mutable-treelist?
  proc : (any/c . -> . any/c)
procedure
(mutable-treelist-for-each tl proc) -> void?
  tl : mutable-treelist?
  proc : (any/c . -> . any)
procedure
(mutable-treelist-member? tl v [eql?]) -> boolean?
  tl : mutable-treelist?
  v : any/c
  eql? : (any/c any/c . -> . any/c) = equal?
procedure
(mutable-treelist-find tl pred) -> any/c
  tl : mutable-treelist?
  pred : (any/c . -> . any/c)
procedure
(mutable-treelist-sort!  tl                              
                         less-than?                      
                        [#:key key                       
                         #:cache-keys? cache-keys?]) -> void?
  tl : mutable-treelist?
  less-than? : (any/c any/c . -> . any/c)
  key : (or/c #f (any/c . -> . any/c)) = #f
  cache-keys? : boolean? = #f
procedure
(in-mutable-treelist tl) -> sequence?
  tl : mutable-treelist?
syntax
(for/mutable-treelist maybe-length (for-clause ...) body-or-break ... body)
syntax
(for*/mutable-treelist maybe-length (for-clause ...) body-or-break ... body)
procedure
(chaperone-mutable-treelist  tl                      
                             #:ref ref-proc          
                             #:set set-proc          
                             #:insert insert-proc    
                             #:append append-proc    
                            [#:prepend prepend-proc] 
                             prop                    
                             prop-val ...            
                             ...)                    
 -> (and/c mutable-treelist? chaperone?)
  tl : mutable-treelist?
  ref-proc : (mutable-treelist? exact-nonnegative-integer? any/c
              . -> . any/c)
  set-proc : (mutable-treelist? exact-nonnegative-integer? any/c
              . -> . any/c)
  insert-proc : (mutable-treelist? exact-nonnegative-integer? any/c
                 . -> . any/c)
  append-proc : (mutable-treelist? treelist?
                 . -> . treelist?)
  prepend-proc : (treelist? mutable-treelist?
                  . -> . treelist?)
               = (λ (o t) (append-proc t o))
  prop : impersonator-property?
  prop-val : any/c
procedure
(impersonate-mutable-treelist  tl                      
                               #:ref ref-proc          
                               #:set set-proc          
                               #:insert insert-proc    
                               #:append append-proc    
                              [#:prepend prepend-proc] 
                               prop                    
                               prop-val ...            
                               ...)                    
 -> (and/c mutable-treelist? impersonator?)
  tl : mutable-treelist?
  ref-proc : (mutable-treelist? exact-nonnegative-integer? any/c
              . -> . any/c)
  set-proc : (mutable-treelist? exact-nonnegative-integer? any/c
              . -> . any/c)
  insert-proc : (mutable-treelist? exact-nonnegative-integer? any/c
                 . -> . any/c)
  append-proc : (mutable-treelist? treelist?
                 . -> . treelist?)
  prepend-proc : (treelist? mutable-treelist?
                  . -> . treelist?)
               = (λ (o t) (append-proc t o))
  prop : impersonator-property?
  prop-val : any/c
procedure
(sequence? v) -> boolean?
  v : any/c
procedure
(in-range end) -> stream?
  end : real?
(in-range start end [step]) -> stream?
  start : real?
  end : real?
  step : real? = 1
procedure
(in-inclusive-range start end [step]) -> stream?
  start : real?
  end : real?
  step : real? = 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?
(in-hash hash bad-index-v) -> sequence?
  hash : hash?
  bad-index-v : any/c
procedure
(in-hash-keys hash) -> sequence?
  hash : hash?
(in-hash-keys hash bad-index-v) -> sequence?
  hash : hash?
  bad-index-v : any/c
procedure
(in-hash-values hash) -> sequence?
  hash : hash?
(in-hash-values hash bad-index-v) -> sequence?
  hash : hash?
  bad-index-v : any/c
procedure
(in-hash-pairs hash) -> sequence?
  hash : hash?
(in-hash-pairs hash bad-index-v) -> sequence?
  hash : hash?
  bad-index-v : any/c
procedure
(in-mutable-hash hash) -> sequence?
  hash : (and/c hash? (not/c immutable?) hash-strong?)
procedure
(in-mutable-hash hash bad-index-v) -> sequence?
  hash : (and/c hash? (not/c immutable?) hash-strong?)
  bad-index-v : any/c
procedure
(in-mutable-hash-keys hash) -> sequence?
  hash : (and/c hash? (not/c immutable?) hash-strong?)
procedure
(in-mutable-hash-keys hash bad-index-v) -> sequence?
  hash : (and/c hash? (not/c immutable?) hash-strong?)
  bad-index-v : any/c
procedure
(in-mutable-hash-values hash) -> sequence?
  hash : (and/c hash? (not/c immutable?) hash-strong?)
procedure
(in-mutable-hash-values hash bad-index-v) -> sequence?
  hash : (and/c hash? (not/c immutable?) hash-strong?)
  bad-index-v : any/c
procedure
(in-mutable-hash-pairs hash) -> sequence?
  hash : (and/c hash? (not/c immutable?) hash-strong?)
procedure
(in-mutable-hash-pairs hash bad-index-v) -> sequence?
  hash : (and/c hash? (not/c immutable?) hash-strong?)
  bad-index-v : any/c
procedure
(in-immutable-hash hash) -> sequence?
  hash : (and/c hash? immutable?)
procedure
(in-immutable-hash hash bad-index-v) -> sequence?
  hash : (and/c hash? immutable?)
  bad-index-v : any/c
procedure
(in-immutable-hash-keys hash) -> sequence?
  hash : (and/c hash? immutable?)
procedure
(in-immutable-hash-keys hash bad-index-v) -> sequence?
  hash : (and/c hash? immutable?)
  bad-index-v : any/c
procedure
(in-immutable-hash-values hash) -> sequence?
  hash : (and/c hash? immutable?)
procedure
(in-immutable-hash-values hash bad-index-v) -> sequence?
  hash : (and/c hash? immutable?)
  bad-index-v : any/c
procedure
(in-immutable-hash-pairs hash) -> sequence?
  hash : (and/c hash? immutable?)
procedure
(in-immutable-hash-pairs hash bad-index-v) -> sequence?
  hash : (and/c hash? immutable?)
  bad-index-v : any/c
procedure
(in-weak-hash hash) -> sequence?
  hash : (and/c hash? hash-weak?)
procedure
(in-weak-hash hash bad-index-v) -> sequence?
  hash : (and/c hash? hash-weak?)
  bad-index-v : any/c
procedure
(in-weak-hash-keys hash) -> sequence?
  hash : (and/c hash? hash-weak?)
procedure
(in-weak-hash-keys hash bad-index-v) -> sequence?
  hash : (and/c hash? hash-weak?)
  bad-index-v : any/c
procedure
(in-weak-hash-values hash) -> sequence?
  hash : (and/c hash? hash-weak?)
procedure
(in-weak-hash-keys hash bad-index-v) -> sequence?
  hash : (and/c hash? hash-weak?)
  bad-index-v : any/c
procedure
(in-weak-hash-pairs hash) -> sequence?
  hash : (and/c hash? hash-weak?)
procedure
(in-weak-hash-pairs hash bad-index-v) -> sequence?
  hash : (and/c hash? hash-weak?)
  bad-index-v : any/c
procedure
(in-ephemeron-hash hash) -> sequence?
  hash : (and/c hash? hash-ephemeron?)
procedure
(in-ephemeron-hash hash bad-index-v) -> sequence?
  hash : (and/c hash? hash-ephemeron?)
  bad-index-v : any/c
procedure
(in-ephemeron-hash-keys hash) -> sequence?
  hash : (and/c hash? hash-ephemeron?)
procedure
(in-ephemeron-hash-keys hash bad-index-v) -> sequence?
  hash : (and/c hash? hash-ephemeron?)
  bad-index-v : any/c
procedure
(in-ephemeron-hash-values hash) -> sequence?
  hash : (and/c hash? hash-ephemeron?)
procedure
(in-ephemeron-hash-keys hash bad-index-v) -> sequence?
  hash : (and/c hash? hash-ephemeron?)
  bad-index-v : any/c
procedure
(in-ephemeron-hash-pairs hash) -> sequence?
  hash : (and/c hash? hash-ephemeron?)
procedure
(in-ephemeron-hash-pairs hash bad-index-v) -> sequence?
  hash : (and/c hash? hash-ephemeron?)
  bad-index-v : any/c
procedure
(in-directory [dir use-dir?]) -> (sequence/c path?)
  dir : (or/c #f path-string?) = #f
  use-dir? : ((and/c path? complete-path?) . -> . any/c)
           = (lambda (dir-path) #t)
procedure
(in-producer producer) -> sequence?
  producer : 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-parallel-values n seq ... ...) -> sequence?
  n : exact-nonnegative-integer?
  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 : (or/c (-> (values (any/c . -> . any)
                            (any/c . -> . any/c)
                            any/c
                            (or/c (any/c . -> . any/c) #f)
                            (or/c (any/c ... . -> . any/c) #f)
                            (or/c (any/c any/c ... . -> . any/c) #f)))
                (-> (values (any/c . -> . any)
                            (or/c (any/c . -> . any/c) #f)
                            (any/c . -> . any/c)
                            any/c
                            (or/c (any/c . -> . any/c) #f)
                            (or/c (any/c ... . -> . any/c) #f)
                            (or/c (any/c any/c ... . -> . 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
(sequence/c [#:min-count min-count]     
             elem/c ...)            -> contract?
  min-count : (or/c #f exact-nonnegative-integer?) = #f
  elem/c : contract?
procedure
(in-syntax stx) -> sequence?
  stx : syntax?
procedure
(in-slice length seq) -> sequence?
  length : exact-positive-integer?
  seq : sequence?
procedure
(initiate-sequence                                                      
                    #:pos->element pos->element                         
                   [#:early-next-pos early-next-pos]                    
                    #:next-pos next-pos                                 
                    #:init-pos init-pos                                 
                   [#:continue-with-pos? continue-with-pos?             
                    #:continue-with-val? continue-with-val?             
                    #:continue-after-pos+val? continue-after-pos+val?]) 
 -> (any/c . -> . any)
    (or/c (any/c . -> . any) #f)
    (any/c . -> . any/c)
    any/c
    (or/c (any/c . -> . any/c) #f)
    (or/c (any/c ... . -> . any/c) #f)
    (or/c (any/c any/c ... . -> . any/c) #f)
  pos->element : (any/c . -> . any)
  early-next-pos : (or/c (any/c . -> . any) #f) = #f
  next-pos : (any/c . -> . any/c)
  init-pos : any/c
  continue-with-pos? : (or/c (any/c . -> . any/c) #f) = #f
  continue-with-val? : (or/c (any/c ... . -> . any/c) #f) = #f
  continue-after-pos+val? : (or/c (any/c any/c ... . -> . any/c) #f)
                          = #f
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)
(stream-cons #:eager first-expr rest-expr)
(stream-cons first-expr #:eager rest-expr)
(stream-cons #:eager first-expr #:eager rest-expr)
syntax
(stream-lazy stream-expr)
(stream-lazy #:who who-expr stream-expr)
procedure
(stream-force s) -> stream?
  s : stream?
syntax
(stream elem-expr ...)
 
elem-expr = (values single-expr ...)
          | single-expr
syntax
(stream* elem-expr ... tail-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-take 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
syntax
(for/stream (for-clause ...) body-or-break ... body)
syntax
(for*/stream (for-clause ...) body-or-break ... body)
value
gen:stream : any/c
value
prop:stream : struct-type-property?
procedure
(stream/c c) -> contract?
  c : contract?
procedure
(generator? v) -> boolean?
  v : any/c
syntax
(generator formals body ...+)
 
formals = (id ...)
        | (id ...+ . rest-id)
        | rest-id
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-implements? d sym ...) -> boolean?
  d : dict?
  sym : symbol?
procedure
(dict-implements/c sym ...) -> flat-contract?
  sym : symbol?
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?
syntax
gen:dict
value
prop:dict : struct-type-property?
procedure
(dict-ref dict key [failure-result]) -> any
  dict : dict?
  key : any/c
  failure-result : failure-result/c
                 = (lambda () (raise (make-exn:fail ....)))
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-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-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
(dict-has-key? dict key) -> boolean?
  dict : dict?
  key : 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-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 : failure-result/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 : failure-result/c
                 = (lambda () (raise (make-exn:fail ....)))
procedure
(dict-map dict proc) -> (listof any/c)
  dict : dict?
  proc : (any/c any/c . -> . any/c)
procedure
(dict-map/copy dict proc) -> dict?
  dict : dict?
  proc : (any/c any/c . -> . (values any/c any/c))
procedure
(dict-for-each dict proc) -> void?
  dict : dict?
  proc : (any/c any/c . -> . any)
procedure
(dict-empty? dict) -> boolean?
  dict : dict?
procedure
(dict-count dict) -> exact-nonnegative-integer?
  dict : dict?
procedure
(dict-copy dict) -> dict?
  dict : dict?
procedure
(dict-clear dict) -> dict?
  dict : dict?
procedure
(dict-clear! dict) -> void?
  dict : dict?
procedure
(dict-keys dict) -> list?
  dict : dict?
procedure
(dict-values dict) -> list?
  dict : dict?
procedure
(dict->list dict) -> list?
  dict : dict?
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?
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?
syntax
(define-custom-hash-types name
                          optional-predicate
                          comparison-expr
                          optional-hash-functions)
 
     optional-predicate = 
                        | #:key? predicate-expr
                           
optional-hash-functions = 
                        | hash1-expr
                        | hash1-expr hash2-expr
procedure
(make-custom-hash-types  eql?            
                        [hash1           
                         hash2           
                         #:key? key?     
                         #:name name     
                         #:for who]) -> (any/c . -> . boolean?)
                                        (any/c . -> . boolean?)
                                        (any/c . -> . boolean?)
                                        (any/c . -> . boolean?)
                                        (->* [] [dict?] dict?)
                                        (->* [] [dict?] dict?)
                                        (->* [] [dict?] dict?)
  eql? : (or/c (any/c any/c . -> . any/c)
               (any/c any/c (any/c any/c . -> . any/c) . -> . any/c))
  hash1 : (or/c (any/c . -> . exact-integer?)
                (any/c (any/c . -> . exact-integer?) . -> . exact-integer?))
        = (const 1)
  hash2 : (or/c (any/c . -> . exact-integer?)
                (any/c (any/c . -> . exact-integer?) . -> . exact-integer?))
        = (const 1)
  key? : (any/c . -> . boolean?) = (const #true)
  name : symbol? = 'custom-hash
  who : symbol? = 'make-custom-hash-types
procedure
(make-custom-hash  eql?              
                  [hash1             
                   hash2             
                   #:key? key?]) -> dict?
  eql? : (or/c (any/c any/c . -> . any/c)
               (any/c any/c (any/c any/c . -> . any/c) . -> . any/c))
  hash1 : (or/c (any/c . -> . exact-integer?)
                (any/c (any/c . -> . exact-integer?) . -> . exact-integer?))
        = (const 1)
  hash2 : (or/c (any/c . -> . exact-integer?)
                (any/c (any/c . -> . exact-integer?) . -> . exact-integer?))
        = (const 1)
  key? : (any/c . -> . boolean?) = (λ (x) #true)
procedure
(make-weak-custom-hash  eql?              
                       [hash1             
                        hash2             
                        #:key? key?]) -> dict?
  eql? : (or/c (any/c any/c . -> . any/c)
               (any/c any/c (any/c any/c . -> . any/c) . -> . any/c))
  hash1 : (or/c (any/c . -> . exact-integer?)
                (any/c (any/c . -> . exact-integer?) . -> . exact-integer?))
        = (const 1)
  hash2 : (or/c (any/c . -> . exact-integer?)
                (any/c (any/c . -> . exact-integer?) . -> . exact-integer?))
        = (const 1)
  key? : (any/c . -> . boolean?) = (λ (x) #true)
procedure
(make-immutable-custom-hash  eql?              
                            [hash1             
                             hash2             
                             #:key? key?]) -> dict?
  eql? : (or/c (any/c any/c . -> . any/c)
               (any/c any/c (any/c any/c . -> . any/c) . -> . any/c))
  hash1 : (or/c (any/c . -> . exact-integer?)
                (any/c (any/c . -> . exact-integer?) . -> . exact-integer?))
        = (const 1)
  hash2 : (or/c (any/c . -> . exact-integer?)
                (any/c (any/c . -> . exact-integer?) . -> . exact-integer?))
        = (const 1)
  key? : (any/c . -> . boolean?) = (λ (x) #true)
procedure
(keyword-apply/dict proc                   
                    kw-dict                
                    pos-arg ...            
                    pos-args               
                    #:<kw> kw-arg ...) -> any
  proc : procedure?
  kw-dict : dict?
  pos-arg : any/c
  pos-args : (listof any/c)
  kw-arg : any/c
procedure
(set-equal? x) -> boolean?
  x : any/c
procedure
(set-equal-always? x) -> boolean?
  x : any/c
procedure
(set-eqv? x) -> boolean?
  x : any/c
procedure
(set-eq? x) -> boolean?
  x : any/c
procedure
(set? x) -> boolean?
  x : any/c
procedure
(set-mutable? x) -> boolean?
  x : any/c
procedure
(set-weak? x) -> boolean?
  x : any/c
procedure
(set v ...) -> (and/c generic-set? set-equal? set?)
  v : any/c
procedure
(setalw v ...) -> (and/c generic-set? set-equal-always? set?)
  v : any/c
procedure
(seteqv v ...) -> (and/c generic-set? set-eqv? set?)
  v : any/c
procedure
(seteq v ...) -> (and/c generic-set? set-eq? set?)
  v : any/c
procedure
(mutable-set v ...)
 -> (and/c generic-set? set-equal? set-mutable?)
  v : any/c
procedure
(mutable-setalw v ...)
 -> (and/c generic-set? set-equal-always? set-mutable?)
  v : any/c
procedure
(mutable-seteqv v ...)
 -> (and/c generic-set? set-eqv? set-mutable?)
  v : any/c
procedure
(mutable-seteq v ...)
 -> (and/c generic-set? set-eq? set-mutable?)
  v : any/c
procedure
(weak-set v ...) -> (and/c generic-set? set-equal? set-weak?)
  v : any/c
procedure
(weak-setalw v ...)
 -> (and/c generic-set? set-equal-always? set-weak?)
  v : any/c
procedure
(weak-seteqv v ...) -> (and/c generic-set? set-eqv? set-weak?)
  v : any/c
procedure
(weak-seteq v ...) -> (and/c generic-set? set-eq? set-weak?)
  v : any/c
procedure
(list->set lst) -> (and/c generic-set? set-equal? set?)
  lst : list?
procedure
(list->setalw lst)
 -> (and/c generic-set? set-equal-always? set?)
  lst : list?
procedure
(list->seteqv lst) -> (and/c generic-set? set-eqv? set?)
  lst : list?
procedure
(list->seteq lst) -> (and/c generic-set? set-eq? set?)
  lst : list?
procedure
(list->mutable-set lst)
 -> (and/c generic-set? set-equal? set-mutable?)
  lst : list?
procedure
(list->mutable-setalw lst)
 -> (and/c generic-set? set-equal-always? set-mutable?)
  lst : list?
procedure
(list->mutable-seteqv lst)
 -> (and/c generic-set? set-eqv? set-mutable?)
  lst : list?
procedure
(list->mutable-seteq lst)
 -> (and/c generic-set? set-eq? set-mutable?)
  lst : list?
procedure
(list->weak-set lst)
 -> (and/c generic-set? set-equal? set-weak?)
  lst : list?
procedure
(list->weak-setalw lst)
 -> (and/c generic-set? set-equal-always? set-weak?)
  lst : list?
procedure
(list->weak-seteqv lst)
 -> (and/c generic-set? set-eqv? set-weak?)
  lst : list?
procedure
(list->weak-seteq lst) -> (and/c generic-set? set-eq? set-weak?)
  lst : list?
syntax
(for/set (for-clause ...) body ...+)
syntax
(for/seteq (for-clause ...) body ...+)
syntax
(for/seteqv (for-clause ...) body ...+)
syntax
(for/setalw (for-clause ...) body ...+)
syntax
(for*/set (for-clause ...) body ...+)
syntax
(for*/seteq (for-clause ...) body ...+)
syntax
(for*/seteqv (for-clause ...) body ...+)
syntax
(for*/setalw (for-clause ...) body ...+)
syntax
(for/mutable-set (for-clause ...) body ...+)
syntax
(for/mutable-seteq (for-clause ...) body ...+)
syntax
(for/mutable-seteqv (for-clause ...) body ...+)
syntax
(for/mutable-setalw (for-clause ...) body ...+)
syntax
(for*/mutable-set (for-clause ...) body ...+)
syntax
(for*/mutable-seteq (for-clause ...) body ...+)
syntax
(for*/mutable-seteqv (for-clause ...) body ...+)
syntax
(for*/mutable-setalw (for-clause ...) body ...+)
syntax
(for/weak-set (for-clause ...) body ...+)
syntax
(for/weak-seteq (for-clause ...) body ...+)
syntax
(for/weak-seteqv (for-clause ...) body ...+)
syntax
(for/weak-setalw (for-clause ...) body ...+)
syntax
(for*/weak-set (for-clause ...) body ...+)
syntax
(for*/weak-seteq (for-clause ...) body ...+)
syntax
(for*/weak-seteqv (for-clause ...) body ...+)
syntax
(for*/weak-setalw (for-clause ...) body ...+)
procedure
(in-immutable-set st) -> sequence?
  st : set?
procedure
(in-mutable-set st) -> sequence?
  st : set-mutable?
procedure
(in-weak-set st) -> sequence?
  st : set-weak?
procedure
(generic-set? v) -> boolean?
  v : any/c
procedure
(set-implements? st sym ...) -> boolean?
  st : generic-set?
  sym : symbol?
procedure
(set-implements/c sym ...) -> flat-contract?
  sym : symbol?
procedure
(set/c  elem/c                          
       [#:cmp cmp                       
        #:kind kind                     
        #:lazy? lazy?                   
        #:equal-key/c equal-key/c]) -> contract?
  elem/c : chaperone-contract?
  cmp : (or/c 'dont-care 'equal 'equal-always 'eqv 'eq)
      = 'dont-care
  kind : (or/c 'dont-care 'immutable 'mutable 'weak 'mutable-or-weak)
       = 'immutable
  lazy? : any/c = (not (and (equal? kind 'immutable)
                            (flat-contract? elem/c)))
  equal-key/c : contract? = any/c
syntax
gen:set
procedure
(set-member? st v) -> boolean?
  st : generic-set?
  v : any/c
procedure
(set-add st v) -> generic-set?
  st : generic-set?
  v : any/c
procedure
(set-add! st v) -> void?
  st : generic-set?
  v : any/c
procedure
(set-remove st v) -> generic-set?
  st : generic-set?
  v : any/c
procedure
(set-remove! st v) -> void?
  st : generic-set?
  v : any/c
procedure
(set-empty? st) -> boolean?
  st : generic-set?
procedure
(set-count st) -> exact-nonnegative-integer?
  st : generic-set?
procedure
(set-first st) -> any/c
  st : (and/c generic-set? (not/c set-empty?))
procedure
(set-rest st) -> generic-set?
  st : (and/c generic-set? (not/c set-empty?))
procedure
(set->stream st) -> stream?
  st : generic-set?
procedure
(set-copy st) -> generic-set?
  st : generic-set?
procedure
(set-copy-clear st) -> (and/c generic-set? set-empty?)
  st : generic-set?
procedure
(set-clear st) -> (and/c generic-set? set-empty?)
  st : generic-set?
procedure
(set-clear! st) -> void?
  st : generic-set?
procedure
(set-union st0 st ...) -> generic-set?
  st0 : generic-set?
  st : generic-set?
procedure
(set-union! st0 st ...) -> void?
  st0 : generic-set?
  st : generic-set?
procedure
(set-intersect st0 st ...) -> generic-set?
  st0 : generic-set?
  st : generic-set?
procedure
(set-intersect! st0 st ...) -> void?
  st0 : generic-set?
  st : generic-set?
procedure
(set-subtract st0 st ...) -> generic-set?
  st0 : generic-set?
  st : generic-set?
procedure
(set-subtract! st0 st ...) -> void?
  st0 : generic-set?
  st : generic-set?
procedure
(set-symmetric-difference st0 st ...) -> generic-set?
  st0 : generic-set?
  st : generic-set?
procedure
(set-symmetric-difference! st0 st ...) -> void?
  st0 : generic-set?
  st : generic-set?
procedure
(set=? st st2) -> boolean?
  st : generic-set?
  st2 : generic-set?
procedure
(subset? st st2) -> boolean?
  st : generic-set?
  st2 : generic-set?
procedure
(proper-subset? st st2) -> boolean?
  st : generic-set?
  st2 : generic-set?
procedure
(set->list st) -> list?
  st : generic-set?
procedure
(set-map st proc) -> (listof any/c)
  st : generic-set?
  proc : (any/c . -> . any/c)
procedure
(set-for-each st proc) -> void?
  st : generic-set?
  proc : (any/c . -> . any)
procedure
(in-set st) -> sequence?
  st : generic-set?
procedure
(impersonate-hash-set  st              
                       inject-proc     
                       add-proc        
                       shrink-proc     
                       extract-proc    
                      [clear-proc      
                       equal-key-proc] 
                       prop            
                       prop-val ...    
                       ...)            
 -> (and/c (or/c set-mutable? set-weak?) impersonator?)
  st : (or/c set-mutable? set-weak?)
  inject-proc : (or/c #f (-> set? any/c any/c))
  add-proc : (or/c #f (-> set? any/c any/c))
  shrink-proc : (or/c #f (-> set? any/c any/c))
  extract-proc : (or/c #f (-> set? any/c any/c))
  clear-proc : (or/c #f (-> set? any)) = #f
  equal-key-proc : (or/c #f (-> set? any/c any/c)) = #f
  prop : impersonator-property?
  prop-val : any/c
procedure
(chaperone-hash-set  st              
                     inject-proc     
                     add-proc        
                     shrink-proc     
                     extract-proc    
                    [clear-proc      
                     equal-key-proc] 
                     prop            
                     prop-val ...    
                     ...)            
 -> (and/c (or/c set? set-mutable? set-weak?) chaperone?)
  st : (or/c set? set-mutable? set-weak?)
  inject-proc : (or/c #f (-> set? any/c any/c))
  add-proc : (or/c #f (-> set? any/c any/c))
  shrink-proc : (or/c #f (-> set? any/c any/c))
  extract-proc : (or/c #f (-> set? any/c any/c))
  clear-proc : (or/c #f (-> set? any)) = #f
  equal-key-proc : (or/c #f (-> set? any/c any/c)) = #f
  prop : impersonator-property?
  prop-val : any/c
syntax
(define-custom-set-types name
                         optional-predicate
                         comparison-expr
                         optional-hash-functions)
 
     optional-predicate = 
                        | #:elem? predicate-expr
                           
optional-hash-functions = 
                        | hash1-expr
                        | hash1-expr hash2-expr
procedure
(make-custom-set-types  eql?          
                       [hash1         
                        hash2         
                        #:elem? elem? 
                        #:name name   
                        #:for who])   
 -> (any/c . -> . boolean?)
    (any/c . -> . boolean?)
    (any/c . -> . boolean?)
    (any/c . -> . boolean?)
    (->* [] [stream?] generic-set?)
    (->* [] [stream?] generic-set?)
    (->* [] [stream?] generic-set?)
  eql? : (or/c (any/c any/c . -> . any/c)
               (any/c any/c (any/c any/c . -> . any/c) . -> . any/c))
  hash1 : (or/c (any/c . -> . exact-integer?)
                (any/c (any/c . -> . exact-integer?) . -> . exact-integer?))
        = (const 1)
  hash2 : (or/c (any/c . -> . exact-integer?)
                (any/c (any/c . -> . exact-integer?) . -> . exact-integer?))
        = (const 1)
  elem? : (any/c . -> . boolean?) = (const #true)
  name : symbol? = 'custom-set
  who : symbol? = 'make-custom-set-types
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 [realm]) -> procedure?
  proc : procedure?
  name : symbol?
  realm : symbol? = 'racket
procedure
(procedure-realm proc) -> symbol?
  proc : procedure?
procedure
(procedure->method proc) -> procedure?
  proc : procedure?
procedure
(procedure-closure-contents-eq? proc1      
                                proc2) -> boolean?
  proc1 : procedure?
  proc2 : 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) -> normalized-arity?
  proc : procedure?
procedure
(procedure-arity? v) -> boolean?
  v : any/c
procedure
(procedure-arity-mask proc) -> exact-integer?
  proc : procedure?
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       
                        [name        
                         realm]) -> procedure?
  proc : procedure?
  arity : procedure-arity?
  name : (or/c symbol? #f) = #f
  realm : symbol? = 'racket
procedure
(procedure-reduce-arity-mask  proc        
                              mask        
                             [name        
                              realm]) -> procedure?
  proc : procedure?
  mask : exact-integer?
  name : (or/c symbol? #f) = #f
  realm : symbol? = 'racket
procedure
(procedure-keywords proc) -> (listof keyword?)
                             (or/c (listof keyword?) #f)
  proc : procedure?
procedure
(procedure-result-arity proc) -> (or/c #f procedure-arity?)
  proc : procedure?
procedure
(make-keyword-procedure proc [plain-proc]) -> procedure?
  proc : ((listof keyword?) list? any/c ... . -> . any)
  plain-proc : procedure?
             = (lambda args (apply proc null null args))
procedure
(procedure-reduce-keyword-arity  proc             
                                 arity            
                                 required-kws     
                                 allowed-kws      
                                [name             
                                 realm])      -> procedure?
  proc : procedure?
  arity : procedure-arity?
  required-kws : (listof keyword?)
  allowed-kws : (or/c (listof keyword?)
                      #f)
  name : (or/c symbol? #f) = #f
  realm : symbol? = 'racket
procedure
(procedure-reduce-keyword-arity-mask  proc             
                                      mask             
                                      required-kws     
                                      allowed-kws      
                                     [name             
                                      realm])      -> procedure?
  proc : procedure?
  mask : exact-integer?
  required-kws : (listof keyword?)
  allowed-kws : (or/c (listof keyword?)
                       #f)
  name : (or/c symbol? #f) = #f
  realm : symbol? = 'racket
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
(procedure-specialize proc) -> procedure?
  proc : procedure?
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/c
procedure
(const* v ...) -> procedure?
  v : any/c
syntax
(thunk  body ...+)
syntax
(thunk* body ...+)
procedure
(negate proc) -> procedure?
  proc : procedure?
procedure
((conjoin f ...) x ...) -> any
  f : procedure?
  x : any/c
procedure
((disjoin f ...) x ...) -> any
  f : procedure?
  x : any/c
procedure
(curry proc) -> procedure?
  proc : procedure?
(curry proc v ...+) -> any
  proc : procedure?
  v : any/c
procedure
(curryr proc) -> procedure?
  proc : procedure?
(curryr proc v ...+) -> any
  proc : procedure?
  v : any/c
procedure
(normalized-arity? arity) -> boolean?
  arity : any/c
procedure
(normalize-arity arity)
 -> (and/c normalized-arity? (lambda (x) (arity=? x arity)))
  arity : procedure-arity?
procedure
(arity=? a b) -> boolean?
  a : procedure-arity?
  b : procedure-arity?
procedure
(arity-includes? a b) -> boolean?
  a : procedure-arity?
  b : procedure-arity?
procedure
(void? v) -> boolean?
  v : any/c
procedure
(void v ...) -> void?
  v : any/c
value
undefined : 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
              | #:properties prop-list-expr
              | #:transparent
              | #:prefab
              | #:sealed
              | #:authentic
              | #:name name-id
              | #:extra-name name-id
              | #:constructor-name constructor-id
              | #:extra-constructor-name constructor-id
              | #:reflection-name symbol-expr
              | #:methods gen:name-id method-defs
              | #:omit-define-syntaxes
              | #:omit-define-values
                 
 field-option = #:mutable
              | #:auto
                 
  method-defs = (definition ...)
syntax
(struct-field-index field-id)
syntax
(define-struct id-maybe-super (field ...)
               struct-option ...)
 
id-maybe-super = id
               | (id super-id)
syntax
(struct/derived (id . rest-form)
id (field ...) struct-option ...)
(struct/derived (id . rest-form)
id super-id (field ...) struct-option ...)
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 'current 'prefab) = 'current
  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/proc-name      
                             arg-contract-str     
                             realm])          -> procedure?
  accessor-proc : struct-accessor-procedure?
  field-pos : exact-nonnegative-integer?
  field/proc-name : (or/c symbol? #f)
                  = (symbol->string (format "field~a" field-pos))
  arg-contract-str : (or/c string? symbol? #f) = #f
  realm : symbol? = 'racket
procedure
(make-struct-field-mutator  mutator-proc         
                            field-pos            
                           [field/proc-name      
                            arg-contract-str     
                            realm])          -> procedure?
  mutator-proc : struct-mutator-procedure?
  field-pos : exact-nonnegative-integer?
  field/proc-name : (or/c symbol? #f)
                  = (symbol->string (format "field~a" field-pos))
  arg-contract-str : (or/c string? symbol? #f) = #f
  realm : symbol? = 'racket
value
prop:sealed : struct-type-property?
procedure
(make-struct-type-property  name             
                           [guard            
                            supers           
                            can-impersonate? 
                            accessor-name    
                            contract-str     
                            realm])          
 -> struct-type-property?
    (any/c . -> . boolean?)
    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
  accessor-name : (or/c symbol? #f) = #f
  contract-str : (or/c string? symbol? #f) = #f
  realm : symbol? = 'racket
procedure
(struct-type-property? v) -> boolean?
  v : any/c
procedure
(struct-type-property-accessor-procedure? v) -> boolean?
  v : any/c
procedure
(struct-type-property-predicate-procedure?  v          
                                           [prop]) -> boolean?
  v : any/c
  prop : (or/c struct-type-property? #f) = #f
syntax
(define-generics id
  generics-opt ...
  [method-id . kw-formals*] ...
  generics-opt ...)
 
generics-opt = #:defaults ([default-pred? default-impl ...] ...)
             | #:fast-defaults ([fast-pred? fast-impl ...] ...)
             | #:fallbacks [fallback-impl ...]
             | #:defined-predicate defined-pred-id
             | #:defined-table defined-table-id
             | #:derive-property prop-expr prop-value-expr
             | #:requires [required-method-id ...]
                
 kw-formals* = (arg* ...)
             | (arg* ...+ . rest-id)
             | rest-id
                
        arg* = arg-id
             | [arg-id]
             | keyword arg-id
             | keyword [arg-id]
procedure
(raise-support-error name v) -> none/c
  name : symbol?
  v : any/c
struct
(struct exn:fail:support exn:fail ()
    #:transparent)
syntax
(define/generic local-id method-id)
syntax
(generic-instance/c gen-id [method-id method-ctc] ...)
 
  method-ctc : contract?
syntax
(impersonate-generics gen-id val-expr
  [method-id method-proc-expr] ...
  maybe-properties)
 
maybe-properties = 
                 | #:properties props-expr
 
  method-proc-expr : (any/c . -> . any/c)
  props-expr : (list/c impersonator-property? any/c ... ...)
syntax
(chaperone-generics gen-id val-expr
  [method-id method-proc-expr] ...
  maybe-properties)
syntax
(redirect-generics mode gen-id val-expr
   [method-id method-proc-expr] ...
   maybe-properties)
syntax
(make-struct-type-property/generic
  name-expr
  maybe-guard-expr
  maybe-supers-expr
  maybe-can-impersonate?-expr
  property-option
  ...)
 
           maybe-guard-expr = 
                            | guard-expr
                               
          maybe-supers-expr = 
                            | supers-expr
                               
maybe-can-impersonate?-expr = 
                            | can-impersonate?-expr
                               
            property-option = #:property prop-expr val-expr
                            | #:methods gen:name-id method-defs
                               
                method-defs = (definition ...)
 
  name-expr : symbol?
  guard-expr : (or/c procedure? #f 'can-impersonate)
  supers-expr : (listof (cons/c struct-type-property? (-> any/c any/c)))
  can-impersonate?-expr : any/c
  prop-expr : struct-type-property?
  val-expr : any/c
syntax
(make-generic-struct-type-property
   gen:name-id
   method-def
   ...)
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-struct-type-key+field-count type)
 -> (or/c #f (cons/c prefab-key? (integer-in 0 32768)))
  type : struct-type?
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
(make-constructor-style-printer get-constructor 
                                get-contents)   
 -> (-> any/c output-port? (or/c #t #f 0 1) void?)
  get-constructor : (-> any/c (or/c symbol? string?))
  get-contents : (-> any/c sequence?)
procedure
(struct->list v [#:on-opaque on-opaque]) -> (or/c list? #f)
  v : any/c
  on-opaque : (or/c 'error 'return-false 'skip) = 'error
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?
value
prop:struct-field-info : struct-type-property?
procedure
(struct-field-info? v) -> boolean?
  v : any/c
procedure
(struct-field-info-list sfi) -> (listof symbol?)
  sfi : struct-field-info?
syntax
(interface (super-interface-expr ...) name-clause ...)
 
name-clause = id
            | (id contract-expr)
            | (id #:public default-expr)
            | (id #:override default-expr)
            | (id contract-expr #:public impl-expr)
            | (id contract-expr #:override impl-expr)
syntax
(interface* (super-interface-expr ...)
            ([property-expr val-expr] ...)
  name-clause ...)
 
name-clause = id
            | (id contract-expr)
            | (id #:public default-expr)
            | (id #:override default-expr)
            | (id contract-expr #:public default-expr)
            | (id contract-expr #:override default-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)
                  | (chaperone-procedure method-procedure wrapper-proc
                                         other-arg-expr ...)
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) ...)
procedure
(dynamic-instantiate cls pos-vs named-vs) -> object?
  cls : class?
  pos-vs : list?
  named-vs : (listof (cons/c symbol? any/c))
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
             | #:opaque #:ignore-local-member-names
                
 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-expr)
                
  field-spec = field-id
             | (field-id contract-expr)
                
 absent-spec = method-id
             | (field field-id ...)
syntax
(absent absent-spec ...)
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 ...)
            | #:opaque opaque-expr
            | #:opaque-except opaque-expr
            | #:opaque-fields opaque-fields-expr
            | #:do-not-check-class-field-accessor-or-mutator-access
               
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?
procedure
(dynamic-object/c method-names         
                  method-contracts     
                  field-names          
                  field-contracts) -> contract?
  method-names : (listof symbol?)
  method-contracts : (listof contract?)
  field-names : (listof symbol?)
  field-contracts : (listof 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-or-false=? a b) -> boolean?
  a : (or/c object? #f)
  b : (or/c object? #f)
procedure
(object=-hash-code o) -> fixnum?
  o : 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 cls) -> boolean?
  v : any/c
  cls : class?
procedure
(implementation? v intf) -> boolean?
  v : any/c
  intf : interface?
procedure
(interface-extension? v intf) -> boolean?
  v : any/c
  intf : interface?
procedure
(method-in-interface? sym intf) -> boolean?
  sym : symbol?
  intf : interface?
procedure
(interface->method-names intf) -> (listof symbol?)
  intf : 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 : object?
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)
procedure
(class-seal class                
            key                  
            unsealed-inits       
            unsealed-fields      
            unsealed-methods     
            inst-proc            
            member-proc)     -> class?
  class : class?
  key : symbol?
  unsealed-inits : (listof symbol?)
  unsealed-fields : (listof symbol?)
  unsealed-methods : (listof symbol?)
  inst-proc : (-> class? any)
  member-proc : (-> class? (listof symbol?) any)
procedure
(class-unseal class key wrong-key-proc) -> class?
  class : class?
  key : symbol?
  wrong-key-proc : (-> class? any)
syntax
(surrogate use-wrapper-proc method-spec ...)
 
use-wrapper-proc = #:use-wrapper-proc
                 | 
                    
     method-spec = (augment default-expr method-id arg-spec ...)
                 | (override method-id 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 sig-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 ...)
  maybe-results-clause)
 
maybe-results-clause = 
                     | (values result-id ...)
                     | (values result-id ... . rest-results-id)
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
  unit-spec
  maybe-exports
  maybe-results-clause)
(define-values/invoke-unit/infer
  (export tagged-sig-spec ...)
  unit-spec)
 
           unit-spec = unit-id
                     | (link link-unit-id ...)
                        
       maybe-exports = 
                     | (export tagged-sig-spec ...)
                        
maybe-results-clause = 
                     | (values result-id ...)
                     | (values result-id ... . rest-results-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 ...+)
(define-signature-form (sig-form-id id intro-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-spec-block ...)
  (export sig-spec-block ...)
  init-depends-decl
  optional-body-ctc)
 
   sig-spec-block = (tagged-sig-spec [id contract] ...)
                  | tagged-sig-spec
                     
init-depends-decl = 
                  | (init-depend tagged-sig-id ...)
                     
optional-body-ctc = 
                  | contract
                  | (values contract ...)
syntax
(define-unit/contract unit-id
  (import sig-spec-block ...)
  (export sig-spec-block ...)
  init-depends-decl
  optional-body-ctc
  unit-body-expr-or-defn
  ...)
 
   sig-spec-block = (tagged-sig-spec [id contract] ...)
                  | tagged-sig-spec
                     
optional-body-ctc = 
                  | #:invoke/contract contract
                  | #:invoke/contract (values contract ...)
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
(unit-static-init-dependencies unit-identifier 
                               err-syntax)     
 -> (list/c (cons/c (or/c symbol? #f)
                    identifier?))
  unit-identifier : identifier?
  err-syntax : syntax?
procedure
(flat-contract-with-explanation  get-explanation 
                                [#:name name])   
 -> flat-contract?
  get-explanation : (-> any/c (or/c boolean? (-> blame? any)))
  name : any/c = (object-name get-explanation)
procedure
(flat-named-contract  name              
                      flat-contract     
                     [generator])   -> flat-contract?
  name : any/c
  flat-contract : flat-contract?
  generator : (or/c #f (-> exact-nonnegative-integer? (-> any/c)))
            = #f
value
any/c : flat-contract?
value
none/c : flat-contract?
procedure
(or/c contract ...) -> contract?
  contract : contract?
procedure
(first-or/c contract ...) -> contract?
  contract : contract?
procedure
(and/c contract ...) -> contract?
  contract : contract?
procedure
(not/c flat-contract) -> flat-contract?
  flat-contract : flat-contract?
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 : (or/c exact-integer? #f)
  k : (or/c exact-integer? #f)
procedure
(complex/c real imag) -> flat-contract?
  real : flat-contract?
  imag : flat-contract?
procedure
(char-in a b) -> flat-contract?
  a : char?
  b : char?
value
natural-number/c : flat-contract?
procedure
(string-len/c len) -> flat-contract?
  len : real?
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?             
           #:eager eager])       -> contract?
  c : contract?
  immutable : (or/c #t #f 'dont-care) = 'dont-care
  flat? : boolean? = #f
  eager : (or/c #t #f exact-nonnegative-integer?) = #t
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  in-c                      
       [c                         
        #:immutable immutable     
        #:flat? flat?])       -> contract?
  in-c : contract?
  c : contract? = in-c
  immutable : (or/c #t #f 'dont-care) = 'dont-care
  flat? : boolean? = #f
procedure
(box-immutable/c c) -> contract?
  c : contract?
procedure
(listof c) -> list-contract?
  c : contract?
procedure
(non-empty-listof c) -> list-contract?
  c : contract?
procedure
(list*of ele-c [last-c]) -> contract?
  ele-c : contract?
  last-c : contract? = ele-c
procedure
(cons/c car-c cdr-c) -> contract?
  car-c : contract?
  cdr-c : contract?
syntax
(cons/dc [car-id contract-expr] [cdr-id (car-id) contract-expr] cons/dc-option)
(cons/dc [car-id (cdr-id) contract-expr] [cdr-id contract-expr] cons/dc-option)
 
cons/dc-option = 
               | #:flat
               | #:chaperone
               | #:impersonator
procedure
(list/c c ...) -> list-contract?
  c : contract?
procedure
(*list/c prefix suffix ...) -> list-contract?
  prefix : contract?
  suffix : contract?
procedure
(treelist/c ctc [#:flat? flat? #:lazy? lazy?]) -> contract?
  ctc : contract?
  flat? : any/c = (flat-contract? ctc)
  lazy? : any/c = #f
procedure
(mutable-treelist/c ctc) -> contract?
  ctc : contract?
procedure
(syntax/c c) -> flat-contract?
  c : flat-contract?
syntax
(struct/c struct-id contract-expr ...)
syntax
(struct/dc struct-id field-spec ... maybe-inv)
 
         field-spec = [field-name maybe-lazy contract-expr]
                    | [field-name (dep-field-name ...)
                                  maybe-lazy
                                  maybe-contract-type
                                  maybe-dep-state
                                  contract-expr]
                       
         field-name = field-id
                    | (#:selector selector-id)
                    | (field-id #:parent struct-id)
                       
         maybe-lazy = 
                    | #:lazy
                       
maybe-contract-type = 
                    | #:flat
                    | #:chaperone
                    | #:impersonator
                       
    maybe-dep-state = 
                    | #:depends-on-state
                       
          maybe-inv = 
                    | #:inv (dep-field-name ...) invariant-expr
procedure
(parameter/c  in                                  
             [out                                 
              #:impersonator? impersonator?]) -> contract?
  in : contract?
  out : contract? = in
  impersonator? : any/c = #t
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
syntax
(hash/dc [key-id key-contract-expr] [value-id (key-id) value-contract-expr]
         hash/dc-option)
 
hash/dc-option = 
               | #:immutable immutable?-expr hash/dc-option
               | #:kind kind-expr hash/dc-option
procedure
(channel/c val) -> contract?
  val : contract?
syntax
(prompt-tag/c contract ... maybe-call/cc)
 
maybe-call/cc = 
              | #:call/cc contract
              | #:call/cc (values contract ...)
 
  contract : contract?
procedure
(continuation-mark-key/c contract) -> contract?
  contract : contract?
procedure
(evt/c contract ...) -> chaperone-contract?
  contract : chaperone-contract?
syntax
(flat-rec-contract id flat-contract-expr ...)
syntax
(flat-murec-contract ([id flat-contract-expr ...] ...) body ...+)
syntax
any
procedure
(promise/c c) -> contract?
  c : contract?
procedure
(flat-contract predicate) -> flat-contract?
  predicate : (-> any/c any/c)
procedure
(flat-contract-predicate v) -> (-> any/c any/c)
  v : flat-contract?
procedure
(property/c accessor ctc [#:name name]) -> flat-contract?
  accessor : (-> any/c any/c)
  ctc : flat-contract?
  name : any/c = (object-name accessor)
procedure
(suggest/c c field message) -> contract?
  c : contract?
  field : string?
  message : string?
syntax
(-> dom ... range)
(-> dom ... ellipsis dom-expr ... range)
 
     dom = dom-expr
         | keyword dom-expr
            
   range = range-expr
         | (values range-expr ...)
         | any
            
ellipsis = ...
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
              | #:pre/desc pre-cond-expr
                 
        range = range-expr
              | (values range-expr ...)
              | any
                 
         post = 
              | #:post post-cond-expr
              | #:post/desc post-cond-expr
syntax
(->i maybe-chaperone
     (mandatory-dependent-dom ...)
     dependent-rest
     pre-condition
     param-value
     dependent-range
     post-condition)
(->i maybe-chaperone
     (mandatory-dependent-dom ...)
     (optional-dependent-dom ...)
     dependent-rest
     pre-condition
     param-value
     dependent-range
     post-condition)
 
        maybe-chaperone = #:chaperone
                        | 
                           
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/desc (id ...)
                          expr pre-condition
                        | #:pre/name (id ...)
                          string boolean-expr pre-condition
                           
            param-value = 
                        | #:param (id ...)
                          param-expr val-expr param-value
                           
        dependent-range = any
                        | id+ctc
                        | un+ctc
                        | (values id+ctc ...)
                        | (values un+ctc ...)
                           
         post-condition = 
                        | #:post (id ...)
                          boolean-expr post-condition
                        | #:post/desc (id ...)
                          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
procedure
(dynamic->*                                                            
            [#:mandatory-domain-contracts mandatory-domain-contracts   
             #:optional-domain-contracts optional-domain-contracts     
             #:mandatory-keywords mandatory-keywords                   
             #:mandatory-keyword-contracts mandatory-keyword-contracts 
             #:optional-keywords optional-keywords                     
             #:optional-keyword-contracts optional-keyword-contracts   
             #:rest-contract rest-contract]                            
             #:range-contracts range-contracts)                        
 -> contract?
  mandatory-domain-contracts : (listof contract?) = '()
  optional-domain-contracts : (listof contract?) = '()
  mandatory-keywords : (listof keyword?) = '()
  mandatory-keyword-contracts : (listof contract?) = '()
  optional-keywords : (listof keyword?) = '()
  optional-keyword-contracts : (listof contract?) = '()
  rest-contract : (or/c #f contract?) = #f
  range-contracts : (or/c #f (listof contract?))
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 : (or/c symbol? #f) = #f
procedure
(new-∃/c [name]) -> contract?
  name : (or/c symbol? #f) = #f
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-in module-path in-out-item ...)
syntax
(contract-out unprotected-submodule in-out-item ...)
 
          in-out-item = [id contract-expr]
                      | (rename internal-id external-id contract-expr)
                      | (struct id/ignored ([id contract-expr] ...)
                          struct-option)
                      | #:∃ poly-variables
                      | #:exists poly-variables
                      | #:∀ poly-variables
                      | #:forall poly-variables
                         
unprotected-submodule = 
                      | #:unprotected-submodule submodule-name
                         
       poly-variables = id
                      | (id ...)
                         
           id/ignored = id
                      | (id ignored-id)
                         
        struct-option = 
                      | #:omit-constructor
syntax
(recontract-out id ...)
syntax
(provide/contract unprotected-submodule in-out-item ...)
syntax
(struct-guard/c contract-expr ...)
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
(struct/contract struct-id ([field contract-expr] ...)
                        struct-option ...)
(struct/contract struct-id super-struct-id
                        ([field contract-expr] ...)
                        struct-option ...)
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
(invariant-assertion invariant-expr expr)
syntax
current-contract-region
syntax
(define-module-boundary-contract id
  orig-id
  contract-expr
  d-m-b-c-kwd-arg ...)
 
d-m-b-c-kwd-arg = #:name-for-contract name-for-contract-id
                | #:name-for-blame blame-id
                | #:srcloc srcloc-expr
                | #:pos-source pos-source-expr
                | #:context-limit limit-expr
                | #:lift-to-end? boolean
                | #:start-swapped? boolean
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
          #:context-limit limit-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 first-order                                   
                #:late-neg-projection late-neg-proj                         
                #:collapsible-late-neg-projection collapsible-late-neg-proj 
                #:val-first-projection val-first-proj                       
                #:projection proj                                           
                #:stronger stronger                                         
                #:equivalent equivalent                                     
                #:list-contract? is-list-contract?])                        
 -> contract?
  name : any/c = 'anonymous-contract
  first-order : (-> any/c any/c) = (λ (x) #t)
  late-neg-proj : (or/c #f (-> blame? (-> any/c any/c any/c)))
                = #f
  collapsible-late-neg-proj : (or/c #f (-> blame? (values (-> any/c any/c any/c) collapsible-contract?)))
                            = #f
  val-first-proj : (or/c #f (-> blame? (-> any/c (-> any/c any/c))))
                 = #f
  proj : (-> blame? (-> any/c any/c))
       = (λ (b)
           (λ (x)
             (if (first-order x)
               x
               (raise-blame-error
                b x
                '(expected: "~a" given: "~e")
                name x))))
  stronger : (or/c #f (-> contract? contract? boolean?)) = #f
  equivalent : (or/c #f (-> contract? contract? boolean?)) = #f
  is-list-contract? : boolean? = #f
procedure
(make-chaperone-contract                                                              
                         [#:name name                                                 
                          #:first-order first-order                                   
                          #:late-neg-projection late-neg-proj                         
                          #:collapsible-late-neg-projection collapsible-late-neg-proj 
                          #:val-first-projection val-first-proj                       
                          #:projection proj                                           
                          #:stronger stronger                                         
                          #:equivalent equivalent                                     
                          #:list-contract? is-list-contract?])                        
 -> chaperone-contract?
  name : any/c = 'anonymous-chaperone-contract
  first-order : (-> any/c any/c) = (λ (x) #t)
  late-neg-proj : (or/c #f (-> blame? (-> any/c any/c any/c)))
                = #f
  collapsible-late-neg-proj : (or/c #f (-> blame? (values (-> any/c any/c any/c) collapsible-contract?)))
                            = #f
  val-first-proj : (or/c #f (-> blame? (-> any/c (-> any/c any/c))))
                 = #f
  proj : (-> blame? (-> any/c any/c))
       = (λ (b)
           (λ (x)
             (if (first-order x)
               x
               (raise-blame-error
                b x
                '(expected: "~a" given: "~e")
                name x))))
  stronger : (or/c #f (-> contract? contract? boolean?)) = #f
  equivalent : (or/c #f (-> contract? contract? boolean?)) = #f
  is-list-contract? : boolean? = #f
procedure
(make-flat-contract                                                              
                    [#:name name                                                 
                     #:first-order first-order                                   
                     #:late-neg-projection late-neg-proj                         
                     #:collapsible-late-neg-projection collapsible-late-neg-proj 
                     #:val-first-projection val-first-proj                       
                     #:projection proj                                           
                     #:stronger stronger                                         
                     #:equivalent equivalent                                     
                     #:list-contract? is-list-contract?])                        
 -> flat-contract?
  name : any/c = 'anonymous-flat-contract
  first-order : (-> any/c any/c) = (λ (x) #t)
  late-neg-proj : (or/c #f (-> blame? (-> any/c any/c any/c)))
                = #f
  collapsible-late-neg-proj : (or/c #f (-> blame? (values (-> any/c any/c any/c) collapsible-contract?)))
                            = #f
  val-first-proj : (or/c #f (-> blame? (-> any/c (-> any/c any/c))))
                 = #f
  proj : (-> blame? (-> any/c any/c))
       = (λ (b)
           (λ (x)
             (if (first-order x)
               x
               (raise-blame-error
                b x
                '(expected: "~a" given: "~e")
                name x))))
  stronger : (or/c #f (-> contract? contract? boolean?)) = #f
  equivalent : (or/c #f (-> contract? contract? boolean?)) = #f
  is-list-contract? : boolean? = #f
procedure
(build-compound-type-name c/s ...) -> any
  c/s : any/c
procedure
(coerce-contract id v) -> contract?
  id : symbol?
  v : any/c
procedure
(coerce-contracts id vs) -> (listof contract?)
  id : symbol?
  vs : (listof any/c)
procedure
(coerce-chaperone-contract id v) -> chaperone-contract?
  id : symbol?
  v : any/c
procedure
(coerce-chaperone-contracts id vs)
 -> (listof chaperone-contract?)
  id : symbol?
  vs : (listof any/c)
procedure
(coerce-flat-contract id v) -> flat-contract?
  id : symbol?
  v : any/c
procedure
(coerce-flat-contracts id v) -> (listof flat-contract?)
  id : symbol?
  v : (listof any/c)
procedure
(coerce-contract/f v) -> (or/c contract? #f)
  v : any/c
parameter
(skip-projection-wrapper?) -> boolean?
(skip-projection-wrapper? wrap?) -> void?
  wrap? : boolean?
 = #f
syntax
(with-contract-continuation-mark blame body ...)
(with-contract-continuation-mark blame+neg-party body ...)
syntax
(contract-pos/neg-doubling e1 e2)
procedure
(blame? v) -> boolean?
  v : any/c
procedure
(raise-blame-error b                                 
                   #:missing-party missing-party     
                   v                                 
                   fmt                               
                   v-fmt ...)                    -> none/c
  b : blame?
  missing-party : #f
  v : any/c
  fmt : (or/c string?
              (listof (or/c string?
                            'given 'given:
                            'expected 'expected:)))
  v-fmt : 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-context blame) -> (listof string?)
  blame : blame?
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
(blame-replaced-negative? b) -> boolean?
  b : blame?
procedure
(blame-update b pos neg) -> blame?
  b : blame?
  pos : any/c
  neg : any/c
procedure
(blame-missing-party? b) -> boolean?
  b : blame?
procedure
(blame-add-missing-party b missing-party)
 -> (and/c blame? (not/c blame-missing-party?))
  b : (and/c blame? blame-missing-party?)
  missing-party : 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?
value
prop:blame : struct-type-property?
value
impersonator-prop:blame : impersonator-property?
procedure
(build-flat-contract-property                                                              
                              [#:name get-name                                             
                               #:first-order get-first-order                               
                               #:late-neg-projection late-neg-proj                         
                               #:collapsible-late-neg-projection collapsible-late-neg-proj 
                               #:val-first-projection val-first-proj                       
                               #:projection get-projection                                 
                               #:stronger stronger                                         
                               #:equivalent equivalent                                     
                               #:generate generate                                         
                               #:list-contract? is-list-contract?])                        
 -> flat-contract-property?
  get-name : (or/c #f (-> contract? any/c))
           = (λ (c) 'anonymous-flat-contract)
  get-first-order : (-> contract? (-> any/c boolean?))
                  = (λ (c) (λ (x) #t))
  late-neg-proj : (or/c #f (-> contract? (-> blame? (-> any/c any/c any/c))))
                = #f
  collapsible-late-neg-proj : (or/c #f (-> contract? (-> blame? (values (-> any/c any/c any/c) collapsible-contract?))))
                            = #f
  val-first-proj : (or/c #f (-> contract? blame? (-> any/c (-> any/c any/c))))
                 = #f
  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
  equivalent : (or/c #f (-> contract? contract? boolean?)) = #f
  generate : (->i ([c contract?])
                  [generator
                   (c)
                   (-> exact-nonnegative-integer?
                       (or/c (-> (or/c contract-random-generate-fail? c))
                             #f))])
           = (λ (c) (λ (fuel) #f))
  is-list-contract? : (-> contract? boolean?) = (λ (c) #f)
procedure
(build-chaperone-contract-property                                                              
                                   [#:name get-name                                             
                                    #:first-order get-first-order                               
                                    #:late-neg-projection late-neg-proj                         
                                    #:collapsible-late-neg-projection collapsible-late-neg-proj 
                                    #:val-first-projection val-first-proj                       
                                    #:projection get-projection                                 
                                    #:stronger stronger                                         
                                    #:equivalent equivalent                                     
                                    #:generate generate                                         
                                    #:exercise exercise                                         
                                    #:list-contract? is-list-contract?])                        
 -> chaperone-contract-property?
  get-name : (or/c #f (-> contract? any/c))
           = (λ (c) 'anonymous-chaperone-contract)
  get-first-order : (-> contract? (-> any/c boolean?))
                  = (λ (c) (λ (x) #t))
  late-neg-proj : (or/c #f (-> contract? (-> blame? (-> any/c any/c any/c))))
                = #f
  collapsible-late-neg-proj : (or/c #f (-> contract? (-> blame? (values (-> any/c any/c any/c) collapsible-contract?))))
                            = #f
  val-first-proj : (or/c #f (-> contract? blame? (-> any/c (-> any/c any/c))))
                 = #f
  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
  equivalent : (or/c #f (-> contract? contract? boolean?)) = #f
  generate : (->i ([c contract?])
                  [generator
                   (c)
                   (-> exact-nonnegative-integer?
                       (or/c (-> (or/c contract-random-generate-fail? c))
                             #f))])
           = (λ (c) (λ (fuel) #f))
  exercise : (->i ([c contract?])
                  [result
                   (c)
                   (-> exact-nonnegative-integer?
                       (values
                        (-> c void?)
                        (listof contract?)))])
           = (λ (c) (λ (fuel) (values void '())))
  is-list-contract? : (-> contract? boolean?) = (λ (c) #f)
procedure
(build-contract-property                                                              
                         [#:name get-name                                             
                          #:first-order get-first-order                               
                          #:late-neg-projection late-neg-proj                         
                          #:collapsible-late-neg-projection collapsible-late-neg-proj 
                          #:val-first-projection val-first-proj                       
                          #:projection get-projection                                 
                          #:stronger stronger                                         
                          #:equivalent equivalent                                     
                          #:generate generate                                         
                          #:exercise exercise                                         
                          #:list-contract? is-list-contract?])                        
 -> contract-property?
  get-name : (or/c #f (-> contract? any/c))
           = (λ (c) 'anonymous-contract)
  get-first-order : (-> contract? (-> any/c boolean?))
                  = (λ (c) (λ (x) #t))
  late-neg-proj : (or/c #f (-> contract? (-> blame? (-> any/c any/c any/c))))
                = #f
  collapsible-late-neg-proj : (or/c #f (-> contract? (-> blame? (values (-> any/c any/c any/c) collapsible-contract?))))
                            = #f
  val-first-proj : (or/c #f (-> contract? blame? (-> any/c (-> any/c any/c))))
                 = #f
  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
  equivalent : (or/c #f (-> contract? contract? boolean?)) = #f
  generate : (->i ([c contract?])
                  [generator
                   (c)
                   (-> exact-nonnegative-integer?
                       (or/c (-> (or/c contract-random-generate-fail? c))
                             #f))])
           = (λ (c) (λ (fuel) #f))
  exercise : (->i ([c contract?])
                  [result
                   (c)
                   (-> exact-nonnegative-integer?
                       (values
                        (-> c void?)
                        (listof contract?)))])
           = (λ (c) (λ (fuel) (values void '())))
  is-list-contract? : (-> contract? boolean?) = (λ (c) #f)
procedure
(contract-property? v) -> boolean?
  v : any/c
procedure
(chaperone-contract-property? v) -> boolean?
  v : any/c
procedure
(flat-contract-property? v) -> boolean?
  v : 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? c1 c2) -> boolean?
  c1 : contract?
  c2 : contract?
procedure
(contract-equivalent? c1 c2) -> boolean?
  c1 : contract?
  c2 : 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
(list-contract? v) -> boolean?
  v : any/c
procedure
(contract-name c) -> any/c
  c : contract?
procedure
(value-contract v) -> (or/c contract? #f)
  v : has-contract?
procedure
(has-contract? v) -> boolean?
  v : any/c
procedure
(value-blame v) -> (or/c blame? #f)
  v : has-blame?
procedure
(has-blame? v) -> boolean?
  v : any/c
procedure
(contract-late-neg-projection c)
 -> (-> blame? (-> any/c (or/c #f any/c) any/c))
  c : contract?
procedure
(contract-projection c) -> (-> blame? (-> any/c any/c))
  c : contract?
procedure
(contract-val-first-projection c)
 -> (-> blame? (-> any/c (-> any/c any/c)))
  c : contract?
procedure
(make-none/c sexp-name) -> contract?
  sexp-name : any/c
syntax
(recursive-contract contract-expr recursive-contract-option ...)
(recursive-contract contract-expr type recursive-contract-option ...)
 
recursive-contract-option = #:list-contract?
                          | #:extra-delay
                             
                     type = #:impersonator
                          | #:chaperone
                          | #:flat
syntax
(opt/c contract-expr maybe-name)
 
maybe-name = 
           | #:error-name id
syntax
(define-opt/c (id id ...) expr)
value
contract-continuation-mark-key : continuation-mark-key?
procedure
(contract-custom-write-property-proc c         
                                     p         
                                     mode) -> void?
  c : contract?
  p : output-port?
  mode : (or/c #f #t 0 1)
procedure
(rename-contract contract name) -> contract?
  contract : contract?
  name : any/c
syntax
(contract-first-order-okay-to-give-up?)
syntax
(contract-first-order-try-less-hard e)
procedure
(if/c predicate then-contract else-contract) -> contract?
  predicate : (-> any/c any/c)
  then-contract : contract?
  else-contract : contract?
value
failure-result/c : contract?
procedure
(get/build-val-first-projection c)
 -> (-> blame? (-> any/c (-> any/c any/c)))
  c : contract?
procedure
(get/build-late-neg-projection c)
 -> (-> blame? (-> any/c any/c any/c))
  c : contract?
procedure
(get/build-collapsible-late-neg-projection c)
 -> (-> blame? (values (-> any/c any/c any/c) collapsible-contract?))
  c : contract?
value
collapsible-contract-continuation-mark-key
 : continuation-mark-key?
syntax
(with-collapsible-contract-continuation-mark body ...)
value
prop:collapsible-contract : struct-type-property?
procedure
(collapsible-contract? v) -> boolean?
  v : any/c
procedure
(merge new-cc new-neg old-cc old-neg) -> collapsible-contract?
  new-cc : collapsible-contract?
  new-neg : any/c
  old-cc : collapsible-contract?
  old-neg : any/c
procedure
(collapsible-guard cc val neg-party) -> any/c
  cc : collapsible-contract?
  val : any/c
  neg-party : any/c
procedure
(collapsible-contract-property? v) -> boolean?
  v : any/c
procedure
(build-collapsible-contract-property                                          
                                     [#:try-merge try-merge                   
                                      #:collapsible-guard collapsible-guard]) 
 -> collapsible-contract-property?
  try-merge : (or/c #f                                    = #f
                    (-> collapsible-contract?
                        any/c
                        collapsible-contract?
                        any/c
                        (or/c #f collapsible-contract?)))
  collapsible-guard : (-> collapsible-contract? any/c any/c any/c)
                    = (λ (cc v neg)
                        (error
                         "internal error: contract does not support `collapsible-guard`" cc))
struct
(struct collapsible-ho/c (latest-blame missing-party latest-ctc))
  latest-blame : blame?
  missing-party : any/c
  latest-ctc : contract?
struct
(struct collapsible-leaf/c (proj-list
                            contract-list
                            blame-list
                            missing-party-list))
  proj-list : (listof (-> any/c any/c any/c))
  contract-list : (listof contract?)
  blame-list : (listof blame?)
  missing-party-list : (listof any/c)
value
impersonator-prop:collapsible : impersonator-property?
procedure
(has-impersonator-prop:collapsible? v) -> boolean?
  v : any/c
procedure
(get-impersonator-prop:collapsible v) -> collapsible-property?
  v : any/c
struct
(struct collapsible-property (c-c neg-party ref))
  c-c : collapsible-contract?
  neg-party : any/c
  ref : (or/c #f impersonator?)
struct
(struct collapsible-count-property collapsible-property (count
                                                         prev))
  count : natural-number/c
  prev : (or/c collapsible-count-property? any/c)
struct
(struct collapsible-wrapper-property collapsible-property
        (checking-wrapper)
  checking-wrapper : impersonator?
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 : 5 = exact-nonnegative-integer?
  fail : (or/c #f (-> any) (-> boolean? any)) = #f
procedure
(contract-exercise [#:fuel fuel              
                    #:shuffle? shuffle?]     
                    val ...+)            -> void?
  fuel : exact-nonnegative-integer? = 10
  shuffle? : any/c = #f
  val : any/c
procedure
(contract-random-generate/choose c fuel) -> (or/c #f (-> c))
  c : contract?
  fuel : exact-nonnegative-integer?
value
contract-random-generate-fail : contract-random-generate-fail?
procedure
(contract-random-generate-fail? v) -> boolean?
  v : any/c
procedure
(contract-random-generate-env? v) -> boolean?
  v : any/c
procedure
(contract-random-generate-stash env c v) -> void?
  env : contract-random-generate-env?
  c : contract?
  v : c
procedure
(contract-random-generate-get-current-environment)
 -> contract-random-generate-env?
syntax
(match val-expr clause ...)
 
  clause = [pat option=> option ... body ...+]
            
option=> = 
         | (=> id)
            
  option = #:when cond-expr
         | #:do [do-body ...]
syntax
(match* (val-expr ...+) clause* ...)
 
clause* = [(pat ...+) option=> option ... body ...+]
syntax
(match/values expr clause* clause* ...)
syntax
(define/match (head args)
  match*-clause ...)
 
         head = id
              | (head args)
                 
         args = arg ...
              | arg ... . rest-id
                 
          arg = arg-id
              | [arg-id default-expr]
              | keyword arg-id
              | keyword [arg-id default-expr]
                 
match*-clause = [(pat ...+) option=> option ... body ...+]
syntax
(match-lambda clause ...)
syntax
(match-λ clause ...)
syntax
(match-lambda* clause ...)
syntax
(match-λ* clause ...)
syntax
(match-lambda** clause* ...)
syntax
(match-λ** 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-letrec-values ([(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
(failure-cont)
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?
procedure
(match-expander? v) -> boolean?
  v : any/c
procedure
(legacy-match-expander? v) -> boolean?
  v : any/c
procedure
(syntax-local-match-introduce stx) -> syntax?
  stx : syntax?
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 message-sym) -> any
  message-sym : symbol?
(error message-str v ...) -> any
  message-str : string?
  v : any/c
(error who-sym format-str v ...) -> any
  who-sym : symbol?
  format-str : string?
  v : any/c
procedure
(raise-user-error message-sym) -> any
  message-sym : symbol?
(raise-user-error message-str v ...) -> any
  message-str : string?
  v : any/c
(raise-user-error who-sym format-str v ...) -> any
  who-sym : symbol?
  format-str : 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-argument-error* name realm expected v) -> any
  name : symbol?
  realm : symbol?
  expected : string?
  v : any/c
(raise-argument-error* name         
                       realm        
                       expected     
                       bad-pos      
                       v ...)   -> any
  name : symbol?
  realm : 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-result-error* name realm expected v) -> any
  name : symbol?
  realm : symbol?
  expected : string?
  v : any/c
(raise-result-error* name         
                     realm        
                     expected     
                     bad-pos      
                     v ...)   -> any
  name : symbol?
  realm : 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-arguments-error* name        
                        realm       
                        message     
                        field       
                        v ...       
                        ...)    -> any
  name : symbol?
  realm : 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?) = #f
procedure
(raise-range-error*  name                  
                     realm                 
                     type-description      
                     index-prefix          
                     index                 
                     in-value              
                     lower-bound           
                     upper-bound           
                    [alt-lower-bound]) -> any
  name : symbol?
  realm : 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?) = #f
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
procedure
(raise-arity-error* name           
                    realm          
                    arity-v        
                    arg-v ...) -> any
  name : (or/c symbol? procedure?)
  realm : symbol?
  arity-v : (or/c exact-nonnegative-integer?
                  arity-at-least?
                  (listof
                   (or/c exact-nonnegative-integer?
                         arity-at-least?)))
  arg-v : any/c
procedure
(raise-arity-mask-error name mask arg-v ...) -> any
  name : (or/c symbol? procedure?)
  mask : exact-integer?
  arg-v : any/c
procedure
(raise-arity-mask-error* name           
                         realm          
                         mask           
                         arg-v ...) -> any
  name : (or/c symbol? procedure?)
  realm : symbol?
  mask : exact-integer?
  arg-v : any/c
procedure
(raise-result-arity-error name              
                          arity-v           
                          detail-str        
                          result-v ...) -> any
  name : (or/c symbol? #f)
  arity-v : exact-nonnegative-integer?
  detail-str : (or/c string? #f)
  result-v : any/c
procedure
(raise-result-arity-error* name              
                           realm             
                           arity-v           
                           detail-str        
                           result-v ...) -> any
  name : (or/c symbol? #f)
  realm : symbol?
  arity-v : exact-nonnegative-integer?
  detail-str : (or/c string? #f)
  result-v : any/c
procedure
(raise-syntax-error  name               
                     message            
                    [expr               
                     sub-expr           
                     extra-sources      
                     message-suffix     
                     #:exn exn])    -> any
  name : (or/c symbol? #f)
  message : string?
  expr : any/c = #f
  sub-expr : any/c = #f
  extra-sources : (listof syntax?) = null
  message-suffix : string? = ""
  exn : (-> string?                = exn:fail:syntax
            continuation-mark-set?
            (listof syntax?)
            exn:fail:syntax?)
procedure
(unquoted-printing-string? v) -> boolean?
  v : any/c
procedure
(unquoted-printing-string s) -> unquoted-printing-string?
  s : string?
procedure
(unquoted-printing-string-value ups) -> string?
  ups : unquoted-printing-string?
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-print-source-location) -> boolean?
(error-print-source-location include?) -> void?
  include? : any/c
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-syntax->string-handler)
 -> (any/c (or/c exact-nonnegative-integer? #f)
          . -> .
          string?)
(error-syntax->string-handler proc) -> void?
  proc : (any/c (or/c exact-nonnegative-integer? #f)
               . -> .
               string?)
parameter
(error-syntax->name-handler)
 -> (syntax? . -> . (or/c symbol? #f))
(error-syntax->name-handler proc) -> void?
  proc : (syntax? . -> . (or/c symbol? #f))
parameter
(error-syntax->srcloc-handler)
 -> (any/c . -> . (or/c srcloc? #f))
(error-syntax->srcloc-handler proc) -> void?
  proc : (any/c . -> . (or/c srcloc? #f))
parameter
(error-module-path->string-handler)
 -> (any/c exact-nonnegative-integer?
           . -> .
           string?)
(error-module-path->string-handler proc) -> void?
  proc : (any/c exact-nonnegative-integer?
                . -> .
                string?)
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:syntax:missing-module exn:fail:syntax (path)
    #:extra-constructor-name make-exn:fail:syntax:missing-module
    #:transparent)
  path : module-path?
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:filesystem:errno exn:fail:filesystem (errno)
    #:extra-constructor-name make-exn:fail:filesystem:errno
    #:transparent)
  errno : (cons/c exact-integer? (or/c 'posix 'windows 'gai))
struct
(struct exn:fail:filesystem:missing-module exn:fail:filesystem
        (path)
    #:extra-constructor-name
    make-exn:fail:filesystem:missing-module
    #:transparent)
  path : module-path?
struct
(struct exn:fail:network exn:fail ()
    #:extra-constructor-name make-exn:fail:network
    #:transparent)
struct
(struct exn:fail:network:errno exn:fail:network (errno)
    #:extra-constructor-name make-exn:fail:network:errno
    #:transparent)
  errno : (cons/c exact-integer? (or/c 'posix 'windows 'gai))
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
(srcloc->string srcloc) -> (or/c string? #f)
  srcloc : srcloc?
value
prop:exn:missing-module : struct-type-property?
procedure
(exn:missing-module? v) -> boolean?
  v : any/c
procedure
(exn:missing-module-accessor v)
 -> (exn:missing-module? . -> . module-path?)
  v : exn:srclocs?
procedure
(exn-classify-errno exn/errno) -> (or/c symbol? #f)
  exn/errno : (or/c exn? (cons/c exact-integer? (or/c 'posix 'windows 'gai)))
procedure
(exn->string exn) -> string?
  exn : (or/c exn? any/c)
procedure
(error-message->adjusted-string name               
                                name-realm         
                                message            
                                message-realm) -> string?
  name : (or/c symbol? #f)
  name-realm : symbol?
  message : string?
  message-realm : symbol?
procedure
(error-contract->adjusted-string contract-str        
                                 contract-realm) -> string?
  contract-str : string?
  contract-realm : symbol?
parameter
(current-error-message-adjuster)
 -> (symbol? . -> . (or/c procedure? #f))
(current-error-message-adjuster proc) -> void?
  proc : (symbol? . -> . (or/c procedure? #f))
value
error-message-adjuster-key : symbol?
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 ...+)
procedure
(promise/name? promise) -> boolean?
  promise : any/c
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
syntax
(for/list/concurrent maybe-group (for-clause ...)
  body-or-break ... body)
 
maybe-group = 
            | #:group thread-group-expr
 
  thread-group-expr : thread-group?
syntax
(for*/list/concurrent maybe-group (for-clause ...)
  body-or-break ... body)
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 name) -> continuation-prompt-tag?
  name : 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)
procedure
(call-in-continuation k proc) -> any
  k : continuation?
  proc : (-> 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) -> continuation-prompt-tag?
(new-prompt name) -> continuation-prompt-tag?
  name : symbol?
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 : (or/c continuation-mark-set? #f)
  key-v : any/c
  prompt-tag : continuation-prompt-tag?
             = (default-continuation-prompt-tag)
procedure
(continuation-mark-set->list*  mark-set         
                               key-list         
                              [none-v           
                               prompt-tag]) -> (listof vector?)
  mark-set : (or/c continuation-mark-set? #f)
  key-list : (listof any/c)
  none-v : any/c = #f
  prompt-tag : continuation-prompt-tag?
             = (default-continuation-prompt-tag)
procedure
(continuation-mark-set->iterator  mark-set     
                                  key-list     
                                 [none-v       
                                  prompt-tag]) 
 -> (-> (values (or/c vector? #f) procedure?))
  mark-set : (or/c continuation-mark-set? #f)
  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
(make-continuation-mark-key) -> continuation-mark-key?
(make-continuation-mark-key sym) -> continuation-mark-key?
  sym : symbol?
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      
                                [realms?]) -> list?
  mark-set : continuation-mark-set?
  realms? : any/c = #f
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
(break-parameterization? v) -> boolean?
  v : any/c
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
(black-box v) -> any/c
  v : any/c
procedure
(assert-unreachable) -> none/c
syntax
(with-assert-unreachable
  body ...+)
procedure
(thread thunk [#:pool pool #:keep keep]) -> thread?
  thunk : (-> any)
  pool : (or/c #f 'own parallel-thread-pool?) = #f
  keep : (or/c #f 'results) = #f
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 [fail-k]) -> any
  thd : thread?
  fail-k : (procedure-arity-includes/c 0) = void
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
(parallel-thread-pool? v) -> thread?
  v : any/c
procedure
(make-parallel-thread-pool [n]) -> parallel-thread-pool?
  n : exact-positive-integer? = (processor-count)
procedure
(parallel-thread-pool-close p) -> void?
  p : parallel-thread-pool?
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 : evt?
  wrap : (any/c ... . -> . any)
procedure
(handle-evt evt handle) -> handle-evt?
  evt : evt?
  handle : (any/c ... . -> . any)
procedure
(guard-evt maker) -> evt?
  maker : (-> (or/c evt? any/c))
procedure
(nack-guard-evt maker) -> evt?
  maker : (evt? . -> . (or/c evt? any/c))
procedure
(poll-guard-evt maker) -> evt?
  maker : (boolean? . -> . (or/c evt? any/c))
procedure
(replace-evt evt maker) -> evt?
  evt : evt?
  maker : (any/c ... . -> . (or/c evt? any/c))
value
always-evt : evt?
value
never-evt : evt?
procedure
(system-idle-evt) -> evt?
procedure
(alarm-evt msecs [monotonic?]) -> evt?
  msecs : real?
  monotonic? : any/c = #f
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
(async-channel/c c) -> contract?
  c : contract?
procedure
(impersonate-async-channel channel      
                           get-proc     
                           put-proc     
                           prop         
                           prop-val ... 
                           ...)         
 -> (and/c async-channel? impersonator?)
  channel : async-channel?
  get-proc : (any/c . -> . any/c)
  put-proc : (any/c . -> . any/c)
  prop : impersonator-property?
  prop-val : any
procedure
(chaperone-async-channel channel      
                         get-proc     
                         put-proc     
                         prop         
                         prop-val ... 
                         ...)         
 -> (and/c async-channel? chaperone?)
  channel : async-channel?
  get-proc : (any/c . -> . any/c)
  put-proc : (any/c . -> . any/c)
  prop : impersonator-property?
  prop-val : any
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 name realm]) -> parameter?
  v : any/c
  guard : (or/c (any/c . -> . any) #f) = #f
  name : symbol? = 'parameter-procedure
  realm : symbol? = 'racket
syntax
(parameterize ([parameter-expr value-expr] ...)
  body ...+)
 
  parameter-expr : parameter?
syntax
(parameterize* ((parameter-expr value-expr) ...)
  body ...+)
procedure
(make-derived-parameter  parameter     
                         guard         
                         wrap          
                        [name          
                         realm])   -> parameter?
  parameter : parameter?
  guard : (any/c . -> . any)
  wrap : (any/c . -> . any)
  name : symbol? = (object-name parameter)
  realm : symbol? = (procedure-realm parameter)
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?
syntax
(for/async (for-clause ...) body-or-break ... body)
syntax
(for*/async (for-clause ...) body-or-break ... body)
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          
               [#:at location       
                #:named named]) -> place?
  module-path : (or/c module-path? path?)
  start-name : symbol?
  location : (or/c #f place-location?) = #f
  named : any/c = #f
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)
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
value
prop:place-location : struct-type-property?
procedure
(place-location? v) -> boolean?
  v : any/c
syntax
(place id body ...+)
syntax
(place* maybe-port ...
        id
        body ...+)
 
maybe-port = 
           | #:in in-expr
           | #:out out-expr
           | #:err err-expr
syntax
(place/context id body ...+)
procedure
(processor-count) -> exact-positive-integer?
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?
procedure
(memory-order-acquire) -> void?
procedure
(memory-order-release) -> void?
syntax
(syntax-case stx-expr (literal-id ...)
  clause ...)
 
      clause = [pattern result-expr]
             | [pattern fender-expr result-expr]
                
     pattern = np-pattern
             | (pattern ...)
             | (pattern ...+ . np-pattern)
             | (pattern ... pattern ellipsis pattern ... . np-pattern)
                
  np-pattern = _
             | id
             | #(pattern ...)
             | #(pattern ... pattern ellipsis pattern ...)
             | #&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 ...)
             | #&stat-pattern
             | #s(key-datum stat-pattern ...)
             | const
                
    ellipsis = ...

_

id

(pattern ...)

(pattern ...+ . np-pattern)

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

(pattern ... pattern ellipsis pattern ... . np-pattern)

#(pattern ...)

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

#&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
              | (head-template ...)
              | (head-template ...+ . template)
              | #(head-template ...)
              | #&template
              | #s(key-datum head-template ...)
              | (~? template template)
              | (ellipsis stat-template)
              | const
                 
head-template = template
              | head-template ellipsis ...+
              | (~@ . template)
              | (~? head-template head-template)
              | (~? head-template)
                 
stat-template = like template, but without ..., ~?, and ~@
                 
     ellipsis = ...

id

(head-template ...)

(head-template ... . template)

#(head-template ...)

#&template

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

(~? template1 template2)

(ellipsis stat-template)

const

template

head-template ellipsis ...+
syntax
(~@ . template)
syntax
(~? head-template1 head-template2)

(~? head-template)
syntax
(quasisyntax template)
syntax
(unsyntax expr)
syntax
(unsyntax-splicing expr)
syntax
(syntax/loc loc-expr template)
 
  loc-expr : (or/c #f srcloc? syntax?
                   (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)))
syntax
(quasisyntax/loc loc-expr template)
 
  loc-expr : (or/c #f srcloc? syntax?
                   (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)))
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
_
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/c
  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/c
  stx : syntax?
procedure
(syntax->list stx) -> (or/c list? #f)
  stx : syntax?
procedure
(syntax->datum stx) -> any/c
  stx : syntax?
procedure
(datum->syntax ctxt v [srcloc prop ignored]) -> syntax?
  ctxt : (or/c syntax? #f)
  v : any/c
  srcloc : (or/c #f
                 syntax?
                 srcloc?
                 (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
(syntax-binding-set? v) -> boolean?
  v : any/c
procedure
(syntax-binding-set) -> syntax-binding-set?
procedure
(syntax-binding-set->syntax binding-set     
                            datum)      -> syntax?
  binding-set : syntax-binding-set?
  datum : any/c
procedure
(syntax-binding-set-extend                                                
                            binding-set                                   
                            symbol                                        
                            phase                                         
                            mpi                                           
                           [#:source-symbol source-symbol                 
                            #:source-phase source-phase                   
                            #:nominal-module nominal-mpi                  
                            #:nominal-phase nominal-phase                 
                            #:nominal-symbol nominal-symbol               
                            #:nominal-require-phase nominal-require-phase 
                            #:inspector inspector])                       
 -> syntax-binding-set?
  binding-set : syntax-binding-set?
  symbol : symbol?
  phase : (or/c exact-integer? #f)
  mpi : module-path-index?
  source-symbol : symbol? = symbol
  source-phase : (or/c exact-integer? #f) = phase
  nominal-mpi : module-path-index? = mpi
  nominal-phase : (or/c exact-integer? #f) = source-phase
  nominal-symbol : symbol? = source-symbol
  nominal-require-phase : (or/c exact-integer? #f) = 0
  inspector : (or/c inspector? #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 v) -> (listof identifier?)
  v : stx-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
(syntax-debug-info stx [phase all-bindings?]) -> hash?
  stx : syntax?
  phase : (or/c exact-integer? #f) = (syntax-local-phase-level)
  all-bindings? : any/c = #f
procedure
(syntax-srcloc stx) -> (or/c #f srcloc?)
  stx : syntax?
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 : identifier?
  b-id : identifier?
  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 : identifier?
  b-id : identifier?
procedure
(free-template-identifier=? a-id b-id) -> boolean?
  a-id : identifier?
  b-id : identifier?
procedure
(free-label-identifier=? a-id b-id) -> boolean?
  a-id : identifier?
  b-id : identifier?
procedure
(check-duplicate-identifier ids) -> (or/c identifier? #f)
  ids : (listof identifier?)
procedure
(identifier-binding  id-stx            
                    [phase-level       
                     top-level-symbol? 
                     exact-scopes?])   
 -> (or/c 'lexical
          #f
          (list/c module-path-index?
                  symbol?
                  module-path-index?
                  symbol?
                  exact-nonnegative-integer?
                  phase+space-shift?
                  phase+space?)
          (list/c symbol?))
  id-stx : identifier?
  phase-level : (or/c exact-integer? #f)
              = (syntax-local-phase-level)
  top-level-symbol? : any/c = #f
  exact-scopes? : any/c = #f
procedure
(identifier-transformer-binding  id-stx           
                                [rt-phase-level]) 
 -> (or/c 'lexical
          #f
          (listof module-path-index?
                  symbol?
                  module-path-index?
                  symbol?
                  exact-nonnegative-integer?
                  phase+space-shift?
                  phase+space?))
  id-stx : identifier?
  rt-phase-level : (or/c exact-integer? #f)
                 = (syntax-local-phase-level)
procedure
(identifier-template-binding id-stx)
 -> (or/c 'lexical
          #f
          (listof module-path-index?
                  symbol?
                  module-path-index?
                  symbol?
                  phase+space?
                  phase+space-shift?
                  phase+space?))
  id-stx : identifier?
procedure
(identifier-label-binding id-stx)
 -> (or/c 'lexical
          #f
          (listof module-path-index?
                  symbol?
                  module-path-index?
                  symbol?
                  exact-nonnegative-integer?
                  phase+space-shift?
                  phase+space?))
  id-stx : identifier?
procedure
(identifier-distinct-binding  id-stx              
                              wrt-id-stx          
                             [phase-level         
                              top-level-symbol?]) 
 -> (or/c 'lexical
          #f
          (list/c module-path-index?
                  symbol?
                  module-path-index?
                  symbol?
                  exact-nonnegative-integer?
                  phase+space-shift?
                  phase+space?)
          (list/c symbol?))
  id-stx : identifier?
  wrt-id-stx : identifier?
  phase-level : (or/c exact-integer? #f)
              = (syntax-local-phase-level)
  top-level-symbol? : any/c = #f
procedure
(identifier-binding-symbol  id-stx            
                           [phase-level]) -> symbol?
  id-stx : identifier?
  phase-level : (or/c exact-integer? #f)
              = (syntax-local-phase-level)
procedure
(identifier-binding-portal-syntax  id-stx        
                                  [phase-level]) 
 -> (or/c #f syntax?)
  id-stx : identifier?
  phase-level : (or/c exact-integer? #f)
              = (syntax-local-phase-level)
procedure
(syntax-bound-symbols  stx                 
                      [phase-level         
                       exact-scopes?]) -> (listof symbol?)
  stx : syntax?
  phase-level : (or/c exact-integer? #f)
              = (syntax-local-phase-level)
  exact-scopes? : any/c = #f
procedure
(syntax-bound-interned-scope-symbols  stx             
                                     [phase-level     
                                      exact-scopes?]) 
 -> (listof symbol?)
  stx : syntax?
  phase-level : (or/c exact-integer? #f)
              = (syntax-local-phase-level)
  exact-scopes? : any/c = #f
procedure
(syntax-bound-phases stx) -> (listof (or/c exact-integer? #f))
  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) -> rename-transformer?
  id-stx : syntax?
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 : any/c
  context-v : (or/c 'expression 'top-level 'module 'module-begin list?)
  stop-ids : (or/c (listof identifier?) empty #f)
  intdef-ctx : (or/c internal-definition-context?           = #f
                     #f
                     (listof internal-definition-context?))
procedure
(syntax-local-expand-expression  stx            
                                [opaque-only?]) 
 -> (if opaque-only? #f syntax?) syntax?
  stx : any/c
  opaque-only? : any/c = #f
procedure
(local-transformer-expand  stx              
                           context-v        
                           stop-ids         
                          [intdef-ctx]) -> syntax?
  stx : any/c
  context-v : (or/c 'expression 'top-level list?)
  stop-ids : (or/c (listof identifier?) #f)
  intdef-ctx : (or/c internal-definition-context?           = #f
                     #f
                     (listof internal-definition-context?))
procedure
(local-expand/capture-lifts  stx            
                             context-v      
                             stop-ids       
                            [intdef-ctx     
                             lift-ctx]) -> syntax?
  stx : any/c
  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
                     (listof internal-definition-context?))
  lift-ctx : any/c = (gensym 'lifts)
procedure
(local-transformer-expand/capture-lifts  stx            
                                         context-v      
                                         stop-ids       
                                        [intdef-ctx     
                                         lift-ctx]) -> syntax?
  stx : any/c
  context-v : (or/c 'expression 'top-level list?)
  stop-ids : (or/c (listof identifier?) #f)
  intdef-ctx : (or/c internal-definition-context?           = #f
                     #f
                     (listof internal-definition-context?))
  lift-ctx : any/c = (gensym 'lifts)
procedure
(syntax-local-apply-transformer transformer         
                                binding-id/insp     
                                context-v           
                                intdef-ctx          
                                v ...)          -> any
  transformer : procedure?
  binding-id/insp : (or/c #f identifier? inspector?
                          (list identifier? inspector?))
  context-v : (or/c 'expression 'top-level 'module 'module-begin list?)
  intdef-ctx : (or/c internal-definition-context? #f)
  v : any/c
procedure
(internal-definition-context? v) -> boolean?
  v : any/c
procedure
(syntax-local-make-definition-context [parent-ctx   
                                       add-scope?]) 
 -> internal-definition-context?
  parent-ctx : (or/c internal-definition-context? #f) = #f
  add-scope? : any/c = #t
procedure
(syntax-local-make-definition-context-introducer [name])
 -> ((syntax?) ((or/c 'flip 'add 'remove)) . ->* . syntax?)
  name : (and/c symbol? (not/c 'macro)) = 'intdef
procedure
(internal-definition-context-add-scopes intdef-ctx     
                                        stx)       -> syntax?
  intdef-ctx : internal-definition-context?
  stx : syntax?
procedure
(internal-definition-context-splice-binding-identifier            
                                                       intdef-ctx 
                                                       id)        
 -> syntax?
  intdef-ctx : internal-definition-context?
  id : identifier?
procedure
(syntax-local-bind-syntaxes  id-list             
                             expr                
                             intdef-ctx          
                            [extra-intdef-ctxs]) 
 -> (listof identifier?)
  id-list : (listof identifier?)
  expr : (or/c syntax? #f)
  intdef-ctx : internal-definition-context?
  extra-intdef-ctxs : (or/c internal-definition-context?
                            (listof internal-definition-context?))
                    = '()
procedure
(internal-definition-context-binding-identifiers intdef-ctx)
 -> (listof identifier?)
  intdef-ctx : internal-definition-context?
procedure
(internal-definition-context-introduce  intdef-ctx     
                                        stx            
                                       [mode])     -> syntax?
  intdef-ctx : internal-definition-context?
  stx : syntax?
  mode : (or/c 'flip 'add 'remove) = 'flip
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?))
value
prop:expansion-contexts : struct-type-property?
procedure
(syntax-local-value  id-stx            
                    [failure-thunk     
                     intdef-ctx])  -> any
  id-stx : identifier?
  failure-thunk : (or/c (-> any) #f) = #f
  intdef-ctx : (or/c internal-definition-context?           = #f
                     #f
                     (listof internal-definition-context?))
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
                     (listof internal-definition-context?))
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 stx) -> void?
  stx : syntax?
procedure
(syntax-local-lift-module-end-declaration stx) -> void?
  stx : syntax?
procedure
(syntax-local-lift-require  raw-require-spec     
                            stx                  
                           [new-scope?])     -> syntax?
  raw-require-spec : any/c
  stx : syntax?
  new-scope? : any/c = #t
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) -> exact-integer?
procedure
(syntax-local-module-exports mod-path)
 -> (listof (cons/c phase+space? (listof symbol?)))
  mod-path : (or/c module-path?
                   (syntax/c module-path?))
procedure
(syntax-local-submodules) -> (listof symbol?)
procedure
(syntax-local-module-interned-scope-symbols)
 -> (listof symbol?)
procedure
(syntax-local-get-shadower  id-stx                
                           [only-generated?]) -> identifier?
  id-stx : identifier?
  only-generated? : any/c = #f
procedure
(syntax-local-make-delta-introducer id-stx) -> procedure?
  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-with-lifts?) -> boolean?
procedure
(syntax-transforming-module-expression?) -> boolean?
procedure
(syntax-local-compiling-module?) -> boolean?
procedure
(syntax-local-identifier-as-binding  id-stx           
                                    [intdef-ctx]) -> identifier?
  id-stx : identifier?
  intdef-ctx : (or/c internal-definition-context? #f) = #f
procedure
(syntax-local-introduce stx) -> syntax?
  stx : syntax?
procedure
(make-syntax-introducer [as-use-site?])
 -> ((syntax?) ((or/c 'flip 'add 'remove)) . ->* . syntax?)
  as-use-site? : any/c = #f
procedure
(make-interned-syntax-introducer key)
 -> ((syntax?) ((or/c 'flip 'add 'remove)) . ->* . syntax?)
  key : (and/c symbol? symbol-interned?)
procedure
(make-syntax-delta-introducer  ext-stx       
                               base-stx      
                              [phase-level]) 
 -> ((syntax?) ((or/c 'flip 'add 'remove)) . ->* . syntax?)
  ext-stx : identifier?
  base-stx : (or/c syntax? #f)
  phase-level : (or/c #f exact-integer?)
              = (syntax-local-phase-level)
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 
                                          shift)   
 -> (or/c (listof (cons/c phase+space?
                          (listof identifier?)))
          #f)
  mod-path : (or/c module-path? #f)
  shift : (or/c #t phase+space-shift?)
value
prop:liberal-define-context : struct-type-property?
procedure
(liberal-define-context? v) -> boolean?
  v : any/c
procedure
(expand-import require-spec)
 -> (listof import?) (listof import-source?)
  require-spec : 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?
                       (syntax/c module-path?))
  mode : phase+space?
  req-mode : phase+space-shift?
  orig-mode : phase+space?
  orig-stx : syntax?
struct
(struct import-source (mod-path-stx mode)
    #:extra-constructor-name make-import-source)
  mod-path-stx : (syntax/c module-path?)
  mode : phase+space-shift?
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?
          (syntax/c module-path?))
  module-path : (or/c module-path?
                      (syntax/c module-path?))
procedure
(syntax-local-lift-require-top-level-form top-level-stx)
 -> void?
  top-level-stx : syntax?
procedure
(syntax-local-require-certifier)
 -> ((syntax?) (or/c #f (syntax? . -> . syntax?))
     . ->* . syntax?)
procedure
(expand-export provide-spec modes) -> (listof export?)
  provide-spec : syntax?
  modes : (listof phase+space?)
procedure
(pre-expand-export provide-spec modes) -> syntax?
  provide-spec : syntax?
  modes : (listof phase+space?)
procedure
(make-provide-transformer proc) -> provide-transformer?
  proc : (syntax? (listof phase+space?)
          . -> . (listof export?))
(make-provide-transformer proc pre-proc)
 -> (and/c provide-transformer? provide-pre-transformer?)
  proc : (syntax? (listof phase+space?)
          . -> . (listof export?))
  pre-proc : (syntax? (listof phase+space?)
              . -> . syntax?)
procedure
(make-provide-pre-transformer pre-proc)
 -> provide-pre-transformer?
  pre-proc : (syntax? (listof phase+space?)
              . -> . 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-id mode protect? orig-stx)
    #:extra-constructor-name make-export)
  local-id : identifier?
  out-id : identifier?
  mode : phase+space?
  protect? : any/c
  orig-stx : syntax?
procedure
(export-out-sym ex) -> symbol?
  ex : export?
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?
procedure
(portal-syntax? v) -> boolean?
  v : any/c
procedure
(make-portal-syntax stx) -> portal-syntax?
  stx : syntax?
procedure
(portal-syntax-content portal) -> syntax?
  portal : portal-syntax?
syntax
(define-syntax-parameter id expr)
syntax
(syntax-parameterize ([id expr] ...) body-expr ...+)
syntax
(define-rename-transformer-parameter id 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-parameterize
syntax
splicing-syntax-parameterize
procedure
(syntax-property stx key v [preserved?]) -> syntax?
  stx : syntax?
  key : (if preserved? (and/c symbol? symbol-interned?) any/c)
  v : any/c
  preserved? : any/c = (eq? key 'paren-shape)
(syntax-property stx key) -> any
  stx : syntax?
  key : any/c
procedure
(syntax-property-remove stx key) -> syntax?
  stx : syntax?
  key : any/c
procedure
(syntax-property-preserved? stx key) -> boolean?
  stx : syntax?
  key : (and/c symbol? symbol-interned?)
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 : identifier?
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 [insp]) -> syntax?
  top-level-form : any/c
  insp : inspector? = (current-code-inspector)
procedure
(expand-syntax stx [insp]) -> syntax?
  stx : syntax?
  insp : inspector? = (current-code-inspector)
procedure
(expand-once top-level-form [insp]) -> syntax?
  top-level-form : any/c
  insp : inspector? = (current-code-inspector)
procedure
(expand-syntax-once stx [insp]) -> syntax?
  stx : syntax?
  insp : inspector? = (current-code-inspector)
procedure
(expand-to-top-form top-level-form [insp]) -> syntax?
  top-level-form : any/c
  insp : inspector? = (current-code-inspector)
procedure
(expand-syntax-to-top-form stx [insp]) -> syntax?
  stx : syntax?
  insp : inspector? = (current-code-inspector)
procedure
(syntax-serialize                                                    
                   stx                                               
                   #:preserve-property-keys preserve-property-keys   
                  [#:provides-namespace provides-namespace           
                   #:base-module-path-index base-module-path-index]) 
 -> any/c
  stx : syntax?
  preserve-property-keys : (listof symbol?)
  provides-namespace : (or/c namespace? #f)
                     = (current-namespace)
  base-module-path-index : (or/c module-path-index? #f) = #f
procedure
(syntax-deserialize                                                    
                     v                                                 
                    [#:base-module-path-index base-module-path-index]) 
 -> syntax?
  v : any/c
  base-module-path-index : (or/c module-path-index? #f) = #f
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                     
            #:subs? subs?                      
            #:subs-intro subs-introducer]) -> identifier?
  lctx : (or/c syntax? #f)
  fmt : string?
  v : (or/c string? symbol? keyword? char? number?
            (syntax/c (or/c string? symbol? keyword? char? number?)))
  src : (or/c syntax? #f) = #f
  props : (or/c syntax? #f) = #f
  ignored : (or/c syntax? #f) = #f
  subs? : boolean? = #f
  subs-introducer : (-> syntax? syntax?)
                  = (if (syntax-transforming?) syntax-local-introduce values)
procedure
(format-symbol fmt v ...) -> symbol?
  fmt : string?
  v : (or/c string? symbol? keyword? char? number?
            (syntax/c (or/c string? symbol? keyword? char? number?)))
syntax
(define/with-syntax pattern stx-expr)
 
  stx-expr : syntax?
parameter
(current-syntax-context) -> (or/c syntax? #f)
(current-syntax-context stx) -> void?
  stx : (or/c syntax? #f)
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?) #f)
(current-recorded-disappeared-uses ids) -> void?
  ids : (or/c (listof identifier?) #f)
syntax
(with-disappeared-uses body-expr ... stx-expr)
 
  stx-expr : syntax?
procedure
(syntax-local-value/record id predicate) -> any/c
  id : identifier?
  predicate : (-> any/c boolean?)
procedure
(record-disappeared-uses id [intro?]) -> void?
  id : (or/c identifier? (listof identifier?))
  intro? : boolean? = (syntax-transforming?)
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 : any/c
  intdef-ctx : (or/c internal-definition-context?
                     #f
                     (listof internal-definition-context?))
             = '()
syntax
(with-syntax* ([pattern stx-expr] ...)
  body ...+)
 
  stx-expr : syntax?
procedure
(phase? v) -> boolean?
  v : any/c
procedure
(space? v) -> boolean?
  v : any/c
procedure
(phase+space? v) -> boolean?
  v : any/c
procedure
(phase+space phase space) -> phase+space?
  phase : phase?
  space : space?
procedure
(phase+space-phase p+s) -> phase?
  p+s : phase+space?
procedure
(phase+space-space p+s) -> phase?
  p+s : phase+space?
procedure
(phase+space-shift? v) -> boolean?
  v : any/c
procedure
(phase+space+ p+s shift) -> phase+space?
  p+s : phase+space?
  shift : phase+space-shift?
procedure
(phase+space-shift+ shift additional-shift) -> phase+space-shift?
  shift : phase+space?
  additional-shift : phase+space-shift?
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? v) -> boolean?
  v : any/c
procedure
(terminal-port? v) -> boolean?
  v : any/c
procedure
(port-waiting-peer? port) -> boolean?
  port : port?
value
eof : eof-object?
procedure
(eof-object? v) -> boolean?
  v : 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
(file-truncate port size) -> void?
  port : (and/c output-port? file-stream-port?)
  size : exact-nonnegative-integer?
procedure
(terminal-file-position) -> exact-nonnegative-integer?
procedure
(port-count-lines! port) -> void?
  port : port?
procedure
(port-counts-lines? port) -> boolean?
  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                
                  #:for-module? for-module?]) -> input-port?
  path : path-string?
  mode-flag : (or/c 'binary 'text) = 'binary
  for-module? : any/c = #f
procedure
(open-output-file  path                                          
                  [#:mode mode-flag                              
                   #:exists exists-flag                          
                   #:permissions permissions                     
                   #:replace-permissions? replace-permissions?]) 
 -> 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
  permissions : (integer-in 0 65535) = #o666
  replace-permissions? : any/c = #f
procedure
(open-input-output-file                                                
                         path                                          
                        [#:mode mode-flag                              
                         #:exists exists-flag                          
                         #:permissions permissions                     
                         #:replace-permissions? replace-permissions?]) 
 -> 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
                      'must-truncate 'truncate/replace)
              = 'error
  permissions : (integer-in 0 65535) = #o666
  replace-permissions? : any/c = #f
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                          
                        #:permissions permissions                     
                        #:replace-permissions? replace-permissions?]) 
 -> any
  path : path-string?
  proc : (output-port? . -> . any)
  mode-flag : (or/c 'binary 'text) = 'binary
  exists-flag : (or/c 'error 'append 'update 'can-update
                      'replace 'truncate
                      'must-truncate 'truncate/replace)
              = 'error
  permissions : (integer-in 0 65535) = #o666
  replace-permissions? : any/c = #f
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                          
                         #:permissions permissions                     
                         #:replace-permissions? replace-permissions?]) 
 -> any
  path : path-string?
  proc : (output-port? . -> . any)
  mode-flag : (or/c 'binary 'text) = 'binary
  exists-flag : (or/c 'error 'append 'update 'can-update
                      'replace 'truncate
                      'must-truncate 'truncate/replace)
              = 'error
  permissions : (integer-in 0 65535) = #o666
  replace-permissions? : any/c = #f
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                          
                      #:permissions permissions                     
                      #:replace-permissions? replace-permissions?]) 
 -> any
  path : path-string?
  thunk : (-> any)
  mode-flag : (or/c 'binary 'text) = 'binary
  exists-flag : (or/c 'error 'append 'update 'can-update
                      'replace 'truncate
                      'must-truncate 'truncate/replace)
              = 'error
  permissions : (integer-in 0 65535) = #o666
  replace-permissions? : any/c = #f
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
(port-file-stat port) -> (and/c (hash/c symbol? any/c) hash-eq?)
  port : file-stream-port?
procedure
(string-port? p) -> boolean?
  p : port?
procedure
(open-input-bytes bstr [name]) -> (and/c input-port? string-port?)
  bstr : bytes?
  name : any/c = 'string
procedure
(open-input-string str [name]) -> (and/c input-port? string-port?)
  str : string?
  name : any/c = 'string
procedure
(open-output-bytes [name]) -> (and/c output-port? string-port?)
  name : any/c = 'string
procedure
(open-output-string [name]) -> (and/c output-port? string-port?)
  name : any/c = 'string
procedure
(get-output-bytes  out           
                  [reset?        
                   start-pos     
                   end-pos]) -> bytes?
  out : (and/c output-port? string-port?)
  reset? : any/c = #f
  start-pos : exact-nonnegative-integer? = 0
  end-pos : exact-nonnegative-integer? = #f
procedure
(get-output-string out) -> string?
  out : (and/c output-port? string-port?)
procedure
(pipe-port? p) -> boolean?
  p : port?
procedure
(make-pipe [limit input-name output-name])
 -> (and/c input-port? pipe-port?)
    (and/c output-port? pipe-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 : pipe-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?
          #f)
  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
                  (->
                   (values (or/c exact-positive-integer? #f)
                           (or/c exact-nonnegative-integer? #f)
                           (or/c exact-positive-integer? #f)))
                  #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
                  (->
                   (values (or/c exact-positive-integer? #f)
                           (or/c exact-nonnegative-integer? #f)
                           (or/c exact-positive-integer? #f)))
                  #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 #:close? close?]) -> string?
  in : input-port? = (current-input-port)
  close? : any/c = #f
procedure
(port->bytes [in #:close? close?]) -> bytes?
  in : input-port? = (current-input-port)
  close? : any/c = #f
procedure
(port->lines [in                        
              #:line-mode line-mode     
              #:close? close?])     -> (listof string?)
  in : input-port? = (current-input-port)
  line-mode : (or/c 'linefeed 'return 'return-linefeed 'any 'any-one)
            = 'any
  close? : any/c = #f
procedure
(port->bytes-lines [in                        
                    #:line-mode line-mode     
                    #:close? close?])     -> (listof bytes?)
  in : input-port? = (current-input-port)
  line-mode : (or/c 'linefeed 'return 'return-linefeed 'any 'any-one)
            = 'any
  close? : any/c = #f
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 ...            
                   [#:name name]) -> input-port?
  close-at-eof? : any/c
  in : input-port?
  name : any/c = (map object-name in)
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
(combine-output a-out b-out) -> output-port?
  a-out : output-port?
  b-out : output-port?
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
(open-input-nowhere [name]) -> input-port?
  name : any/c = 'nowhere
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?]          
                      #:name name) -> 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
  name : (object-name in)
procedure
(relocate-output-port  out              
                       line             
                       column           
                       position         
                      [close?]          
                       #:name name) -> 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
  name : (object-name out)
procedure
(transplant-input-port  in                
                        get-location      
                        init-pos          
                       [close?            
                        count-lines!]     
                        #:name name)  -> 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
  name : (object-name in)
procedure
(transplant-output-port  out               
                         get-location      
                         init-pos          
                        [close?            
                         count-lines!]     
                         #:name name)  -> 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
  name : (object-name out)
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) -> evt?
  bstr : (and/c bytes? (not/c immutable?))
  in : input-port?
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)
       = 'linefeed
procedure
(read-bytes-line-evt in [mode]) -> evt?
  in : input-port?
  mode : (or/c 'linefeed 'return 'return-linefeed 'any 'any-one)
       = 'linefeed
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-nonnegative-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-nonnegative-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-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!*  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-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
(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-nonnegative-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-nonnegative-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            
                       special-wrap  
                       source-name]) 
 -> (or/c char? eof-object? any/c)
  in : input-port? = (current-input-port)
  special-wrap : (or/c (any/c . -> . any/c) #f) = #f
  source-name : any/c = #f
procedure
(read-byte-or-special [in            
                       special-wrap  
                       source-name]) 
 -> (or/c byte? eof-object? any/c)
  in : input-port? = (current-input-port)
  special-wrap : (or/c (any/c . -> . any/c) #f) = #f
  source-name : any/c = #f
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 
                       special-wrap   
                       source-name])  
 -> (or/c char? eof-object? any/c)
  in : input-port? = (current-input-port)
  skip-bytes-amt : exact-nonnegative-integer? = 0
  special-wrap : (or/c (any/c . -> . any/c) #f 'special) = #f
  source-name : any/c = #f
procedure
(peek-byte-or-special [in             
                       skip-bytes-amt 
                       progress       
                       special-wrap   
                       source-name])  
 -> (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
  special-wrap : (or/c (any/c . -> . any/c) #f 'special) = #f
  source-name : any/c = #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 : char?
  out : output-port? = (current-output-port)
procedure
(write-byte byte [out]) -> void?
  byte : byte?
  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 (current-input-port))
  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])
 -> (or/c (any/c any/c . -> . any) #f)
  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-square-bracket-with-tag) -> boolean?
(read-square-bracket-with-tag on?) -> void?
  on? : any/c
parameter
(read-curly-brace-with-tag) -> boolean?
(read-curly-brace-with-tag 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-syntax-accept-graph) -> boolean?
(read-syntax-accept-graph on?) -> void?
  on? : any/c
parameter
(read-decimal-as-inexact) -> boolean?
(read-decimal-as-inexact on?) -> void?
  on? : any/c
parameter
(read-single-flonum) -> boolean?
(read-single-flonum 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-cdot) -> boolean?
(read-cdot 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-readtable) -> (or/c readtable? #f)
(current-readtable readtable) -> void?
  readtable : (or/c readtable? #f)
procedure
(call-with-default-reading-parameterization thunk) -> any
  thunk : (-> any)
parameter
(current-reader-guard) -> (any/c . -> . any)
(current-reader-guard proc) -> void?
  proc : (any/c . -> . any)
parameter
(read-on-demand-source)
 -> (or/c #f #t (and/c path? complete-path?))
(read-on-demand-source mode) -> void?
  mode : (or/c #f #t (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
(writeln datum [out]) -> void?
  datum : any/c
  out : output-port? = (current-output-port)
procedure
(displayln datum [out]) -> void?
  datum : any/c
  out : output-port? = (current-output-port)
procedure
(println datum [out quote-depth]) -> void?
  datum : any/c
  out : output-port? = (current-output-port)
  quote-depth : (or/c 0 1) = 0
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
(print-value-columns)
 -> (or/c +inf.0 (and/c exact-integer? (>/c 5)))
(print-value-columns columns) -> void?
  columns : (or/c +inf.0 (and/c exact-integer? (>/c 5)))
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
(default-global-port-print-handler  v                 
                                    out               
                                   [print-depth]) -> void?
  v : any/c
  out : output-port?
  print-depth : (or/c 0 1) = 0
procedure
(pretty-print  v                         
              [port                      
               quote-depth               
               #:newline? newline?]) -> void?
  v : any/c
  port : output-port? = (current-output-port)
  quote-depth : (or/c 0 1) = 0
  newline? : boolean? = #t
procedure
(pretty-write v [port #:newline? newline?]) -> void?
  v : any/c
  port : output-port? = (current-output-port)
  newline? : boolean? = #t
procedure
(pretty-display v [port #:newline? newline?]) -> void?
  v : any/c
  port : output-port? = (current-output-port)
  newline? : boolean? = #t
procedure
(pretty-format v [columns #:mode mode]) -> string?
  v : any/c
  columns : exact-nonnegative-integer? = (pretty-print-columns)
  mode : (or/c 'print 'write 'display) = 'print
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 : output-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 : (or/c readtable? #f)
  key : (or/c char? #f)
  mode : (or/c 'terminating-macro
               'non-terminating-macro
               'dispatch-macro
               char?)
  action : (or/c procedure?
                 readtable?
                 #f)
procedure
(readtable-mapping readtable char)
 -> (or/c char?
          'terminating-macro
          'non-terminating-macro)
    (or/c #f procedure?)
    (or/c #f procedure?)
  readtable : readtable?
  char : char?
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? (or/c #t #f 0 1) . -> . 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                                                          
           [#:relative-directory relative-to                           
            #:deserialize-relative-directory deserialize-relative-to]) 
 -> any
  v : serializable?
  relative-to : (or/c (and/c path? complete-path?)          = #f
                      (cons/c (and/c path? complete-path?)
                              (and/c path? complete-path?))
                      #f)
  deserialize-relative-to : (or/c (and/c path? complete-path?)
                                  (cons/c (and/c path? complete-path?)
                                          (and/c path? complete-path?))
                                  #f)
                          = relative-to
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?
        (or/c void? (cons/c module-path? symbol?)))
(deserialize-module-guard guard) -> void?
  guard : (-> module-path? symbol?
              (or/c void? (cons/c module-path? symbol?)))
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 : struct-type-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?)
                       (-> any/c))
  can-cycle? : any/c
  dir : path-string?
procedure
(s-exp->fasl  v                               
             [out                             
              #:keep-mutable? keep-mutable?   
              #:handle-fail handle-fail       
              #:external-lift? external-lift? 
              #:skip-prefix? skip-prefix?])   
 -> (or/c (void) bytes?)
  v : any/c
  out : (or/c output-port? #f) = #f
  keep-mutable? : any/c = #f
  handle-fail : (or/c #f (any/c . -> . any/c)) = #f
  external-lift? : (or/c #f (any/c . -> . any/c)) = #f
  skip-prefix? : any/c = #f
procedure
(fasl->s-exp  in                                  
             [#:datum-intern? datum-intern?       
              #:external-lifts external-lifts     
              #:skip-prefix? skip-prefix?])   -> any/c
  in : (or/c input-port? bytes?)
  datum-intern? : any/c = #t
  external-lifts : vector? = '#()
  skip-prefix? : any/c = #f
procedure
(sha1-bytes in [start end]) -> bytes?
  in : (or/c bytes? input-port?)
  start : exact-nonnegative-integer? = 0
  end : (or/c #f exact-nonnegative-integer?) = #f
procedure
(sha224-bytes in [start end]) -> bytes?
  in : (or/c bytes? input-port?)
  start : exact-nonnegative-integer? = 0
  end : (or/c #f exact-nonnegative-integer?) = #f
procedure
(sha256-bytes in [start end]) -> bytes?
  in : (or/c bytes? input-port?)
  start : exact-nonnegative-integer? = 0
  end : (or/c #f exact-nonnegative-integer?) = #f
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          
                                as-constant?]) -> void?
  sym : symbol?
  v : any/c
  map? : any/c = #f
  namespace : namespace? = (current-namespace)
  as-constant? : any/c = #f
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     
                   [namespace])             -> void?
  quoted-raw-require-spec : any/c
  namespace : namespace? = (current-namespace)
procedure
(namespace-require/copy  quoted-raw-require-spec     
                        [namespace])             -> void?
  quoted-raw-require-spec : any/c
  namespace : namespace? = (current-namespace)
procedure
(namespace-require/constant  quoted-raw-require-spec     
                            [namespace])             -> void?
  quoted-raw-require-spec : any/c
  namespace : namespace? = (current-namespace)
procedure
(namespace-require/expansion-time  quoted-raw-require-spec 
                                  [namespace])             
 -> void?
  quoted-raw-require-spec : any/c
  namespace : namespace? = (current-namespace)
procedure
(namespace-attach-module  src-namespace        
                          modname              
                         [dest-namespace]) -> void?
  src-namespace : namespace?
  modname : (or module-path? resolved-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
(namespace-call-with-registry-lock namespace     
                                   thunk)    -> any
  namespace : namespace?
  thunk : (-> any)
procedure
(module->namespace mod [src-namespace]) -> namespace?
  mod : (or/c module-path?
              resolved-module-path?
              module-path-index?)
  src-namespace : namespace? = (current-namespace)
procedure
(namespace-syntax-introduce stx [namespace]) -> syntax?
  stx : syntax?
  namespace : namespace? = (current-namespace)
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?
procedure
(variable-reference-from-unsafe? varref) -> boolean?
  varref : variable-reference?
parameter
(current-eval) -> (any/c . -> . any)
(current-eval proc) -> void?
  proc : (any/c . -> . any)
procedure
(eval top-level-form) -> any
  top-level-form : any/c
(eval top-level-form namespace) -> any
  top-level-form : any/c
  namespace : namespace?
procedure
(eval-syntax stx) -> any
  stx : syntax?
(eval-syntax stx namespace) -> any
  stx : syntax?
  namespace : 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 #f
                 symbol?
                 (cons/c (or/c #f symbol?)
                         (non-empty-listof symbol?)))
     . -> .
     any)
(current-load-extension proc) -> void?
  proc : (path? (or/c #f
                      symbol?
                      (cons/c (or/c #f symbol?)
                              (non-empty-listof symbol?)))
          . -> .
          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 (and/c path? relative-path?))
(use-compiled-file-paths paths) -> void?
  paths : (listof (and/c path-string? relative-path?))
parameter
(current-compiled-file-roots) -> (listof (or/c path? 'same))
(current-compiled-file-roots paths) -> void?
  paths : (listof (or/c path-string? 'same))
procedure
(find-compiled-file-roots) -> (listof (or/c path? 'same))
parameter
(use-compiled-file-check) -> (or/c 'modify-seconds 'exists)
(use-compiled-file-check check) -> void?
  check : (or/c 'modify-seconds 'exists)
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-get-interaction-evt) -> (-> evt?)
(current-get-interaction-evt proc) -> void?
  proc : (-> evt?)
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-recompile ce) -> compiled-expression?
  ce : compiled-expression?
procedure
(compiled-expression-add-target-machine ce        
                                        other-ce) 
 -> compiled-expression?
  ce : compiled-expression?
  other-ce : (or/c compiled-expression? hash?)
procedure
(compiled-expression-summarize-target-machine other-ce) -> hash?
  other-ce : compiled-expression?
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
(current-compile-target-machine)
 -> (or/c #f (and/c symbol? compile-target-machine?))
(current-compile-target-machine target) -> void?
  target : (or/c #f (and/c symbol? compile-target-machine?))
procedure
(compile-target-machine? sym) -> boolean?
  sym : symbol?
parameter
(current-compile-realm) -> symbol?
(current-compile-realm realm) -> void?
  realm : symbol?
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)
parameter
(current-module-path-for-load)
 -> (or/c #f module-path?
          (and/c syntax?
                 (lambda (stx)
                   (module-path? (syntax->datum s)))))
(current-module-path-for-load path) -> void?
  path : (or/c #f module-path?
               (and/c syntax?
                      (lambda (stx)
                        (module-path? (syntax->datum s)))))
procedure
(module-path-index? v) -> boolean?
  v : any/c
procedure
(module-path-index-resolve  mpi           
                           [load?         
                            src-stx]) -> resolved-module-path?
  mpi : module-path-index?
  load? : any/c = #f
  src-stx : (or/c syntax? #f) = #f
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 
                         [verbosity])          
 -> (listof (cons/c phase+space? list?))
    (listof (cons/c phase+space? list?))
  compiled-module-code : compiled-module-expression?
  verbosity : (or/c #f 'defined-names) = #f
procedure
(module-compiled-indirect-exports compiled-module-code)
 -> (listof (cons/c exact-integer? (listof symbol?)))
  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
(module-compiled-cross-phase-persistent? compiled-module-code)
 -> boolean?
  compiled-module-code : compiled-module-expression?
procedure
(module-compiled-realm compiled-module-code) -> symbol?
  compiled-module-code : compiled-module-expression?
procedure
(dynamic-require  mod                
                  provided           
                 [fail-thunk         
                  syntax-thunk]) -> (or/c void? any/c)
  mod : (or/c module-path?
              resolved-module-path?
              module-path-index?)
  provided : (or/c symbol? #f 0 void?)
  fail-thunk : (or/c 'error (-> any)) = 'error
  syntax-thunk : (or/c 'eval (-> any)) = 'eval
procedure
(dynamic-require-for-syntax  mod                
                             provided           
                            [fail-thunk         
                             syntax-thunk]) -> any
  mod : module-path?
  provided : (or/c symbol? #f)
  fail-thunk : (or/c 'error (-> any)) = 'error
  syntax-thunk : (or/c 'eval (-> any)) = 'eval
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 [verbosity])
 -> (listof (cons/c phase+space? list?))
    (listof (cons/c phase+space? list?))
  mod : (or/c module-path? module-path-index?
              resolved-module-path?)
  verbosity : (or/c #f 'defined-names) = #f
procedure
(module->indirect-exports mod)
 -> (listof (cons/c exact-integer? (listof symbol?)))
  mod : (or/c module-path? module-path-index?
              resolved-module-path?)
procedure
(module->realm mod) -> symbol?
  mod : (or/c module-path? module-path-index?
              resolved-module-path?)
procedure
(module-predefined? mod) -> boolean?
  mod : (or/c module-path? module-path-index?
              resolved-module-path?)
procedure
(module-cache-clear!) -> void?
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
(impersonator-ephemeron v) -> ephemeron?
  v : any/c
procedure
(procedure-impersonator*? v) -> boolean?
  v : any/c
procedure
(impersonate-procedure proc         
                       wrapper-proc 
                       prop         
                       prop-val ... 
                       ...)         
 -> (and/c procedure? impersonator?)
  proc : procedure?
  wrapper-proc : (or/c procedure? #f)
  prop : impersonator-property?
  prop-val : any/c
procedure
(impersonate-procedure* proc         
                        wrapper-proc 
                        prop         
                        prop-val ... 
                        ...)         
 -> (and/c procedure? impersonator?)
  proc : procedure?
  wrapper-proc : (or/c procedure? #f)
  prop : impersonator-property?
  prop-val : any/c
procedure
(impersonate-struct  v                     
                    [struct-type]          
                     orig-proc             
                     redirect-proc ...     
                     ...                   
                     prop                  
                     prop-val ...          
                     ...)              -> any/c
  v : any/c
  struct-type : struct-type? = unspecified
  orig-proc : (or/c struct-accessor-procedure?
                    struct-mutator-procedure?
                    struct-type-property-accessor-procedure?)
  redirect-proc : (or/c procedure? #f)
  prop : impersonator-property?
  prop-val : any/c
procedure
(impersonate-vector vec          
                    ref-proc     
                    set-proc     
                    prop         
                    prop-val ... 
                    ...)         
 -> (and/c vector? impersonator?)
  vec : (and/c vector? (not/c immutable?))
  ref-proc : (or/c (vector? exact-nonnegative-integer? any/c . ->
. any/c) #f)
  set-proc : (or/c (vector? exact-nonnegative-integer? any/c . ->
. any/c) #f)
  prop : impersonator-property?
  prop-val : any/c
procedure
(impersonate-vector* vec          
                     ref-proc     
                     set-proc     
                     prop         
                     prop-val ... 
                     ...)         
 -> (and/c vector? impersonator?)
  vec : (and/c vector? (not/c immutable?))
  ref-proc : (or/c (vector? vector? exact-nonnegative-integer? any/c .
-> . any/c) #f)
  set-proc : (or/c (vector? vector? exact-nonnegative-integer? any/c .
-> . any/c) #f)
  prop : impersonator-property?
  prop-val : any/c
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/c
procedure
(impersonate-hash  hash                
                   ref-proc            
                   set-proc            
                   remove-proc         
                   key-proc            
                  [clear-proc          
                   equal-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)
  clear-proc : (or/c #f (hash? . -> . any)) = #f
  equal-key-proc : (or/c #f (hash? any/c . -> . any/c)) = #f
  prop : impersonator-property?
  prop-val : any/c
procedure
(impersonate-channel channel      
                     get-proc     
                     put-proc     
                     prop         
                     prop-val ... 
                     ...)         
 -> (and/c channel? impersonator?)
  channel : channel?
  get-proc : (channel? . -> . (values channel? (any/c . -> . any/c)))
  put-proc : (channel? any/c . -> . any/c)
  prop : impersonator-property?
  prop-val : any/c
procedure
(impersonate-prompt-tag  prompt-tag               
                         handle-proc              
                         abort-proc               
                        [cc-guard-proc            
                         callcc-impersonate-proc] 
                         prop                     
                         prop-val ...             
                         ...)                     
 -> (and/c continuation-prompt-tag? impersonator?)
  prompt-tag : continuation-prompt-tag?
  handle-proc : procedure?
  abort-proc : procedure?
  cc-guard-proc : procedure? = values
  callcc-impersonate-proc : (procedure? . -> . procedure?)
                          = (lambda (p) p)
  prop : impersonator-property?
  prop-val : any/c
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/c
value
prop:impersonator-of : struct-type-property?
value
prop:authentic : struct-type-property?
procedure
(chaperone-procedure proc         
                     wrapper-proc 
                     prop         
                     prop-val ... 
                     ...)         
 -> (and/c procedure? chaperone?)
  proc : procedure?
  wrapper-proc : (or/c procedure? #f)
  prop : impersonator-property?
  prop-val : any/c
procedure
(chaperone-procedure* proc         
                      wrapper-proc 
                      prop         
                      prop-val ... 
                      ...)         
 -> (and/c procedure? chaperone?)
  proc : procedure?
  wrapper-proc : (or/c procedure? #f)
  prop : impersonator-property?
  prop-val : any/c
procedure
(chaperone-struct  v                     
                  [struct-type]          
                   orig-proc             
                   redirect-proc ...     
                   ...                   
                   prop                  
                   prop-val ...          
                   ...)              -> any/c
  v : any/c
  struct-type : struct-type? = unspecified
  orig-proc : (or/c struct-accessor-procedure?
                    struct-mutator-procedure?
                    struct-type-property-accessor-procedure?
                    (lambda (proc)
                      (eq? proc struct-info)))
  redirect-proc : (or/c procedure? #f)
  prop : impersonator-property?
  prop-val : any/c
procedure
(chaperone-vector vec              
                  ref-proc         
                  set-proc         
                  prop             
                  prop-val ...     
                  ...)         -> (and/c vector? chaperone?)
  vec : vector?
  ref-proc : (or/c (vector? exact-nonnegative-integer? any/c . ->
. any/c) #f)
  set-proc : (or/c (vector? exact-nonnegative-integer? any/c . ->
. any/c) #f)
  prop : impersonator-property?
  prop-val : any/c
procedure
(chaperone-vector* vec              
                   ref-proc         
                   set-proc         
                   prop             
                   prop-val ...     
                   ...)         -> (and/c vector? chaperone?)
  vec : vector?
  ref-proc : (or/c (vector? vector? exact-nonnegative-integer? any/c .
-> . any/c) #f)
  set-proc : (or/c (vector? vector? exact-nonnegative-integer? any/c .
-> . any/c) #f)
  prop : impersonator-property?
  prop-val : any/c
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/c
procedure
(chaperone-hash  hash                
                 ref-proc            
                 set-proc            
                 remove-proc         
                 key-proc            
                [clear-proc          
                 equal-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)
  clear-proc : (or/c #f (hash? . -> . any)) = #f
  equal-key-proc : (or/c #f (hash? any/c . -> . any/c)) = #f
  prop : impersonator-property?
  prop-val : any/c
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/c
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/c
procedure
(chaperone-channel channel          
                   get-proc         
                   put-proc         
                   prop             
                   prop-val ...     
                   ...)         -> (and/c channel? chaperone?)
  channel : channel?
  get-proc : (channel? . -> . (values channel? (any/c . -> . any/c)))
  put-proc : (channel? any/c . -> . any/c)
  prop : impersonator-property?
  prop-val : any/c
procedure
(chaperone-prompt-tag  prompt-tag             
                       handle-proc            
                       abort-proc             
                      [cc-guard-proc          
                       callcc-chaperone-proc] 
                       prop                   
                       prop-val ...           
                       ...)                   
 -> (and/c continuation-prompt-tag? chaperone?)
  prompt-tag : continuation-prompt-tag?
  handle-proc : procedure?
  abort-proc : procedure?
  cc-guard-proc : procedure? = values
  callcc-chaperone-proc : (procedure? . -> . procedure?)
                        = (lambda (p) p)
  prop : impersonator-property?
  prop-val : any/c
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/c
procedure
(make-impersonator-property name)
 -> impersonator-property?
    (-> any/c boolean?)
    (->* (impersonator?) (any/c) any)
  name : symbol?
procedure
(impersonator-property? v) -> boolean?
  v : any/c
procedure
(impersonator-property-predicate-procedure? 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 : (and/c custodian? (not/c custodian-shut-down?))
       = (current-custodian)
procedure
(custodian-shutdown-all cust) -> void?
  cust : custodian?
procedure
(custodian-shut-down? cust) -> boolean?
  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)
procedure
(inspector-superior? inspector               
                     maybe-subinspector) -> boolean?
  inspector : inspector?
  maybe-subinspector : 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-sealed? struct-type) -> boolean?
  struct-type : struct-type?
procedure
(struct-type-authentic? struct-type) -> boolean?
  struct-type : struct-type?
procedure
(struct-type-make-constructor  struct-type        
                              [constructor-name]) 
 -> struct-constructor-procedure?
  struct-type : struct-type?
  constructor-name : (or/c symbol? #f) = #f
procedure
(struct-type-make-predicate struct-type) -> any
  struct-type : any/c
procedure
(object-name v) -> any
  v : any/c
value
prop:object-name : struct-type-property?
parameter
(current-code-inspector) -> inspector?
(current-code-inspector insp) -> void?
  insp : inspector?
procedure
(plumber? v) -> boolean?
  v : any/c
procedure
(make-plumber) -> plumber?
parameter
(current-plumber) -> plumber?
(current-plumber plumber) -> void?
  plumber : plumber?
procedure
(plumber-flush-all plumber) -> void?
  plumber : plumber?
procedure
(plumber-flush-handle? v) -> boolean?
  v : any/c
procedure
(plumber-add-flush! plumber proc [weak?]) -> plumber-flush-handle?
  plumber : plumber?
  proc : (plumber-flush-handle? . -> . any)
  weak? : any/c = #f
procedure
(plumber-flush-handle-remove! handle) -> void?
  handle : plumber-flush-handle?
procedure
(make-evaluator                                                        
                 language                                              
                 input-program ...                                     
                [#:requires requires                                   
                 #:allow-for-require allow-for-require                 
                 #:allow-for-load allow-for-load                       
                 #:allow-read allow-read                               
                 #:allow-syntactic-requires allow-syntactic-requires]) 
 -> (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
  allow-syntactic-requires : (or/c #f (listof module-path?))
                           = #f
(make-module-evaluator                                                        
                        module-decl                                           
                       [#:language lang                                       
                        #:readers readers                                     
                        #:allow-for-require allow-for-require                 
                        #:allow-for-load allow-for-load                       
                        #:allow-read allow-read                               
                        #:allow-syntactic-requires allow-syntactic-requires]) 
 -> (any/c . -> . any)
  module-decl : (or/c syntax? pair? path? input-port? string? bytes?)
  lang : (or/c #f module-path?) = #f
  readers : (or/c #f (listof module-path?))
          = (and lang (default-language-readers lang))
  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
  allow-syntactic-requires : (or/c #f (listof module-path?))
                           = #f
procedure
(exn:fail:sandbox-terminated? v) -> boolean?
  v : any/c
(exn:fail:sandbox-terminated-reason exn) -> symbol?
  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 (>=/c 0) #f)
(sandbox-memory-limit limit) -> void?
  limit : (or/c (>=/c 0) #f)
parameter
(sandbox-eval-limits) -> (or/c (list/c (or/c (>=/c 0) #f)
                                       (or/c (>=/c 0) #f))
                               #f)
(sandbox-eval-limits limits) -> void?
  limits : (or/c (list/c (or/c (>=/c 0) #f)
                         (or/c (>=/c 0) #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-run-submodules) -> (list/c symbol?)
(sandbox-run-submodules submod-syms) -> void?
  submod-syms : (list/c symbol?)
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?)
parameter
(sandbox-make-plumber) -> (or/c (-> plumber?) 'propagate)
(sandbox-make-plumber make) -> void?
  make : (or/c (-> plumber?) 'propagate)
parameter
(sandbox-make-environment-variables)
 -> (-> environment-variables?)
(sandbox-make-environment-variables make) -> void?
  make : (-> environment-variables?)
procedure
(default-language-readers lang) -> (listof module-path?)
  lang : module-path?
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
(call-with-deep-time-limit secs thunk) -> any
  secs : exact-nonnegative-integer?
  thunk : (-> any)
syntax
(with-deep-time-limit secs-expr body ...)
procedure
(exn:fail:resource? v) -> boolean?
  v : any/c
(exn:fail:resource-resource exn)
 -> (or/c 'time 'memory 'deep-time)
  exn : exn:fail:resource?

(linklet [[imported-id/renamed ...] ...]
         [exported-id/renamed ...]
  defn-or-expr ...)
 
imported-id/renamed = imported-id
                    | (external-imported-id internal-imported-id)
                       
exported-id/renamed = exported-id
                    | (internal-exported-id external-exported-id)
procedure
(linklet? v) -> boolean?
  v : any/c
procedure
(compile-linklet  form            
                 [info            
                  import-keys     
                  get-import      
                  options])   -> linklet?
  form : (or/c correlated? any/c)
  info : (or/c hash? any/c) = #f
  import-keys : #f = #f
  get-import : #f = #f
  options : (listof (or/c 'serializable 'unsafe 'static 'quick
                           'use-prompt 'unlimited-compile
                           'uninterned-literal))
          = '(serializable)
(compile-linklet  form            
                  info            
                  import-keys     
                 [get-import      
                  options])   -> linklet? vector?
  form : (or/c correlated? any/c)
  info : (or/c hash? any/c)
  import-keys : vector?
  get-import : (or/c #f (any/c . -> . (values (or/c linklet? instance? #f)
                                              (or/c vector? #f))))
             = #f
  options : (listof (or/c 'serializable 'unsafe 'static 'quick
                          'use-prompt 'unlimited-compile
                          'uninterned-literal))
          = '(serializable)
procedure
(recompile-linklet  linklet         
                   [info            
                    import-keys     
                    get-import      
                    options])   -> linklet?
  linklet : linklet?
  info : (or/c hash? any/c) = #f
  import-keys : #f = #f
  get-import : #f = #f
  options : (listof (or/c 'serializable 'unsafe 'static 'quick
                          'use-prompt 'uninterned-literal))
          = '(serializable)
(recompile-linklet  linklet         
                    info            
                    import-keys     
                   [get-import      
                    options])   -> linklet? vector?
  linklet : linklet?
  info : (or/c hash? any/c)
  import-keys : vector?
  get-import : (or/c (any/c . -> . (values (or/c linklet? #f)
                                           (or/c vector? #f)))
                     #f)
             = (lambda (import-key) (values #f #f))
  options : (listof (or/c 'serializable 'unsafe 'static 'quick
                          'use-prompt 'uninterned-literal))
          = '(serializable)
procedure
(eval-linklet linklet) -> linklet?
  linklet : linklet?
procedure
(instantiate-linklet  linklet              
                      import-instances     
                     [target-instance?     
                      use-prompt?])    -> instance?
  linklet : linklet?
  import-instances : (listof instance?)
  target-instance? : #f = #f
  use-prompt? : any/c = #t
(instantiate-linklet  linklet              
                      import-instances     
                      target-instance      
                     [use-prompt?])    -> any
  linklet : linklet?
  import-instances : (listof instance?)
  target-instance : instance?
  use-prompt? : any/c = #t
procedure
(linklet-import-variables linklet) -> (listof (listof symbol?))
  linklet : linklet?
procedure
(linklet-export-variables linklet) -> (listof symbol?)
  linklet : linklet?
procedure
(linklet-add-target-machine-info linklet           
                                 from-linklet) -> linklet?
  linklet : linklet?
  from-linklet : (or linklet? hash?)
procedure
(linklet-summarize-target-machine-info from-linklet) -> hash?
  from-linklet : linklet?
procedure
(decompile-linklet linklet) -> (or/c #f correlated? any/c)
  linklet : linklet?
procedure
(linklet-directory? v) -> boolean?
  v : any/c
procedure
(hash->linklet-directory content) -> linklet-directory?
  content : (and/c hash? hash-eq? immutable? (not/c impersonator?))
procedure
(linklet-directory->hash linklet-directory)
 -> (and/c hash? hash-eq? immutable? (not/c impersonator?))
  linklet-directory : linklet-directory?
procedure
(linklet-bundle? v) -> boolean?
  v : any/c
procedure
(hash->linklet-bundle content) -> linklet-bundle?
  content : (and/c hash? hash-eq? immutable? (not/c impersonator?))
procedure
(linklet-bundle->hash linklet-bundle)
 -> (and/c hash? hash-eq? immutable? (not/c impersonator?))
  linklet-bundle : linklet-bundle?
procedure
(linklet-body-reserved-symbol? sym) -> boolean?
  sym : symbol?
procedure
(instance? v) -> boolean?
  v : any/c
procedure
(make-instance  name                   
               [data                   
                mode]                  
                variable-name          
                variable-value ...     
                ...)               -> instance?
  name : any/c
  data : any/c = #f
  mode : (or/c #f 'constant 'consistent) = #f
  variable-name : symbol?
  variable-value : any/c
procedure
(instance-name instance) -> any/c
  instance : instance?
procedure
(instance-data instance) -> any/c
  instance : instance?
procedure
(instance-variable-names instance) -> (list symbol?)
  instance : instance?
procedure
(instance-variable-value  instance     
                          name         
                         [fail-k]) -> any
  instance : instance?
  name : symbol?
  fail-k : any/c = (lambda () (error ....))
procedure
(instance-set-variable-value!  instance     
                               name         
                               v            
                              [mode])   -> void?
  instance : instance?
  name : symbol?
  v : any/c
  mode : (or/c #f 'constant 'consistent) = #f
procedure
(instance-unset-variable! instance name) -> void?
  instance : instance?
  name : symbol?
procedure
(instance-describe-variable! instance     
                             name         
                             desc-v)  -> void?
  instance : instance?
  name : symbol?
  desc-v : any/c
procedure
(variable-reference->instance  varref      
                              [ref-site?]) 
 -> (if ref-site? (or/c instance? #f symbol?) instance?)
  varref : variable-reference?
  ref-site? : any/c = #f
procedure
(correlated? v) -> boolean?
  v : any/c
procedure
(correlated-source crlt) -> any
  crlt : correlated?
procedure
(correlated-line crlt) -> (or/c exact-positive-integer? #f)
  crlt : correlated?
procedure
(correlated-column crlt) -> (or/c exact-nonnegative-integer? #f)
  crlt : correlated?
procedure
(correlated-position crlt) -> (or/c exact-positive-integer? #f)
  crlt : correlated?
procedure
(correlated-span crlt) -> (or/c exact-nonnegative-integer? #f)
  crlt : correlated?
procedure
(correlated-e crlt) -> any
  crlt : correlated?
procedure
(correlated->datum crlt) -> any
  crlt : (or/c correlated? any/c)
procedure
(datum->correlated v [srcloc prop]) -> correlated?
  v : any/c
  srcloc : (or/c correlated? #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 correlated? #f) = #f
procedure
(correlated-property crlt key val) -> correlated?
  crlt : correlated?
  key : any/c
  val : any/c
(correlated-property crlt key) -> any/c
  crlt : correlated?
  key : any/c
procedure
(correlated-property-symbol-keys crlt) -> list?
  crlt : correlated?
syntax
(define-deprecated-alias alias-id target-id)
procedure
(deprecated-alias? v) -> boolean?
  v : any/c
procedure
(deprecated-alias target) -> deprecated-alias?
  target : identifier?
procedure
(deprecated-alias-target alias) -> identifier?
  alias : deprecated-alias?
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                     
                      [false-on-non-element?]) 
 -> (or/c (and/c path? path-element?) #f)
  str : string?
  false-on-non-element? : any/c = #f
procedure
(bytes->path-element  bstr                    
                     [type                    
                      false-on-non-element?]) 
 -> (or/c path-element? #f)
  bstr : bytes?
  type : (or/c 'unix 'windows) = (system-path-convention-type)
  false-on-non-element? : any/c = #f
procedure
(path-element->string path) -> string?
  path : path-element?
procedure
(path-element->bytes path) -> bytes?
  path : path-element?
procedure
(path<? a-path b-path ...) -> boolean?
  a-path : path?
  b-path : path?
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
(explode-path path)
 -> (listof (or/c path-for-some-system? 'up 'same))
  path : (or/c path-string? path-for-some-system?)
procedure
(path-replace-extension path ext) -> path-for-some-system?
  path : (or/c path-string? path-for-some-system?)
  ext : (or/c string? bytes?)
procedure
(path-add-extension path ext [sep]) -> path-for-some-system?
  path : (or/c path-string? path-for-some-system?)
  ext : (or/c string? bytes?)
  sep : (or/c string? bytes?) = #"_"
procedure
(path-replace-suffix path ext) -> path-for-some-system?
  path : (or/c path-string? path-for-some-system?)
  ext : (or/c string? bytes?)
procedure
(path-add-suffix path ext) -> path-for-some-system?
  path : (or/c path-string? path-for-some-system?)
  ext : (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
(file-name-from-path path) -> (or/c path-for-some-system? #f)
  path : (or/c path-string? path-for-some-system?)
procedure
(path-get-extension path) -> (or/c bytes? #f)
  path : (or/c path-string? path-for-some-system?)
procedure
(path-has-extension? path ext) -> boolean?
  path : (or/c path-string? path-for-some-system?)
  ext : (or/c bytes? string?)
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?   
                     #:more-than-same? more-than-same?   
                     #:normalize-case? normalize-case?]) 
 -> (or/c path-for-some-system? path-string?)
  base : (or/c path-string? path-for-some-system?)
  path : (or/c path-string?  path-for-some-system?)
  more-than-root? : any/c = #f
  more-than-same? : any/c = #t
  normalize-case? : any/c = #t
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
(shrink-path-wrt pth other-pths) -> (or/c #f path?)
  pth : path?
  other-pths : (listof path?)
procedure
(find-system-path kind) -> path?
  kind : symbol?
procedure
(path-list-string->path-list str                
                             default-path-list) 
 -> (listof (or/c path? 'same))
  str : (or/c string? bytes?)
  default-path-list : (listof (or/c path? 'same))
procedure
(find-executable-path  program        
                      [related        
                       deepest?]) -> (or/c path? #f)
  program : path-string?
  related : (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
(file-or-directory-type path [must-exist?])
 -> (or/c 'file 'directory 'link 'directory-link #f)
  path : path-string?
  must-exist? : any/c = #f
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]) -> exact-integer?
  path : path-string?
  secs-n : #f = #f
(file-or-directory-modify-seconds path        
                                  secs-n) -> void?
  path : path-string?
  secs-n : exact-integer?
(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-stat path [as-link?])
 -> (and/c (hash/c symbol? any/c) hash-eq?)
  path : path-string?
  as-link? : boolean? = #f
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?/pos                                    
            #:exists-ok? exists-ok?                           
            #:permissions permissions                         
            #:replace-permissions? replace-permissions?]) -> void?
  src : path-string?
  dest : path-string?
  exists-ok?/pos : any/c = #f
  exists-ok? : any/c = exists-ok?/pos
  permissions : (or/c #f (integer-in 0 65535)) = #f
  replace-permissions? : any/c = #t
procedure
(make-file-or-directory-link to path) -> void?
  to : path-string?
  path : path-string?
parameter
(current-force-delete-permissions) -> boolean?
(current-force-delete-permissions force?) -> void?
  force? : any/c
 = #t
parameter
(current-directory) -> (and/c path? complete-path?)
(current-directory path) -> void?
  path : path-string?
parameter
(current-directory-for-user) -> (and/c path? complete-path?)
(current-directory-for-user path) -> void?
  path : path-string?
procedure
(current-drive) -> path?
procedure
(directory-exists? path) -> boolean?
  path : path-string?
procedure
(make-directory path [permissions]) -> void?
  path : path-string?
  permissions : (integer-in 0 65535) = #o777
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?)
procedure
(filesystem-change-evt? v) -> boolean?
  v : any/c
procedure
(filesystem-change-evt path [failure-thunk])
 -> (or/c filesystem-change-evt? any)
  path : path-string?
  failure-thunk : (or/c (-> any) #f) = #f
procedure
(filesystem-change-evt-ready? evt) -> boolean?
  evt : filesystem-change-evt?
procedure
(filesystem-change-evt-cancel evt) -> void?
  evt : filesystem-change-evt?
syntax
(define-runtime-path id maybe-runtime?-id expr)
 
maybe-runtime?-id = 
                  | #:runtime?-id runtime?-id
syntax
(define-runtime-paths (id ...) maybe-runtime?-id expr)
syntax
(define-runtime-path-list id maybe-runtime?-id expr)
syntax
(define-runtime-module-path-index id maybe-runtime?-id module-path-expr)
syntax
(runtime-require module-path)
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                                        
                      [#:keep-modify-seconds? keep-modify-seconds? 
                       #:preserve-links? preserve-links?])         
 -> void?
  src : path-string?
  dest : path-string?
  keep-modify-seconds? : any/c = #f
  preserve-links? : any/c = #f
procedure
(delete-directory/files  path                            
                        [#:must-exist? must-exist?]) -> void?
  path : path-string?
  must-exist? : any/c = #t
procedure
(find-files                                                      
             predicate                                           
            [start-path                                          
             #:skip-filtered-directory? skip-filtered-directory? 
             #:follow-links? follow-links?])                     
 -> (listof path?)
  predicate : (path? . -> . any/c)
  start-path : (or/c path-string? #f) = #f
  skip-filtered-directory? : any/c = #f
  follow-links? : any/c = #f
procedure
(pathlist-closure  path-list                       
                  [#:path-filter path-filter       
                   #:follow-links? follow-links?]) 
 -> (listof path?)
  path-list : (listof path-string?)
  path-filter : (or/c #f (path? . -> . any/c)) = #f
  follow-links? : any/c = #f
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-parent-directory* path) -> void?
  path : path-string?
procedure
(make-temporary-file [template              
                      #:copy-from copy-from 
                      #:base-dir base-dir   
                      compat-copy-from      
                      compat-base-dir])     
 -> (and/c path? complete-path?)
  template : string? = "rkttmp~a"
  copy-from : (or/c path-string? #f 'directory) = #f
  base-dir : (or/c path-string? #f) = #f
  compat-copy-from : (or/c path-string? #f 'directory)
                   = copy-from
  compat-base-dir : (or/c path-string? #f) = base-dir
procedure
(make-temporary-directory [template              
                           #:base-dir base-dir]) 
 -> (and/c path? complete-path?)
  template : string? = "rkttmp~a"
  base-dir : (or/c path-string? #f) = #f
procedure
(make-temporary-file*  prefix                
                       suffix                
                      [#:copy-from copy-from 
                       #:base-dir base-dir]) 
 -> (and/c path? complete-path?)
  prefix : bytes?
  suffix : bytes?
  copy-from : (or/c path-string? #f) = #f
  base-dir : (or/c path-string? #f) = #f
procedure
(make-temporary-directory*  prefix                
                            suffix                
                           [#:base-dir base-dir]) 
 -> (and/c path? complete-path?)
  prefix : bytes?
  suffix : bytes?
  base-dir : (or/c path-string? #f) = #f
procedure
(call-with-atomic-output-file                                              
                               file                                        
                               proc                                        
                              [#:security-guard security-guard             
                               #:rename-fail-handler rename-fail-handler]) 
 -> any
  file : path-string?
  proc : (output-port? path? . -> . any)
  security-guard : (or/c #f security-guard?) = #f
  rename-fail-handler : (or/c #f (exn:fail:filesystem? path? . -> . any))
                      = #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 path-string? #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/c path-string? path-for-some-system?)
(make-lock-file-name dir name) -> path?
  dir : (or/c path-string? path-for-some-system?)
  name : path-element?
value
file-type-bits : #o170000
value
socket-type-bits : #o140000
value
symbolic-link-type-bits : #o120000
value
regular-file-type-bits : #o100000
value
block-device-type-bits : #o060000
value
directory-type-bits : #o040000
value
character-device-type-bits : #o020000
value
fifo-type-bits : #o010000
value
set-user-id-bit : #o004000
value
set-group-id-bit : #o002000
value
sticky-bit : #o001000
value
user-permission-bits : #o000700
value
user-read-bit : #o000400
value
user-write-bit : #o000200
value
user-execute-bit : #o000100
value
group-permission-bits : #o000070
value
group-read-bit : #o000040
value
group-write-bit : #o000020
value
group-execute-bit : #o000010
value
other-permission-bits : #o000007
value
other-read-bit : #o000004
value
other-write-bit : #o000002
value
other-execute-bit : #o000001
procedure
(tcp-listen  port-no            
            [max-allow-wait     
             reuse?             
             hostname])     -> tcp-listener?
  port-no : listen-port-number?
  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 : port-number?
  local-hostname : (or/c string? #f) = #f
  local-port-no : (or/c port-number? #f) = #f
procedure
(tcp-connect/enable-break  hostname        
                           port-no         
                          [local-hostname] 
                           local-port-no)  
 -> input-port? output-port?
  hostname : string?
  port-no : port-number?
  local-hostname : (or/c string? #f) = #f
  local-port-no : (or/c port-number? #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? port-number?
                  string? listen-port-number?))
  tcp-port : (or/c tcp-port? tcp-listener? udp?)
  port-numbers? : any/c = #f
procedure
(tcp-port? v) -> boolean?
  v : any/c
value
port-number? : contract?
value
listen-port-number? : contract?
procedure
(udp-open-socket [family-hostname      
                  family-port-no]) -> udp?
  family-hostname : (or/c string? #f) = #f
  family-port-no : (or/c port-number? #f) = #f
procedure
(udp-bind!  udp-socket          
            hostname-string     
            port-no             
           [reuse?])        -> void?
  udp-socket : udp?
  hostname-string : (or/c string? #f)
  port-no : listen-port-number?
  reuse? : any/c = #f
procedure
(udp-connect! udp-socket          
              hostname-string     
              port-no)        -> void?
  udp-socket : udp?
  hostname-string : (or/c string? #f)
  port-no : (or/c port-number? #f)
procedure
(udp-send-to  udp-socket     
              hostname       
              port-no        
              bstr           
             [start-pos      
              end-pos])  -> void?
  udp-socket : udp?
  hostname : string?
  port-no : port-number?
  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 : port-number?
  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 : port-number?
  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?
                             port-number?
  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 port-number? #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?
    port-number?
  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-set-receive-buffer-size! udp-socket     
                              size)      -> void?
  udp-socket : udp?
  size : exact-positive-integer?
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 : port-number?
  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? listen-port-number?
                  string? listen-port-number?))
  udp-port : udp?
  port-numbers? : any/c = #f
procedure
(udp-set-ttl! udp-socket ttl) -> void?
  udp-socket : udp?
  ttl : byte?
procedure
(udp-ttl udp-socket) -> byte?
  udp-socket : udp?
procedure
(udp-multicast-join-group! udp-socket         
                           multicast-addr     
                           hostname)      -> void?
  udp-socket : udp?
  multicast-addr : string?
  hostname : (or/c string? #f)
procedure
(udp-multicast-leave-group! udp-socket         
                            multicast-addr     
                            hostname)      -> void?
  udp-socket : udp?
  multicast-addr : string?
  hostname : (or/c string? #f)
procedure
(udp-multicast-interface udp-socket) -> string?
  udp-socket : udp?
procedure
(udp-multicast-set-interface! udp-socket     
                              hostname)  -> void?
  udp-socket : udp?
  hostname : (or/c string? #f)
procedure
(udp-multicast-set-loopback! udp-socket     
                             loopback?) -> void?
  udp-socket : udp?
  loopback? : any/c
procedure
(udp-multicast-loopback? udp-socket) -> boolean?
  udp-socket : udp?
procedure
(udp-multicast-set-ttl! udp-socket ttl) -> void?
  udp-socket : udp?
  ttl : byte?
procedure
(udp-multicast-ttl udp-socket) -> byte?
  udp-socket : udp?
procedure
(subprocess  stdout   
             stdin    
             stderr   
            [group]   
             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)
  group : (or/c #f 'new subprocess)
        = (and (subprocess-group-enabled) 'new)
  command : path-string?
  arg : (or/c path? string-no-nuls? bytes-no-nuls?)
(subprocess  stdout  
             stdin   
             stderr  
            [group]  
             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)
  group : (or/c #f 'new subprocess)
        = (and (subprocess-group-enabled) 'new)
  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
parameter
(current-subprocess-keep-file-descriptors)
 -> (or/c 'inherited 'all '())
(current-subprocess-keep-file-descriptors keeps) -> void?
  keeps : (or/c 'inherited 'all '())
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 [#:set-pwd? set-pwd?]) -> boolean?
  command : (or/c string-no-nuls? bytes-no-nuls?)
  set-pwd? : any/c = (member (system-type) '(unix macosx))
procedure
(system* command arg ... [#:set-pwd? set-pwd?]) -> boolean?
  command : path-string?
  arg : (or/c path? string-no-nuls? bytes-no-nuls?)
  set-pwd? : any/c = (member (system-type) '(unix macosx))
(system*  command                   
          exact                     
          arg                       
         [#:set-pwd? set-pwd?]) -> boolean?
  command : path-string?
  exact : 'exact
  arg : string?
  set-pwd? : any/c = (member (system-type) '(unix macosx))
procedure
(system/exit-code  command                   
                  [#:set-pwd? set-pwd?]) -> byte?
  command : (or/c string-no-nuls? bytes-no-nuls?)
  set-pwd? : any/c = (member (system-type) '(unix macosx))
procedure
(system*/exit-code  command                   
                    arg ...                   
                   [#:set-pwd? set-pwd?]) -> byte?
  command : path-string?
  arg : (or/c path? string-no-nuls? bytes-no-nuls?)
  set-pwd? : any/c = (member (system-type) '(unix macosx))
(system*/exit-code  command                   
                    exact                     
                    arg                       
                   [#:set-pwd? set-pwd?]) -> byte?
  command : path-string?
  exact : 'exact
  arg : string?
  set-pwd? : any/c = (member (system-type) '(unix macosx))
procedure
(process command [#:set-pwd? set-pwd?])
 -> (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?)
  set-pwd? : any/c = (member (system-type) '(unix macosx))
procedure
(process*  command                   
           arg ...                   
          [#:set-pwd? set-pwd?]) -> list?
  command : path-string?
  arg : (or/c path? string-no-nuls? bytes-no-nuls?)
  set-pwd? : any/c = (member (system-type) '(unix macosx))
(process*  command                   
           exact                     
           arg                       
          [#:set-pwd? set-pwd?]) -> list?
  command : path-string?
  exact : 'exact
  arg : string?
  set-pwd? : any/c = (member (system-type) '(unix macosx))
procedure
(process/ports  out                       
                in                        
                error-out                 
                command                   
               [#:set-pwd? set-pwd?]) -> 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?)
  set-pwd? : any/c = (member (system-type) '(unix macosx))
procedure
(process*/ports  out                       
                 in                        
                 error-out                 
                 command                   
                 arg ...                   
                [#:set-pwd? set-pwd?]) -> 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?)
  set-pwd? : any/c = (member (system-type) '(unix macosx))
(process*/ports  out                       
                 in                        
                 error-out                 
                 command                   
                 exact                     
                 arg                       
                [#:set-pwd? set-pwd?]) -> 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?
  set-pwd? : any/c = (member (system-type) '(unix macosx))
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 [topic                    
              parent                   
              propagate-level          
              propagate-topic ...]     
              ...)                 -> logger?
  topic : (or/c symbol? #f) = #f
  parent : (or/c logger? #f) = #f
  propagate-level : log-level/c = 'debug
  propagate-topic : (or/c #f symbol?) = #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 maybe-parent)
 
maybe-parent = 
             | #:parent parent-expr
 
  parent-expr : (or/c logger? #f)
procedure
(log-message  logger                
              level                 
             [topic]                
              message               
             [data                  
              prefix-message?]) -> void?
  logger : logger?
  level : log-level/c
  topic : (or/c symbol? #f) = (logger-name logger)
  message : string?
  data : any/c = #f
  prefix-message? : any/c = #t
procedure
(log-level? logger level [topic]) -> boolean?
  logger : logger?
  level : log-level/c
  topic : (or/c symbol? #f) = #f
procedure
(log-max-level logger [topic]) -> (or/c log-level/c #f)
  logger : logger?
  topic : (or/c symbol? #f) = #f
procedure
(log-all-levels logger) -> (list/c (or/c #f log-level/c)
                                   (or/c #f symbol?)
                                   ... ...)
  logger : logger?
procedure
(log-level-evt logger) -> evt?
  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 [topic ...] ...) -> log-receiver?
  logger : logger?
  level : log-level/c
  topic : (or/c #f symbol?) = #f
procedure
(log-level/c v) -> boolean?
  v : any/c
procedure
(with-intercepted-logging  interceptor          
                           proc                 
                          [#:logger logger]     
                           level                
                          [topic ...]           
                           ...)             -> any
  interceptor : (-> (vector/c
                      log-level/c
                      string?
                      any/c
                      (or/c symbol? #f))
                     any)
  proc : (-> any)
  logger : logger? = #f
  level : log-level/c
  topic : (or/c #f symbol?) = #f
procedure
(with-logging-to-port  port                 
                       proc                 
                      [#:logger logger]     
                       level                
                      [topic ...]           
                       ...)             -> any
  port : output-port?
  proc : (-> any)
  logger : logger? = #f
  level : log-level/c
  topic : (or/c #f symbol?) = #f
procedure
(current-seconds) -> exact-integer?
procedure
(current-inexact-milliseconds) -> real?
procedure
(current-inexact-monotonic-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 [scope]) -> exact-integer?
  scope : (or/c #f thread? 'subprocesses) = #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 body ...+)
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
(date*->seconds date [local-time?]) -> real?
  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-integer?
  local-time? : any/c = #t
procedure
(date->julian/scaliger date) -> exact-integer?
  date : date?
procedure
(julian/scaliger->string date-number) -> string?
  date-number : exact-integer?
procedure
(date->julian/scalinger date) -> exact-integer?
  date : date?
procedure
(julian/scalinger->string date-number) -> string?
  date-number : exact-integer?
procedure
(environment-variables? v) -> boolean?
  v : any/c
parameter
(current-environment-variables) -> environment-variables?
(current-environment-variables env) -> void?
  env : environment-variables?
procedure
(bytes-environment-variable-name? v) -> boolean?
  v : any/c
procedure
(make-environment-variables name val ... ...)
 -> environment-variables?
  name : bytes-environment-variable-name?
  val : bytes-no-nuls?
procedure
(environment-variables-ref env name)
 -> (or/c #f (and/c bytes-no-nuls? immutable?))
  env : environment-variables?
  name : bytes-environment-variable-name?
procedure
(environment-variables-set!  env            
                             name           
                             maybe-bstr     
                            [fail])     -> any
  env : environment-variables?
  name : bytes-environment-variable-name?
  maybe-bstr : (or/c bytes-no-nuls? #f)
  fail : (-> any) = (lambda ()
                      (raise (make-exn:fail ....)))
procedure
(environment-variables-names env)
 -> (listof (and/c bytes-environment-variable-name? immutable?))
  env : environment-variables?
procedure
(environment-variables-copy env) -> environment-variables?
  env : environment-variables?
procedure
(getenv name) -> (or/c string-no-nuls? #f)
  name : string-environment-variable-name?
procedure
(putenv name value) -> boolean?
  name : string-environment-variable-name?
  value : string-no-nuls?
procedure
(string-environment-variable-name? v) -> boolean?
  v : any/c
procedure
(system-type [mode])
 -> (or/c symbol? string? bytes? exact-positive-integer? vector? #f)
  mode : (or/c 'os 'os* 'arch 'word 'so-find 'platform = 'os
               'vm 'gc 'link 'machine 'target-machine
               'so-suffix 'so-mode 'fs-change 'cross)
procedure
(system-language+country) -> string?
procedure
(system-library-subpath [mode]) -> path?
  mode : (or/c 'cgc '3m 'cs #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 string?)
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 ...
                   | #:usage-help string ...
                   | #: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? any/c ... . -> . any)
  arg-help-strs : (listof string?)
  help-proc : (string? . -> . any) = (lambda (str) ....)
  unknown-proc : (string? . -> . any) = (lambda (str) ...)
procedure
(gethostname) -> string?
procedure
(getpid) -> exact-integer?
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 retain-v]) -> any/c
  ephemeron : ephemeron?
  gced-v : any/c = #f
  retain-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 [v]) -> any
  executor : any/c
  v : any/c = #f
procedure
(collect-garbage [request]) -> void?
  request : (or/c 'major 'minor 'incremental) = 'major
procedure
(current-memory-use [mode]) -> exact-nonnegative-integer?
  mode : (or/c #f 'cumulative 'peak custodian?) = #f
procedure
(dump-memory-stats v ...) -> any
  v : any/c
procedure
(phantom-bytes? v) -> boolean?
  v : any/c
procedure
(make-phantom-bytes k) -> phantom-bytes?
  k : exact-nonnegative-integer?
procedure
(set-phantom-bytes! phantom-bstr k) -> phantom-bytes?
  phantom-bstr : phantom-bytes?
  k : exact-nonnegative-integer?
procedure
(unsafe-fx+ a ...) -> fixnum?
  a : fixnum?
procedure
(unsafe-fx- a b ...) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fx* a ...) -> fixnum?
  a : 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 ...) -> fixnum?
  a : fixnum?
procedure
(unsafe-fxior a ...) -> fixnum?
  a : fixnum?
procedure
(unsafe-fxxor a ...) -> fixnum?
  a : 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-fxrshift/logical a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fxpopcount a) -> fixnum?
  a : (and/c fixnum? (not/c negative?))
procedure
(unsafe-fxpopcount32 a) -> fixnum?
  a : (and/c fixnum? (integer-in 0 #xFFFFFFFF))
procedure
(unsafe-fxpopcount16 a) -> fixnum?
  a : (and/c fixnum? (integer-in 0 #xFFFF))
procedure
(unsafe-fx+/wraparound a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fx-/wraparound [a] b) -> fixnum?
  a : fixnum? = 0
  b : fixnum?
procedure
(unsafe-fx*/wraparound a b) -> fixnum?
  a : fixnum?
  b : fixnum?
procedure
(unsafe-fxlshift/wraparound 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 ...) -> flonum?
  a : flonum?
procedure
(unsafe-fl- a b ...) -> flonum?
  a : flonum?
  b : flonum?
procedure
(unsafe-fl* a ...) -> flonum?
  a : 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-flsingle a) -> flonum?
  a : flonum?
procedure
(unsafe-flbit-field a start end) -> exact-nonnegative-integer?
  a : flonum?
  start : (integer-in 0 64)
  end : (integer-in 0 64)
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?
           (lambda (c) (flonum? (real-part c)))
           (lambda (c) (flonum? (imag-part c))))
  a : flonum?
  b : flonum?
procedure
(unsafe-flreal-part a) -> flonum?
  a : (and/c complex?
             (lambda (c) (flonum? (real-part c)))
             (lambda (c) (flonum? (imag-part c))))
procedure
(unsafe-flimag-part a) -> flonum?
  a : (and/c complex?
             (lambda (c) (flonum? (real-part c)))
             (lambda (c) (flonum? (imag-part c))))
procedure
(unsafe-fx->fl a) -> flonum?
  a : fixnum?
procedure
(unsafe-fl->fx a) -> fixnum?
  a : flonum?
procedure
(unsafe-flrandom rand-gen) -> (and flonum? (>/c 0) (</c 1))
  rand-gen : pseudo-random-generator?
procedure
(unsafe-char=? a b ...) -> boolean?
  a : char?
  b : char?
procedure
(unsafe-char<? a b ...) -> boolean?
  a : char?
  b : char?
procedure
(unsafe-char>? a b ...) -> boolean?
  a : char?
  b : char?
procedure
(unsafe-char<=? a b ...) -> boolean?
  a : char?
  b : char?
procedure
(unsafe-char>=? a b ...) -> boolean?
  a : char?
  b : char?
procedure
(unsafe-char->integer a) -> fixnum?
  a : char?
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-cons-list v rest) -> (and/c pair? list?)
  v : any/c
  rest : list?
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-set-immutable-car! p v) -> void?
  p : pair?
  v : any/c
procedure
(unsafe-set-immutable-cdr! p v) -> void?
  p : pair?
  v : any/c
procedure
(unsafe-unbox b) -> any/c
  b : box?
procedure
(unsafe-set-box! b k) -> void?
  b : box?
  k : any/c
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-copy v [start end]) -> vector?
  v : vector?
  start : fixnum? = 0
  end : fixnum? = (vector-length v)
procedure
(unsafe-vector-set/copy v [pos] val) -> vector?
  v : vector?
  pos : fixnum? = 0
  val : any/c
procedure
(unsafe-vector-append v ...) -> vector?
  v : vector?
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-vector*-cas! v k old-val new-val) -> boolean?
  v : (and/c vector? (not/c impersonator?))
  k : fixnum?
  old-val : any/c
  new-val : any/c
procedure
(unsafe-vector*-copy v [start end]) -> vector?
  v : vector?
  start : fixnum? = 0
  end : fixnum? = (vector-length v)
procedure
(unsafe-vector*-set/copy v pos val) -> vector?
  v : vector?
  pos : fixnum?
  val : any/c
procedure
(unsafe-vector*-append v ...) -> vector?
  v : vector?
procedure
(unsafe-vector*->immutable-vector! v)
 -> (and/c vector? immutable?)
  v : (and/c vector? (not/c impersonator?))
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-string->immutable-string! str)
 -> (and/c string? immutable?)
  str : string?
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-bytes-copy!  dest           
                     dest-start     
                     src            
                    [src-start      
                     src-end])  -> void?
  dest : (and/c bytes? (not/c immutable?))
  dest-start : fixnum?
  src : bytes?
  src-start : fixnum? = 0
  src-end : fixnum? = (bytes-length src)
procedure
(unsafe-bytes->immutable-bytes! bstr)
 -> (and/c bytes? immutable?)
  bstr : bytes?
procedure
(unsafe-fxvector-length v) -> fixnum?
  v : fxvector?
procedure
(unsafe-fxvector-ref v k) -> fixnum?
  v : fxvector?
  k : fixnum?
procedure
(unsafe-fxvector-set! v k x) -> void?
  v : fxvector?
  k : fixnum?
  x : fixnum?
procedure
(unsafe-flvector-length v) -> fixnum?
  v : flvector?
procedure
(unsafe-flvector-ref v k) -> flonum?
  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-stencil-vector mask v ...) -> stencil-vector?
  mask : (integer-in 0 (sub1 (expt 2 (stencil-vector-mask-width))))
  v : any/c
procedure
(unsafe-stencil-vector-mask vec)
 -> (integer-in 0 (sub1 (expt 2 (stencil-vector-mask-width))))
  vec : stencil-vector?
procedure
(unsafe-stencil-vector-length vec)
 -> (integer-in 0 (sub1 (stencil-vector-mask-width)))
  vec : stencil-vector?
procedure
(unsafe-stencil-vector-ref vec pos) -> any/c
  vec : stencil-vector?
  pos : exact-nonnegative-integer?
procedure
(unsafe-stencil-vector-set! vec pos v) -> void?
  vec : stencil-vector?
  pos : exact-nonnegative-integer?
  v : any/c
procedure
(unsafe-stencil-vector-update vec             
                              remove-mask     
                              add-mask        
                              v ...)      -> stencil-vector?
  vec : stencil-vector?
  remove-mask : (integer-in 0 (sub1 (expt 2 (stencil-vector-mask-width))))
  add-mask : (integer-in 0 (sub1 (expt 2 (stencil-vector-mask-width))))
  v : any/c
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
(unsafe-struct*-cas! v k old-val new-val) -> boolean?
  v : (not/c impersonator?)
  k : fixnum?
  old-val : any/c
  new-val : any/c
procedure
(unsafe-struct*-type v) -> struct-type?
  v : any/c
procedure
(unsafe-mutable-hash-iterate-first hash) -> (or/c #f any/c)
  hash : (and/c hash? (not/c immutable?) hash-strong?)
procedure
(unsafe-mutable-hash-iterate-next hash pos) -> (or/c #f any/c)
  hash : (and/c hash? (not/c immutable?) hash-strong?)
  pos : any/c
procedure
(unsafe-mutable-hash-iterate-key hash pos) -> any/c
  hash : (and/c hash? (not/c immutable?) hash-strong?)
  pos : any/c
procedure
(unsafe-mutable-hash-iterate-key hash             
                                 pos              
                                 bad-index-v) -> any/c
  hash : (and/c hash? (not/c immutable?) hash-strong?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-mutable-hash-iterate-value hash     
                                   pos) -> any/c
  hash : (and/c hash? (not/c immutable?) hash-strong?)
  pos : any/c
procedure
(unsafe-mutable-hash-iterate-value hash             
                                   pos              
                                   bad-index-v) -> any/c
  hash : (and/c hash? (not/c immutable?) hash-strong?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-mutable-hash-iterate-key+value hash     
                                       pos) -> any/c any/c
  hash : (and/c hash? (not/c immutable?) hash-strong?)
  pos : any/c
procedure
(unsafe-mutable-hash-iterate-key+value hash         
                                       pos          
                                       bad-index-v) 
 -> any/c any/c
  hash : (and/c hash? (not/c immutable?) hash-strong?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-mutable-hash-iterate-pair hash pos) -> pair?
  hash : (and/c hash? (not/c immutable?) hash-strong?)
  pos : any/c
procedure
(unsafe-mutable-hash-iterate-pair hash             
                                  pos              
                                  bad-index-v) -> pair?
  hash : (and/c hash? (not/c immutable?) hash-strong?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-immutable-hash-iterate-first hash) -> (or/c #f any/c)
  hash : (and/c hash? immutable?)
procedure
(unsafe-immutable-hash-iterate-next hash     
                                    pos) -> (or/c #f any/c)
  hash : (and/c hash? immutable?)
  pos : any/c
procedure
(unsafe-immutable-hash-iterate-key hash     
                                   pos) -> any/c
  hash : (and/c hash? immutable?)
  pos : any/c
procedure
(unsafe-immutable-hash-iterate-key hash             
                                   pos              
                                   bad-index-v) -> any/c
  hash : (and/c hash? immutable?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-immutable-hash-iterate-value hash     
                                     pos) -> any/c
  hash : (and/c hash? immutable?)
  pos : any/c
procedure
(unsafe-immutable-hash-iterate-value hash             
                                     pos              
                                     bad-index-v) -> any/c
  hash : (and/c hash? immutable?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-immutable-hash-iterate-key+value hash     
                                         pos) -> any/c any/c
  hash : (and/c hash? immutable?)
  pos : any/c
procedure
(unsafe-immutable-hash-iterate-key+value hash         
                                         pos          
                                         bad-index-v) 
 -> any/c any/c
  hash : (and/c hash? immutable?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-immutable-hash-iterate-pair hash     
                                    pos) -> pair?
  hash : (and/c hash? immutable?)
  pos : any/c
procedure
(unsafe-immutable-hash-iterate-pair hash             
                                    pos              
                                    bad-index-v) -> pair?
  hash : (and/c hash? immutable?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-weak-hash-iterate-first hash) -> (or/c #f any/c)
  hash : (and/c hash? hash-weak?)
procedure
(unsafe-weak-hash-iterate-next hash pos) -> (or/c #f any/c)
  hash : (and/c hash? hash-weak?)
  pos : any/c
procedure
(unsafe-weak-hash-iterate-key hash pos) -> any/c
  hash : (and/c hash? hash-weak?)
  pos : any/c
procedure
(unsafe-weak-hash-iterate-key hash             
                              pos              
                              bad-index-v) -> any/c
  hash : (and/c hash? hash-weak?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-weak-hash-iterate-value hash pos) -> any/c
  hash : (and/c hash? hash-weak?)
  pos : any/c
procedure
(unsafe-weak-hash-iterate-value hash             
                                pos              
                                bad-index-v) -> any/c
  hash : (and/c hash? hash-weak?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-weak-hash-iterate-key+value hash     
                                    pos) -> any/c any/c
  hash : (and/c hash? hash-weak?)
  pos : any/c
procedure
(unsafe-weak-hash-iterate-key+value hash             
                                    pos              
                                    bad-index-v) -> any/c any/c
  hash : (and/c hash? hash-weak?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-weak-hash-iterate-pair hash pos) -> pair?
  hash : (and/c hash? hash-weak?)
  pos : any/c
procedure
(unsafe-weak-hash-iterate-pair hash             
                               pos              
                               bad-index-v) -> pair?
  hash : (and/c hash? hash-weak?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-ephemeron-hash-iterate-first hash) -> (or/c #f any/c)
  hash : (and/c hash? hash-ephemeron?)
procedure
(unsafe-ephemeron-hash-iterate-next hash     
                                    pos) -> (or/c #f any/c)
  hash : (and/c hash? hash-ephemeron?)
  pos : any/c
procedure
(unsafe-ephemeron-hash-iterate-key hash     
                                   pos) -> any/c
  hash : (and/c hash? hash-ephemeron?)
  pos : any/c
procedure
(unsafe-ephemeron-hash-iterate-key hash             
                                   pos              
                                   bad-index-v) -> any/c
  hash : (and/c hash? hash-ephemeron?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-ephemeron-hash-iterate-value hash     
                                     pos) -> any/c
  hash : (and/c hash? hash-ephemeron?)
  pos : any/c
procedure
(unsafe-ephemeron-hash-iterate-value hash             
                                     pos              
                                     bad-index-v) -> any/c
  hash : (and/c hash? hash-ephemeron?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-ephemeron-hash-iterate-key+value hash     
                                         pos) -> any/c any/c
  hash : (and/c hash? hash-ephemeron?)
  pos : any/c
procedure
(unsafe-ephemeron-hash-iterate-key+value hash         
                                         pos          
                                         bad-index-v) 
 -> any/c any/c
  hash : (and/c hash? hash-ephemeron?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-ephemeron-hash-iterate-pair hash     
                                    pos) -> pair?
  hash : (and/c hash? hash-ephemeron?)
  pos : any/c
procedure
(unsafe-ephemeron-hash-iterate-pair hash             
                                    pos              
                                    bad-index-v) -> pair?
  hash : (and/c hash? hash-ephemeron?)
  pos : any/c
  bad-index-v : any/c
procedure
(unsafe-make-srcloc source       
                    line         
                    column       
                    position     
                    span)    -> srcloc?
  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
(unsafe-extfl+ a b) -> extflonum?
  a : extflonum?
  b : extflonum?
procedure
(unsafe-extfl- a b) -> extflonum?
  a : extflonum?
  b : extflonum?
procedure
(unsafe-extfl* a b) -> extflonum?
  a : extflonum?
  b : extflonum?
procedure
(unsafe-extfl/ a b) -> extflonum?
  a : extflonum?
  b : extflonum?
procedure
(unsafe-extflabs a) -> extflonum?
  a : extflonum?
procedure
(unsafe-extfl= a b) -> boolean?
  a : extflonum?
  b : extflonum?
procedure
(unsafe-extfl< a b) -> boolean?
  a : extflonum?
  b : extflonum?
procedure
(unsafe-extfl> a b) -> boolean?
  a : extflonum?
  b : extflonum?
procedure
(unsafe-extfl<= a b) -> boolean?
  a : extflonum?
  b : extflonum?
procedure
(unsafe-extfl>= a b) -> boolean?
  a : extflonum?
  b : extflonum?
procedure
(unsafe-extflmin a b) -> extflonum?
  a : extflonum?
  b : extflonum?
procedure
(unsafe-extflmax a b) -> extflonum?
  a : extflonum?
  b : extflonum?
procedure
(unsafe-extflround a) -> extflonum?
  a : extflonum?
procedure
(unsafe-extflfloor a) -> extflonum?
  a : extflonum?
procedure
(unsafe-extflceiling a) -> extflonum?
  a : extflonum?
procedure
(unsafe-extfltruncate a) -> extflonum?
  a : extflonum?
procedure
(unsafe-extflsin a) -> extflonum?
  a : extflonum?
procedure
(unsafe-extflcos a) -> extflonum?
  a : extflonum?
procedure
(unsafe-extfltan a) -> extflonum?
  a : extflonum?
procedure
(unsafe-extflasin a) -> extflonum?
  a : extflonum?
procedure
(unsafe-extflacos a) -> extflonum?
  a : extflonum?
procedure
(unsafe-extflatan a) -> extflonum?
  a : extflonum?
procedure
(unsafe-extfllog a) -> extflonum?
  a : extflonum?
procedure
(unsafe-extflexp a) -> extflonum?
  a : extflonum?
procedure
(unsafe-extflsqrt a) -> extflonum?
  a : extflonum?
procedure
(unsafe-extflexpt a b) -> extflonum?
  a : extflonum?
  b : extflonum?
procedure
(unsafe-fx->extfl a) -> extflonum?
  a : fixnum?
procedure
(unsafe-extfl->fx a) -> fixnum?
  a : extflonum?
procedure
(unsafe-extflvector-length v) -> fixnum?
  v : extflvector?
procedure
(unsafe-extflvector-ref v k) -> extflonum?
  v : extflvector?
  k : fixnum?
procedure
(unsafe-extflvector-set! v k x) -> void?
  v : extflvector?
  k : fixnum?
  x : extflonum?
procedure
(unsafe-impersonate-procedure proc             
                              replacement-proc 
                              prop             
                              prop-val ...     
                              ...)             
 -> (and/c procedure? impersonator?)
  proc : procedure?
  replacement-proc : procedure?
  prop : impersonator-property?
  prop-val : any
procedure
(unsafe-chaperone-procedure proc         
                            wrapper-proc 
                            prop         
                            prop-val ... 
                            ...)         
 -> (and/c procedure? chaperone?)
  proc : procedure?
  wrapper-proc : procedure?
  prop : impersonator-property?
  prop-val : any
procedure
(unsafe-impersonate-vector vec             
                           replacement-vec 
                           prop            
                           prop-val ...    
                           ...)            
 -> (and/c vector? impersonator?)
  vec : vector?
  replacement-vec : (and/c vector? (not/c impersonator?))
  prop : impersonator-property?
  prop-val : any/c
procedure
(unsafe-chaperone-vector vec             
                         replacement-vec 
                         prop            
                         prop-val ...    
                         ...)            
 -> (and/c vector? chaperone?)
  vec : vector?
  replacement-vec : (and/c vector? (not/c impersonator?))
  prop : impersonator-property?
  prop-val : any/c
procedure
(unsafe-assert-unreachable) -> none/c
procedure
(unsafe-make-struct-type-property/guard-calls-no-arguments                   
                                                            name             
                                                           [guard            
                                                            supers           
                                                            can-impersonate? 
                                                            accessor-name    
                                                            contract-str     
                                                            realm])          
 -> struct-type-property?
    (any/c . -> . boolean?)
    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
  accessor-name : (or/c symbol? #f) = #f
  contract-str : (or/c string? symbol? #f) = #f
  realm : symbol? = 'racket
value
unsafe-undefined : any/c
procedure
(check-not-unsafe-undefined v sym) -> any/c
  v : any/c
  sym : symbol?
procedure
(check-not-unsafe-undefined/assign v sym) -> any/c
  v : any/c
  sym : symbol?
procedure
(chaperone-struct-unsafe-undefined v) -> any/c
  v : any/c
value
prop:chaperone-unsafe-undefined : struct-type-property?
procedure
(find-library-collection-paths [pre-extras      
                                post-extras     
                                config]         
                                name)       -> (listof path?)
  pre-extras : (listof path-string?) = null
  post-extras : (listof path-string?) = null
  config : hash? = (read-installation-configuration-table)
  name : (get-installation-name config)
procedure
(find-library-collection-links [config] name)
 -> (listof (or/c #f (and/c path? complete-path?)))
  config : hash? = (read-installation-configuration-table)
  name : (get-installation-name config)
procedure
(collection-file-path  file                                
                       collection ...+                     
                      [#:check-compiled? check-compiled?]) 
 -> path?
  file : path-string?
  collection : path-string?
  check-compiled? : any/c = (regexp-match? #rx"[.]rkt$" file)
(collection-file-path  file                                    
                       collection ...+                         
                       #:fail fail-proc                        
                      [#:check-compiled? check-compiled?]) -> any
  file : path-string?
  collection : path-string?
  fail-proc : (string? . -> . any)
  check-compiled? : any/c = (regexp-match? #rx"[.]rkt$" file)
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-string? complete-path?))
parameter
(current-library-collection-links)
 -> (listof (or/c #f
                  (and/c path? complete-path?)
                  (hash/c (or/c (and/c symbol? module-path?) #f)
                          (listof (and/c path? complete-path?)))))
(current-library-collection-links paths) -> void?
  paths : (listof (or/c #f
                        (and/c path-string? complete-path?)
                        (hash/c (or/c (and/c symbol? module-path?) #f)
                                (listof (and/c path-string? 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
procedure
(read-installation-configuration-table)
 -> (and/c hash? immutable?)
syntax
help
(help string ...)
(help id)
(help id #:from module-path)
(help #:search datum ...)
parameter
(current-interaction-info)
 -> (or/c #f (vector/c module-path? symbol? any/c))
(current-interaction-info info) -> void?
  info : (or/c #f (vector/c module-path? symbol? any/c))
syntax
(enter! module-path)
(enter! #f)
(enter! module-path flag ...+)
 
flag = #:quiet
     | #:verbose-reload
     | #:verbose
     | #:dont-re-require-enter
procedure
(dynamic-enter!  mod                                         
                [#:verbosity verbosity                       
                 #:re-require-enter? re-require-enter?]) -> void?
  mod : (or/c module-path? #f)
  verbosity : (or/c 'all 'reload 'none) = 'reload
  re-require-enter? : any/c = #t
procedure
(dynamic-rerequire  module-path                 
                   [#:verbosity verbosity]) -> (listof path?)
  module-path : module-path?
  verbosity : (or/c 'all 'reload 'none) = 'reload
syntax
(trace id ...)
syntax
(trace-define id expr)
(trace-define (head args) body ...+)
syntax
(trace-define-syntax id expr)
(trace-define-syntax (head args) body ...+)
syntax
(trace-lambda [#:name id] args expr)
syntax
(trace-let id ([arg expr] ...+) body ...+)
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?
