25161
((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/base-env/extra-procs.rkt") (q lib "typed/scheme/base.rkt") (q lib "typed/untyped-utils.rkt") (q lib "typed/racket/unsafe.rkt") (q lib "typed/racket/base.rkt")) () (h ! (equal) ((c form c (c (? . 0) q for/fold:)) q (28332 . 2)) ((c form c (c (? . 0) q define-struct/exec:)) q (27855 . 2)) ((c form c (c (? . 1) q Inexact-Real)) q (117 . 2)) ((c form c (c (? . 0) q let/cc:)) q (27253 . 2)) ((c form c (c (? . 1) q Negative-Inexact-Real)) q (1134 . 2)) ((c form c (c (? . 2) q GIF-Stream)) q (16464 . 2)) ((c form c (c (? . 0) q define-predicate)) q (15087 . 2)) ((c form c (c (? . 1) q ExtFlonum-Positive-Zero)) q (1836 . 2)) ((c form c (c (? . 1) q Parameterization)) q (2594 . 2)) ((c form c (c (? . 1) q Flonum-Negative-Zero)) q (705 . 2)) ((c form c (c (? . 1) q Nonpositive-Single-Flonum)) q (933 . 2)) ((c form c (c (? . 1) q Float-Negative-Zero)) q (680 . 2)) ((c form c (c (? . 4) q define/private)) q (19518 . 3)) ((c form c (c (? . 0) q for*/hashalw)) q (10626 . 2)) ((c form c (c (? . 0) q for*/hasheqv)) q (10541 . 2)) ((c form c (c (? . 1) q Boxof)) q (3205 . 2)) ((c form c (c (? . 1) q Custodian-Boxof)) q (4095 . 2)) ((c form c (c (? . 0) q define-typed-struct)) q (28617 . 2)) ((c form c (c (? . 0) q for*/extflvector:)) q (27952 . 2)) ((c form c (c (? . 1) q Inexact-Complex)) q (229 . 2)) ((c def c (c (? . 0) q default-continuation-prompt-tag)) q (16255 . 3)) ((c form c (c (? . 0) q ann)) q (15201 . 2)) ((c form c (c (? . 0) q with-handlers*)) q (16233 . 2)) ((c form c (c (? . 2) q PortT/Bytes)) q (16651 . 2)) ((c form c (c (? . 1) q Syntax-E)) q (4360 . 2)) ((c form c (c (? . 0) q for/lists:)) q (28477 . 2)) ((c form c (c (? . 1) q Evtof)) q (4273 . 2)) ((c form c (c (? . 1) q Nonnegative-Single-Flonum)) q (874 . 2)) ((c form c (c (? . 0) q for/vector)) q (9806 . 2)) ((c form c (c (? . 2) q for*/flvector)) q (17022 . 2)) ((c form c (c (? . 0) q for*/sum)) q (10875 . 2)) ((c form c (c (? . 3) q All)) q (6804 . 3)) ((c form c (c (? . 1) q Compiled-Expression)) q (2395 . 2)) ((c def c (c (? . 6) q defined?)) q (24599 . 3)) ((c form c (c (? . 0) q case-lambda)) q (8869 . 2)) ((c form c (c (? . 0) q row-inst)) q (15317 . 2)) ((c form c (c (? . 1) q Integer)) q (62 . 2)) ((c form c (c (? . 0) q let/ec:)) q (27287 . 2)) ((c form c (c (? . 0) q for/lists)) q (11530 . 6)) ((c form c (c (? . 1) q SequenceTop)) q (4078 . 2)) ((c form c (c (? . 1) q MPairTop)) q (3191 . 2)) ((c form c (c (? . 3) q Opaque)) q (7372 . 2)) ((c form c (c (? . 2) q Draw-Caret)) q (17158 . 2)) ((c form c (c (? . 1) q Real)) q (155 . 2)) ((c form c (c (? . 1) q Struct-Type-Property)) q (2504 . 2)) ((c form c (c (? . 1) q Negative-Float)) q (592 . 2)) ((c form c (c (? . 1) q Place)) q (2791 . 2)) ((c form c (c (? . 1) q Sexpof)) q (4374 . 2)) ((c form c (c (? . 0) q let*-values)) q (7944 . 2)) ((c form c (c (? . 2) q Edit-Op)) q (17090 . 2)) ((c form c (c (? . 1) q ExtFlonum-Negative-Zero)) q (1807 . 2)) ((c form c (c (? . 0) q for*/first)) q (11447 . 2)) ((c form c (c (? . 1) q UnitTop)) q (23761 . 2)) ((c form c (c (? . 1) q Positive-Single-Flonum)) q (846 . 2)) ((c form c (c (? . 0) q require-typed-struct/provide)) q (28699 . 2)) ((c form c (c (? . 1) q ChannelTop)) q (3849 . 2)) ((c form c (c (? . 1) q U)) q (6683 . 2)) ((c form c (c (? . 1) q Nonnegative-Exact-Rational)) q (1329 . 2)) ((c form c (c (? . 1) q Un)) q (28768 . 2)) ((c form c (c (? . 1) q Nonpositive-Fixnum)) q (1666 . 2)) ((c form c (c (? . 1) q Single-Flonum-Complex)) q (202 . 2)) ((c form c (c (? . 5) q define-unit-from-context)) q (23328 . 2)) ((c form c (c (? . 4) q init-rest)) q (19736 . 2)) ((c form c (c (? . 1) q Byte)) q (1528 . 2)) ((c form c (c (? . 3) q ->)) q (4557 . 53)) ((c form c (c (? . 5) q unit)) q (21027 . 16)) ((c form c (c (? . 1) q Nonpositive-Real)) q (1482 . 2)) ((c form c (c (? . 1) q Vectorof)) q (3245 . 2)) ((c form c (c (? . 1) q FlVector)) q (3476 . 2)) ((c form c (c (? . 3) q →)) q (7266 . 2)) ((c form c (c (? . 0) q let/ec)) q (8035 . 2)) ((c form c (c (? . 0) q require/opaque-type)) q (28644 . 2)) ((c form c (c (? . 1) q FSemaphore)) q (2836 . 2)) ((c form c (c (? . 1) q True)) q (1917 . 2)) ((c form c (c (? . 0) q letrec-values:)) q (27131 . 2)) ((c form c (c (? . 1) q Inspector)) q (2631 . 2)) ((c form c (c (? . 0) q for/hasheqv:)) q (28403 . 2)) ((c form c (c (? . 0) q for/first:)) q (28269 . 2)) ((c form c (c (? . 0) q define-struct)) q (14538 . 12)) ((c form c (c (? . 1) q Positive-Integer)) q (328 . 2)) ((c form c (c (? . 1) q Async-Channelof)) q (3865 . 2)) ((c form c (c (? . 1) q Environment-Variables)) q (2900 . 2)) ((c form c (c (? . 1) q Syntaxof)) q (4301 . 2)) ((c form c (c (? . 2) q PortT)) q (16640 . 2)) ((c form c (c (? . 0) q for*/hash:)) q (28014 . 2)) ((c form c (c (? . 0) q define:)) q (27321 . 7)) ((c form c (c (? . 1) q Subprocess)) q (2775 . 2)) ((c form c (c (? . 1) q VectorTop)) q (3521 . 2)) ((c form c (c (? . 3) q Struct-Type)) q (6981 . 2)) ((c form c (c (? . 1) q PRegexp)) q (2116 . 2)) ((c form c (c (? . 0) q for/foldr:)) q (28349 . 2)) ((c form c (c (? . 0) q typecheck-fail)) q (24705 . 8)) ((c form c (c (? . 2) q Char-Set)) q (17190 . 2)) ((c form c (c (? . 0) q for/hasheq:)) q (28384 . 2)) ((c form c (c (? . 0) q for*/product:)) q (28182 . 2)) ((c form c (c (? . 5) q define-compound-unit)) q (22693 . 5)) ((c form c (c (? . 1) q False)) q (1927 . 2)) ((c form c (c (? . 1) q Nonnegative-Flonum)) q (568 . 2)) ((c form c (c (? . 0) q let-values:)) q (27072 . 2)) ((c form c (c (? . 0) q declare-refinement)) q (29369 . 2)) ((c def c (c (? . 6) q assert)) q (24380 . 6)) ((c form c (c (? . 1) q Single-Flonum-Nan)) q (1054 . 2)) ((c form c (c (? . 2) q Threshold)) q (17143 . 2)) ((c form c (c (? . 1) q Log-Level)) q (2730 . 2)) ((c form c (c (? . 0) q lambda:)) q (25971 . 9)) ((c form c (c (? . 4) q public)) q (19764 . 2)) ((c form c (c (? . 4) q augment)) q (19890 . 2)) ((c form c (c (? . 0) q for/hash)) q (9474 . 2)) ((c form c (c (? . 1) q Nonpositive-ExtFlonum)) q (1780 . 2)) ((c form c (c (? . 0) q for/hasheq)) q (9555 . 2)) ((c form c (c (? . 1) q Nonnegative-Real)) q (1441 . 2)) ((c form c (c (? . 0) q for/sum)) q (9968 . 2)) ((c form c (c (? . 0) q for/last:)) q (28443 . 2)) ((c form c (c (? . 0) q for:)) q (27882 . 2)) ((c form c (c (? . 1) q Thread-Cellof)) q (4133 . 2)) ((c form c (c (? . 1) q Security-Guard)) q (2646 . 2)) ((c form c (c (? . 0) q do)) q (12866 . 7)) ((c form c (c (? . 1) q Flonum-Zero)) q (798 . 2)) ((c form c (c (? . 0) q for*/fold:)) q (27977 . 2)) ((c form c (c (? . 3) q Self)) q (7140 . 2)) ((c form c (c (? . 3) q Unit)) q (23376 . 13)) ((c form c (c (? . 1) q MPairof)) q (3158 . 2)) ((c form c (c (? . 0) q for*/vector:)) q (28220 . 2)) ((c form c (c (? . 1) q Continuation-Mark-Keyof)) q (4481 . 2)) ((c form c (c (? . 7) q require/typed)) q (28894 . 12)) ((c form c (c (? . 0) q do:)) q (28581 . 2)) ((c form c (c (? . 1) q Negative-Flonum)) q (612 . 2)) ((c form c (c (? . 0) q for*/sum:)) q (28203 . 2)) ((c form c (c (? . 0) q make-predicate)) q (15060 . 2)) ((c form c (c (? . 1) q Single-Flonum-Zero)) q (1030 . 2)) ((c form c (c (? . 4) q init-field)) q (19628 . 2)) ((c form c (c (? . 5) q invoke-unit/infer)) q (22961 . 5)) ((c form c (c (? . 1) q Float-Complex)) q (183 . 2)) ((c form c (c (? . 1) q Immutable-Vectorof)) q (3276 . 2)) ((c form c (c (? . 3) q Bot)) q (6659 . 2)) ((c form c (c (? . 1) q Real-Zero)) q (1504 . 2)) ((c form c (c (? . 0) q define-struct/exec)) q (27570 . 8)) ((c form c (c (? . 1) q Variable-Reference)) q (2212 . 2)) ((c form c (c (? . 1) q Exact-Positive-Integer)) q (350 . 2)) ((c form c (c (? . 3) q Struct-Property)) q (7101 . 2)) ((c form c (c (? . 1) q Undefined)) q (2282 . 2)) ((c form c (c (? . 1) q Nonpositive-Float)) q (633 . 2)) ((c form c (c (? . 1) q Nothing)) q (24 . 2)) ((c form c (c (? . 3) q Top)) q (6650 . 2)) ((c form c (c (? . 0) q lambda)) q (8068 . 26)) ((c form c (c (? . 2) q for/extflvector)) q (16810 . 2)) ((c form c (c (? . 1) q Pair)) q (28848 . 2)) ((c form c (c (? . 0) q for/hashalw:)) q (28423 . 2)) ((c form c (c (? . 4) q pubment)) q (19805 . 2)) ((c form c (c (? . 1) q Natural)) q (434 . 2)) ((c form c (c (? . 1) q Boolean)) q (1904 . 2)) ((c form c (c (? . 1) q Nonpositive-Exact-Rational)) q (1390 . 2)) ((c form c (c (? . 1) q Place-Channel)) q (2802 . 2)) ((c form c (c (? . 2) q Imp)) q (7150 . 2)) ((c form c (c (? . 0) q for/extflvector:)) q (28308 . 2)) ((c form c (c (? . 1) q Nonnegative-Float)) q (545 . 2)) ((c form c (c (? . 1) q Datum)) q (4413 . 2)) ((c form c (c (? . 0) q for*/lists)) q (12226 . 6)) ((c form c (c (? . 1) q Char)) q (1975 . 2)) ((c form c (c (? . 1) q Negative-ExtFlonum)) q (1756 . 2)) ((c form c (c (? . 1) q Namespace)) q (2175 . 2)) ((c form c (c (? . 1) q Namespace-Anchor)) q (2190 . 2)) ((c form c (c (? . 0) q letrec)) q (7749 . 2)) ((c form c (c (? . 4) q override)) q (19847 . 2)) ((c form c (c (? . 0) q for/fold)) q (11711 . 6)) ((c form c (c (? . 1) q Float-Nan)) q (815 . 2)) ((c form c (c (? . 0) q for/list)) q (9393 . 2)) ((c form c (c (? . 1) q Intersection)) q (7236 . 2)) ((c form c (c (? . 0) q for*/foldr:)) q (27995 . 2)) ((c def c (c (? . 0) q index?)) q (24653 . 3)) ((c form c (c (? . 1) q Compiled-Module-Expression)) q (2363 . 2)) ((c form c (c (? . 1) q Continuation-Mark-Set)) q (2255 . 2)) ((c form c (c (? . 3) q Tuple)) q (28798 . 2)) ((c form c (c (? . 0) q for)) q (8940 . 16)) ((c form c (c (? . 2) q SSL-Verify-Source)) q (16769 . 2)) ((c form c (c (? . 3) q AnyValues)) q (9 . 2)) ((c form c (c (? . 3) q Row)) q (20808 . 2)) ((c form c (c (? . 1) q Null)) q (2236 . 2)) ((c form c (c (? . 3) q →*)) q (7287 . 2)) ((c form c (c (? . 0) q for/hasheqv)) q (9638 . 2)) ((c form c (c (? . 1) q Positive-Real)) q (1422 . 2)) ((c form c (c (? . 1) q Immutable-Vector)) q (3390 . 2)) ((c form c (c (? . 1) q Exact-Imaginary)) q (284 . 2)) ((c form c (c (? . 0) q let)) q (7401 . 13)) ((c form c (c (? . 0) q for*/vector)) q (10711 . 2)) ((c form c (c (? . 1) q Flonum-Nan)) q (830 . 2)) ((c form c (c (? . 1) q Thread-Group)) q (2757 . 2)) ((c form c (c (? . 1) q Index)) q (1557 . 2)) ((c form c (c (? . 1) q Mutable-HashTableTop)) q (3740 . 2)) ((c form c (c (? . 1) q Syntax)) q (4348 . 2)) ((c form c (c (? . 0) q for/hashalw)) q (9722 . 2)) ((c form c (c (? . 2) q with-type)) q (25528 . 10)) ((c form c (c (? . 1) q Impersonator-Property)) q (2530 . 2)) ((c form c (c (? . 1) q Flonum-Positive-Zero)) q (756 . 2)) ((c form c (c (? . 0) q for*/hasheq)) q (10457 . 2)) ((c form c (c (? . 4) q class)) q (17236 . 45)) ((c form c (c (? . 1) q Positive-Float)) q (504 . 2)) ((c form c (c (? . 0) q for/hash:)) q (28367 . 2)) ((c form c (c (? . 5) q define-unit)) q (22048 . 7)) ((c form c (c (? . 3) q ∀)) q (7334 . 2)) ((c form c (c (? . 1) q Thread-CellTop)) q (4169 . 2)) ((c form c (c (? . 2) q IMAP-Connection)) q (16575 . 2)) ((c form c (c (? . 1) q Positive-Flonum)) q (524 . 2)) ((c form c (c (? . 1) q Procedure)) q (6668 . 2)) ((c form c (c (? . 0) q define-struct:)) q (27833 . 2)) ((c form c (c (? . 2) q SSL-Listener)) q (16751 . 2)) ((c form c (c (? . 5) q define-signature)) q (20845 . 8)) ((c form c (c (? . 4) q init)) q (19598 . 2)) ((c form c (c (? . 7) q require-typed-struct)) q (29341 . 2)) ((c form c (c (? . 0) q for*/product)) q (10956 . 2)) ((c form c (c (? . 0) q :kind)) q (25510 . 2)) ((c form c (c (? . 4) q inherit)) q (19963 . 2)) ((c form c (c (? . 3) q mu)) q (28788 . 2)) ((c form c (c (? . 1) q Sexp)) q (4403 . 2)) ((c form c (c (? . 1) q Byte-PRegexp)) q (2146 . 2)) ((c form c (c (? . 0) q :query-type/result)) q (25476 . 2)) ((c form c (c (? . 0) q for*/hasheq:)) q (28032 . 2)) ((c form c (c (? . 0) q require-typed-struct)) q (28671 . 2)) ((c form c (c (? . 2) q for*/extflvector)) q (16882 . 2)) ((c form c (c (? . 1) q Positive-Byte)) q (1538 . 2)) ((c form c (c (? . 0) q for*/hasheqv:)) q (28052 . 2)) ((c form c (c (? . 1) q Float-Positive-Zero)) q (731 . 2)) ((c form c (c (? . 1) q ExtFlonum-Zero)) q (1865 . 2)) ((c form c (c (? . 1) q Listof)) q (2976 . 2)) ((c form c (c (? . 1) q HashTableTop)) q (3722 . 2)) ((c form c (c (? . 5) q define-compound-unit/infer)) q (22816 . 5)) ((c form c (c (? . 0) q let/cc)) q (8002 . 2)) ((c form c (c (? . 2) q Cursor)) q (17204 . 2)) ((c form c (c (? . 5) q define-values/invoke-unit/infer)) q (23065 . 8)) ((c form c (c (? . 1) q Channelof)) q (3817 . 2)) ((c form c (c (? . 0) q let-values)) q (7827 . 2)) ((c form c (c (? . 0) q case-λ)) q (8925 . 2)) ((c form c (c (? . 1) q Logger)) q (2700 . 2)) ((c form c (c (? . 2) q #%module-begin)) q (16347 . 2)) ((c form c (c (? . 3) q Rec)) q (6946 . 2)) ((c form c (c (? . 5) q unit-from-context)) q (23291 . 2)) ((c form c (c (? . 1) q Exact-Number)) q (165 . 2)) ((c form c (c (? . 3) q PrefabTop)) q (7066 . 2)) ((c form c (c (? . 4) q inherit-field)) q (19696 . 2)) ((c form c (c (? . 1) q Single-Flonum)) q (98 . 2)) ((c form c (c (? . 1) q Inexact-Real-Zero)) q (1255 . 2)) ((c form c (c (? . 1) q Float-Zero)) q (782 . 2)) ((c form c (c (? . 0) q for*:)) q (28240 . 2)) ((c form c (c (? . 1) q Nonnegative-Integer)) q (378 . 2)) ((c form c (c (? . 1) q Imaginary)) q (250 . 2)) ((c form c (c (? . 3) q Struct)) q (6963 . 2)) ((c form c (c (? . 0) q λ)) q (8859 . 2)) ((c form c (c (? . 1) q Will-Executor)) q (2852 . 2)) ((c form c (c (? . 2) q SSL-Client-Context)) q (16710 . 2)) ((c form c (c (? . 0) q :print-type)) q (25415 . 2)) ((c form c (c (? . 1) q Identifier)) q (4332 . 2)) ((c form c (c (? . 0) q require/typed)) q (15404 . 20)) ((c form c (c (? . 1) q Mutable-Vectorof)) q (3317 . 2)) ((c form c (c (? . 3) q Has-Struct-Property)) q (7159 . 2)) ((c form c (c (? . 0) q λ:)) q (26204 . 2)) ((c def c (c (? . 8) q syntax-local-typed-context?)) q (25277 . 2)) ((c form c (c (? . 1) q Positive-Index)) q (1568 . 2)) ((c form c (c (? . 0) q for*/and:)) q (27894 . 2)) ((c form c (c (? . 9) q unsafe-provide)) q (25871 . 2)) ((c form c (c (? . 1) q Complex)) q (49 . 2)) ((c form c (c (? . 2) q Path/Param)) q (16596 . 2)) ((c form c (c (? . 0) q for*/flvector:)) q (27930 . 2)) ((c form c (c (? . 0) q struct:)) q (27818 . 2)) ((c form c (c (? . 3) q Refinement)) q (29401 . 2)) ((c form c (c (? . 4) q field)) q (19664 . 2)) ((c form c (c (? . 4) q define/pubment)) q (19358 . 3)) ((c form c (c (? . 0) q for/and)) q (11204 . 2)) ((c form c (c (? . 1) q One)) q (1519 . 2)) ((c form c (c (? . 2) q LoadFileKind)) q (16792 . 2)) ((c def c (c (? . 10) q prop:procedure)) q (16417 . 2)) ((c form c (c (? . 1) q Resolved-Module-Path)) q (2337 . 2)) ((c form c (c (? . 1) q Nonpositive-Inexact-Real)) q (1161 . 2)) ((c form c (c (? . 1) q Inexact-Real-Positive-Zero)) q (1223 . 2)) ((c form c (c (? . 0) q for/product)) q (10048 . 2)) ((c form c (c (? . 8) q require/untyped-contract)) q (24970 . 5)) ((c form c (c (? . 1) q Negative-Real)) q (1463 . 2)) ((c form c (c (? . 1) q Any)) q (0 . 2)) ((c form c (c (? . 0) q require/typed/provide)) q (16162 . 2)) ((c form c (c (? . 1) q Positive-Fixnum)) q (1600 . 2)) ((c form c (c (? . 0) q for/sum:)) q (28546 . 2)) ((c form c (c (? . 3) q ->*)) q (6242 . 15)) ((c form c (c (? . 0) q inst)) q (15259 . 3)) ((c form c (c (? . 0) q cast)) q (15239 . 2)) ((c form c (c (? . 1) q Pseudo-Random-Generator)) q (2871 . 2)) ((c form c (c (? . 2) q Cookie)) q (16510 . 2)) ((c form c (c (? . 2) q GIF-Colormap)) q (16480 . 2)) ((c form c (c (? . 1) q Negative-Single-Flonum)) q (905 . 2)) ((c form c (c (? . 5) q invoke-unit)) q (21489 . 3)) ((c form c (c (? . 1) q Setof)) q (3789 . 2)) ((c form c (c (? . 0) q let*:)) q (27028 . 2)) ((c form c (c (? . 9) q unsafe-require/typed/provide)) q (25914 . 2)) ((c form c (c (? . 0) q struct)) q (13978 . 16)) ((c form c (c (? . 1) q String)) q (1938 . 2)) ((c form c (c (? . 0) q pcase-lambda:)) q (26718 . 3)) ((c form c (c (? . 0) q for/or)) q (9889 . 2)) ((c form c (c (? . 5) q compound-unit)) q (21809 . 9)) ((c form c (c (? . 5) q compound-unit/infer)) q (22191 . 15)) ((c form c (c (? . 3) q Prefab)) q (7024 . 2)) ((c form c (c (? . 1) q Struct-TypeTop)) q (7004 . 2)) ((c form c (c (? . 10) q values)) q (28870 . 2)) ((c form c (c (? . 0) q for*/fold)) q (12414 . 6)) ((c form c (c (? . 1) q Union)) q (7213 . 2)) ((c form c (c (? . 2) q Time)) q (17216 . 2)) ((c form c (c (? . 1) q Thread)) q (2745 . 2)) ((c form c (c (? . 3) q Refine)) q (29523 . 32)) ((c form c (c (? . 2) q File-Format)) q (17126 . 2)) ((c form c (c (? . 1) q Void)) q (1985 . 2)) ((c form c (c (? . 1) q MListof)) q (3128 . 2)) ((c form c (c (? . 0) q for/vector:)) q (28562 . 2)) ((c form c (c (? . 1) q Zero)) q (494 . 2)) ((c form c (c (? . 1) q Input-Port)) q (1995 . 2)) ((c form c (c (? . 1) q Continuation-Mark-KeyTop)) q (4527 . 2)) ((c form c (c (? . 0) q popt-lambda:)) q (26577 . 3)) ((c form c (c (? . 1) q ExtFlonum)) q (1690 . 2)) ((c form c (c (? . 1) q Nonnegative-Fixnum)) q (1621 . 2)) ((c form c (c (? . 0) q define-typed-struct/exec)) q (29425 . 2)) ((c form c (c (? . 0) q for*/hash)) q (10375 . 2)) ((c form c (c (? . 1) q Flonum)) q (86 . 2)) ((c form c (c (? . 4) q define/augment)) q (19438 . 3)) ((c form c (c (? . 0) q letrec-values)) q (7884 . 2)) ((c form c (c (? . 1) q Internal-Definition-Context)) q (2420 . 2)) ((c form c (c (? . 0) q define-new-subtype)) q (29471 . 2)) ((c form c (c (? . 0) q for*/set)) q (11123 . 2)) ((c form c (c (? . 0) q for/and:)) q (28253 . 2)) ((c form c (c (? . 1) q FxVector)) q (3507 . 2)) ((c form c (c (? . 0) q for/foldr)) q (11896 . 9)) ((c form c (c (? . 1) q Byte-Regexp)) q (2129 . 2)) ((c form c (c (? . 1) q Positive-ExtFlonum)) q (1705 . 2)) ((c form c (c (? . 1) q Path-String)) q (2927 . 2)) ((c form c (c (? . 0) q for*/last)) q (11041 . 2)) ((c form c (c (? . 1) q Number)) q (37 . 2)) ((c form c (c (? . 0) q for*/and)) q (11366 . 2)) ((c form c (c (? . 1) q Bytes)) q (2164 . 2)) ((c form c (c (? . 1) q Ephemeronof)) q (4239 . 2)) ((c form c (c (? . 0) q plet:)) q (26921 . 2)) ((c form c (c (? . 0) q for/set)) q (10213 . 2)) ((c form c (c (? . 1) q Single-Flonum-Negative-Zero)) q (964 . 2)) ((c form c (c (? . 0) q let*)) q (7789 . 2)) ((c form c (c (? . 3) q Instance)) q (20773 . 2)) ((c form c (c (? . 0) q for/or:)) q (28511 . 2)) ((c form c (c (? . 1) q Pairof)) q (2944 . 2)) ((c form c (c (? . 1) q Module-Path-Index)) q (2314 . 2)) ((c form c (c (? . 1) q Fixnum)) q (1588 . 2)) ((c form c (c (? . 2) q SSL-Context)) q (16734 . 2)) ((c form c (c (? . 1) q Positive-Exact-Rational)) q (1300 . 2)) ((c form c (c (? . 1) q Exact-Nonnegative-Integer)) q (403 . 2)) ((c form c (c (? . 3) q Class)) q (20005 . 17)) ((c form c (c (? . 0) q for*/lists:)) q (28130 . 2)) ((c form c (c (? . 1) q Path)) q (2068 . 2)) ((c form c (c (? . 1) q Option)) q (7343 . 2)) ((c form c (c (? . 0) q opt-lambda:)) q (26328 . 6)) ((c form c (c (? . 1) q Custodian)) q (2616 . 2)) ((c form c (c (? . 1) q Inexact-Real-Negative-Zero)) q (1191 . 2)) ((c form c (c (? . 1) q Read-Table)) q (2557 . 2)) ((c form c (c (? . 1) q Port)) q (2058 . 2)) ((c form c (c (? . 0) q assert-typecheck-fail)) q (24870 . 3)) ((c form c (c (? . 1) q Negative-Fixnum)) q (1645 . 2)) ((c form c (c (? . 1) q Positive-Inexact-Real)) q (1077 . 2)) ((c form c (c (? . 1) q Promise)) q (3979 . 2)) ((c form c (c (? . 0) q let*-values:)) q (27193 . 2)) ((c form c (c (? . 8) q define-typed/untyped-identifier)) q (25103 . 2)) ((c form c (c (? . 1) q Exact-Complex)) q (265 . 2)) ((c form c (c (? . 3) q Some)) q (6855 . 2)) ((c form c (c (? . 1) q Output-Port)) q (2011 . 2)) ((c form c (c (? . 1) q Mutable-VectorTop)) q (3536 . 2)) ((c form c (c (? . 0) q with-asserts)) q (24495 . 5)) ((c form c (c (? . 1) q Bytes-Converter)) q (2573 . 2)) ((c form c (c (? . 1) q Nonpositive-Integer)) q (469 . 2)) ((c form c (c (? . 0) q letrec:)) q (26982 . 2)) ((c form c (c (? . 2) q #%top-interaction)) q (16382 . 2)) ((c form c (c (? . 1) q UDP-Socket)) q (2666 . 2)) ((c form c (c (? . 0) q define)) q (13048 . 30)) ((c form c (c (? . 3) q Parameter)) q (28821 . 2)) ((c form c (c (? . 3) q Values)) q (6880 . 2)) ((c form c (c (? . 0) q for/set:)) q (28495 . 2)) ((c form c (c (? . 5) q define-values/invoke-unit)) q (21571 . 8)) ((c form c (c (? . 1) q Nonnegative-Inexact-Real)) q (1104 . 2)) ((c form c (c (? . 3) q case->)) q (6743 . 2)) ((c form c (c (? . 1) q BoxTop)) q (3233 . 2)) ((c form c (c (? . 1) q TCP-Listener)) q (2682 . 2)) ((c form c (c (? . 3) q pred)) q (28751 . 2)) ((c form c (c (? . 1) q Inexact-Real-Nan)) q (1278 . 2)) ((c form c (c (? . 0) q for/flvector:)) q (28287 . 2)) ((c form c (c (? . 1) q Vector)) q (3356 . 2)) ((c form c (c (? . 1) q Futureof)) q (4009 . 2)) ((c form c (c (? . 0) q for*/set:)) q (28149 . 2)) ((c form c (c (? . 1) q Nonpositive-Flonum)) q (656 . 2)) ((c form c (c (? . 3) q !)) q (30639 . 2)) ((c form c (c (? . 1) q EOF)) q (2246 . 2)) ((c form c (c (? . 1) q Exact-Rational)) q (135 . 2)) ((c form c (c (? . 4) q define/public)) q (19198 . 3)) ((c form c (c (? . 1) q Mutable-Vector)) q (3434 . 2)) ((c form c (c (? . 1) q Mutable-HashTable)) q (3639 . 2)) ((c form c (c (? . 1) q Log-Receiver)) q (2712 . 2)) ((c form c (c (? . 2) q Read/Write-Format)) q (17103 . 2)) ((c form c (c (? . 1) q Nonnegative-ExtFlonum)) q (1729 . 2)) ((c form c (c (? . 1) q Prompt-TagTop)) q (4462 . 2)) ((c form c (c (? . 2) q for/flvector)) q (16955 . 2)) ((c form c (c (? . 2) q SSL-Protocol)) q (16668 . 2)) ((c form c (c (? . 1) q Semaphore)) q (2821 . 2)) ((c form c (c (? . 0) q for*/list:)) q (28112 . 2)) ((c form c (c (? . 0) q for*/hashalw:)) q (28073 . 2)) ((c form c (c (? . 1) q Weak-Boxof)) q (4189 . 2)) ((c form c (c (? . 3) q Sequenceof)) q (4040 . 2)) ((c form c (c (? . 0) q for*/list)) q (10293 . 2)) ((c form c (c (? . 2) q JSExpr)) q (16498 . 2)) ((c form c (c (? . 0) q with-handlers)) q (16212 . 2)) ((c form c (c (? . 0) q for*/or:)) q (28166 . 2)) ((c form c (c (? . 0) q let:)) q (26829 . 3)) ((c form c (c (? . 0) q plambda:)) q (26215 . 3)) ((c form c (c (? . 0) q for*)) q (12149 . 2)) ((c form c (c (? . 1) q Keyword)) q (1950 . 2)) ((c form c (c (? . 3) q Parameterof)) q (3925 . 3)) ((c form c (c (? . 0) q case-lambda:)) q (26698 . 2)) ((c form c (c (? . 1) q Weak-HashTable)) q (3682 . 2)) ((c form c (c (? . 1) q Path-For-Some-System)) q (2078 . 2)) ((c form c (c (? . 0) q for/list:)) q (28460 . 2)) ((c form c (c (? . 1) q Negative-Exact-Rational)) q (1361 . 2)) ((c form c (c (? . 1) q ExtFlVector)) q (3490 . 2)) ((c form c (c (? . 0) q :type)) q (25331 . 5)) ((c form c (c (? . 2) q Image-Kind)) q (17174 . 2)) ((c form c (c (? . 2) q Date)) q (17226 . 2)) ((c form c (c (? . 0) q provide:)) q (15152 . 2)) ((c form c (c (? . 1) q Special-Comment)) q (2483 . 2)) ((c form c (c (? . 1) q Inexact-Imaginary)) q (305 . 2)) ((c form c (c (? . 3) q List)) q (3005 . 2)) ((c form c (c (? . 0) q :)) q (15122 . 3)) ((c form c (c (? . 0) q for/first)) q (11284 . 2)) ((c form c (c (? . 1) q Regexp)) q (2104 . 2)) ((c form c (c (? . 1) q Single-Flonum-Positive-Zero)) q (997 . 2)) ((c form c (c (? . 3) q List*)) q (3088 . 2)) ((c form c (c (? . 0) q :query-type/args)) q (25439 . 2)) ((c form c (c (? . 1) q ClassTop)) q (20632 . 2)) ((c form c (c (? . 2) q URL)) q (16612 . 2)) ((c form c (c (? . 0) q for/last)) q (10132 . 2)) ((c form c (c (? . 0) q for*/or)) q (10795 . 2)) ((c form c (c (? . 1) q Async-ChannelTop)) q (3903 . 2)) ((c form c (c (? . 0) q pdefine:)) q (28735 . 2)) ((c form c (c (? . 2) q FTP-Connection)) q (16534 . 2)) ((c form c (c (? . 1) q Weak-HashTableTop)) q (3766 . 2)) ((c form c (c (? . 0) q for*/first:)) q (27911 . 2)) ((c form c (c (? . 1) q Float)) q (75 . 2)) ((c form c (c (? . 1) q HashTable)) q (3559 . 2)) ((c form c (c (? . 1) q ExtFlonum-Nan)) q (1885 . 2)) ((c form c (c (? . 1) q Negative-Integer)) q (447 . 2)) ((c form c (c (? . 3) q case→)) q (7309 . 2)) ((c form c (c (? . 1) q Pretty-Print-Style-Table)) q (2453 . 2)) ((c form c (c (? . 9) q unsafe-require/typed)) q (25822 . 2)) ((c form c (c (? . 1) q Prompt-Tagof)) q (4424 . 2)) ((c form c (c (? . 0) q for*/last:)) q (28094 . 2)) ((c form c (c (? . 2) q HTTP-Connection)) q (16554 . 2)) ((c form c (c (? . 0) q for*/foldr)) q (12606 . 9)) ((c form c (c (? . 1) q Unquoted-Printing-String)) q (2028 . 2)) ((c form c (c (? . 4) q private)) q (19932 . 2)) ((c form c (c (? . 1) q Symbol)) q (1963 . 2)) ((c form c (c (? . 3) q Object)) q (20648 . 5)) ((c form c (c (? . 1) q ∩)) q (6712 . 2)) ((c form c (c (? . 0) q define-type-alias)) q (28592 . 2)) ((c form c (c (? . 2) q URL-Exception)) q (16621 . 2)) ((c form c (c (? . 1) q Immutable-HashTable)) q (3594 . 2)) ((c form c (c (? . 1) q Module-Path)) q (2297 . 2)) ((c form c (c (? . 2) q SSL-Server-Context)) q (16686 . 2)) ((c form c (c (? . 10) q define-type)) q (14899 . 6)) ((c form c (c (? . 1) q ∪)) q (7192 . 2)) ((c form c (c (? . 0) q for/product:)) q (28526 . 2)) ((c form c (c (? . 4) q define/override)) q (19276 . 3)) ((c form c (c (? . 1) q Weak-BoxTop)) q (4222 . 2))))
type
Any
type
AnyValues
type
Nothing
type
Number
type
Complex
type
Integer
type
Float
type
Flonum
type
Single-Flonum
type
Inexact-Real
type
Exact-Rational
type
Real
type
Exact-Number
type
Float-Complex
type
Single-Flonum-Complex
type
Inexact-Complex
type
Imaginary
type
Exact-Complex
type
Exact-Imaginary
type
Inexact-Imaginary
type
Positive-Integer
type
Exact-Positive-Integer
type
Nonnegative-Integer
type
Exact-Nonnegative-Integer
type
Natural
type
Negative-Integer
type
Nonpositive-Integer
type
Zero
type
Positive-Float
type
Positive-Flonum
type
Nonnegative-Float
type
Nonnegative-Flonum
type
Negative-Float
type
Negative-Flonum
type
Nonpositive-Float
type
Nonpositive-Flonum
type
Float-Negative-Zero
type
Flonum-Negative-Zero
type
Float-Positive-Zero
type
Flonum-Positive-Zero
type
Float-Zero
type
Flonum-Zero
type
Float-Nan
type
Flonum-Nan
type
Positive-Single-Flonum
type
Nonnegative-Single-Flonum
type
Negative-Single-Flonum
type
Nonpositive-Single-Flonum
type
Single-Flonum-Negative-Zero
type
Single-Flonum-Positive-Zero
type
Single-Flonum-Zero
type
Single-Flonum-Nan
type
Positive-Inexact-Real
type
Nonnegative-Inexact-Real
type
Negative-Inexact-Real
type
Nonpositive-Inexact-Real
type
Inexact-Real-Negative-Zero
type
Inexact-Real-Positive-Zero
type
Inexact-Real-Zero
type
Inexact-Real-Nan
type
Positive-Exact-Rational
type
Nonnegative-Exact-Rational
type
Negative-Exact-Rational
type
Nonpositive-Exact-Rational
type
Positive-Real
type
Nonnegative-Real
type
Negative-Real
type
Nonpositive-Real
type
Real-Zero
type
One
type
Byte
type
Positive-Byte
type
Index
type
Positive-Index
type
Fixnum
type
Positive-Fixnum
type
Nonnegative-Fixnum
type
Negative-Fixnum
type
Nonpositive-Fixnum
type
ExtFlonum
type
Positive-ExtFlonum
type
Nonnegative-ExtFlonum
type
Negative-ExtFlonum
type
Nonpositive-ExtFlonum
type
ExtFlonum-Negative-Zero
type
ExtFlonum-Positive-Zero
type
ExtFlonum-Zero
type
ExtFlonum-Nan
type
Boolean
type
True
type
False
type
String
type
Keyword
type
Symbol
type
Char
type
Void
type
Input-Port
type
Output-Port
type
Unquoted-Printing-String
type
Port
type
Path
type
Path-For-Some-System
type
Regexp
type
PRegexp
type
Byte-Regexp
type
Byte-PRegexp
type
Bytes
type
Namespace
type
Namespace-Anchor
type
Variable-Reference
type
Null
type
EOF
type
Continuation-Mark-Set
type
Undefined
type
Module-Path
type
Module-Path-Index
type
Resolved-Module-Path
type
Compiled-Module-Expression
type
Compiled-Expression
type
Internal-Definition-Context
type
Pretty-Print-Style-Table
type
Special-Comment
type
Struct-Type-Property
type
Impersonator-Property
type
Read-Table
type
Bytes-Converter
type
Parameterization
type
Custodian
type
Inspector
type
Security-Guard
type
UDP-Socket
type
TCP-Listener
type
Logger
type
Log-Receiver
type
Log-Level
type
Thread
type
Thread-Group
type
Subprocess
type
Place
type
Place-Channel
type
Semaphore
type
FSemaphore
type
Will-Executor
type
Pseudo-Random-Generator
type
Environment-Variables
type
Path-String
type constructor
(Pairof s t)
type constructor
(Listof t)
type constructor
(List t ...)
type constructor
(List t ... trest ... bound)
type constructor
(List* t t1 ... s)
type constructor
(MListof t)
type constructor
(MPairof t u)
type
MPairTop
type constructor
(Boxof t)
type
BoxTop
type constructor
(Vectorof t)
type constructor
(Immutable-Vectorof t)
type constructor
(Mutable-Vectorof t)
type constructor
(Vector t ...)
type constructor
(Immutable-Vector t ...)
type constructor
(Mutable-Vector t ...)
type
FlVector
type
ExtFlVector
type
FxVector
type
VectorTop
type
Mutable-VectorTop
type constructor
(HashTable k v)
type constructor
(Immutable-HashTable k v)
type constructor
(Mutable-HashTable k v)
type constructor
(Weak-HashTable k v)
type
HashTableTop
type
Mutable-HashTableTop
type
Weak-HashTableTop
type constructor
(Setof t)
type constructor
(Channelof t)
type
ChannelTop
type constructor
(Async-Channelof t)
type
Async-ChannelTop
type constructor
(Parameterof t)
(Parameterof s t)
type constructor
(Promise t)
type constructor
(Futureof t)
type constructor
(Sequenceof t ...)
type
SequenceTop
type constructor
(Custodian-Boxof t)
type constructor
(Thread-Cellof t)
type
Thread-CellTop
type constructor
(Weak-Boxof t)
type
Weak-BoxTop
type constructor
(Ephemeronof t)
type constructor
(Evtof t)
type constructor
(Syntaxof t)
type
Identifier
type
Syntax
type
Syntax-E
type constructor
(Sexpof t)
type
Sexp
type
Datum
type constructor
(Prompt-Tagof s t)
type
Prompt-TagTop
type constructor
(Continuation-Mark-Keyof t)
type
Continuation-Mark-KeyTop
type constructor
(-> 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
                | (Some (a ...) type : #:+ proposition)
                | (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
type constructor
(->* (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 ...)
type
Top
type
Bot
type
Procedure
type constructor
(U t ...)
type constructor
(∩ t ...)
type constructor
(case-> fun-ty ...)
type
(t t1 t2 ...)
type
(All (a ...) t)
(All (a ... a ooo) t)
type
(Some (a ...) t)
type constructor
(Values t ...)
type
v
type
(quote val)
type
i
type
(Rec n t)
type
(Struct st)
type
(Struct-Type st)
type
Struct-TypeTop
type constructor
(Prefab key type ...)
type
(PrefabTop key field-count)
type constructor
(Struct-Property ty)
type
Self
type
Imp
type
(Has-Struct-Property prop)
type constructor
∪
type constructor
Union
type constructor
Intersection
type constructor
→
type constructor
→*
type constructor
case→
type
∀
type constructor
(Option t)
type constructor
(Opaque t)
syntax
(let maybe-tvars (binding ...) maybe-ret . 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
λ
syntax
(case-lambda maybe-tvars [formals body] ...)
syntax
case-λ
syntax
(for void-ann-maybe (for-clause ...) void-ann-maybe expr ...+)
 
void-ann-maybe = 
               | : Void
                  
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 ...) type-ann-maybe expr ...+)
syntax
(for/hash type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for/hasheq type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for/hasheqv type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for/hashalw type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for/vector type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for/or type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for/sum type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for/product type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for/last type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for/set type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for*/list type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for*/hash type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for*/hasheq type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for*/hasheqv type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for*/hashalw type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for*/vector type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for*/or type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for*/sum type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for*/product type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for*/last type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for*/set type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for/and type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for/first type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for*/and type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for*/first type-ann-maybe (for-clause ...) type-ann-maybe expr ...+)
syntax
(for/lists type-ann-maybe
           ([id : t] ... maybe-result)
           (for-clause ...)
           type-ann-maybe
  expr ...+)
syntax
(for/fold type-ann-maybe
          ([id : t init-expr] ... maybe-result)
          (for-clause ...)
          type-ann-maybe
  expr ...+)
syntax
(for/foldr type-ann-maybe
           ([id : t init-expr] ... maybe-result)
           (for-clause ...)
           type-ann-maybe
  expr ...+)
 
maybe-result = 
             | #:result result-expr
syntax
(for* void-ann-maybe (for-clause ...) void-ann-maybe expr ...+)
syntax
(for*/lists type-ann-maybe
            ([id : t] ... maybe-result)
            (for-clause ...)
            type-ann-maybe
  expr ...+)
syntax
(for*/fold type-ann-maybe
           ([id : t init-expr] ... maybe-result)
           (for-clause ...)
           type-ann-maybe
  expr ...+)
syntax
(for*/foldr type-ann-maybe
            ([id : t init-expr] ... maybe-result)
            (for-clause ...)
            type-ann-maybe
  expr ...+)
 
maybe-result = 
             | #:result result-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
                | #:property property-id property-expr
                | #: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-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
syntax
with-handlers*
procedure
(default-continuation-prompt-tag)
 -> (-> (Prompt-Tagof Any (Any -> Any)))
syntax
(#%module-begin form ...)
syntax
(#%top-interaction . form)
value
prop:procedure : struct-type-property?
type
GIF-Stream
type
GIF-Colormap
type
JSExpr
type
Cookie
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
type
LoadFileKind
syntax
(for/extflvector type-ann-maybe (for-clause ...) expr ...+)
syntax
(for*/extflvector type-ann-maybe (for-clause ...) expr ...+)
syntax
(for/flvector maybe-length (for-clause ...) expr ...+)
syntax
(for*/flvector maybe-length (for-clause ...) expr ...+)
type
Edit-Op
type
Read/Write-Format
type
File-Format
type
Threshold
type
Draw-Caret
type
Image-Kind
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)
syntax
(define-typed/untyped-identifier name deep-name untyped-name shallow-name optional-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
(:kind e)
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 maybe-ret . body)
 
maybe-ret = 
          | : type
             
  formals = ([v : t] ...)
          | ([v : t] ... v : t *)
          | ([v : t] ... v : t ooo bound)
syntax
λ:
syntax
(plambda: (a ...) formals maybe-ret . body)
(plambda: (a ... b ooo) formals maybe-ret . body)
syntax
(opt-lambda: formals maybe-ret . 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 maybe-ret . body)
(popt-lambda: (a ... a ooo) formals maybe-ret . 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] ...) : t0 . 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
(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
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*/foldr:
syntax
for*/hash:
syntax
for*/hasheq:
syntax
for*/hasheqv:
syntax
for*/hashalw:
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/foldr:
syntax
for/hash:
syntax
for/hasheq:
syntax
for/hasheqv:
syntax
for/hashalw:
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)
type constructor
Un
syntax
mu
type constructor
Tuple
type constructor
Parameter
type constructor
Pair
type constructor
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
