node -max-old-space-size=8192 build/phase0/pyret.jarr --outfile build/phaseA/pyret.jarr \ --build-runnable src/arr/compiler/pyret.arr \ --builtin-js-dir src/js/trove/ \ --builtin-arr-dir src/arr/trove/ \ --compiled-dir build/phaseA/compiled/ \ -no-check-mode \ --require-config src/scripts/standalone-configA.json Gathering dependencies... Compiling worklist... Loading existing compiled modules... Compiling 51/72: global 51/72 modules compiled (global) Compiling 52/72: ffi 52/72 modules compiled (ffi) Compiling 53/72: table 53/72 modules compiled (table) Compiling 54/72: reactors 54/72 modules compiled (reactors) Compiling 55/72: s-exp 55/72 modules compiled (s-exp) Compiling 56/72: base 56/72 modules compiled (base) Compiling 57/72: cmdline-lib 57/72 modules compiled (cmdline-lib) Compiling 58/72: format 58/72 modules compiled (format) Compiling 59/72: string-dict 59/72 modules compiled (string-dict) Compiling 60/72: filelib 60/72 modules compiled (filelib) Compiling 61/72: pathlib 61/72 modules compiled (pathlib) Compiling 62/72: builtin-modules 62/72 modules compiled (builtin-modules) Compiling 63/72: json 63/72 modules compiled (json) Compiling 64/72: runtime-lib 64/72 modules compiled (runtime-lib) Compiling 65/72: load-lib 65/72 modules compiled (load-lib) Compiling 66/72: make-standalone 66/72 modules compiled (make-standalone) Compiling 67/72: sha 67/72 modules compiled (sha) Compiling 68/72: parse-pyret 68/72 modules compiled (parse-pyret) Compiling 69/72: source-map-lib 69/72 modules compiled (source-map-lib) Compiling 70/72: type-logger 70/72 modules compiled (type-logger) Compiling 71/72: flatness.arr 71/72 modules compiled (flatness.arr) Compiling 72/72: server 72/72 modules compiled (server) Cleaning up and generating standalone... /Users/joe/src/pyret-lang node -max-old-space-size=8192 build/phaseA/pyret.jarr --outfile tests/pyret/tests/test-flatness.jarr \ --build-runnable tests/pyret/tests/test-flatness.arr \ --builtin-js-dir src/js/trove/ \ --builtin-arr-dir src/arr/trove/ \ --compiled-dir compiled/ \ \ --require-config src/scripts/standalone-configA.json Gathering dependencies... Compiling worklist... Loading existing compiled modules... Compiling 50/69: global 50/69 modules compiled (global) Compiling 51/69: ffi 51/69 modules compiled (ffi) Compiling 52/69: table 52/69 modules compiled (table) Compiling 53/69: reactors 53/69 modules compiled (reactors) Compiling 54/69: s-exp 54/69 modules compiled (s-exp) Compiling 55/69: base 55/69 modules compiled (base) Compiling 56/69: string-dict 56/69 modules compiled (string-dict) Compiling 57/69: format 57/69 modules compiled (format) Compiling 58/69: source-map-lib 58/69 modules compiled (source-map-lib) Compiling 59/69: runtime-lib 59/69 modules compiled (runtime-lib) Compiling 60/69: load-lib 60/69 modules compiled (load-lib) Compiling 61/69: pathlib 61/69 modules compiled (pathlib) Compiling 62/69: builtin-modules 62/69 modules compiled (builtin-modules) Compiling 63/69: filelib 63/69 modules compiled (filelib) Compiling 64/69: json 64/69 modules compiled (json) Compiling 65/69: make-standalone 65/69 modules compiled (make-standalone) Compiling 66/69: sha 66/69 modules compiled (sha) Compiling 67/69: parse-pyret 67/69 modules compiled (parse-pyret) Compiling 68/69: type-logger 68/69 modules compiled (type-logger) Compiling 69/69: flatness.arrThe bindings: [mutable-string-dict: "global#within-rel-now", value-bind(bo-module(none, "builtin://global"), vb-let, within-rel-now, a-blank, none), "global#num-round-even", value-bind(bo-module(none, "builtin://global"), vb-let, num-round-even, a-blank, none), "global#num-cos", value-bind(bo-module(none, "builtin://global"), vb-let, num-cos, a-blank, none), "global#string-tonumber", value-bind(bo-module(none, "builtin://global"), vb-let, string-tonumber, a-blank, none), "global#string-length", value-bind(bo-module(none, "builtin://global"), vb-let, string-length, a-blank, none), "global#num-is-integer", value-bind(bo-module(none, "builtin://global"), vb-let, num-is-integer, a-blank, none), "global#display", value-bind(bo-module(none, "builtin://global"), vb-let, display, a-blank, none), "global#is-object", value-bind(bo-module(none, "builtin://global"), vb-let, is-object, a-blank, none), "global#raw-array-map", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array-map, a-blank, none), "global#random", value-bind(bo-module(none, "builtin://global"), vb-let, random, a-blank, none), "global#to-string", value-bind(bo-module(none, "builtin://global"), vb-let, to-string, a-blank, none), "global#is-tuple", value-bind(bo-module(none, "builtin://global"), vb-let, is-tuple, a-blank, none), "global#is-boolean", value-bind(bo-module(none, "builtin://global"), vb-let, is-boolean, a-blank, none), "global#num-floor", value-bind(bo-module(none, "builtin://global"), vb-let, num-floor, a-blank, none), "global#string-explode", value-bind(bo-module(none, "builtin://global"), vb-let, string-explode, a-blank, none), "global#string-to-code-point", value-bind(bo-module(none, "builtin://global"), vb-let, string-to-code-point, a-blank, none), "global#raw-array-join-str", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array-join-str, a-blank, none), "global#num-round", value-bind(bo-module(none, "builtin://global"), vb-let, num-round, a-blank, none), "global#raw-array-map-1", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array-map-1, a-blank, none), "global#num-atan", value-bind(bo-module(none, "builtin://global"), vb-let, num-atan, a-blank, none), "global#_times", value-bind(bo-module(none, "builtin://global"), vb-let, _times, a-blank, none), "global#num-sqrt", value-bind(bo-module(none, "builtin://global"), vb-let, num-sqrt, a-blank, none), "global#to-repr", value-bind(bo-module(none, "builtin://global"), vb-let, to-repr, a-blank, none), "global#run-task", value-bind(bo-module(none, "builtin://global"), vb-let, run-task, a-blank, none), "global#ref-set", value-bind(bo-module(none, "builtin://global"), vb-let, ref-set, a-blank, none), "global#equal-always", value-bind(bo-module(none, "builtin://global"), vb-let, equal-always, a-blank, none), "global#raw-array-from-list", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array-from-list, a-blank, none), "global#print-error", value-bind(bo-module(none, "builtin://global"), vb-let, print-error, a-blank, none), "global#num-is-roughnum", value-bind(bo-module(none, "builtin://global"), vb-let, num-is-roughnum, a-blank, none), "global#raw-array-set", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array-set, a-blank, none), "global#num-random", value-bind(bo-module(none, "builtin://global"), vb-let, num-random, a-blank, none), "global#is-nothing", value-bind(bo-module(none, "builtin://global"), vb-let, is-nothing, a-blank, none), "global#num-is-rational", value-bind(bo-module(none, "builtin://global"), vb-let, num-is-rational, a-blank, none), "global#string-tolower", value-bind(bo-module(none, "builtin://global"), vb-let, string-tolower, a-blank, none), "global#within", value-bind(bo-module(none, "builtin://global"), vb-let, within, a-blank, none), "global#string-toupper", value-bind(bo-module(none, "builtin://global"), vb-let, string-toupper, a-blank, none), "global#is-table", value-bind(bo-module(none, "builtin://global"), vb-let, is-table, a-blank, none), "global#num-abs", value-bind(bo-module(none, "builtin://global"), vb-let, num-abs, a-blank, none), "global#equal-always3", value-bind(bo-module(none, "builtin://global"), vb-let, equal-always3, a-blank, none), "global#string-to-lower", value-bind(bo-module(none, "builtin://global"), vb-let, string-to-lower, a-blank, none), "global#num-min", value-bind(bo-module(none, "builtin://global"), vb-let, num-min, a-blank, none), "global#num-atan2", value-bind(bo-module(none, "builtin://global"), vb-let, num-atan2, a-blank, none), "global#string-to-upper", value-bind(bo-module(none, "builtin://global"), vb-let, string-to-upper, a-blank, none), "global#is-number", value-bind(bo-module(none, "builtin://global"), vb-let, is-number, a-blank, none), "global#tostring", value-bind(bo-module(none, "builtin://global"), vb-let, tostring, a-blank, none), "global#raise", value-bind(bo-module(none, "builtin://global"), vb-let, raise, a-blank, none), "global#string-to-code-points", value-bind(bo-module(none, "builtin://global"), vb-let, string-to-code-points, a-blank, none), "global#num-equal", value-bind(bo-module(none, "builtin://global"), vb-let, num-equal, a-blank, none), "global#print", value-bind(bo-module(none, "builtin://global"), vb-let, print, a-blank, none), "global#num-sqr", value-bind(bo-module(none, "builtin://global"), vb-let, num-sqr, a-blank, none), "global#num-acos", value-bind(bo-module(none, "builtin://global"), vb-let, num-acos, a-blank, none), "global#num-is-fixnum", value-bind(bo-module(none, "builtin://global"), vb-let, num-is-fixnum, a-blank, none), "global#num-truncate", value-bind(bo-module(none, "builtin://global"), vb-let, num-truncate, a-blank, none), "global#nothing", value-bind(bo-module(none, "builtin://global"), vb-let, nothing, a-blank, none), "global#string-char-at", value-bind(bo-module(none, "builtin://global"), vb-let, string-char-at, a-blank, none), "global#string-index-of", value-bind(bo-module(none, "builtin://global"), vb-let, string-index-of, a-blank, none), "global#string-isnumber", value-bind(bo-module(none, "builtin://global"), vb-let, string-isnumber, a-blank, none), "global#within-abs", value-bind(bo-module(none, "builtin://global"), vb-let, within-abs, a-blank, none), "global#torepr", value-bind(bo-module(none, "builtin://global"), vb-let, torepr, a-blank, none), "global#builtins", value-bind(bo-module(none, "builtin://global"), vb-let, builtins, a-blank, none), "global#raw-array-of", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array-of, a-blank, none), "global#string-is-number", value-bind(bo-module(none, "builtin://global"), vb-let, string-is-number, a-blank, none), "global#ref-freeze", value-bind(bo-module(none, "builtin://global"), vb-let, ref-freeze, a-blank, none), "global#num-is-negative", value-bind(bo-module(none, "builtin://global"), vb-let, num-is-negative, a-blank, none), "global#num-sin", value-bind(bo-module(none, "builtin://global"), vb-let, num-sin, a-blank, none), "global#num-is-non-negative", value-bind(bo-module(none, "builtin://global"), vb-let, num-is-non-negative, a-blank, none), "global#raw-array-filter", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array-filter, a-blank, none), "global#_minus", value-bind(bo-module(none, "builtin://global"), vb-let, _minus, a-blank, none), "global#is-raw-array", value-bind(bo-module(none, "builtin://global"), vb-let, is-raw-array, a-blank, none), "global#num-within", value-bind(bo-module(none, "builtin://global"), vb-let, num-within, a-blank, none), "global#string-split-all", value-bind(bo-module(none, "builtin://global"), vb-let, string-split-all, a-blank, none), "global#test-print", value-bind(bo-module(none, "builtin://global"), vb-let, test-print, a-blank, none), "global#num-tostring", value-bind(bo-module(none, "builtin://global"), vb-let, num-tostring, a-blank, none), "global#not", value-bind(bo-module(none, "builtin://global"), vb-let, not, a-blank, none), "global#raw-array", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array, a-blank, none), "global#num-random-seed", value-bind(bo-module(none, "builtin://global"), vb-let, num-random-seed, a-blank, none), "global#is-string", value-bind(bo-module(none, "builtin://global"), vb-let, is-string, a-blank, none), "global#brander", value-bind(bo-module(none, "builtin://global"), vb-let, brander, a-blank, none), "global#num-is-non-positive", value-bind(bo-module(none, "builtin://global"), vb-let, num-is-non-positive, a-blank, none), "global#identical", value-bind(bo-module(none, "builtin://global"), vb-let, identical, a-blank, none), "global#exn-unwrap", value-bind(bo-module(none, "builtin://global"), vb-let, exn-unwrap, a-blank, none), "global#num-is-positive", value-bind(bo-module(none, "builtin://global"), vb-let, num-is-positive, a-blank, none), "global#string-substring", value-bind(bo-module(none, "builtin://global"), vb-let, string-substring, a-blank, none), "global#raw-array-build", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array-build, a-blank, none), "global#string-append", value-bind(bo-module(none, "builtin://global"), vb-let, string-append, a-blank, none), "global#num-ceiling", value-bind(bo-module(none, "builtin://global"), vb-let, num-ceiling, a-blank, none), "global#equal-now3", value-bind(bo-module(none, "builtin://global"), vb-let, equal-now3, a-blank, none), "global#num-exp", value-bind(bo-module(none, "builtin://global"), vb-let, num-exp, a-blank, none), "global#time-now", value-bind(bo-module(none, "builtin://global"), vb-let, time-now, a-blank, none), "global#within-rel", value-bind(bo-module(none, "builtin://global"), vb-let, within-rel, a-blank, none), "global#raw-array-to-list", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array-to-list, a-blank, none), "global#num-within-abs", value-bind(bo-module(none, "builtin://global"), vb-let, num-within-abs, a-blank, none), "global#gensym", value-bind(bo-module(none, "builtin://global"), vb-let, gensym, a-blank, none), "global#num-to-string-digits", value-bind(bo-module(none, "builtin://global"), vb-let, num-to-string-digits, a-blank, none), "global#string-from-code-point", value-bind(bo-module(none, "builtin://global"), vb-let, string-from-code-point, a-blank, none), "global#string-repeat", value-bind(bo-module(none, "builtin://global"), vb-let, string-repeat, a-blank, none), "global#string-replace", value-bind(bo-module(none, "builtin://global"), vb-let, string-replace, a-blank, none), "global#_divide", value-bind(bo-module(none, "builtin://global"), vb-let, _divide, a-blank, none), "global#num-exact", value-bind(bo-module(none, "builtin://global"), vb-let, num-exact, a-blank, none), "global#string-equal", value-bind(bo-module(none, "builtin://global"), vb-let, string-equal, a-blank, none), "global#num-to-roughnum", value-bind(bo-module(none, "builtin://global"), vb-let, num-to-roughnum, a-blank, none), "global#_lessthan", value-bind(bo-module(none, "builtin://global"), vb-let, _lessthan, a-blank, none), "global#num-to-rational", value-bind(bo-module(none, "builtin://global"), vb-let, num-to-rational, a-blank, none), "global#_greaterequal", value-bind(bo-module(none, "builtin://global"), vb-let, _greaterequal, a-blank, none), "global#_plus", value-bind(bo-module(none, "builtin://global"), vb-let, _plus, a-blank, none), "global#within-abs-now", value-bind(bo-module(none, "builtin://global"), vb-let, within-abs-now, a-blank, none), "global#num-tan", value-bind(bo-module(none, "builtin://global"), vb-let, num-tan, a-blank, none), "global#raw-array-fold", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array-fold, a-blank, none), "global#string-contains", value-bind(bo-module(none, "builtin://global"), vb-let, string-contains, a-blank, none), "global#raw-array-build-opt", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array-build-opt, a-blank, none), "global#is-function", value-bind(bo-module(none, "builtin://global"), vb-let, is-function, a-blank, none), "global#string-from-code-points", value-bind(bo-module(none, "builtin://global"), vb-let, string-from-code-points, a-blank, none), "global#raw-array-and-mapi", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array-and-mapi, a-blank, none), "global#num-to-string", value-bind(bo-module(none, "builtin://global"), vb-let, num-to-string, a-blank, none), "global#_greaterthan", value-bind(bo-module(none, "builtin://global"), vb-let, _greaterthan, a-blank, none), "global#ref-get", value-bind(bo-module(none, "builtin://global"), vb-let, ref-get, a-blank, none), "global#_lessequal", value-bind(bo-module(none, "builtin://global"), vb-let, _lessequal, a-blank, none), "global#num-log", value-bind(bo-module(none, "builtin://global"), vb-let, num-log, a-blank, none), "global#equal-now", value-bind(bo-module(none, "builtin://global"), vb-let, equal-now, a-blank, none), "global#display-error", value-bind(bo-module(none, "builtin://global"), vb-let, display-error, a-blank, none), "global#raw-array-get", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array-get, a-blank, none), "global#num-modulo", value-bind(bo-module(none, "builtin://global"), vb-let, num-modulo, a-blank, none), "global#num-max", value-bind(bo-module(none, "builtin://global"), vb-let, num-max, a-blank, none), "global#num-remainder", value-bind(bo-module(none, "builtin://global"), vb-let, num-remainder, a-blank, none), "global#num-within-rel", value-bind(bo-module(none, "builtin://global"), vb-let, num-within-rel, a-blank, none), "global#identical3", value-bind(bo-module(none, "builtin://global"), vb-let, identical3, a-blank, none), "global#string-split", value-bind(bo-module(none, "builtin://global"), vb-let, string-split, a-blank, none), "global#num-asin", value-bind(bo-module(none, "builtin://global"), vb-let, num-asin, a-blank, none), "global#num-expt", value-bind(bo-module(none, "builtin://global"), vb-let, num-expt, a-blank, none), "global#raw-array-or-mapi", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array-or-mapi, a-blank, none), "global#string-to-number", value-bind(bo-module(none, "builtin://global"), vb-let, string-to-number, a-blank, none), "global#raw-array-length", value-bind(bo-module(none, "builtin://global"), vb-let, raw-array-length, a-blank, none), "atom#A#1", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 4, 14, 41, 4, 15, 42)), vb-module("builtin://ast"), A1, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 4, 0, 27, 4, 15, 42)), none), "atom#SD#3", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 5, 22, 65, 5, 24, 67)), vb-module("builtin://string-dict"), SD3, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 5, 0, 43, 5, 24, 67)), none), "atom#AA#5", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 7, 30, 99, 7, 32, 101)), vb-module("file:///Users/joe/src/pyret-lang/src/arr/compiler/ast-anf.arr"), AA5, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 7, 0, 69, 7, 32, 101)), none), "atom#AU#7", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 8, 31, 133, 8, 33, 135)), vb-module("file:///Users/joe/src/pyret-lang/src/arr/compiler/ast-util.arr"), AU7, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 8, 0, 102, 8, 33, 135)), none), "atom#C#9", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 9, 38, 174, 9, 39, 175)), vb-module("file:///Users/joe/src/pyret-lang/src/arr/compiler/compile-structs.arr"), C9, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 9, 0, 136, 9, 39, 175)), none), "atom#$global#11", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), vb-module("builtin://global"), $global11, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#$base#13", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), vb-module("builtin://base"), $base13, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#arrays#15", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), vb-module("builtin://arrays"), arrays15, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#array#17", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "arrays")), "builtin://arrays"), vb-let, array17, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#build-array#18", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "arrays")), "builtin://arrays"), vb-let, build-array18, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#array-from-list#19", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "arrays")), "builtin://arrays"), vb-let, array-from-list19, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#is-array#20", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "arrays")), "builtin://arrays"), vb-let, is-array20, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#array-of#21", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "arrays")), "builtin://arrays"), vb-let, array-of21, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#array-set-now#22", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "arrays")), "builtin://arrays"), vb-let, array-set-now22, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#array-get-now#23", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "arrays")), "builtin://arrays"), vb-let, array-get-now23, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#array-length#24", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "arrays")), "builtin://arrays"), vb-let, array-length24, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#array-to-list-now#25", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "arrays")), "builtin://arrays"), vb-let, array-to-list-now25, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#lists#27", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), vb-module("builtin://lists"), lists27, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#list#29", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, list29, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#is-List#30", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, is-List30, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#is-empty#31", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, is-empty31, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#is-link#32", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, is-link32, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#empty#33", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, empty33, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#link#34", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, link34, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#range#35", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, range35, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#range-by#36", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, range-by36, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#repeat#37", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, repeat37, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#filter#38", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, filter38, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#partition#39", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, partition39, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#split-at#40", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, split-at40, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#any#41", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, any41, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#find#42", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, find42, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#map#43", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, map43, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#map2#44", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, map244, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#map3#45", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, map345, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#map4#46", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, map446, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#map_n#47", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, map_n47, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#map2_n#48", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, map2_n48, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#map3_n#49", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, map3_n49, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#map4_n#50", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, map4_n50, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#each#51", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, each51, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#each2#52", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, each252, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#each3#53", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, each353, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#each4#54", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, each454, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#each_n#55", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, each_n55, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#each2_n#56", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, each2_n56, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#each3_n#57", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, each3_n57, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#each4_n#58", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, each4_n58, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#fold#59", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, fold59, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#fold2#60", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, fold260, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#fold3#61", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, fold361, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#fold4#62", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), vb-let, fold462, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#option#64", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), vb-module("builtin://option"), option64, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#is-Option#66", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "option")), "builtin://option"), vb-let, is-Option66, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#is-none#67", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "option")), "builtin://option"), vb-let, is-none67, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#is-some#68", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "option")), "builtin://option"), vb-let, is-some68, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#none#69", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "option")), "builtin://option"), vb-let, none69, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#some#70", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "option")), "builtin://option"), vb-let, some70, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#error#72", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), vb-module("builtin://error"), error72, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#sets#74", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), vb-module("builtin://sets"), sets74, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#set#76", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "sets")), "builtin://sets"), vb-let, set76, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#tree-set#77", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "sets")), "builtin://sets"), vb-let, tree-set77, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#list-set#78", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "sets")), "builtin://sets"), vb-let, list-set78, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#empty-set#79", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "sets")), "builtin://sets"), vb-let, empty-set79, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#empty-list-set#80", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "sets")), "builtin://sets"), vb-let, empty-list-set80, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#empty-tree-set#81", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "sets")), "builtin://sets"), vb-let, empty-tree-set81, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#list-to-set#82", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "sets")), "builtin://sets"), vb-let, list-to-set82, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#list-to-list-set#83", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "sets")), "builtin://sets"), vb-let, list-to-list-set83, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#list-to-tree-set#84", value-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "sets")), "builtin://sets"), vb-let, list-to-tree-set84, a-any(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), none), "atom#flatness-max#86", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 11, 0, 177, 22, 3, 505)), vb-letrec, flatness-max86, a-blank, none), "atom#ann-flatness#87", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 25, 0, 508, 65, 3, 1995)), vb-letrec, ann-flatness87, a-blank, none), "atom#make-expr-data-env#88", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 68, 0, 1998, 149, 3, 5456)), vb-letrec, make-expr-data-env88, a-blank, none), "atom#make-lettable-data-env#89", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 151, 0, 5458, 217, 3, 8019)), vb-letrec, make-lettable-data-env89, a-blank, none), "atom#is-trivial-ann#90", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 220, 0, 8022, 223, 3, 8199)), vb-letrec, is-trivial-ann90, a-blank, none), "atom#make-expr-flatness-env#91", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 226, 0, 8321, 290, 3, 10855)), vb-letrec, make-expr-flatness-env91, a-blank, none), "atom#get-flatness-for-call#92", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 292, 0, 10857, 302, 3, 11235)), vb-letrec, get-flatness-for-call92, a-blank, none), "atom#make-lettable-flatness-env#93", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 304, 0, 11237, 371, 3, 13965)), vb-letrec, make-lettable-flatness-env93, a-blank, none), "atom#make-prog-flatness-env#94", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 373, 0, 13967, 471, 3, 17709)), vb-letrec, make-prog-flatness-env94, a-blank, none), "atom#get-defined-values#95", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 474, 0, 17712, 503, 3, 18502)), vb-letrec, get-defined-values95, a-blank, none), "atom#get-flat-provides#96", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 505, 0, 18504, 521, 3, 19157)), vb-letrec, get-flat-provides96, a-blank, none), "atom#a#97", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 11, 17, 194, 11, 36, 213)), vb-let, a97, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 11, 22, 199, 11, 36, 213), a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 11, 22, 199, 11, 28, 205), Option71), [list: a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 11, 29, 206, 11, 35, 212), $type$Number)]), none), "atom#b#98", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 11, 38, 215, 11, 57, 234)), vb-let, b98, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 11, 43, 220, 11, 57, 234), a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 11, 43, 220, 11, 49, 226), Option71), [list: a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 11, 50, 227, 11, 56, 233), $type$Number)]), none), "atom#a-val#99", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 14, 11, 347, 14, 16, 352)), vb-let, a-val99, a-blank, none), "atom#b-val#100", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 16, 15, 396, 16, 20, 401)), vb-let, b-val100, a-blank, none), "atom#ann#101", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 26, 2, 528, 26, 14, 540)), vb-let, ann101, a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 26, 9, 535, 26, 14, 540), A2, "Ann"), none), "atom#val-env#102", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 27, 2, 544, 27, 49, 591)), vb-let, val-env102, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 27, 13, 555, 27, 49, 591), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 27, 13, 555, 27, 33, 575), SD4, "MutableStringDict"), [list: a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 27, 34, 576, 27, 48, 590), a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 27, 34, 576, 27, 40, 582), Option71), [list: a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 27, 41, 583, 27, 47, 589), $type$Number)])]), none), "atom#ann-env#103", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 28, 2, 595, 28, 49, 642)), vb-let, ann-env103, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 28, 13, 606, 28, 49, 642), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 28, 13, 606, 28, 33, 626), SD4, "MutableStringDict"), [list: a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 28, 34, 627, 28, 48, 641), a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 28, 34, 627, 28, 40, 633), Option71), [list: a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 28, 41, 634, 28, 47, 640), $type$Number)])]), none), "atom#l#104", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 32, 12, 721, 32, 13, 722)), vb-let, l104, a-blank, none), "atom#l#105", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 33, 13, 748, 33, 14, 749)), vb-let, l105, a-blank, none), "atom#id#106", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 33, 16, 751, 33, 18, 753)), vb-let, id106, a-blank, none), "atom#l#107", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 35, 17, 821, 35, 18, 822)), vb-let, l107, a-blank, none), "atom#id#108", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 35, 20, 824, 35, 22, 826)), vb-let, id108, a-blank, none), "atom#l#109", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 36, 14, 853, 36, 15, 854)), vb-let, l109, a-blank, none), "atom#$underscore#110", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 36, 17, 856, 36, 18, 857)), vb-let, $underscore110, a-blank, none), "atom#$underscore#111", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 36, 20, 859, 36, 21, 860)), vb-let, $underscore111, a-blank, none), "atom#$underscore#112", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 36, 23, 862, 36, 24, 863)), vb-let, $underscore112, a-blank, none), "atom#l#113", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 39, 23, 1003, 39, 24, 1004)), vb-let, l113, a-blank, none), "atom#$underscore#114", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 39, 26, 1006, 39, 27, 1007)), vb-let, $underscore114, a-blank, none), "atom#$underscore#115", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 39, 29, 1009, 39, 30, 1010)), vb-let, $underscore115, a-blank, none), "atom#$underscore#116", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 39, 32, 1012, 39, 33, 1013)), vb-let, $underscore116, a-blank, none), "atom#l#117", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 42, 15, 1145, 42, 16, 1146)), vb-let, l117, a-blank, none), "atom#$underscore#118", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 42, 18, 1148, 42, 19, 1149)), vb-let, $underscore118, a-blank, none), "atom#$underscore#119", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 42, 21, 1151, 42, 22, 1152)), vb-let, $underscore119, a-blank, none), "atom#l#120", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 43, 15, 1180, 43, 16, 1181)), vb-let, l120, a-blank, none), "atom#fields#121", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 43, 18, 1183, 43, 24, 1189)), vb-let, fields121, a-blank, none), "atom#flatness#122", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 44, 15, 1209, 44, 36, 1230)), vb-let, flatness122, a-blank, none), "atom#f#123", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 44, 38, 1232, 44, 51, 1245)), vb-let, f123, a-blank, none), "atom#l#124", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 47, 14, 1342, 47, 15, 1343)), vb-let, l124, a-blank, none), "atom#fields#125", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 47, 17, 1345, 47, 23, 1351)), vb-let, fields125, a-blank, none), "atom#flatness#126", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 48, 15, 1371, 48, 36, 1392)), vb-let, flatness126, a-blank, none), "atom#f#127", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 48, 38, 1394, 48, 51, 1407)), vb-let, f127, a-blank, none), "atom#l#128", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 51, 12, 1498, 51, 13, 1499)), vb-let, l128, a-blank, none), "atom#base#129", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 51, 15, 1501, 51, 19, 1505)), vb-let, base129, a-blank, none), "atom#$underscore#130", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 51, 21, 1507, 51, 22, 1508)), vb-let, $underscore130, a-blank, none), "atom#l#131", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 55, 13, 1679, 55, 14, 1680)), vb-let, l131, a-blank, none), "atom#base#132", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 55, 16, 1682, 55, 20, 1686)), vb-let, base132, a-blank, none), "atom#exp#133", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 55, 22, 1688, 55, 25, 1691)), vb-let, exp133, a-blank, none), "atom#val-flatness#134", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 56, 6, 1702, 56, 64, 1760)), vb-let, val-flatness134, a-blank, none), "atom#l#135", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 61, 12, 1868, 61, 13, 1869)), vb-let, l135, a-blank, none), "atom#obj#136", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 61, 15, 1871, 61, 18, 1874)), vb-let, obj136, a-blank, none), "atom#field#137", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 61, 20, 1876, 61, 25, 1881)), vb-let, field137, a-blank, none), "atom#checked#138", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 62, 16, 1958, 62, 23, 1965)), vb-let, checked138, a-blank, none), "atom#residual#139", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 62, 25, 1967, 62, 33, 1975)), vb-let, residual139, a-blank, none), "atom#aexpr#140", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 69, 4, 2026, 69, 21, 2043)), vb-let, aexpr140, a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 69, 13, 2035, 69, 21, 2043), AA6, "AExpr"), none), "atom#sd#141", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 70, 4, 2049, 70, 46, 2091)), vb-let, sd141, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 70, 10, 2055, 70, 46, 2091), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 70, 10, 2055, 70, 30, 2075), SD4, "MutableStringDict"), [list: a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 70, 31, 2076, 70, 45, 2090), a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 70, 31, 2076, 70, 37, 2082), Option71), [list: a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 70, 38, 2083, 70, 44, 2089), $type$Number)])]), none), "atom#ad#142", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 71, 4, 2097, 71, 46, 2139)), vb-let, ad142, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 71, 10, 2103, 71, 46, 2139), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 71, 10, 2103, 71, 30, 2123), SD4, "MutableStringDict"), [list: a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 71, 31, 2124, 71, 45, 2138), a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 71, 31, 2124, 71, 37, 2130), Option71), [list: a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 71, 38, 2131, 71, 44, 2137), $type$Number)])]), none), "atom#type-name-to-variants#143", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 72, 4, 2145, 72, 68, 2209)), vb-let, type-name-to-variants143, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 72, 29, 2170, 72, 68, 2209), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 72, 29, 2170, 72, 49, 2190), SD4, "MutableStringDict"), [list: a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 72, 50, 2191, 72, 67, 2208), a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 72, 50, 2191, 72, 54, 2195), List63), [list: a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 72, 55, 2196, 72, 66, 2207), AA6, "AVariant")])]), none), "atom#alias-to-type-name#144", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 73, 4, 2215, 73, 54, 2265)), vb-let, alias-to-type-name144, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 73, 26, 2237, 73, 54, 2265), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 73, 26, 2237, 73, 46, 2257), SD4, "MutableStringDict"), [list: a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 73, 47, 2258, 73, 53, 2264), $type$String)]), none), "atom#$underscore#145", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 75, 17, 2316, 75, 18, 2317)), vb-let, $underscore145, a-blank, none), "atom#bind#146", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 75, 20, 2319, 75, 24, 2323)), vb-let, bind146, a-blank, none), "atom#body#147", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 75, 26, 2325, 75, 30, 2329)), vb-let, body147, a-blank, none), "atom#l#148", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 77, 25, 2391, 77, 26, 2392)), vb-let, l148, a-blank, none), "atom#name-of-type#149", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 77, 28, 2394, 77, 40, 2406)), vb-let, name-of-type149, a-blank, none), "atom#name-of-brand-value#150", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 77, 42, 2408, 77, 61, 2427)), vb-let, name-of-brand-value150, a-blank, none), "atom#l#151", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 81, 22, 2622, 81, 23, 2623)), vb-let, l151, a-blank, none), "atom#name-of-alias#152", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 81, 25, 2625, 81, 38, 2638)), vb-let, name-of-alias152, a-blank, none), "atom#underlying-ann#153", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 81, 40, 2640, 81, 54, 2654)), vb-let, underlying-ann153, a-blank, none), "atom#$underscore#154", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 85, 12, 2843, 85, 13, 2844)), vb-let, $underscore154, a-blank, none), "atom#bind#155", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 85, 15, 2846, 85, 19, 2850)), vb-let, bind155, a-blank, none), "atom#val#156", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 85, 21, 2852, 85, 24, 2855)), vb-let, val156, a-blank, none), "atom#body#157", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 85, 26, 2857, 85, 30, 2861)), vb-let, body157, a-blank, none), "atom#type-name-opt#158", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 96, 10, 3294, 96, 66, 3350)), vb-let, type-name-opt158, a-blank, none), "atom#type-name-opt#159", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 102, 10, 3635, 102, 70, 3695)), vb-let, type-name-opt159, a-blank, none), "atom#type-name#160", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 104, 12, 3753, 104, 43, 3784)), vb-let, type-name160, a-blank, none), "atom#variants#161", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 105, 12, 3797, 105, 69, 3854)), vb-let, variants161, a-blank, none), "atom#is-is-function#162", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 107, 12, 3868, 107, 85, 3941)), vb-let, is-is-function162, a-blank, none), "atom#v#163", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 107, 37, 3893, 107, 38, 3894)), vb-let, v163, a-blank, none), "atom#the-variant#164", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 112, 12, 4053, 112, 98, 4139)), vb-let, the-variant164, a-blank, none), "atom#v#165", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 112, 35, 4076, 112, 36, 4077)), vb-let, v165, a-blank, none), "atom#variant-flatness#166", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 114, 14, 4193, 116, 17, 4369)), vb-let, variant-flatness166, a-blank, none), "atom#flatness#167", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 114, 42, 4221, 114, 63, 4242)), vb-let, flatness167, a-blank, none), "atom#m#168", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 114, 65, 4244, 114, 97, 4276)), vb-let, m168, a-blank, none), "atom#$underscore#169", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 129, 16, 4720, 129, 17, 4721)), vb-let, $underscore169, a-blank, none), "atom#bind#170", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 129, 19, 4723, 129, 23, 4727)), vb-let, bind170, a-blank, none), "atom#idx#171", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 129, 25, 4729, 129, 28, 4732)), vb-let, idx171, a-blank, none), "atom#e#172", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 129, 30, 4734, 129, 31, 4735)), vb-let, e172, a-blank, none), "atom#body#173", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 129, 33, 4737, 129, 37, 4741)), vb-let, body173, a-blank, none), "atom#$underscore#174", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 135, 12, 4964, 135, 13, 4965)), vb-let, $underscore174, a-blank, none), "atom#bind#175", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 135, 15, 4967, 135, 19, 4971)), vb-let, bind175, a-blank, none), "atom#val#176", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 135, 21, 4973, 135, 24, 4976)), vb-let, val176, a-blank, none), "atom#body#177", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 135, 26, 4978, 135, 30, 4982)), vb-let, body177, a-blank, none), "atom#$underscore#178", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 138, 12, 5089, 138, 13, 5090)), vb-let, $underscore178, a-blank, none), "atom#lettable#179", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 138, 15, 5092, 138, 23, 5100)), vb-let, lettable179, a-blank, none), "atom#expr#180", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 138, 25, 5102, 138, 29, 5106)), vb-let, expr180, a-blank, none), "atom#$underscore#181", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 145, 17, 5347, 145, 18, 5348)), vb-let, $underscore181, a-blank, none), "atom#l#182", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 145, 20, 5350, 145, 21, 5351)), vb-let, l182, a-blank, none), "atom#lettable#183", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 152, 4, 5490, 152, 28, 5514)), vb-let, lettable183, a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 152, 16, 5502, 152, 28, 5514), AA6, "ALettable"), none), "atom#sd#184", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 153, 4, 5520, 153, 46, 5562)), vb-let, sd184, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 153, 10, 5526, 153, 46, 5562), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 153, 10, 5526, 153, 30, 5546), SD4, "MutableStringDict"), [list: a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 153, 31, 5547, 153, 45, 5561), a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 153, 31, 5547, 153, 37, 5553), Option71), [list: a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 153, 38, 5554, 153, 44, 5560), $type$Number)])]), none), "atom#ad#185", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 154, 4, 5568, 154, 46, 5610)), vb-let, ad185, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 154, 10, 5574, 154, 46, 5610), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 154, 10, 5574, 154, 30, 5594), SD4, "MutableStringDict"), [list: a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 154, 31, 5595, 154, 45, 5609), a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 154, 31, 5595, 154, 37, 5601), Option71), [list: a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 154, 38, 5602, 154, 44, 5608), $type$Number)])]), none), "atom#type-name-to-variants#186", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 155, 4, 5616, 155, 68, 5680)), vb-let, type-name-to-variants186, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 155, 29, 5641, 155, 68, 5680), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 155, 29, 5641, 155, 49, 5661), SD4, "MutableStringDict"), [list: a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 155, 50, 5662, 155, 67, 5679), a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 155, 50, 5662, 155, 54, 5666), List63), [list: a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 155, 55, 5667, 155, 66, 5678), AA6, "AVariant")])]), none), "atom#alias-to-type-name#187", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 156, 4, 5686, 156, 54, 5736)), vb-let, alias-to-type-name187, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 156, 26, 5708, 156, 54, 5736), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 156, 26, 5708, 156, 46, 5728), SD4, "MutableStringDict"), [list: a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 156, 47, 5729, 156, 53, 5735), $type$String)]), none), "atom#default-ret#188", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 157, 2, 5741, 157, 20, 5759)), vb-let, default-ret188, a-blank, none), "atom#$underscore#189", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 159, 15, 5807, 159, 16, 5808)), vb-let, $underscore189, a-blank, none), "atom#answer#190", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 159, 18, 5810, 159, 24, 5816)), vb-let, answer190, a-blank, none), "atom#dv#191", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 159, 26, 5818, 159, 28, 5820)), vb-let, dv191, a-blank, none), "atom#dt#192", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 159, 30, 5822, 159, 32, 5824)), vb-let, dt192, a-blank, none), "atom#provides#193", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 159, 34, 5826, 159, 42, 5834)), vb-let, provides193, a-blank, none), "atom#types#194", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 159, 44, 5836, 159, 49, 5841)), vb-let, types194, a-blank, none), "atom#checks#195", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 159, 51, 5843, 159, 57, 5849)), vb-let, checks195, a-blank, none), "atom#$underscore#196", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 161, 11, 5883, 161, 12, 5884)), vb-let, $underscore196, a-blank, none), "atom#c#197", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 161, 14, 5886, 161, 15, 5887)), vb-let, c197, a-blank, none), "atom#t#198", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 161, 17, 5889, 161, 18, 5890)), vb-let, t198, a-blank, none), "atom#e#199", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 161, 20, 5892, 161, 21, 5893)), vb-let, e199, a-blank, none), "atom#$underscore#200", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 168, 15, 6118, 168, 16, 6119)), vb-let, $underscore200, a-blank, none), "atom#id#201", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 168, 18, 6121, 168, 20, 6123)), vb-let, id201, a-blank, none), "atom#value#202", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 168, 22, 6125, 168, 27, 6130)), vb-let, value202, a-blank, none), "atom#val-type#203", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 176, 12, 6390, 176, 71, 6449)), vb-let, val-type203, a-blank, none), "atom#type-name-opt#204", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 182, 10, 6590, 182, 68, 6648)), vb-let, type-name-opt204, a-blank, none), "atom#$underscore#205", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 188, 12, 6806, 188, 13, 6807)), vb-let, $underscore205, a-blank, none), "atom#f#206", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 188, 15, 6809, 188, 16, 6810)), vb-let, f206, a-blank, none), "atom#args#207", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 188, 18, 6812, 188, 22, 6816)), vb-let, args207, a-blank, none), "atom#$underscore#208", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 188, 24, 6818, 188, 25, 6819)), vb-let, $underscore208, a-blank, none), "atom#$underscore#209", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 189, 19, 6855, 189, 20, 6856)), vb-let, $underscore209, a-blank, none), "atom#obj#210", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 189, 22, 6858, 189, 25, 6861)), vb-let, obj210, a-blank, none), "atom#meth#211", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 189, 27, 6863, 189, 31, 6867)), vb-let, meth211, a-blank, none), "atom#args#212", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 189, 33, 6869, 189, 37, 6873)), vb-let, args212, a-blank, none), "atom#$underscore#213", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 190, 17, 6907, 190, 18, 6908)), vb-let, $underscore213, a-blank, none), "atom#f#214", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 190, 20, 6910, 190, 21, 6911)), vb-let, f214, a-blank, none), "atom#args#215", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 190, 23, 6913, 190, 27, 6917)), vb-let, args215, a-blank, none), "atom#$underscore#216", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 191, 12, 6946, 191, 13, 6947)), vb-let, $underscore216, a-blank, none), "atom#ann#217", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 191, 15, 6949, 191, 18, 6952)), vb-let, ann217, a-blank, none), "atom#$underscore#218", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 192, 14, 6983, 192, 15, 6984)), vb-let, $underscore218, a-blank, none), "atom#fields#219", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 192, 17, 6986, 192, 23, 6992)), vb-let, fields219, a-blank, none), "atom#$underscore#220", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 193, 18, 7027, 193, 19, 7028)), vb-let, $underscore220, a-blank, none), "atom#tup#221", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 193, 21, 7030, 193, 24, 7033)), vb-let, tup221, a-blank, none), "atom#index#222", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 193, 26, 7035, 193, 31, 7040)), vb-let, index222, a-blank, none), "atom#$underscore#223", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 194, 12, 7069, 194, 13, 7070)), vb-let, $underscore223, a-blank, none), "atom#fields#224", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 194, 15, 7072, 194, 21, 7078)), vb-let, fields224, a-blank, none), "atom#$underscore#225", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 195, 15, 7110, 195, 16, 7111)), vb-let, $underscore225, a-blank, none), "atom#supe#226", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 195, 18, 7113, 195, 22, 7117)), vb-let, supe226, a-blank, none), "atom#fields#227", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 195, 24, 7119, 195, 30, 7125)), vb-let, fields227, a-blank, none), "atom#$underscore#228", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 196, 15, 7157, 196, 16, 7158)), vb-let, $underscore228, a-blank, none), "atom#supe#229", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 196, 18, 7160, 196, 22, 7164)), vb-let, supe229, a-blank, none), "atom#fields#230", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 196, 24, 7166, 196, 30, 7172)), vb-let, fields230, a-blank, none), "atom#$underscore#231", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 197, 12, 7201, 197, 13, 7202)), vb-let, $underscore231, a-blank, none), "atom#obj#232", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 197, 15, 7204, 197, 18, 7207)), vb-let, obj232, a-blank, none), "atom#field#233", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 197, 20, 7209, 197, 25, 7214)), vb-let, field233, a-blank, none), "atom#$underscore#234", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 198, 14, 7245, 198, 15, 7246)), vb-let, $underscore234, a-blank, none), "atom#obj#235", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 198, 17, 7248, 198, 20, 7251)), vb-let, obj235, a-blank, none), "atom#field#236", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 198, 22, 7253, 198, 27, 7258)), vb-let, field236, a-blank, none), "atom#$underscore#237", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 199, 17, 7292, 199, 18, 7293)), vb-let, $underscore237, a-blank, none), "atom#obj#238", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 199, 20, 7295, 199, 23, 7298)), vb-let, obj238, a-blank, none), "atom#field#239", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 199, 25, 7300, 199, 30, 7305)), vb-let, field239, a-blank, none), "atom#$underscore#240", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 200, 12, 7334, 200, 13, 7335)), vb-let, $underscore240, a-blank, none), "atom#name#241", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 200, 15, 7337, 200, 19, 7341)), vb-let, name241, a-blank, none), "atom#args#242", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 200, 21, 7343, 200, 25, 7347)), vb-let, args242, a-blank, none), "atom#ret#243", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 200, 27, 7349, 200, 30, 7352)), vb-let, ret243, a-blank, none), "atom#body#244", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 200, 32, 7354, 200, 36, 7358)), vb-let, body244, a-blank, none), "atom#$underscore#245", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 201, 15, 7390, 201, 16, 7391)), vb-let, $underscore245, a-blank, none), "atom#name#246", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 201, 18, 7393, 201, 22, 7397)), vb-let, name246, a-blank, none), "atom#args#247", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 201, 24, 7399, 201, 28, 7403)), vb-let, args247, a-blank, none), "atom#ret#248", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 201, 30, 7405, 201, 33, 7408)), vb-let, ret248, a-blank, none), "atom#body#249", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 201, 35, 7410, 201, 39, 7414)), vb-let, body249, a-blank, none), "atom#$underscore#250", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 202, 15, 7446, 202, 16, 7447)), vb-let, $underscore250, a-blank, none), "atom#id#251", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 202, 18, 7449, 202, 20, 7451)), vb-let, id251, a-blank, none), "atom#$underscore#252", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 203, 18, 7486, 203, 19, 7487)), vb-let, $underscore252, a-blank, none), "atom#id#253", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 203, 21, 7489, 203, 23, 7491)), vb-let, id253, a-blank, none), "atom#safe#254", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 203, 25, 7493, 203, 29, 7497)), vb-let, safe254, a-blank, none), "atom#$underscore#255", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 204, 23, 7537, 204, 24, 7538)), vb-let, $underscore255, a-blank, none), "atom#id#256", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 204, 26, 7540, 204, 28, 7542)), vb-let, id256, a-blank, none), "atom#$underscore#257", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 205, 12, 7571, 205, 13, 7572)), vb-let, $underscore257, a-blank, none), "atom#v#258", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 205, 15, 7574, 205, 16, 7575)), vb-let, v258, a-blank, none), "atom#l#259", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 206, 18, 7610, 206, 19, 7611)), vb-let, l259, a-blank, none), "atom#name#260", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 206, 21, 7613, 206, 25, 7617)), vb-let, name260, a-blank, none), "atom#namet#261", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 206, 27, 7619, 206, 32, 7624)), vb-let, namet261, a-blank, none), "atom#vars#262", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 206, 34, 7626, 206, 38, 7630)), vb-let, vars262, a-blank, none), "atom#shared#263", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 206, 40, 7632, 206, 46, 7638)), vb-let, shared263, a-blank, none), "atom#$underscore#264", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 207, 14, 7669, 207, 15, 7670)), vb-let, $underscore264, a-blank, none), "atom#typ#265", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 207, 17, 7672, 207, 20, 7675)), vb-let, typ265, a-blank, none), "atom#val#266", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 207, 22, 7677, 207, 25, 7680)), vb-let, val266, a-blank, none), "atom#branches#267", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 207, 27, 7682, 207, 35, 7690)), vb-let, branches267, a-blank, none), "atom#els#268", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 207, 37, 7692, 207, 40, 7695)), vb-let, els268, a-blank, none), "atom#visit-branch#269", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 208, 8, 7715, 211, 11, 7869)), vb-let, visit-branch269, a-blank, none), "atom#case-branch#270", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 208, 27, 7734, 208, 38, 7745)), vb-let, case-branch270, a-blank, none), "atom#ann#271", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 220, 19, 8041, 220, 22, 8044)), vb-let, ann271, a-blank, none), "atom#field-a#272", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 222, 49, 8135, 222, 56, 8142)), vb-let, field-a272, a-blank, none), "atom#aexpr#273", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 227, 4, 8353, 227, 21, 8370)), vb-let, aexpr273, a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 227, 13, 8362, 227, 21, 8370), AA6, "AExpr"), none), "atom#sd#274", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 228, 4, 8376, 228, 46, 8418)), vb-let, sd274, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 228, 10, 8382, 228, 46, 8418), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 228, 10, 8382, 228, 30, 8402), SD4, "MutableStringDict"), [list: a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 228, 31, 8403, 228, 45, 8417), a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 228, 31, 8403, 228, 37, 8409), Option71), [list: a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 228, 38, 8410, 228, 44, 8416), $type$Number)])]), none), "atom#ad#275", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 229, 4, 8424, 229, 46, 8466)), vb-let, ad275, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 229, 10, 8430, 229, 46, 8466), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 229, 10, 8430, 229, 30, 8450), SD4, "MutableStringDict"), [list: a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 229, 31, 8451, 229, 45, 8465), a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 229, 31, 8451, 229, 37, 8457), Option71), [list: a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 229, 38, 8458, 229, 44, 8464), $type$Number)])]), none), "atom#$underscore#276", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 231, 17, 8535, 231, 18, 8536)), vb-let, $underscore276, a-blank, none), "atom#bind#277", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 231, 20, 8538, 231, 24, 8542)), vb-let, bind277, a-blank, none), "atom#body#278", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 231, 26, 8544, 231, 30, 8548)), vb-let, body278, a-blank, none), "atom#$underscore#279", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 233, 12, 8608, 233, 13, 8609)), vb-let, $underscore279, a-blank, none), "atom#bind#280", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 233, 15, 8611, 233, 19, 8615)), vb-let, bind280, a-blank, none), "atom#val#281", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 233, 21, 8617, 233, 24, 8620)), vb-let, val281, a-blank, none), "atom#body#282", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 233, 26, 8622, 233, 30, 8626)), vb-let, body282, a-blank, none), "atom#val-flatness#283", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 235, 6, 8638, 266, 9, 9786)), vb-let, val-flatness283, a-blank, none), "atom#has-nontrivial-arg-ann#284", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 236, 8, 8688, 238, 11, 8797)), vb-let, has-nontrivial-arg-ann284, a-blank, none), "atom#elt#285", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 236, 47, 8727, 236, 64, 8744)), vb-let, elt285, a-blank, none), "atom#has-nontrivial-ann#286", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 239, 8, 8806, 239, 83, 8881)), vb-let, has-nontrivial-ann286, a-blank, none), "atom#lam-flatness#287", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 241, 8, 8891, 245, 11, 9026)), vb-let, lam-flatness287, a-blank, none), "atom#known-flatness-opt#288", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 255, 10, 9389, 255, 55, 9434)), vb-let, known-flatness-opt288, a-blank, none), "atom#flatness#289", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 257, 19, 9499, 257, 27, 9507)), vb-let, flatness289, a-blank, none), "atom#body-flatness#290", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 269, 6, 9835, 269, 58, 9887)), vb-let, body-flatness290, a-blank, none), "atom#ann-f#291", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 271, 6, 9895, 271, 44, 9933)), vb-let, ann-f291, a-blank, none), "atom#$underscore#292", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 274, 16, 10020, 274, 17, 10021)), vb-let, $underscore292, a-blank, none), "atom#bind#293", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 274, 19, 10023, 274, 23, 10027)), vb-let, bind293, a-blank, none), "atom#idx#294", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 274, 25, 10029, 274, 28, 10032)), vb-let, idx294, a-blank, none), "atom#e#295", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 274, 30, 10034, 274, 31, 10035)), vb-let, e295, a-blank, none), "atom#body#296", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 274, 33, 10037, 274, 37, 10041)), vb-let, body296, a-blank, none), "atom#$underscore#297", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 280, 12, 10412, 280, 13, 10413)), vb-let, $underscore297, a-blank, none), "atom#bind#298", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 280, 15, 10415, 280, 19, 10419)), vb-let, bind298, a-blank, none), "atom#val#299", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 280, 21, 10421, 280, 24, 10424)), vb-let, val299, a-blank, none), "atom#body#300", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 280, 26, 10426, 280, 30, 10430)), vb-let, body300, a-blank, none), "atom#$underscore#301", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 283, 12, 10591, 283, 13, 10592)), vb-let, $underscore301, a-blank, none), "atom#lettable#302", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 283, 15, 10594, 283, 23, 10602)), vb-let, lettable302, a-blank, none), "atom#expr#303", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 283, 25, 10604, 283, 29, 10608)), vb-let, expr303, a-blank, none), "atom#a-flatness#304", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 284, 6, 10619, 284, 63, 10676)), vb-let, a-flatness304, a-blank, none), "atom#b-flatness#305", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 285, 6, 10683, 285, 55, 10732)), vb-let, b-flatness305, a-blank, none), "atom#$underscore#306", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 287, 17, 10793, 287, 18, 10794)), vb-let, $underscore306, a-blank, none), "atom#l#307", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 287, 20, 10796, 287, 21, 10797)), vb-let, l307, a-blank, none), "atom#function-name#308", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 292, 26, 10883, 292, 49, 10906)), vb-let, function-name308, a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 292, 43, 10900, 292, 49, 10906), $type$String), none), "atom#sd#309", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 292, 51, 10908, 292, 93, 10950)), vb-let, sd309, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 292, 57, 10914, 292, 93, 10950), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 292, 57, 10914, 292, 77, 10934), SD4, "MutableStringDict"), [list: a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 292, 78, 10935, 292, 92, 10949), a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 292, 78, 10935, 292, 84, 10941), Option71), [list: a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 292, 85, 10942, 292, 91, 10948), $type$Number)])]), none), "atom#flatness#310", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 296, 13, 11148, 296, 21, 11156)), vb-let, flatness310, a-blank, none), "atom#lettable#311", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 305, 4, 11273, 305, 28, 11297)), vb-let, lettable311, a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 305, 16, 11285, 305, 28, 11297), AA6, "ALettable"), none), "atom#sd#312", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 306, 4, 11303, 306, 46, 11345)), vb-let, sd312, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 306, 10, 11309, 306, 46, 11345), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 306, 10, 11309, 306, 30, 11329), SD4, "MutableStringDict"), [list: a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 306, 31, 11330, 306, 45, 11344), a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 306, 31, 11330, 306, 37, 11336), Option71), [list: a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 306, 38, 11337, 306, 44, 11343), $type$Number)])]), none), "atom#ad#313", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 307, 4, 11351, 307, 46, 11393)), vb-let, ad313, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 307, 10, 11357, 307, 46, 11393), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 307, 10, 11357, 307, 30, 11377), SD4, "MutableStringDict"), [list: a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 307, 31, 11378, 307, 45, 11392), a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 307, 31, 11378, 307, 37, 11384), Option71), [list: a-name(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 307, 38, 11385, 307, 44, 11391), $type$Number)])]), none), "atom#default-ret#314", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 308, 2, 11416, 308, 23, 11437)), vb-let, default-ret314, a-blank, none), "atom#$underscore#315", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 310, 15, 11485, 310, 16, 11486)), vb-let, $underscore315, a-blank, none), "atom#answer#316", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 310, 18, 11488, 310, 24, 11494)), vb-let, answer316, a-blank, none), "atom#dv#317", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 310, 26, 11496, 310, 28, 11498)), vb-let, dv317, a-blank, none), "atom#dt#318", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 310, 30, 11500, 310, 32, 11502)), vb-let, dt318, a-blank, none), "atom#provides#319", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 310, 34, 11504, 310, 42, 11512)), vb-let, provides319, a-blank, none), "atom#types#320", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 310, 44, 11514, 310, 49, 11519)), vb-let, types320, a-blank, none), "atom#checks#321", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 310, 51, 11521, 310, 57, 11527)), vb-let, checks321, a-blank, none), "atom#$underscore#322", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 312, 11, 11561, 312, 12, 11562)), vb-let, $underscore322, a-blank, none), "atom#c#323", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 312, 14, 11564, 312, 15, 11565)), vb-let, c323, a-blank, none), "atom#t#324", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 312, 17, 11567, 312, 18, 11568)), vb-let, t324, a-blank, none), "atom#e#325", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 312, 20, 11570, 312, 21, 11571)), vb-let, e325, a-blank, none), "atom#$underscore#326", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 316, 15, 11748, 316, 16, 11749)), vb-let, $underscore326, a-blank, none), "atom#id#327", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 316, 18, 11751, 316, 20, 11753)), vb-let, id327, a-blank, none), "atom#value#328", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 316, 22, 11755, 316, 27, 11760)), vb-let, value328, a-blank, none), "atom#$underscore#329", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 324, 12, 12029, 324, 13, 12030)), vb-let, $underscore329, a-blank, none), "atom#f#330", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 324, 15, 12032, 324, 16, 12033)), vb-let, f330, a-blank, none), "atom#args#331", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 324, 18, 12035, 324, 22, 12039)), vb-let, args331, a-blank, none), "atom#$underscore#332", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 324, 24, 12041, 324, 25, 12042)), vb-let, $underscore332, a-blank, none), "atom#$underscore#333", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 333, 19, 12392, 333, 20, 12393)), vb-let, $underscore333, a-blank, none), "atom#obj#334", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 333, 22, 12395, 333, 25, 12398)), vb-let, obj334, a-blank, none), "atom#meth#335", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 333, 27, 12400, 333, 31, 12404)), vb-let, meth335, a-blank, none), "atom#args#336", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 333, 33, 12406, 333, 37, 12410)), vb-let, args336, a-blank, none), "atom#$underscore#337", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 336, 17, 12494, 336, 18, 12495)), vb-let, $underscore337, a-blank, none), "atom#f#338", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 336, 20, 12497, 336, 21, 12498)), vb-let, f338, a-blank, none), "atom#args#339", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 336, 23, 12500, 336, 27, 12504)), vb-let, args339, a-blank, none), "atom#$underscore#340", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 338, 15, 12554, 338, 16, 12555)), vb-let, $underscore340, a-blank, none), "atom#supe#341", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 338, 18, 12557, 338, 22, 12561)), vb-let, supe341, a-blank, none), "atom#fields#342", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 338, 24, 12563, 338, 30, 12569)), vb-let, fields342, a-blank, none), "atom#$underscore#343", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 342, 12, 12728, 342, 13, 12729)), vb-let, $underscore343, a-blank, none), "atom#ann#344", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 342, 15, 12731, 342, 18, 12734)), vb-let, ann344, a-blank, none), "atom#$underscore#345", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 343, 14, 12765, 343, 15, 12766)), vb-let, $underscore345, a-blank, none), "atom#fields#346", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 343, 17, 12768, 343, 23, 12774)), vb-let, fields346, a-blank, none), "atom#$underscore#347", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 344, 18, 12809, 344, 19, 12810)), vb-let, $underscore347, a-blank, none), "atom#tup#348", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 344, 21, 12812, 344, 24, 12815)), vb-let, tup348, a-blank, none), "atom#index#349", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 344, 26, 12817, 344, 31, 12822)), vb-let, index349, a-blank, none), "atom#$underscore#350", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 345, 12, 12851, 345, 13, 12852)), vb-let, $underscore350, a-blank, none), "atom#fields#351", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 345, 15, 12854, 345, 21, 12860)), vb-let, fields351, a-blank, none), "atom#$underscore#352", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 347, 15, 12893, 347, 16, 12894)), vb-let, $underscore352, a-blank, none), "atom#supe#353", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 347, 18, 12896, 347, 22, 12900)), vb-let, supe353, a-blank, none), "atom#fields#354", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 347, 24, 12902, 347, 30, 12908)), vb-let, fields354, a-blank, none), "atom#$underscore#355", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 348, 12, 12937, 348, 13, 12938)), vb-let, $underscore355, a-blank, none), "atom#obj#356", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 348, 15, 12940, 348, 18, 12943)), vb-let, obj356, a-blank, none), "atom#field#357", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 348, 20, 12945, 348, 25, 12950)), vb-let, field357, a-blank, none), "atom#$underscore#358", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 349, 14, 12981, 349, 15, 12982)), vb-let, $underscore358, a-blank, none), "atom#obj#359", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 349, 17, 12984, 349, 20, 12987)), vb-let, obj359, a-blank, none), "atom#field#360", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 349, 22, 12989, 349, 27, 12994)), vb-let, field360, a-blank, none), "atom#$underscore#361", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 350, 17, 13028, 350, 18, 13029)), vb-let, $underscore361, a-blank, none), "atom#obj#362", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 350, 20, 13031, 350, 23, 13034)), vb-let, obj362, a-blank, none), "atom#field#363", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 350, 25, 13036, 350, 30, 13041)), vb-let, field363, a-blank, none), "atom#$underscore#364", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 351, 12, 13070, 351, 13, 13071)), vb-let, $underscore364, a-blank, none), "atom#name#365", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 351, 15, 13073, 351, 19, 13077)), vb-let, name365, a-blank, none), "atom#args#366", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 351, 21, 13079, 351, 25, 13083)), vb-let, args366, a-blank, none), "atom#ret#367", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 351, 27, 13085, 351, 30, 13088)), vb-let, ret367, a-blank, none), "atom#body#368", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 351, 32, 13090, 351, 36, 13094)), vb-let, body368, a-blank, none), "atom#$underscore#369", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 352, 15, 13126, 352, 16, 13127)), vb-let, $underscore369, a-blank, none), "atom#name#370", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 352, 18, 13129, 352, 22, 13133)), vb-let, name370, a-blank, none), "atom#args#371", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 352, 24, 13135, 352, 28, 13139)), vb-let, args371, a-blank, none), "atom#ret#372", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 352, 30, 13141, 352, 33, 13144)), vb-let, ret372, a-blank, none), "atom#body#373", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 352, 35, 13146, 352, 39, 13150)), vb-let, body373, a-blank, none), "atom#$underscore#374", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 353, 15, 13182, 353, 16, 13183)), vb-let, $underscore374, a-blank, none), "atom#id#375", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 353, 18, 13185, 353, 20, 13187)), vb-let, id375, a-blank, none), "atom#$underscore#376", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 354, 18, 13222, 354, 19, 13223)), vb-let, $underscore376, a-blank, none), "atom#id#377", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 354, 21, 13225, 354, 23, 13227)), vb-let, id377, a-blank, none), "atom#safe#378", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 354, 25, 13229, 354, 29, 13233)), vb-let, safe378, a-blank, none), "atom#$underscore#379", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 355, 23, 13273, 355, 24, 13274)), vb-let, $underscore379, a-blank, none), "atom#id#380", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 355, 26, 13276, 355, 28, 13278)), vb-let, id380, a-blank, none), "atom#$underscore#381", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 356, 12, 13307, 356, 13, 13308)), vb-let, $underscore381, a-blank, none), "atom#v#382", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 356, 15, 13310, 356, 16, 13311)), vb-let, v382, a-blank, none), "atom#l#383", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 357, 18, 13346, 357, 19, 13347)), vb-let, l383, a-blank, none), "atom#name#384", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 357, 21, 13349, 357, 25, 13353)), vb-let, name384, a-blank, none), "atom#namet#385", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 357, 27, 13355, 357, 32, 13360)), vb-let, namet385, a-blank, none), "atom#vars#386", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 357, 34, 13362, 357, 38, 13366)), vb-let, vars386, a-blank, none), "atom#shared#387", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 357, 40, 13368, 357, 46, 13374)), vb-let, shared387, a-blank, none), "atom#$underscore#388", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 359, 14, 13469, 359, 15, 13470)), vb-let, $underscore388, a-blank, none), "atom#typ#389", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 359, 17, 13472, 359, 20, 13475)), vb-let, typ389, a-blank, none), "atom#val#390", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 359, 22, 13477, 359, 25, 13480)), vb-let, val390, a-blank, none), "atom#branches#391", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 359, 27, 13482, 359, 35, 13490)), vb-let, branches391, a-blank, none), "atom#els#392", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 359, 37, 13492, 359, 40, 13495)), vb-let, els392, a-blank, none), "atom#combine#393", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 361, 6, 13573, 364, 9, 13743)), vb-let, combine393, a-blank, none), "atom#case-branch#394", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 361, 20, 13587, 361, 31, 13598)), vb-let, case-branch394, a-blank, none), "atom#max-flat#395", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 361, 33, 13600, 361, 41, 13608)), vb-let, max-flat395, a-blank, none), "atom#branch-flatness#396", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 362, 8, 13619, 362, 74, 13685)), vb-let, branch-flatness396, a-blank, none), "atom#max-flat#397", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 365, 6, 13750, 365, 49, 13793)), vb-let, max-flat397, a-blank, none), "atom#else-flat#398", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 367, 6, 13801, 367, 53, 13848)), vb-let, else-flat398, a-blank, none), "atom#typ-flat#399", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 368, 6, 13855, 368, 42, 13891)), vb-let, typ-flat399, a-blank, none), "atom#anfed#400", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 373, 27, 13994, 373, 44, 14011)), vb-let, anfed400, a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 373, 36, 14003, 373, 44, 14011), AA6, "AProg"), none), "atom#bindings#401", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 373, 46, 14013, 373, 91, 14058)), vb-let, bindings401, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 373, 58, 14025, 373, 91, 14058), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 373, 58, 14025, 373, 78, 14045), SD4, "MutableStringDict"), [list: a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 373, 79, 14046, 373, 90, 14057), C10, "ValueBind")]), none), "atom#type-bindings#402", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 373, 93, 14060, 373, 142, 14109)), vb-let, type-bindings402, a-app(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 373, 110, 14077, 373, 142, 14109), a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 373, 110, 14077, 373, 130, 14097), SD4, "MutableStringDict"), [list: a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 373, 131, 14098, 373, 141, 14108), C10, "TypeBind")]), none), "atom#env#403", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 373, 144, 14111, 373, 171, 14138)), vb-let, env403, a-dot(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 373, 151, 14118, 373, 171, 14138), C10, "CompileEnvironment"), none), "atom#sd#404", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 376, 2, 14228, 376, 36, 14262)), vb-let, sd404, a-blank, none), "atom#k#405", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 377, 22, 14285, 377, 37, 14300)), vb-let, k405, a-blank, none), "atom#vb#406", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 378, 4, 14307, 378, 34, 14337)), vb-let, vb406, a-blank, none), "atom#name#407", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 383, 12, 14490, 383, 35, 14513)), vb-let, name407, a-blank, none), "atom#dep#408", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 384, 12, 14526, 384, 52, 14566)), vb-let, dep408, a-blank, none), "atom#provides-opt#409", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 385, 12, 14579, 385, 44, 14611)), vb-let, provides-opt409, a-blank, none), "atom#provides#410", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 388, 21, 14706, 388, 29, 14714)), vb-let, provides410, a-blank, none), "atom#ve#411", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 389, 16, 14735, 389, 52, 14771)), vb-let, ve411, a-blank, none), "atom#$underscore#412", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 391, 26, 14839, 391, 27, 14840)), vb-let, $underscore412, a-blank, none), "atom#$underscore#413", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 391, 29, 14842, 391, 30, 14843)), vb-let, $underscore413, a-blank, none), "atom#flatness#414", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 391, 32, 14845, 391, 40, 14853)), vb-let, flatness414, a-blank, none), "atom#import-type#415", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 396, 15, 14995, 396, 26, 15006)), vb-let, import-type415, a-blank, none), "atom#dep#416", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 397, 10, 15021, 397, 51, 15062)), vb-let, dep416, a-blank, none), "atom#provides#417", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 400, 19, 15258, 400, 27, 15266)), vb-let, provides417, a-blank, none), "atom#exported-as#418", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 401, 14, 15285, 401, 44, 15315)), vb-let, exported-as418, a-blank, none), "atom#value-export#419", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 402, 14, 15330, 402, 67, 15383)), vb-let, value-export419, a-blank, none), "atom#$underscore#420", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 404, 24, 15457, 404, 25, 15458)), vb-let, $underscore420, a-blank, none), "atom#$underscore#421", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 404, 27, 15460, 404, 28, 15461)), vb-let, $underscore421, a-blank, none), "atom#flatness#422", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 404, 30, 15463, 404, 38, 15471)), vb-let, flatness422, a-blank, none), "atom#ad#423", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 415, 2, 15630, 415, 36, 15664)), vb-let, ad423, a-blank, none), "atom#init-type-provides#424", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 416, 2, 15705, 424, 5, 15968)), vb-letrec, init-type-provides424, a-blank, none), "atom#provides#425", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 416, 25, 15728, 416, 33, 15736)), vb-let, provides425, a-blank, none), "atom#tb#426", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 416, 35, 15738, 416, 37, 15740)), vb-let, tb426, a-blank, none), "atom#name#427", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 417, 4, 15753, 417, 27, 15776)), vb-let, name427, a-blank, none), "atom#k#428", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 426, 22, 16049, 426, 42, 16069)), vb-let, k428, a-blank, none), "atom#tb#429", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 427, 4, 16076, 427, 39, 16111)), vb-let, tb429, a-blank, none), "atom#name#430", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 432, 12, 16269, 432, 35, 16292)), vb-let, name430, a-blank, none), "atom#dep#431", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 433, 12, 16305, 433, 51, 16344)), vb-let, dep431, a-blank, none), "atom#provides-opt#432", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 434, 12, 16357, 434, 44, 16389)), vb-let, provides-opt432, a-blank, none), "atom#provides#433", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 437, 21, 16484, 437, 29, 16492)), vb-let, provides433, a-blank, none), "atom#import-type#434", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 441, 15, 16591, 441, 26, 16602)), vb-let, import-type434, a-blank, none), "atom#dep#435", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 442, 10, 16617, 442, 51, 16658)), vb-let, dep435, a-blank, none), "atom#provides#436", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 445, 19, 16859, 445, 27, 16867)), vb-let, provides436, a-blank, none), "atom#flatness-env#437", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 454, 2, 17020, 468, 5, 17622)), vb-let, flatness-env437, a-blank, none), "atom#$underscore#438", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 455, 16, 17074, 455, 17, 17075)), vb-let, $underscore438, a-blank, none), "atom#prov#439", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 455, 19, 17077, 455, 23, 17081)), vb-let, prov439, a-blank, none), "atom#imports#440", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 455, 25, 17083, 455, 32, 17090)), vb-let, imports440, a-blank, none), "atom#body#441", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 455, 34, 17092, 455, 38, 17096)), vb-let, body441, a-blank, none), "atom#ast#442", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 474, 23, 17735, 474, 26, 17738)), vb-let, ast442, a-blank, none), "atom#help#443", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 475, 2, 17743, 490, 5, 18185)), vb-letrec, help443, a-blank, none), "atom#ae#444", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 475, 11, 17752, 475, 13, 17754)), vb-let, ae444, a-blank, none), "atom#$underscore#445", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 477, 19, 17800, 477, 20, 17801)), vb-let, $underscore445, a-blank, none), "atom#$underscore#446", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 477, 22, 17803, 477, 23, 17804)), vb-let, $underscore446, a-blank, none), "atom#body#447", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 477, 25, 17806, 477, 29, 17810)), vb-let, body447, a-blank, none), "atom#$underscore#448", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 478, 14, 17840, 478, 15, 17841)), vb-let, $underscore448, a-blank, none), "atom#$underscore#449", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 478, 17, 17843, 478, 18, 17844)), vb-let, $underscore449, a-blank, none), "atom#$underscore#450", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 478, 20, 17846, 478, 21, 17847)), vb-let, $underscore450, a-blank, none), "atom#body#451", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 478, 23, 17849, 478, 27, 17853)), vb-let, body451, a-blank, none), "atom#$underscore#452", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 479, 18, 17887, 479, 19, 17888)), vb-let, $underscore452, a-blank, none), "atom#$underscore#453", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 479, 21, 17890, 479, 22, 17891)), vb-let, $underscore453, a-blank, none), "atom#$underscore#454", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 479, 24, 17893, 479, 25, 17894)), vb-let, $underscore454, a-blank, none), "atom#$underscore#455", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 479, 27, 17896, 479, 28, 17897)), vb-let, $underscore455, a-blank, none), "atom#body#456", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 479, 30, 17899, 479, 34, 17903)), vb-let, body456, a-blank, none), "atom#$underscore#457", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 480, 14, 17933, 480, 15, 17934)), vb-let, $underscore457, a-blank, none), "atom#$underscore#458", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 480, 17, 17936, 480, 18, 17937)), vb-let, $underscore458, a-blank, none), "atom#$underscore#459", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 480, 20, 17939, 480, 21, 17940)), vb-let, $underscore459, a-blank, none), "atom#body#460", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 480, 23, 17942, 480, 27, 17946)), vb-let, body460, a-blank, none), "atom#$underscore#461", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 481, 14, 17976, 481, 15, 17977)), vb-let, $underscore461, a-blank, none), "atom#$underscore#462", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 481, 17, 17979, 481, 18, 17980)), vb-let, $underscore462, a-blank, none), "atom#e2#463", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 481, 20, 17982, 481, 22, 17984)), vb-let, e2463, a-blank, none), "atom#$underscore#464", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 482, 19, 18017, 482, 20, 18018)), vb-let, $underscore464, a-blank, none), "atom#e#465", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 482, 22, 18020, 482, 23, 18021)), vb-let, e465, a-blank, none), "atom#the-module#466", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 492, 2, 18189, 492, 29, 18216)), vb-let, the-module466, a-blank, none), "atom#the-dvs#467", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 493, 2, 18219, 493, 37, 18254)), vb-let, the-dvs467, a-blank, none), "atom#dvs-dict#468", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 495, 2, 18258, 500, 5, 18486)), vb-let, dvs-dict468, a-blank, none), "atom#s#469", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 495, 22, 18278, 495, 46, 18302)), vb-let, s469, a-blank, none), "atom#d#470", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 495, 48, 18304, 495, 62, 18318)), vb-let, d470, a-blank, none), "atom#name#471", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 497, 24, 18376, 497, 28, 18380)), vb-let, name471, a-blank, none), "atom#val#472", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 497, 30, 18382, 497, 33, 18385)), vb-let, val472, a-blank, none), "atom#name#473", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 498, 22, 18438, 498, 26, 18442)), vb-let, name473, a-blank, none), "atom#id#474", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 498, 28, 18444, 498, 30, 18446)), vb-let, id474, a-blank, none), "atom#provides#475", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 505, 22, 18526, 505, 30, 18534)), vb-let, provides475, a-blank, none), "atom#flatness-env#476", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 505, 32, 18536, 505, 44, 18548)), vb-let, flatness-env476, a-blank, none), "atom#ast#477", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 505, 46, 18550, 505, 49, 18553)), vb-let, ast477, a-blank, none), "atom#dvs-dict#478", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 506, 2, 18564, 506, 36, 18598)), vb-let, dvs-dict478, a-blank, none), "atom#uri#479", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 508, 15, 18650, 508, 18, 18653)), vb-let, uri479, a-blank, none), "atom#values#480", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 508, 20, 18655, 508, 26, 18661)), vb-let, values480, a-blank, none), "atom#aliases#481", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 508, 28, 18663, 508, 35, 18670)), vb-let, aliases481, a-blank, none), "atom#datatypes#482", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 508, 37, 18672, 508, 46, 18681)), vb-let, datatypes482, a-blank, none), "atom#new-values#483", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 509, 6, 18692, 518, 9, 19093)), vb-let, new-values483, a-blank, none), "atom#s#484", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 509, 36, 18722, 509, 60, 18746)), vb-let, s484, a-blank, none), "atom#k#485", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 509, 62, 18748, 509, 75, 18761)), vb-let, k485, a-blank, none), "atom#maybe-flatness#486", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 510, 8, 18772, 510, 64, 18828)), vb-let, maybe-flatness486, a-blank, none), "atom#existing-val#487", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 511, 8, 18837, 511, 42, 18871)), vb-let, existing-val487, a-blank, none), "atom#new-val#488", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 512, 8, 18880, 516, 11, 19057)), vb-let, new-val488, a-blank, none), "atom#flatness-result#489", value-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 514, 17, 18970, 514, 32, 18985)), vb-let, flatness-result489, a-blank, none)] The bindings: [mutable-string-dict: "tglobal#NumNonPositive", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$NumNonPositive, none), "tglobal#Method", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$Method, none), "tglobal#Exactnum", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$Exactnum, none), "tglobal#Boolean", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$Boolean, none), "tglobal#Number", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$Number, none), "tglobal#Roughnum", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$Roughnum, none), "tglobal#Nothing", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$Nothing, none), "tglobal#Table", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$Table, none), "tglobal#String", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$String, none), "tglobal#RawArray", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$RawArray, none), "tglobal#NumRational", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$NumRational, none), "tglobal#NumInteger", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$NumInteger, none), "tglobal#Function", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$Function, none), "tglobal#NumNegative", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$NumNegative, none), "tglobal#NumNonNegative", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$NumNonNegative, none), "tglobal#Object", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$Object, none), "tglobal#NumPositive", type-bind(bo-module(none, "builtin://global"), tb-type-let, $type$NumPositive, none), "atom#A#2", type-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 4, 14, 41, 4, 15, 42)), tb-module("builtin://ast"), A2, none), "atom#SD#4", type-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 5, 22, 65, 5, 24, 67)), tb-module("builtin://string-dict"), SD4, none), "atom#AA#6", type-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 7, 30, 99, 7, 32, 101)), tb-module("file:///Users/joe/src/pyret-lang/src/arr/compiler/ast-anf.arr"), AA6, none), "atom#AU#8", type-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 8, 31, 133, 8, 33, 135)), tb-module("file:///Users/joe/src/pyret-lang/src/arr/compiler/ast-util.arr"), AU8, none), "atom#C#10", type-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 9, 38, 174, 9, 39, 175)), tb-module("file:///Users/joe/src/pyret-lang/src/arr/compiler/compile-structs.arr"), C10, none), "atom#$global#12", type-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), tb-module("builtin://global"), $global12, none), "atom#$base#14", type-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), tb-module("builtin://base"), $base14, none), "atom#arrays#16", type-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), tb-module("builtin://arrays"), arrays16, none), "atom#Array#26", type-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "arrays")), "builtin://arrays"), tb-type-let, Array26, none), "atom#lists#28", type-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), tb-module("builtin://lists"), lists28, none), "atom#List#63", type-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "lists")), "builtin://lists"), tb-type-let, List63, none), "atom#option#65", type-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), tb-module("builtin://option"), option65, none), "atom#Option#71", type-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "option")), "builtin://option"), tb-type-let, Option71, none), "atom#error#73", type-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), tb-module("builtin://error"), error73, none), "atom#sets#75", type-bind(bo-local(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157)), tb-module("builtin://sets"), sets75, none), "atom#Set#85", type-bind(bo-module(some(s-const-import(srcloc("file:///Users/joe/src/pyret-lang/src/arr/compiler/flatness.arr", 1, 0, 0, 521, 3, 19157), "sets")), "builtin://sets"), tb-type-let, Set85, none)] The type/ann environment: [mutable-string-dict: "tglobal#NumNonPositive", none, "tglobal#Method", none, "tglobal#Exactnum", none, "tglobal#Boolean", some(0), "tglobal#Number", some(0), "tglobal#Roughnum", none, "tglobal#Nothing", some(0), "tglobal#Table", some(0), "tglobal#String", some(0), "tglobal#RawArray", some(0), "tglobal#NumRational", none, "tglobal#NumInteger", none, "tglobal#Function", none, "tglobal#NumNegative", none, "tglobal#NumNonNegative", none, "tglobal#Object", none, "tglobal#NumPositive", none, "atom#Array#26", none, "atom#List#63", none, "atom#Option#71", none, "atom#Set#85", none] 69/69 modules compiled (flatness.arr) Cleaning up and generating standalone... /Users/joe/src/pyret-lang