23754
((3) 0 () 11 ((q lib "typed-racket/base-env/prims.rkt") (q lib "typed-racket/base-env/base-types.rkt") (q lib "typed-racket/typed-racket.rkt") (q lib "typed-racket/base-env/base-types-extra.rkt") (q lib "typed/racket/class.rkt") (q lib "typed/racket/unit.rkt") (q lib "typed/racket/unsafe.rkt") (q lib "typed/untyped-utils.rkt") (q lib "typed/scheme/base.rkt") (q lib "typed/racket/base.rkt") (q lib "typed-racket/base-env/extra-procs.rkt")) () (h ! (equal) ((c form c (c (? . 0) q for/set)) q (9477 . 2)) ((c form c (c (? . 0) q cast)) q (13549 . 2)) ((c form c (c (? . 1) q Log-Level)) q (2966 . 2)) ((c form c (c (? . 0) q require/typed)) q (13714 . 20)) ((c form c (c (? . 0) q let*:)) q (24907 . 2)) ((c form c (c (? . 0) q letrec-values)) q (7518 . 2)) ((c form c (c (? . 1) q Positive-Inexact-Real)) q (1181 . 2)) ((c form c (c (? . 1) q Negative-ExtFlonum)) q (1920 . 2)) ((c form c (c (? . 0) q ann)) q (13511 . 2)) ((c form c (c (? . 1) q Positive-Single-Flonum)) q (934 . 2)) ((c form c (c (? . 0) q define-struct)) q (12604 . 12)) ((c form c (c (? . 0) q for*/extflvector:)) q (25583 . 2)) ((c form c (c (? . 1) q Impersonator-Property)) q (2744 . 2)) ((c form c (c (? . 2) q Time)) q (15331 . 2)) ((c form c (c (? . 1) q Complex)) q (57 . 2)) ((c form c (c (? . 5) q compound-unit/infer)) q (20306 . 15)) ((c form c (c (? . 4) q pubment)) q (17920 . 2)) ((c form c (c (? . 0) q :type)) q (23345 . 5)) ((c form c (c (? . 1) q Nonnegative-Fixnum)) q (1773 . 2)) ((c form c (c (? . 1) q Namespace)) q (2357 . 2)) ((c form c (c (? . 1) q Vectorof)) q (3429 . 2)) ((c form c (c (? . 0) q struct)) q (12104 . 15)) ((c form c (c (? . 2) q for/flvector)) q (15166 . 2)) ((c form c (c (? . 0) q for/flvector:)) q (25878 . 2)) ((c form c (c (? . 1) q Port)) q (2224 . 2)) ((c form c (c (? . 0) q for/list:)) q (26013 . 2)) ((c form c (c (? . 0) q define:)) q (25200 . 7)) ((c form c (c (? . 0) q for/hash)) q (9011 . 2)) ((c form c (c (? . 1) q Flonum-Zero)) q (880 . 2)) ((c form c (c (? . 2) q Cursor)) q (15319 . 2)) ((c form c (c (? . 1) q Will-Executor)) q (3104 . 2)) ((c form c (c (? . 0) q letrec:)) q (24861 . 2)) ((c form c (c (? . 3) q ->*)) q (6138 . 15)) ((c form c (c (? . 1) q Negative-Inexact-Real)) q (1242 . 2)) ((c form c (c (? . 0) q struct:)) q (25449 . 2)) ((c form c (c (? . 0) q inst)) q (13569 . 3)) ((c form c (c (? . 0) q let*)) q (7423 . 2)) ((c def c (c (? . 0) q index?)) q (22768 . 3)) ((c form c (c (? . 0) q λ:)) q (24126 . 2)) ((c form c (c (? . 2) q FTP-Connection)) q (14763 . 2)) ((c form c (c (? . 1) q Variable-Reference)) q (2398 . 2)) ((c form c (c (? . 1) q Path-String)) q (3185 . 2)) ((c form c (c (? . 1) q Any)) q (0 . 2)) ((c form c (c (? . 1) q Zero)) q (548 . 2)) ((c form c (c (? . 1) q ExtFlonum-Nan)) q (2059 . 2)) ((c form c (c (? . 1) q Setof)) q (3889 . 2)) ((c form c (c (? . 1) q Exact-Nonnegative-Integer)) q (449 . 2)) ((c form c (c (? . 3) q Struct-Type)) q (6822 . 2)) ((c form c (c (? . 0) q define-new-subtype)) q (26974 . 2)) ((c form c (c (? . 1) q Float)) q (87 . 2)) ((c form c (c (? . 3) q Tuple)) q (26341 . 2)) ((c form c (c (? . 1) q UnitTop)) q (21876 . 2)) ((c form c (c (? . 0) q define-typed-struct/exec)) q (26928 . 2)) ((c form c (c (? . 0) q for/hash:)) q (25940 . 2)) ((c form c (c (? . 0) q pdefine:)) q (26288 . 2)) ((c form c (c (? . 1) q ClassTop)) q (18747 . 2)) ((c form c (c (? . 1) q Datum)) q (4394 . 2)) ((c form c (c (? . 1) q Boxof)) q (3397 . 2)) ((c form c (c (? . 1) q Exact-Imaginary)) q (320 . 2)) ((c form c (c (? . 1) q Mutable-VectorTop)) q (3668 . 2)) ((c form c (c (? . 1) q FSemaphore)) q (3086 . 2)) ((c form c (c (? . 0) q plambda:)) q (24156 . 3)) ((c form c (c (? . 0) q let/ec)) q (7669 . 2)) ((c form c (c (? . 1) q Bytes-Converter)) q (2791 . 2)) ((c form c (c (? . 1) q Futureof)) q (4063 . 2)) ((c form c (c (? . 1) q Syntax)) q (4333 . 2)) ((c form c (c (? . 0) q for*/vector:)) q (25811 . 2)) ((c form c (c (? . 0) q for/sum:)) q (26099 . 2)) ((c form c (c (? . 3) q U)) q (6575 . 2)) ((c form c (c (? . 0) q for*:)) q (25831 . 2)) ((c form c (c (? . 0) q assert-typecheck-fail)) q (22985 . 3)) ((c form c (c (? . 0) q for*/first:)) q (25542 . 2)) ((c form c (c (? . 1) q Prompt-Tagof)) q (4407 . 2)) ((c form c (c (? . 0) q require-typed-struct/provide)) q (26252 . 2)) ((c form c (c (? . 1) q Custodian)) q (2838 . 2)) ((c form c (c (? . 0) q for/lists:)) q (26030 . 2)) ((c form c (c (? . 4) q private)) q (18047 . 2)) ((c form c (c (? . 1) q Pair)) q (26371 . 2)) ((c form c (c (? . 1) q Exact-Positive-Integer)) q (392 . 2)) ((c form c (c (? . 2) q #%top-interaction)) q (14670 . 2)) ((c form c (c (? . 0) q let-values)) q (7461 . 2)) ((c form c (c (? . 1) q Flonum)) q (100 . 2)) ((c form c (c (? . 0) q for/hasheq:)) q (25957 . 2)) ((c form c (c (? . 5) q invoke-unit)) q (19604 . 3)) ((c form c (c (? . 1) q Mutable-HashTable)) q (3753 . 2)) ((c form c (c (? . 1) q Nonnegative-Float)) q (605 . 2)) ((c form c (c (? . 2) q for*/extflvector)) q (15093 . 2)) ((c form c (c (? . 8) q require/typed)) q (26397 . 12)) ((c form c (c (? . 3) q Intersection)) q (6951 . 2)) ((c form c (c (? . 4) q class)) q (15351 . 45)) ((c form c (c (? . 1) q Syntax-E)) q (4347 . 2)) ((c form c (c (? . 1) q Place)) q (3035 . 2)) ((c form c (c (? . 1) q Number)) q (43 . 2)) ((c form c (c (? . 3) q Parameterof)) q (3999 . 3)) ((c form c (c (? . 3) q Mutable-Vector)) q (3568 . 2)) ((c form c (c (? . 1) q Nothing)) q (28 . 2)) ((c form c (c (? . 0) q for/or)) q (9278 . 2)) ((c form c (c (? . 1) q Module-Path-Index)) q (2512 . 2)) ((c form c (c (? . 1) q Custodian-Boxof)) q (4134 . 2)) ((c form c (c (? . 1) q Nonpositive-Flonum)) q (726 . 2)) ((c form c (c (? . 1) q Weak-BoxTop)) q (4233 . 2)) ((c form c (c (? . 1) q Inexact-Imaginary)) q (343 . 2)) ((c form c (c (? . 3) q Refinement)) q (26904 . 2)) ((c form c (c (? . 1) q Byte-PRegexp)) q (2324 . 2)) ((c form c (c (? . 1) q Listof)) q (3226 . 2)) ((c form c (c (? . 1) q HashTable)) q (3693 . 2)) ((c form c (c (? . 0) q for/and:)) q (25844 . 2)) ((c form c (c (? . 1) q Integer)) q (72 . 2)) ((c form c (c (? . 4) q init)) q (17713 . 2)) ((c form c (c (? . 2) q URL)) q (14841 . 2)) ((c form c (c (? . 2) q SSL-Listener)) q (14980 . 2)) ((c form c (c (? . 5) q define-signature)) q (18960 . 8)) ((c form c (c (? . 1) q Symbol)) q (2149 . 2)) ((c form c (c (? . 1) q Inexact-Complex)) q (259 . 2)) ((c form c (c (? . 1) q Prompt-TagTop)) q (4435 . 2)) ((c form c (c (? . 2) q PortT)) q (14869 . 2)) ((c form c (c (? . 2) q URL-Exception)) q (14850 . 2)) ((c form c (c (? . 1) q Single-Flonum-Complex)) q (230 . 2)) ((c form c (c (? . 1) q Read-Table)) q (2773 . 2)) ((c form c (c (? . 1) q Semaphore)) q (3069 . 2)) ((c form c (c (? . 1) q UDP-Socket)) q (2894 . 2)) ((c form c (c (? . 0) q for/first)) q (10209 . 2)) ((c form c (c (? . 1) q False)) q (2107 . 2)) ((c form c (c (? . 1) q Positive-Real)) q (1550 . 2)) ((c form c (c (? . 1) q Pairof)) q (3204 . 2)) ((c form c (c (? . 1) q Resolved-Module-Path)) q (2537 . 2)) ((c form c (c (? . 1) q Identifier)) q (4315 . 2)) ((c form c (c (? . 2) q Path/Param)) q (14825 . 2)) ((c form c (c (? . 0) q for*/product:)) q (25773 . 2)) ((c form c (c (? . 5) q define-unit-from-context)) q (21443 . 2)) ((c form c (c (? . 0) q require-typed-struct)) q (26224 . 2)) ((c form c (c (? . 1) q Nonnegative-Integer)) q (422 . 2)) ((c form c (c (? . 0) q for*/sum)) q (9946 . 2)) ((c form c (c (? . 0) q for/and)) q (10145 . 2)) ((c def c (c (? . 10) q assert)) q (22495 . 6)) ((c form c (c (? . 1) q TCP-Listener)) q (2912 . 2)) ((c form c (c (? . 1) q Natural)) q (482 . 2)) ((c form c (c (? . 0) q for/fold:)) q (25923 . 2)) ((c form c (c (? . 1) q Null)) q (2424 . 2)) ((c form c (c (? . 1) q Thread-Group)) q (2997 . 2)) ((c form c (c (? . 1) q Async-ChannelTop)) q (3975 . 2)) ((c form c (c (? . 1) q Fixnum)) q (1736 . 2)) ((c form c (c (? . 5) q define-unit)) q (20163 . 7)) ((c form c (c (? . 1) q Positive-Exact-Rational)) q (1420 . 2)) ((c form c (c (? . 1) q Positive-Integer)) q (368 . 2)) ((c form c (c (? . 1) q Float-Zero)) q (862 . 2)) ((c form c (c (? . 1) q Weak-HashTable)) q (3786 . 2)) ((c form c (c (? . 1) q Positive-Index)) q (1714 . 2)) ((c form c (c (? . 0) q for/last)) q (10275 . 2)) ((c form c (c (? . 6) q unsafe-require/typed)) q (23818 . 2)) ((c form c (c (? . 9) q define-type)) q (13209 . 6)) ((c form c (c (? . 1) q Byte)) q (1668 . 2)) ((c form c (c (? . 5) q define-values/invoke-unit)) q (19686 . 8)) ((c form c (c (? . 0) q for/fold)) q (10629 . 4)) ((c form c (c (? . 0) q define-struct:)) q (25464 . 2)) ((c form c (c (? . 1) q Exact-Rational)) q (155 . 2)) ((c form c (c (? . 0) q λ)) q (8493 . 2)) ((c form c (c (? . 0) q for*/flvector:)) q (25561 . 2)) ((c form c (c (? . 0) q lambda:)) q (23967 . 6)) ((c form c (c (? . 2) q Char-Set)) q (15305 . 2)) ((c form c (c (? . 1) q Negative-Exact-Rational)) q (1485 . 2)) ((c form c (c (? . 0) q for*/fold)) q (10888 . 4)) ((c form c (c (? . 1) q Bytes)) q (2344 . 2)) ((c form c (c (? . 3) q All)) q (6668 . 3)) ((c form c (c (? . 1) q Sexpof)) q (4363 . 2)) ((c form c (c (? . 1) q Flonum-Negative-Zero)) q (779 . 2)) ((c form c (c (? . 0) q for/vector:)) q (26115 . 2)) ((c form c (c (? . 3) q →)) q (6971 . 2)) ((c form c (c (? . 0) q define-predicate)) q (13397 . 2)) ((c form c (c (? . 2) q IMAP-Connection)) q (14804 . 2)) ((c form c (c (? . 1) q Regexp)) q (2276 . 2)) ((c form c (c (? . 0) q with-asserts)) q (22610 . 5)) ((c form c (c (? . 0) q plet:)) q (24807 . 2)) ((c form c (c (? . 2) q #%module-begin)) q (14635 . 2)) ((c form c (c (? . 1) q Nonnegative-Inexact-Real)) q (1210 . 2)) ((c form c (c (? . 0) q let/ec:)) q (25166 . 2)) ((c form c (c (? . 1) q Environment-Variables)) q (3156 . 2)) ((c form c (c (? . 1) q Flonum-Nan)) q (916 . 2)) ((c form c (c (? . 1) q Negative-Integer)) q (497 . 2)) ((c form c (c (? . 0) q define-struct/exec)) q (12963 . 8)) ((c form c (c (? . 7) q require/untyped-contract)) q (23085 . 5)) ((c form c (c (? . 1) q Positive-Byte)) q (1680 . 2)) ((c form c (c (? . 0) q declare-refinement)) q (26872 . 2)) ((c form c (c (? . 1) q Mutable-Vectorof)) q (3481 . 2)) ((c form c (c (? . 5) q invoke-unit/infer)) q (21076 . 5)) ((c form c (c (? . 1) q Nonpositive-Integer)) q (521 . 2)) ((c form c (c (? . 0) q let-values:)) q (24951 . 2)) ((c form c (c (? . 3) q Parameter)) q (26354 . 2)) ((c form c (c (? . 5) q define-values/invoke-unit/infer)) q (21180 . 8)) ((c form c (c (? . 2) q SSL-Server-Context)) q (14915 . 2)) ((c form c (c (? . 1) q Inexact-Real-Zero)) q (1371 . 2)) ((c form c (c (? . 1) q Index)) q (1701 . 2)) ((c form c (c (? . 0) q for*/hasheq)) q (9673 . 2)) ((c form c (c (? . 0) q for/or:)) q (26064 . 2)) ((c form c (c (? . 0) q case-lambda)) q (8522 . 2)) ((c form c (c (? . 1) q Struct-Type-Property)) q (2716 . 2)) ((c form c (c (? . 1) q Nonpositive-Float)) q (701 . 2)) ((c form c (c (? . 3) q Top)) q (6536 . 2)) ((c form c (c (? . 0) q for/vector)) q (9211 . 2)) ((c form c (c (? . 0) q let)) q (7046 . 13)) ((c form c (c (? . 1) q Output-Port)) q (2205 . 2)) ((c form c (c (? . 3) q case->)) q (6615 . 2)) ((c form c (c (? . 0) q for*/or)) q (9878 . 2)) ((c form c (c (? . 4) q define/pubment)) q (17473 . 3)) ((c form c (c (? . 1) q Real-Zero)) q (1640 . 2)) ((c form c (c (? . 1) q Inexact-Real-Negative-Zero)) q (1303 . 2)) ((c form c (c (? . 3) q case→)) q (6982 . 2)) ((c form c (c (? . 1) q SequenceTop)) q (4115 . 2)) ((c form c (c (? . 0) q for*/sum:)) q (25794 . 2)) ((c form c (c (? . 3) q Opaque)) q (7027 . 2)) ((c form c (c (? . 1) q ExtFlonum-Negative-Zero)) q (1975 . 2)) ((c form c (c (? . 3) q Refine)) q (27026 . 32)) ((c form c (c (? . 6) q unsafe-provide)) q (23867 . 2)) ((c form c (c (? . 1) q Continuation-Mark-KeyTop)) q (4492 . 2)) ((c form c (c (? . 1) q Exact-Complex)) q (299 . 2)) ((c form c (c (? . 1) q Nonpositive-Fixnum)) q (1822 . 2)) ((c form c (c (? . 1) q Real)) q (177 . 2)) ((c form c (c (? . 0) q define)) q (11174 . 30)) ((c form c (c (? . 1) q Weak-Boxof)) q (4210 . 2)) ((c form c (c (? . 1) q Module-Path)) q (2493 . 2)) ((c form c (c (? . 0) q for*/hash)) q (9607 . 2)) ((c form c (c (? . 3) q Vector)) q (3510 . 2)) ((c form c (c (? . 1) q Security-Guard)) q (2872 . 2)) ((c form c (c (? . 1) q Compiled-Module-Expression)) q (2565 . 2)) ((c form c (c (? . 2) q JSExpr)) q (14739 . 2)) ((c form c (c (? . 2) q for*/flvector)) q (15235 . 2)) ((c form c (c (? . 1) q Nonnegative-Real)) q (1571 . 2)) ((c form c (c (? . 1) q Nonnegative-Single-Flonum)) q (964 . 2)) ((c def c (c (? . 0) q default-continuation-prompt-tag)) q (14543 . 3)) ((c form c (c (? . 2) q with-type)) q (23524 . 10)) ((c form c (c (? . 1) q Negative-Fixnum)) q (1799 . 2)) ((c form c (c (? . 1) q HashTableTop)) q (3816 . 2)) ((c form c (c (? . 1) q Nonpositive-Inexact-Real)) q (1271 . 2)) ((c form c (c (? . 1) q BoxTop)) q (3415 . 2)) ((c form c (c (? . 0) q for)) q (8578 . 14)) ((c form c (c (? . 2) q PortT/Bytes)) q (14880 . 2)) ((c form c (c (? . 4) q define/override)) q (17391 . 3)) ((c form c (c (? . 1) q Keyword)) q (2134 . 2)) ((c form c (c (? . 0) q for*/hasheqv)) q (9741 . 2)) ((c form c (c (? . 0) q for/product:)) q (26079 . 2)) ((c form c (c (? . 3) q Unit)) q (21491 . 13)) ((c form c (c (? . 4) q public)) q (17879 . 2)) ((c form c (c (? . 0) q for*/hasheq:)) q (25644 . 2)) ((c form c (c (? . 1) q Nonnegative-Flonum)) q (630 . 2)) ((c form c (c (? . 3) q List)) q (3245 . 2)) ((c form c (c (? . 3) q ∩)) q (6594 . 2)) ((c form c (c (? . 1) q Negative-Flonum)) q (678 . 2)) ((c form c (c (? . 1) q Struct-TypeTop)) q (6847 . 2)) ((c form c (c (? . 1) q Nonpositive-Exact-Rational)) q (1516 . 2)) ((c form c (c (? . 0) q define-typed-struct)) q (26170 . 2)) ((c form c (c (? . 1) q MPairof)) q (3358 . 2)) ((c form c (c (? . 0) q for/product)) q (9409 . 2)) ((c form c (c (? . 3) q Values)) q (6721 . 2)) ((c form c (c (? . 5) q define-compound-unit)) q (20808 . 5)) ((c form c (c (? . 3) q mu)) q (26331 . 2)) ((c form c (c (? . 0) q popt-lambda:)) q (24485 . 3)) ((c form c (c (? . 1) q Ephemeronof)) q (4252 . 2)) ((c form c (c (? . 1) q EOF)) q (2436 . 2)) ((c form c (c (? . 1) q ExtFlonum)) q (1848 . 2)) ((c form c (c (? . 1) q Single-Flonum)) q (114 . 2)) ((c form c (c (? . 0) q provide:)) q (13462 . 2)) ((c form c (c (? . 1) q Undefined)) q (2476 . 2)) ((c form c (c (? . 0) q for*/set)) q (10080 . 2)) ((c form c (c (? . 1) q Path)) q (2236 . 2)) ((c form c (c (? . 4) q inherit)) q (18078 . 2)) ((c form c (c (? . 0) q for*/or:)) q (25757 . 2)) ((c form c (c (? . 0) q for*/and)) q (10340 . 2)) ((c form c (c (? . 1) q MPairTop)) q (3381 . 2)) ((c form c (c (? . 1) q Nonnegative-Exact-Rational)) q (1451 . 2)) ((c form c (c (? . 1) q Float-Negative-Zero)) q (752 . 2)) ((c form c (c (? . 1) q Inspector)) q (2855 . 2)) ((c form c (c (? . 1) q Immutable-HashTable)) q (3718 . 2)) ((c form c (c (? . 1) q ExtFlVector)) q (3616 . 2)) ((c form c (c (? . 1) q Special-Comment)) q (2693 . 2)) ((c form c (c (? . 0) q lambda)) q (7702 . 26)) ((c form c (c (? . 1) q ExtFlonum-Zero)) q (2037 . 2)) ((c form c (c (? . 1) q True)) q (2095 . 2)) ((c form c (c (? . 1) q Inexact-Real-Positive-Zero)) q (1337 . 2)) ((c form c (c (? . 3) q ->)) q (4524 . 52)) ((c form c (c (? . 1) q Boolean)) q (2080 . 2)) ((c form c (c (? . 3) q Union)) q (6938 . 2)) ((c form c (c (? . 3) q Bot)) q (6547 . 2)) ((c form c (c (? . 1) q Positive-Flonum)) q (582 . 2)) ((c form c (c (? . 0) q case-lambda:)) q (24584 . 2)) ((c form c (c (? . 0) q for*)) q (10732 . 3)) ((c form c (c (? . 5) q unit)) q (19142 . 16)) ((c form c (c (? . 1) q Single-Flonum-Positive-Zero)) q (1095 . 2)) ((c form c (c (? . 3) q Struct)) q (6802 . 2)) ((c form c (c (? . 0) q :query-type/result)) q (23490 . 2)) ((c form c (c (? . 1) q Nonnegative-ExtFlonum)) q (1891 . 2)) ((c form c (c (? . 1) q Channelof)) q (3907 . 2)) ((c form c (c (? . 0) q for*/set:)) q (25740 . 2)) ((c form c (c (? . 0) q letrec-values:)) q (25010 . 2)) ((c form c (c (? . 1) q Single-Flonum-Zero)) q (1130 . 2)) ((c form c (c (? . 0) q for*/hasheqv:)) q (25664 . 2)) ((c form c (c (? . 1) q Place-Channel)) q (3048 . 2)) ((c form c (c (? . 1) q Syntaxof)) q (4294 . 2)) ((c form c (c (? . 1) q Procedure)) q (6558 . 2)) ((c form c (c (? . 3) q Rec)) q (6783 . 2)) ((c form c (c (? . 0) q for*/list)) q (9541 . 2)) ((c form c (c (? . 1) q Negative-Single-Flonum)) q (997 . 2)) ((c form c (c (? . 2) q Date)) q (15341 . 2)) ((c form c (c (? . 1) q VectorTop)) q (3651 . 2)) ((c form c (c (? . 4) q override)) q (17962 . 2)) ((c form c (c (? . 1) q ExtFlonum-Positive-Zero)) q (2006 . 2)) ((c form c (c (? . 0) q for/first:)) q (25860 . 2)) ((c form c (c (? . 5) q unit-from-context)) q (21406 . 2)) ((c form c (c (? . 2) q SSL-Verify-Source)) q (14998 . 2)) ((c form c (c (? . 1) q Logger)) q (2932 . 2)) ((c form c (c (? . 0) q opt-lambda:)) q (24247 . 6)) ((c form c (c (? . 2) q GIF-Stream)) q (14705 . 2)) ((c form c (c (? . 1) q Continuation-Mark-Set)) q (2447 . 2)) ((c form c (c (? . 1) q PRegexp)) q (2290 . 2)) ((c form c (c (? . 4) q augment)) q (18005 . 2)) ((c form c (c (? . 5) q define-compound-unit/infer)) q (20931 . 5)) ((c form c (c (? . 3) q pred)) q (26304 . 2)) ((c form c (c (? . 1) q Thread)) q (2983 . 2)) ((c form c (c (? . 0) q for/set:)) q (26048 . 2)) ((c form c (c (? . 1) q Nonpositive-ExtFlonum)) q (1946 . 2)) ((c form c (c (? . 0) q with-handlers)) q (14522 . 2)) ((c form c (c (? . 2) q HTTP-Connection)) q (14783 . 2)) ((c form c (c (? . 1) q One)) q (1657 . 2)) ((c form c (c (? . 1) q Namespace-Anchor)) q (2374 . 2)) ((c form c (c (? . 1) q Negative-Real)) q (1595 . 2)) ((c form c (c (? . 1) q Thread-Cellof)) q (4162 . 2)) ((c form c (c (? . 1) q Input-Port)) q (2187 . 2)) ((c form c (c (? . 1) q Promise)) q (4043 . 2)) ((c form c (c (? . 1) q Void)) q (2175 . 2)) ((c form c (c (? . 3) q ∀)) q (6997 . 2)) ((c form c (c (? . 0) q for/last:)) q (25996 . 2)) ((c form c (c (? . 0) q :print-type)) q (23429 . 2)) ((c form c (c (? . 1) q Char)) q (2163 . 2)) ((c form c (c (? . 2) q GIF-Colormap)) q (14721 . 2)) ((c form c (c (? . 3) q AnyValues)) q (11 . 2)) ((c form c (c (? . 0) q let/cc:)) q (25132 . 2)) ((c form c (c (? . 1) q Positive-Fixnum)) q (1750 . 2)) ((c form c (c (? . 0) q for*/last:)) q (25685 . 2)) ((c form c (c (? . 0) q for*/lists:)) q (25721 . 2)) ((c form c (c (? . 0) q let*-values:)) q (25072 . 2)) ((c form c (c (? . 0) q require/opaque-type)) q (26197 . 2)) ((c form c (c (? . 1) q ChannelTop)) q (3929 . 2)) ((c form c (c (? . 0) q for*/last)) q (10472 . 2)) ((c form c (c (? . 1) q Exact-Number)) q (189 . 2)) ((c form c (c (? . 3) q Prefab)) q (6869 . 2)) ((c form c (c (? . 1) q Path-For-Some-System)) q (2248 . 2)) ((c form c (c (? . 3) q Un)) q (26321 . 2)) ((c form c (c (? . 4) q define/public)) q (17313 . 3)) ((c form c (c (? . 1) q Compiled-Expression)) q (2599 . 2)) ((c form c (c (? . 3) q Object)) q (18763 . 5)) ((c form c (c (? . 0) q for*/hash:)) q (25626 . 2)) ((c form c (c (? . 1) q Async-Channelof)) q (3947 . 2)) ((c form c (c (? . 1) q Continuation-Mark-Keyof)) q (4456 . 2)) ((c form c (c (? . 0) q define-type-alias)) q (26145 . 2)) ((c form c (c (? . 0) q make-predicate)) q (13370 . 2)) ((c form c (c (? . 1) q Parameterization)) q (2814 . 2)) ((c form c (c (? . 1) q Subprocess)) q (3017 . 2)) ((c form c (c (? . 2) q SSL-Context)) q (14963 . 2)) ((c form c (c (? . 0) q for:)) q (25513 . 2)) ((c form c (c (? . 1) q Log-Receiver)) q (2946 . 2)) ((c form c (c (? . 7) q define-typed/untyped-identifier)) q (23218 . 2)) ((c form c (c (? . 1) q Nonpositive-Real)) q (1616 . 2)) ((c form c (c (? . 1) q Mutable-HashTableTop)) q (3836 . 2)) ((c form c (c (? . 3) q List*)) q (3308 . 2)) ((c form c (c (? . 3) q Instance)) q (18888 . 2)) ((c form c (c (? . 0) q row-inst)) q (13627 . 2)) ((c form c (c (? . 0) q for*/lists)) q (10796 . 4)) ((c form c (c (? . 1) q Option)) q (7008 . 2)) ((c form c (c (? . 1) q Weak-HashTableTop)) q (3864 . 2)) ((c form c (c (? . 2) q for/extflvector)) q (15021 . 2)) ((c form c (c (? . 1) q MListof)) q (3338 . 2)) ((c form c (c (? . 2) q SSL-Client-Context)) q (14939 . 2)) ((c form c (c (? . 1) q Float-Positive-Zero)) q (807 . 2)) ((c form c (c (? . 1) q Immutable-Vectorof)) q (3450 . 2)) ((c form c (c (? . 0) q for/hasheqv:)) q (25976 . 2)) ((c form c (c (? . 1) q Nonpositive-Single-Flonum)) q (1027 . 2)) ((c form c (c (? . 0) q for*/and:)) q (25525 . 2)) ((c form c (c (? . 1) q Single-Flonum-Negative-Zero)) q (1060 . 2)) ((c form c (c (? . 1) q Positive-ExtFlonum)) q (1865 . 2)) ((c form c (c (? . 3) q Class)) q (18120 . 17)) ((c form c (c (? . 8) q require-typed-struct)) q (26844 . 2)) ((c form c (c (? . 1) q Sexp)) q (4382 . 2)) ((c form c (c (? . 3) q Sequenceof)) q (4084 . 2)) ((c form c (c (? . 1) q Byte-Regexp)) q (2305 . 2)) ((c form c (c (? . 2) q Cookie)) q (14751 . 2)) ((c form c (c (? . 2) q SSL-Protocol)) q (14897 . 2)) ((c form c (c (? . 1) q Float-Nan)) q (899 . 2)) ((c form c (c (? . 1) q FlVector)) q (3600 . 2)) ((c form c (c (? . 0) q for/list)) q (8946 . 2)) ((c form c (c (? . 0) q for/sum)) q (9345 . 2)) ((c form c (c (? . 0) q for/hasheq)) q (9076 . 2)) ((c form c (c (? . 3) q Immutable-Vector)) q (3534 . 2)) ((c form c (c (? . 1) q Pretty-Print-Style-Table)) q (2661 . 2)) ((c form c (c (? . 4) q field)) q (17779 . 2)) ((c form c (c (? . 1) q Inexact-Real-Nan)) q (1396 . 2)) ((c form c (c (? . 0) q for/hasheqv)) q (9143 . 2)) ((c form c (c (? . 1) q Float-Complex)) q (209 . 2)) ((c form c (c (? . 0) q for/lists)) q (10538 . 4)) ((c form c (c (? . 1) q String)) q (2120 . 2)) ((c form c (c (? . 5) q compound-unit)) q (19924 . 9)) ((c form c (c (? . 6) q unsafe-require/typed/provide)) q (23910 . 2)) ((c form c (c (? . 0) q for*/fold:)) q (25608 . 2)) ((c form c (c (? . 3) q !)) q (28142 . 2)) ((c form c (c (? . 0) q pcase-lambda:)) q (24604 . 3)) ((c form c (c (? . 0) q typecheck-fail)) q (22820 . 8)) ((c form c (c (? . 0) q :)) q (13432 . 3)) ((c form c (c (? . 9) q values)) q (26383 . 2)) ((c form c (c (? . 0) q :query-type/args)) q (23453 . 2)) ((c form c (c (? . 0) q require/typed/provide)) q (14472 . 2)) ((c form c (c (? . 0) q for*/first)) q (10405 . 2)) ((c form c (c (? . 1) q Internal-Definition-Context)) q (2626 . 2)) ((c form c (c (? . 1) q Single-Flonum-Nan)) q (1156 . 2)) ((c form c (c (? . 1) q Inexact-Real)) q (135 . 2)) ((c form c (c (? . 3) q PrefabTop)) q (6901 . 2)) ((c form c (c (? . 0) q for*/vector)) q (9810 . 2)) ((c form c (c (? . 0) q let:)) q (24715 . 3)) ((c def c (c (? . 7) q syntax-local-typed-context?)) q (23291 . 2)) ((c form c (c (? . 4) q define/private)) q (17633 . 3)) ((c form c (c (? . 1) q Imaginary)) q (282 . 2)) ((c form c (c (? . 4) q init-field)) q (17743 . 2)) ((c form c (c (? . 1) q Negative-Float)) q (656 . 2)) ((c form c (c (? . 4) q init-rest)) q (17851 . 2)) ((c def c (c (? . 10) q defined?)) q (22714 . 3)) ((c form c (c (? . 0) q for*/list:)) q (25703 . 2)) ((c form c (c (? . 0) q for*/product)) q (10011 . 2)) ((c form c (c (? . 0) q do)) q (10992 . 7)) ((c form c (c (? . 1) q Positive-Float)) q (560 . 2)) ((c form c (c (? . 0) q for/extflvector:)) q (25899 . 2)) ((c form c (c (? . 1) q Pseudo-Random-Generator)) q (3125 . 2)) ((c form c (c (? . 1) q FxVector)) q (3635 . 2)) ((c form c (c (? . 0) q define-struct/exec:)) q (25486 . 2)) ((c form c (c (? . 0) q let*-values)) q (7578 . 2)) ((c form c (c (? . 1) q Flonum-Positive-Zero)) q (834 . 2)) ((c form c (c (? . 4) q inherit-field)) q (17811 . 2)) ((c form c (c (? . 1) q Thread-CellTop)) q (4188 . 2)) ((c form c (c (? . 0) q letrec)) q (7383 . 2)) ((c form c (c (? . 0) q do:)) q (26134 . 2)) ((c form c (c (? . 1) q Evtof)) q (4276 . 2)) ((c form c (c (? . 0) q let/cc)) q (7636 . 2)) ((c form c (c (? . 3) q Row)) q (18923 . 2)) ((c form c (c (? . 4) q define/augment)) q (17553 . 3))))
syntax
Any
syntax
AnyValues
syntax
Nothing
syntax
Number
syntax
Complex
syntax
Integer
syntax
Float
syntax
Flonum
syntax
Single-Flonum
syntax
Inexact-Real
syntax
Exact-Rational
syntax
Real
syntax
Exact-Number
syntax
Float-Complex
syntax
Single-Flonum-Complex
syntax
Inexact-Complex
syntax
Imaginary
syntax
Exact-Complex
syntax
Exact-Imaginary
syntax
Inexact-Imaginary
syntax
Positive-Integer
syntax
Exact-Positive-Integer
syntax
Nonnegative-Integer
syntax
Exact-Nonnegative-Integer
syntax
Natural
syntax
Negative-Integer
syntax
Nonpositive-Integer
syntax
Zero
syntax
Positive-Float
syntax
Positive-Flonum
syntax
Nonnegative-Float
syntax
Nonnegative-Flonum
syntax
Negative-Float
syntax
Negative-Flonum
syntax
Nonpositive-Float
syntax
Nonpositive-Flonum
syntax
Float-Negative-Zero
syntax
Flonum-Negative-Zero
syntax
Float-Positive-Zero
syntax
Flonum-Positive-Zero
syntax
Float-Zero
syntax
Flonum-Zero
syntax
Float-Nan
syntax
Flonum-Nan
syntax
Positive-Single-Flonum
syntax
Nonnegative-Single-Flonum
syntax
Negative-Single-Flonum
syntax
Nonpositive-Single-Flonum
syntax
Single-Flonum-Negative-Zero
syntax
Single-Flonum-Positive-Zero
syntax
Single-Flonum-Zero
syntax
Single-Flonum-Nan
syntax
Positive-Inexact-Real
syntax
Nonnegative-Inexact-Real
syntax
Negative-Inexact-Real
syntax
Nonpositive-Inexact-Real
syntax
Inexact-Real-Negative-Zero
syntax
Inexact-Real-Positive-Zero
syntax
Inexact-Real-Zero
syntax
Inexact-Real-Nan
syntax
Positive-Exact-Rational
syntax
Nonnegative-Exact-Rational
syntax
Negative-Exact-Rational
syntax
Nonpositive-Exact-Rational
syntax
Positive-Real
syntax
Nonnegative-Real
syntax
Negative-Real
syntax
Nonpositive-Real
syntax
Real-Zero
syntax
One
syntax
Byte
syntax
Positive-Byte
syntax
Index
syntax
Positive-Index
syntax
Fixnum
syntax
Positive-Fixnum
syntax
Nonnegative-Fixnum
syntax
Negative-Fixnum
syntax
Nonpositive-Fixnum
syntax
ExtFlonum
syntax
Positive-ExtFlonum
syntax
Nonnegative-ExtFlonum
syntax
Negative-ExtFlonum
syntax
Nonpositive-ExtFlonum
syntax
ExtFlonum-Negative-Zero
syntax
ExtFlonum-Positive-Zero
syntax
ExtFlonum-Zero
syntax
ExtFlonum-Nan
syntax
Boolean
syntax
True
syntax
False
syntax
String
syntax
Keyword
syntax
Symbol
syntax
Char
syntax
Void
syntax
Input-Port
syntax
Output-Port
syntax
Port
syntax
Path
syntax
Path-For-Some-System
syntax
Regexp
syntax
PRegexp
syntax
Byte-Regexp
syntax
Byte-PRegexp
syntax
Bytes
syntax
Namespace
syntax
Namespace-Anchor
syntax
Variable-Reference
syntax
Null
syntax
EOF
syntax
Continuation-Mark-Set
syntax
Undefined
syntax
Module-Path
syntax
Module-Path-Index
syntax
Resolved-Module-Path
syntax
Compiled-Module-Expression
syntax
Compiled-Expression
syntax
Internal-Definition-Context
syntax
Pretty-Print-Style-Table
syntax
Special-Comment
syntax
Struct-Type-Property
syntax
Impersonator-Property
syntax
Read-Table
syntax
Bytes-Converter
syntax
Parameterization
syntax
Custodian
syntax
Inspector
syntax
Security-Guard
syntax
UDP-Socket
syntax
TCP-Listener
syntax
Logger
syntax
Log-Receiver
syntax
Log-Level
syntax
Thread
syntax
Thread-Group
syntax
Subprocess
syntax
Place
syntax
Place-Channel
syntax
Semaphore
syntax
FSemaphore
syntax
Will-Executor
syntax
Pseudo-Random-Generator
syntax
Environment-Variables
syntax
Path-String
syntax
(Pairof s t)
syntax
(Listof t)
syntax
(List t ...)
syntax
(List t ... trest ... bound)
syntax
(List* t t1 ... s)
syntax
(MListof t)
syntax
(MPairof t u)
syntax
MPairTop
syntax
(Boxof t)
syntax
BoxTop
syntax
(Vectorof t)
syntax
(Immutable-Vectorof t)
syntax
(Mutable-Vectorof t)
syntax
(Vector t ...)
syntax
(Immutable-Vector t ...)
syntax
(Mutable-Vector t ...)
syntax
FlVector
syntax
ExtFlVector
syntax
FxVector
syntax
VectorTop
syntax
Mutable-VectorTop
syntax
(HashTable k v)
syntax
(Immutable-HashTable k v)
syntax
(Mutable-HashTable k v)
syntax
(Weak-HashTable k v)
syntax
HashTableTop
syntax
Mutable-HashTableTop
syntax
Weak-HashTableTop
syntax
(Setof t)
syntax
(Channelof t)
syntax
ChannelTop
syntax
(Async-Channelof t)
syntax
Async-ChannelTop
syntax
(Parameterof t)
(Parameterof s t)
syntax
(Promise t)
syntax
(Futureof t)
syntax
(Sequenceof t t ...)
syntax
SequenceTop
syntax
(Custodian-Boxof t)
syntax
(Thread-Cellof t)
syntax
Thread-CellTop
syntax
(Weak-Boxof t)
syntax
Weak-BoxTop
syntax
(Ephemeronof t)
syntax
(Evtof t)
syntax
(Syntaxof t)
syntax
Identifier
syntax
Syntax
syntax
Syntax-E
syntax
(Sexpof t)
syntax
Sexp
syntax
Datum
syntax
(Prompt-Tagof s t)
syntax
Prompt-TagTop
syntax
(Continuation-Mark-Keyof t)
syntax
Continuation-Mark-KeyTop
syntax
(-> dom ... rng opt-proposition)
(-> dom ... rest * rng)
(-> dom ... rest ooo bound rng)
(dom ... -> rng opt-proposition)
(dom ... rest * -> rng)
(dom ... rest ooo bound -> rng)
 
            ooo = ...
                   
            dom = type
                | mandatory-kw
                | opt-kw
                   
            rng = type
                | (Values type ...)
                   
   mandatory-kw = keyword type
                   
         opt-kw = [keyword type]
                   
opt-proposition = 
                | : type
                | : pos-proposition
                    neg-proposition
                    object
                   
pos-proposition = 
                | #:+ proposition ...
                   
neg-proposition = 
                | #:- proposition ...
                   
         object = 
                | #:object index
                   
    proposition = Top
                | Bot
                | type
                | (! type)
                | (type @ path-elem ... index)
                | (! type @ path-elem ... index)
                | (and proposition ...)
                | (or proposition ...)
                | (implies proposition ...)
                   
      path-elem = car
                | cdr
                   
          index = positive-integer
                | (positive-integer positive-integer)
                | identifier
syntax
(->* (mandatory-dom ...) optional-doms rest rng)
 
mandatory-dom = type
              | keyword type
                 
optional-doms = 
              | (optional-dom ...)
                 
 optional-dom = type
              | keyword type
                 
         rest = 
              | #:rest type
              | #:rest-star (type ...)
syntax
Top
syntax
Bot
syntax
Procedure
syntax
(U t ...)
syntax
(∩ t ...)
syntax
(case-> fun-ty ...)
syntax
(t t1 t2 ...)
syntax
(All (a ...) t)
(All (a ... a ooo) t)
syntax
(Values t ...)
syntax
v
syntax
(quote val)
syntax
i
syntax
(Rec n t)
syntax
(Struct st)
syntax
(Struct-Type st)
syntax
Struct-TypeTop
syntax
(Prefab key type ...)
syntax
(PrefabTop key field-count)
syntax
Union
syntax
Intersection
syntax
→
syntax
case→
syntax
∀
syntax
(Option t)
syntax
(Opaque t)
syntax
(let maybe-tvars (binding ...) . body)
(let loop maybe-ret (binding ...) . body)
 
    binding = [var e]
            | [var : type e]
               
maybe-tvars = 
            | #:forall (tvar ...)
            | #:∀ (tvar ...)
               
  maybe-ret = 
            | : type0
syntax
(letrec (binding ...) . body)
syntax
(let* (binding ...) . body)
syntax
(let-values ([(var+type ...) e] ...) . body)
syntax
(letrec-values ([(var+type ...) e] ...) . body)
syntax
(let*-values ([(var+type ...) e] ...) . body)
syntax
(let/cc v : t . body)
syntax
(let/ec v : t . body)
syntax
(lambda maybe-tvars formals maybe-ret . body)
 
    formals = (formal ...)
            | (formal ... . rst)
               
     formal = var
            | [var default-expr]
            | [var : type]
            | [var : type default-expr]
            | keyword var
            | keyword [var : type]
            | keyword [var : type default-expr]
               
        rst = var
            | [var : type *]
            | [var : type ooo bound]
               
maybe-tvars = 
            | #:forall (tvar ...)
            | #:∀ (tvar ...)
            | #:forall (tvar ... ooo)
            | #:∀ (tvar ... ooo)
               
  maybe-ret = 
            | : type
syntax
(λ formals . body)
syntax
(case-lambda maybe-tvars [formals body] ...)
syntax
(for type-ann-maybe (for-clause ...)
  expr ...+)
 
type-ann-maybe = 
               | : u
                  
    for-clause = [id : t seq-expr]
               | [(binding ...) seq-expr]
               | [id seq-expr]
               | #:when guard
                  
       binding = id
               | [id : t]
syntax
(for/list type-ann-maybe (for-clause ...) expr ...+)
syntax
(for/hash type-ann-maybe (for-clause ...) expr ...+)
syntax
(for/hasheq type-ann-maybe (for-clause ...) expr ...+)
syntax
(for/hasheqv type-ann-maybe (for-clause ...) expr ...+)
syntax
(for/vector type-ann-maybe (for-clause ...) expr ...+)
syntax
(for/or   type-ann-maybe (for-clause ...) expr ...+)
syntax
(for/sum type-ann-maybe (for-clause ...) expr ...+)
syntax
(for/product type-ann-maybe (for-clause ...) expr ...+)
syntax
(for/set type-ann-maybe (for-clause ...) expr ...+)
syntax
(for*/list type-ann-maybe (for-clause ...) expr ...+)
syntax
(for*/hash type-ann-maybe (for-clause ...) expr ...+)
syntax
(for*/hasheq type-ann-maybe (for-clause ...) expr ...+)
syntax
(for*/hasheqv type-ann-maybe (for-clause ...) expr ...+)
syntax
(for*/vector type-ann-maybe (for-clause ...) expr ...+)
syntax
(for*/or   type-ann-maybe (for-clause ...) expr ...+)
syntax
(for*/sum type-ann-maybe (for-clause ...) expr ...+)
syntax
(for*/product type-ann-maybe (for-clause ...) expr ...+)
syntax
(for*/set type-ann-maybe (for-clause ...) expr ...+)
syntax
(for/and type-ann-maybe (for-clause ...) expr ...+)
syntax
(for/first type-ann-maybe (for-clause ...) expr ...+)
syntax
(for/last type-ann-maybe (for-clause ...) expr ...+)
syntax
(for*/and type-ann-maybe (for-clause ...) expr ...+)
syntax
(for*/first type-ann-maybe (for-clause ...) expr ...+)
syntax
(for*/last type-ann-maybe (for-clause ...) expr ...+)
syntax
(for/lists type-ann-maybe ([id : t] ...)
  (for-clause ...)
  expr ...+)
syntax
(for/fold  type-ann-maybe ([id : t init-expr] ...)
  (for-clause ...)
  expr ...+)
syntax
(for* void-ann-maybe (for-clause ...)
  expr ...+)
syntax
(for*/lists type-ann-maybe ([id : t] ...)
  (for-clause ...)
  expr ...+)
syntax
(for*/fold  type-ann-maybe ([id : t init-expr] ...)
  (for-clause ...)
  expr ...+)
syntax
(do : u ([id : t init-expr step-expr-maybe] ...)
        (stop?-expr finish-expr ...)
  expr ...+)
 
step-expr-maybe = 
                | step-expr
syntax
(define maybe-tvars v maybe-ann e)
(define maybe-tvars header maybe-ann . body)
 
     header = (function-name . formals)
            | (header . formals)
               
    formals = (formal ...)
            | (formal ... . rst)
               
     formal = var
            | [var default-expr]
            | [var : type]
            | [var : type default-expr]
            | keyword var
            | keyword [var : type]
            | keyword [var : type default-expr]
               
        rst = var
            | [var : type *]
            | [var : type ooo bound]
               
maybe-tvars = 
            | #:forall (tvar ...)
            | #:∀ (tvar ...)
            | #:forall (tvar ... ooo)
            | #:∀ (tvar ... ooo)
               
  maybe-ann = 
            | : type
syntax
(struct maybe-type-vars name-spec ([f : t] ...) options ...)
 
maybe-type-vars = 
                | (v ...)
                   
      name-spec = name-id
                | name-id parent
                   
        options = #:transparent
                | #:mutable
                | #:prefab
                | #:constructor-name constructor-id
                | #:extra-constructor-name constructor-id
                | #:type-name type-id
syntax
(define-struct maybe-type-vars name-spec ([f : t] ...) options ...)
 
maybe-type-vars = 
                | (v ...)
                   
      name-spec = name-id
                | name-id parent
                   
        options = #:transparent
                | #:mutable
                | #:type-name type-id
syntax
(define-struct/exec name-spec ([f : t] ...) [e : proc-t] maybe-type-name)
 
      name-spec = name-id
                | name-id parent
                   
maybe-type-name = 
                | #:type-name type-id
syntax
(define-type name t maybe-omit-def)
(define-type (name v ...) t maybe-omit-def)
 
maybe-omit-def = #:omit-define-syntaxes
               | 
syntax
(make-predicate t)
syntax
(define-predicate name t)
syntax
(: v t)
(: v : t)
syntax
(provide: [v t] ...)
syntax
#{v : t}
syntax
(ann e t)
syntax
#{e :: t}
syntax
(cast e t)
syntax
(inst e t ...)
(inst e t ... t ooo bound)
syntax
(row-inst e row)
syntax
#{e @ t ...}
syntax
#{e @ t ... t ooo bound}
syntax
(require/typed m rt-clause ...)
 
    rt-clause = [maybe-renamed t]
              | [#:struct maybe-tvars name-id ([f : t] ...)
                     struct-option ...]
              | [#:struct maybe-tvars (name-id parent) ([f : t] ...)
                     struct-option ...]
              | [#:opaque t pred]
              | [#:signature name ([id : t] ...)]
                 
maybe-renamed = id
              | (orig-id new-id)
                 
  maybe-tvars = 
              | (type-variable ...)
                 
struct-option = #:constructor-name constructor-id
              | #:extra-constructor-name constructor-id
              | #:type-name type-id
syntax
(require/typed/provide m rt-clause ...)
syntax
with-handlers
procedure
(default-continuation-prompt-tag)
 -> (-> (Prompt-Tagof Any (Any -> Any)))
syntax
(#%module-begin form ...)
syntax
(#%top-interaction . form)
type
GIF-Stream
type
GIF-Colormap
type
JSExpr
type
Cookie
type
FTP-Connection
type
HTTP-Connection
type
IMAP-Connection
type
Path/Param
type
URL
type
URL-Exception
type
PortT
type
PortT/Bytes
type
SSL-Protocol
type
SSL-Server-Context
type
SSL-Client-Context
type
SSL-Context
type
SSL-Listener
type
SSL-Verify-Source
syntax
(for/extflvector type-ann-maybe (for-clause ...) expr ...+)
syntax
(for*/extflvector type-ann-maybe (for-clause ...) expr ...+)
syntax
(for/flvector type-ann-maybe (for-clause ...) expr ...+)
syntax
(for*/flvector type-ann-maybe (for-clause ...) expr ...+)
type
Char-Set
type
Cursor
type
Time
type
Date
syntax
(class superclass-expr
  maybe-type-parameters
  class-clause ...)
 
         class-clause = (inspect inspector-expr)
                      | (init init-decl ...)
                      | (init-field init-decl ...)
                      | (init-rest id/type)
                      | (field field-decl ...)
                      | (inherit-field field-decl ...)
                      | (public maybe-renamed/type ...)
                      | (pubment maybe-renamed/type ...)
                      | (override maybe-renamed/type ...)
                      | (augment maybe-renamed/type ...)
                      | (private id/type ...)
                      | (inherit id ...)
                      | method-definition
                      | definition
                      | expr
                      | (begin class-clause ...)
                         
maybe-type-parameters = 
                      | #:forall (type-variable ...)
                      | #:∀ (type-variable ...)
                         
            init-decl = id/type
                      | [renamed]
                      | [renamed : type-expr]
                      | [maybe-renamed default-value-expr]
                      | [maybe-renamed : type-expr default-value-expr]
                         
           field-decl = (maybe-renamed default-value-expr)
                      | (maybe-renamed : type-expr default-value-expr)
                         
              id/type = id
                      | [id : type-expr]
                         
   maybe-renamed/type = maybe-renamed
                      | [maybe-renamed : type-expr]
                         
        maybe-renamed = id
                      | renamed
                         
              renamed = (internal-id external-id)
syntax
(define/public id expr)
(define/public (id . formals) body ...+)
syntax
(define/override id expr)
(define/override (id . formals) body ...+)
syntax
(define/pubment id expr)
(define/pubment (id . formals) body ...+)
syntax
(define/augment id expr)
(define/augment (id . formals) body ...+)
syntax
(define/private id expr)
(define/private (id . formals) body ...+)
syntax
(init init-decl ...)
syntax
(init-field init-decl ...)
syntax
(field field-decl ...)
syntax
(inherit-field field-decl ...)
syntax
(init-rest id/type)
syntax
(public maybe-renamed/type ...)
syntax
(pubment maybe-renamed/type ...)
syntax
(override maybe-renamed/type ...)
syntax
(augment maybe-renamed/type ...)
syntax
(private id/type ...)
syntax
(inherit maybe-renamed/type ...)
syntax
(Class class-type-clause ...)
 
class-type-clause = name+type
                  | (init init-type ...)
                  | (init-field init-type ...)
                  | (init-rest name+type)
                  | (field name+type ...)
                  | (augment name+type ...)
                  | #:implements type-alias-id
                  | #:implements/inits inits-id
                  | #:row-var row-var-id
                     
        init-type = name+type
                  | [id type #:optional]
                     
        name+type = [id type]
syntax
ClassTop
syntax
(Object object-type-clause ...)
 
object-type-clause = name+type
                   | (field name+type ...)
syntax
(Instance class-type-expr)
syntax
(Row class-type-clause ...)
syntax
(define-signature id extension-decl
  (sig-elem ...))
 
extension-decl = 
               | extends sig-id
                  
      sig-elem = [id : type]
syntax
(unit
  (import sig-spec ...)
  (export sig-spec ...)
  init-depends-decl
  unit-body-expr-or-defn
  ...)
 
         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 sig-id ...)
syntax
(invoke-unit unit-expr)
(invoke-unit unit-expr (import sig-spec ...))
syntax
(define-values/invoke-unit unit-expr
  (import def-sig-spec ...)
  (export def-sig-spec ...))
 
def-sig-spec = sig-id
             | (prefix id def-sig-spec)
             | (rename def-sig-spec (id id) ...)
syntax
(compound-unit
  (import link-binding ...)
  (export link-id ...)
  (link linkage-decl ...))
 
link-binding = (link-id : sig-id)
                
linkage-decl = ((link-binding ...) unit-expr link-id ...)
syntax
(define-unit unit-id
  (import sig-spec ...)
  (export sig-spec ...)
  init-depends-decl
  unit-body-expr-or-defn
  ...)
syntax
(compound-unit/infer
  (import infer-link-import ...)
  (export infer-link-export ...)
  (link infer-linkage-decl ...))
 
 infer-link-import = sig-id
                   | (link-id : sig-id)
                      
 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 link-id ...)
  (link linkage-decl ...))
syntax
(define-compound-unit/infer id
  (import link-binding ...)
  (export infer-link-export ...)
  (link infer-linkage-decl ...))
syntax
(invoke-unit/infer unit-spec)
 
unit-spec = unit-id
          | (link link-unit-id ...)
syntax
(define-values/invoke-unit/infer maybe-exports unit-spec)
 
maybe-exports = 
              | (export sig-sepc ...)
                 
    unit-spec = unit-id
              | (link link-unit-id ...)
syntax
(unit-from-context sig-spec)
syntax
(define-unit-from-context id sig-spec)
syntax
(Unit
  (import sig-id ...)
  (export sig-id ...)
  optional-init-depend-clause
  optional-body-type-clause)
 
optional-init-depend-clause = 
                            | (init-depend sig-id ...)
                               
  optional-body-type-clause = 
                            | type
                            | (Values type ...)
syntax
UnitTop
syntax
(require/typed m rt-clause ...)
 
    rt-clause = [maybe-renamed t]
              | [#:struct name ([f : t] ...)
                     struct-option ...]
              | [#:struct (name parent) ([f : t] ...)
                     struct-option ...]
              | [#:opaque t pred]
              | [#:signature name ([id : t] ...)]
                 
maybe-renamed = id
              | (orig-id new-id)
                 
struct-option = #:constructor-name constructor-id
              | #:extra-constructor-name constructor-id
procedure
(assert v) -> A
  v : (U #f A)
(assert v p?) -> B
  v : A
  p? : (A -> Any : B)
syntax
(with-asserts ([id maybe-pred] ...) body ...+)
 
maybe-pred = 
           | predicate
procedure
(defined? v) -> boolean?
  v : any/c
procedure
(index? v) -> boolean?
  v : any/c
syntax
(typecheck-fail orig-stx maybe-msg maybe-id)
 
maybe-msg = 
          | msg-string
             
 maybe-id = 
          | #:covered-id id
syntax
(assert-typecheck-fail body-expr)
(assert-typecheck-fail body-expr #:result result-expr)
syntax
(require/untyped-contract maybe-begin module [name subtype] ...)
 
maybe-begin = 
            | (begin expr ...)
syntax
(define-typed/untyped-identifier name typed-name untyped-name)
procedure
(syntax-local-typed-context?) -> boolean?
syntax
(:type maybe-verbose t)
 
maybe-verbose = 
              | #:verbose
syntax
(:print-type e)
syntax
(:query-type/args f t ...)
syntax
(:query-type/result f t)
syntax
(with-type result-spec fv-clause body ...+)
(with-type export-spec fv-clause body ...+)
 
  fv-clause = 
            | #:freevars ([id fv-type] ...)
               
result-spec = #:result type
               
export-spec = ([export-id export-type] ...)
syntax
(unsafe-require/typed m rt-clause ...)
syntax
(unsafe-provide provide-spec ...)
syntax
(unsafe-require/typed/provide m rt-clause ...)
syntax
(lambda: formals . body)
 
formals = ([v : t] ...)
        | ([v : t] ... v : t *)
        | ([v : t] ... v : t ooo bound)
syntax
(λ: formals . body)
syntax
(plambda: (a ...) formals . body)
(plambda: (a ... b ooo) formals . body)
syntax
(opt-lambda: formals . body)
 
formals = ([v : t] ... [v : t default] ...)
        | ([v : t] ... [v : t default] ... v : t *)
        | ([v : t] ... [v : t default] ... v : t ooo bound)
syntax
(popt-lambda: (a ...) formals . body)
(popt-lambda: (a ... a ooo) formals . body)
syntax
case-lambda:
syntax
(pcase-lambda: (a ...) [formals body] ...)
(pcase-lambda: (a ... b ooo) [formals body] ...)
syntax
(let: ([v : t e] ...) . body)
(let: loop : t0 ([v : t e] ...) . body)
syntax
(plet: (a ...) ([v : t e] ...) . body)
syntax
(letrec: ([v : t e] ...) . body)
syntax
(let*: ([v : t e] ...) . body)
syntax
(let-values: ([([v : t] ...) e] ...) . body)
syntax
(letrec-values: ([([v : t] ...) e] ...) . body)
syntax
(let*-values: ([([v : t] ...) e] ...) . body)
syntax
(let/cc: v : t . body)
syntax
(let/ec: v : t . body)
syntax
(define: v : t e)
(define: (a ...) v : t e)
(define: (a ... a ooo) v : t e)
(define: (f . formals) : t . body)
(define: (a ...) (f . formals) : t . body)
(define: (a ... a ooo) (f . formals) : t . body)
syntax
struct:
syntax
define-struct:
syntax
define-struct/exec:
syntax
for:
syntax
for*/and:
syntax
for*/first:
syntax
for*/flvector:
syntax
for*/extflvector:
syntax
for*/fold:
syntax
for*/hash:
syntax
for*/hasheq:
syntax
for*/hasheqv:
syntax
for*/last:
syntax
for*/list:
syntax
for*/lists:
syntax
for*/set:
syntax
for*/or:
syntax
for*/product:
syntax
for*/sum:
syntax
for*/vector:
syntax
for*:
syntax
for/and:
syntax
for/first:
syntax
for/flvector:
syntax
for/extflvector:
syntax
for/fold:
syntax
for/hash:
syntax
for/hasheq:
syntax
for/hasheqv:
syntax
for/last:
syntax
for/list:
syntax
for/lists:
syntax
for/set:
syntax
for/or:
syntax
for/product:
syntax
for/sum:
syntax
for/vector:
syntax
do:
syntax
define-type-alias
syntax
define-typed-struct
syntax
require/opaque-type
syntax
require-typed-struct
syntax
require-typed-struct/provide
syntax
pdefine:
syntax
(pred t)
syntax
Un
syntax
mu
syntax
Tuple
syntax
Parameter
syntax
Pair
syntax
values
syntax
(require/typed m rt-clause ...)
 
    rt-clause = [r t]
              | [struct name ([f : t] ...)
                     struct-option ...]
              | [struct (name parent) ([f : t] ...)
                     struct-option ...]
              | [opaque t pred]
                 
struct-option = #:constructor-name constructor-id
              | #:extra-constructor-name constructor-id
syntax
require-typed-struct
syntax
(declare-refinement id)
syntax
(Refinement id)
syntax
(define-typed-struct/exec forms ...)
syntax
(define-new-subtype name (constructor t))
syntax
(Refine [id : type] proposition)
 
    proposition = Top
                | Bot
                | (: symbolic-object type)
                | (! symbolic-object type)
                | (and proposition ...)
                | (or proposition ...)
                | (when proposition proposition)
                | (unless proposition proposition)
                | (if proposition proposition proposition)
                | (linear-comp symbolic-object symbolic-object)
                   
    linear-comp = <
                | <=
                | =
                | >=
                | >
                   
symbolic-object = exact-integer
                | symbolic-path
                | (+ symbolic-object ...)
                | (- symbolic-object ...)
                | (* exact-integer symbolic-object)
                   
  symbolic-path = id
                | (path-elem symbolic-path)
                   
      path-elem = car
                | cdr
                | vector-length
syntax
(! sym-obj type)
syntax
(-> ([id : opt-deps arg-type] ...)
    opt-pre
    range-type
    opt-props)
 
    opt-deps = 
             | (id ...)
                
     opt-pre = 
             | #:pre (id ...) prop
                
   opt-props = 
             | opt-pos-prop opt-neg-prop opt-obj
                
opt-pos-prop = 
             | #:+ prop
                
opt-neg-prop = 
             | #:- prop
                
     opt-obj = 
             | #:object obj
